Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: PSUOP6

Package: Pharmacy Benefits Management

Routine: PSUOP6


Information

PSUOP6 ;BIR/REG - PSU PBM Outpatient Pharmacy Printer Output ;10 JUL 1999

Source Information

Source file <PSUOP6.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
Pharmacy Benefits Management 3 PULL^PSUCP  IVSUM^PSUDEM0  $$VAL^PSUTL  
VA Fileman 2 (,IX)^DIC  DT^DILF  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Pharmacy Benefits Management 3 PSUOP0  PSUOP3  PSUOP4  

Entry Points

Name Comments DBIA/ICR reference
PGHDR1 ;AMIS HEADER
PRTAMIS ;Print Amis summary report
PRTDRUG ; Print the Drug summary by Drug by Division/Facility
; Set page number to 0
PRTSUMS ;
; Find first Division/Facility in the summary by division
; then DO the PRTALL routine
PRTALL ; Print the Drug summary of all drugs by Division/Facility
DIVNM ;S PSUDIVNM FROM FILE 40.8 IF NOT IN FILE 59
PRTSUMX ; EXIT PSUOP6
EP ;
PGHDR ;Increment page number and Write Page Heading
; Writes header lines 1 & 2, then page number, then lines 3 through 6

External References

Name Field # of Occurrence
^DIC PRTALL+1, PRTDRUG+3
IX^DIC DIVNM+1
DT^DILF EP+2, EP+4
PULL^PSUCP PRTSUMS+17
IVSUM^PSUDEM0 PRTSUMS+24, PRTSUMS+28
$$VAL^PSUTL PRTALL+2, PRTDRUG+4, DIVNM+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PRTSUMX+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PRTALL+6
Function Call: WRITE
  • Prompt: !
  • Line Location: PRTALL+8
Function Call: WRITE
  • Prompt: " for ",PSUDIVNM,!,?72,"Page: 1"
  • Line Location: PRTALL+12
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PRTAMIS+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PGHDR1+1
Function Call: WRITE
  • Prompt: !
  • Line Location: PGHDR1+2
Function Call: WRITE
  • Prompt: ^XTMP("PSU_"_PSUJOB,"OPAMIS",I)
  • Line Location: PGHDR1+3
Function Call: WRITE
  • Prompt: !!,?68,"Page: ",PSUPGS("PG")
  • Line Location: PGHDR1+4
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PGHDR+2
Function Call: WRITE
  • Prompt: !
  • Line Location: PGHDR+3
Function Call: WRITE
  • Prompt: !,^XTMP(PSUOPSUB,"DRUGSUM",PSUFACN,1)
  • Line Location: PGHDR+4
Function Call: WRITE
  • Prompt: " for ",PSUDIVNM
  • Line Location: PGHDR+5
Function Call: WRITE
  • Prompt: !,$P(^XTMP(PSUOPSUB,"DRUGSUM",PSUFACN,2),":",1),": ",PSUPGS("PG"),!
  • Line Location: PGHDR+7
Function Call: WRITE
  • Prompt: !,$G(^XTMP(PSUOPSUB,"DRUGSUM",PSUFACN,PSUH))
  • Line Location: PGHDR+8
Routine Call
  • DIC
  • Line Location:
    • PRTALL+1
    • PRTDRUG+3
