Routine: PSUV5

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

Package	Total	Caller Graph
Pharmacy Benefits Management	1	PSUV0

Entry Points

Name	Comments	DBIA/ICR reference
EN	;EP entry for IV statistical output
PRTSUM	;Print the statistical summary report
PGHDR1	;Print headings for statistical report
PRTAMIS	;Print the IV AMIS Summary report
GETNAME	;Get the facility name
PRTDRUG	;Print the Statistical Drug Report
NOSUM	;Set up no data to report global if there is no statistical data
PGHDR	;
NODRUG	;Set up the no data to report temp global if there is no drug data

Name	Line Occurrences
Function Call: WRITE	Prompt: !,X_" for "_PSUDIVNM Line Location: PRTSUM+6
Function Call: WRITE	Prompt: !!,?68,"Page: 1" Line Location: PRTSUM+7
Function Call: WRITE	Prompt: @IOF Line Location: PGHDR+1
Function Call: WRITE	Prompt: !,^XTMP(PSUIVSUB,"DRUGSUM",PSUFACN,1) Line Location: PGHDR+2
Function Call: WRITE	Prompt: " for ",PSUDIVNM Line Location: PGHDR+3
Function Call: WRITE	Prompt: !!,?68,"Page: ",PSUPGS("PG") Line Location: PGHDR+4
Function Call: WRITE	Prompt: !,$G(^XTMP(PSUIVSUB,"DRUGSUM",PSUFACN,PSUH)) Line Location: PGHDR+6
Function Call: WRITE	Prompt: @IOF Line Location: PGHDR1+2
Function Call: WRITE	Prompt: !,^XTMP("PSU_"_PSUJOB,"IVAMIS",1) Line Location: PGHDR1+3
Function Call: WRITE	Prompt: !!,?68,"Page: ",PSUPGS("PG") Line Location: PGHDR1+4
Function Call: WRITE	Prompt: !,$G(^XTMP("PSU_"_PSUJOB,"IVAMIS",2)) Line Location: PGHDR1+6
Routine Call	DIC Line Location: GETNAME+1

Name	Line Occurrences (* Changed, ! Killed)
^XTMP(	EN+8, PRTSUM+5, PRTSUM+9, PRTSUM+10, PRTDRUG+1, PRTDRUG+5, PRTDRUG+7, PGHDR+2, PGHDR+6, NOSUM+1* , NOSUM+2, NOSUM+3, NODRUG+1, NODRUG+2, NODRUG+3*
^XTMP("PSU_"	EN+13, PRTAMIS+5, PRTAMIS+7, PGHDR1+3, PGHDR1+6

Name	Field # of Occurrence
>> D	GETNAME+1*
>> DIC	GETNAME+1*
>> DIC(0	GETNAME+1*
ENDIT	EN+1~
>> EXTD	EN+2, EN+4
>> EXTD(0	EN+3, EN+5
>> I	EN+16*
IO	PRTSUM+1, PGHDR+1, PGHDR1+1
IOF	PGHDR+1, PGHDR1+2
IOSL	PRTAMIS+6, PRTDRUG+6
>> LNCNT	PRTAMIS+6, PRTAMIS+8, PRTDRUG+6, PRTDRUG+8, PGHDR+7, PGHDR1+7
>> PSUDIVNM	PRTSUM+6, PGHDR+3, GETNAME+2*
>> PSUEDT	EN+4
>> PSUFACN	EN+7, EN+8, PRTSUM+5, PRTSUM+9, PRTSUM+10, PRTDRUG+5, PRTDRUG+7, PGHDR+2, PGHDR+6, NOSUM+4* , NODRUG+4*, GETNAME+1
PSUH	EN+1~, PGHDR+6*
PSUI	EN+1~
>> PSUIVSUB	EN+8, PRTSUM+5, PRTSUM+9, PRTSUM+10, PRTDRUG+1, PRTDRUG+5, PRTDRUG+7, PGHDR+2, PGHDR+6, NOSUM+1 , NOSUM+2, NOSUM+3, NODRUG+1, NODRUG+2, NODRUG+3
>> PSUJOB	EN+13, PRTAMIS+5, PRTAMIS+7, PGHDR1+3, PGHDR1+6
PSUL	EN+1~, PRTSUM+8, PRTSUM+9, PRTSUM+10, PRTAMIS+4, PRTAMIS+5, PRTAMIS+7, PRTDRUG+4, PRTDRUG+5, PRTDRUG+7
PSUM	EN+1~
>> PSUMOD(	EN+16*
>> PSUMOD(1	EN+18
>> PSUMOD(2	EN+18
>> PSUMOD(4	EN+19
>> PSUOPTS	EN+16
PSUPGS	EN+1~
PSUPGS("PG"	PRTAMIS+2, PRTDRUG+2, PGHDR+4, PGHDR+5, PGHDR1+4, PGHDR1+5
>> PSURP("END"	EN+5*, NOSUM+1, NODRUG+1
>> PSURP("START"	EN+3*, NOSUM+1, NODRUG+1
>> PSUSDT	EN+2
>> PSUSMRY	EN+10
>> PSUSNDR	NOSUM+1, NOSUM+2, NOSUM+3, NOSUM+4, NODRUG+1, NODRUG+2, NODRUG+3, NODRUG+4
>> X	PRTSUM+5, PRTSUM+6, GETNAME+1, GETNAME+2*
>> Y	GETNAME+2