Routine Call
  • DIC
  • Line Location:
    • DIVNM+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^XTMP( PRTSUMS+4, PRTSUMS+6*, PRTSUMS+7*, PRTSUMS+8*, PRTSUMS+13, PRTSUMS+34, PRTSUMS+35*, PRTSUMS+36*, PRTSUMS+37*, PRTSUMS+38
, PRTALL+10, PRTALL+11, PRTDRUG+9, PRTDRUG+11, PGHDR+4, PGHDR+7, PGHDR+8
^XTMP("PSU_" PRTSUMS+5*, PRTSUMS+15, PRTAMIS+6, PRTAMIS+8, PGHDR1+3

Label References

Name Line Occurrences
DIVNM PRTALL+4, PRTDRUG+6
PGHDR PRTDRUG+7, PRTDRUG+10
PGHDR1 PRTAMIS+4, PRTAMIS+7
PRTALL PRTSUMS+13
PRTAMIS PRTSUMS+15
PRTDRUG PRTSUMS+38

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> D DIVNM+1*
>> DIC PRTALL+1*, PRTDRUG+3*, DIVNM+1*
>> DIC(0 PRTALL+1*, PRTDRUG+3*, DIVNM+1*
>> EXTD EP+2, EP+4
>> EXTD(0 EP+3, EP+5
>> I PRTSUMS+18*, PRTALL+8*, PGHDR1+2*, PGHDR1+3*, PGHDR+3*
IO EP+6, PRTAMIS+2, PGHDR1+1, PGHDR+2
IOF PRTSUMX+1, PRTALL+6, PRTAMIS+2, PGHDR1+1, PGHDR+2
IOSL PRTDRUG+10, PRTAMIS+7
>> LNCNT PRTAMIS+7, PRTAMIS+9*, PGHDR1+6*
>> PSUDIVNM PRTALL+2*, PRTALL+4, PRTALL+12, PRTDRUG+4*, PRTDRUG+6, PGHDR+5, DIVNM+2*
>> PSUEDT EP+4
>> PSUFACN PRTSUMS+10*, PRTSUMS+13*, PRTSUMS+33*, PRTSUMS+38*, PRTALL+1, PRTALL+4, PRTALL+10, PRTALL+11, PRTDRUG+3, PRTDRUG+6
, PRTDRUG+9, PRTDRUG+11, PGHDR+4, PGHDR+7, PGHDR+8
PSUFIRST PRTSUMS+12~, PRTALL+6, PRTALL+7*
PSUH EP+1~, PGHDR+8*
PSUI EP+1~
>> PSUJOB PRTSUMS+3, PRTSUMS+5, PRTSUMS+15, PRTAMIS+6, PRTAMIS+8, PGHDR1+3
PSUL EP+1~, PRTALL+9*, PRTALL+10*, PRTALL+11, PRTALL+12, PRTDRUG+8*, PRTDRUG+9*, PRTDRUG+11, PRTAMIS+5*, PRTAMIS+6*
, PRTAMIS+8
PSUM EP+1~
>> PSUMOD( PRTSUMS+18*
>> PSUMOD(1 PRTSUMS+24, PRTSUMS+28
>> PSUMOD(2 PRTSUMS+24, PRTSUMS+28
>> PSUOPSUB PRTSUMS+3*, PRTSUMS+4, PRTSUMS+6, PRTSUMS+7, PRTSUMS+8, PRTSUMS+13, PRTSUMS+34, PRTSUMS+35, PRTSUMS+36, PRTSUMS+37
, PRTSUMS+38, PRTALL+10, PRTALL+11, PRTDRUG+9, PRTDRUG+11, PGHDR+4, PGHDR+7, PGHDR+8
>> PSUOPTS PRTSUMS+18
PSUPGS EP+1~
PSUPGS("PG" PRTDRUG+2*, PRTAMIS+3*, PGHDR1+4, PGHDR1+5*, PGHDR+6*, PGHDR+7
>> PSURP("END" EP+5*, PRTSUMS+6, PRTSUMS+35
>> PSURP("START" EP+3*, PRTSUMS+6, PRTSUMS+35
>> PSUSDT EP+2
>> PSUSMRY PRTSUMS+32
>> PSUSNDR PRTSUMS+6, PRTSUMS+7, PRTSUMS+8, PRTSUMS+35, PRTSUMS+36, PRTSUMS+37
>> X PRTALL+1*, PRTALL+2*, PRTALL+4*, PRTDRUG+3*, PRTDRUG+4*, PRTDRUG+6*, DIVNM+2*
>> Y PRTALL+2, PRTDRUG+4, DIVNM+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All