Routine: PSOATRR

Package	Total	Call Graph
Kernel	3	^%ZIS ^%ZISC ^%ZTLOAD
Outpatient Pharmacy	1	$$DIV^PSOATRP
Registration	1	DEM^VADPT
VA Fileman	1	^DIR

Entry Points

Name	Comments	DBIA/ICR reference
PRTS	;
SET
END
PRT	;PRINT REPORT
T1
START
SUMM	;
HD	;PRINT PAGE HEADING
FO

External References

Name	Field # of Occurrence
^%ZIS	PSOATRR+3
^%ZISC	END
^%ZTLOAD	PSOATRR+8
^DIR	START+16, END+2, PRT+2, T1, SUMM+3
$$DIV^PSOATRP	START+11
DEM^VADPT	SET+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"NO DATA FOUND TO PRINT FOR THIS RANGE.",! Line Location: START+15
Function Call: WRITE	Prompt: @IOF Condition for execution: $E(IOST)="P" Line Location: START+15
Function Call: WRITE	Prompt: !,"INTERNET REFILL REPORT BY RESULT"_" - "_$S(PSODS="D":"Detail",1:"Summary") Line Location: HD+1
Function Call: WRITE	Prompt: ?45,$P(RDATE,":",1,2) Line Location: HD+2
Function Call: WRITE	Prompt: ?$S($G(PSORMZ):120,1:68),"PAGE: "_PAGE Line Location: HD+2
Function Call: WRITE	Prompt: !,$S(PSODS="D":"Not Filled - ",1:"")_"For date range "_$G(PSOSDX)_" through "_$G(PSOEDX)_" for "_$P(^PS(59,DIV,0),"^") Line Location: HD+3
Function Call: WRITE	Prompt: !!,"Result",?30,"Count" Line Location: HD+4
Function Call: WRITE	Prompt: ?$S($G(PSORMZ):58,1:20),"Reason" Line Location: HD+5
Function Call: WRITE	Prompt: !,LINE Line Location: HD+6
Function Call: WRITE	Prompt: ! Line Location: PRT+2
Function Call: WRITE	Prompt: ?$S($G(PSORMZ):58,1:20),$P(PNODE,"^",10) Line Location: PRT+6
Function Call: WRITE	Prompt: !!!,"Total: ",?30,(PSOT(1)+PSOT(2)) Line Location: FO+0
Function Call: WRITE	Prompt: !,"Filled = "_PSO(1)," Not Filled = ",PSO(2) Line Location: FO+3
Function Call: WRITE	Prompt: ! Line Location: T1+0
Function Call: WRITE	Prompt: !!,"NO DATA FOUND TO PRINT FOR THIS RANGE.",! Line Location: SUMM+2
Routine Call	DIR Line Location: START+16 END+2 PRT+2 T1 SUMM+3
Routine Call	%ZIS Line Location: PSOATRR+3

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PS(52.43 - [#52.43]	START+8, START+9, PRT+4, SUMM+6
^PS(59 - [#59]	HD+3
^PSRX - [#52]	START+10
^TMP($J	START+3!, START+5, START+7, START+13, START+15, START+17, START+18, END!, FO, FO+1 , SET+2*, SUMM+1, SUMM+2, SUMM+4, SUMM+5, SUMM+6, PRTS+1

Label References

Name	Line Occurrences
END	PSOATRR+3, PSOATRR+4, START+12
FO	START+13, SUMM+1
HD	START+15, PRT+2, PRT+3, SUMM+2
PRT	START+19
PRTS	SUMM+1
SET	START+11
SUMM	START+12
T1	FO

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%ZIS	PSOATRR+3!*
DFN	START+1~, SET+1*
DIR	START+16!, END+2!, PRT+2!, T1!, SUMM+3!
DIR("A"	START+16, END+2, PRT+2, T1, SUMM+3*
DIR(0	START+16, END+2, PRT+2, T1, SUMM+3*
DIV	START+1~, START+13, START+15, START+17, START+18, HD+3, FO, FO+1, SUMM+1, SUMM+2 , SUMM+4, SUMM+5, SUMM+6, PRTS+1
EOFLAG	START+1~, PRT+1, PRT+2, PRT+3*
IO	START
IO("Q"	PSOATRR+4, PSOATRR+5!
IOF	START+13, START+15, END, HD+1, T1+1, SUMM+1
ION	PSOATRR+3
IOP	PSOATRR+3!*
IOSL	PRT+1
IOST	START+13, START+15, END, HD+1, PRT+2, PRT+3, T1, T1+1, SUMM+1, SUMM+2
LINE	START+1~, START+3*, HD+6
PAGE	START+1~, START+3, START+15, HD+1, HD+2, HD+6, SUMM+2
PNODE	START+1~, PRT+4, PRT+5, PRT+6, SUMM+6, SUMM+7
POP	PSOATRR+3!
PSA	START+1~, START+6, START+9, SET+2
PSAB	START+1~, START+9*, START+10, SET
PSO	START+1~
PSO(	PRT+5, SUMM+7
PSO("TOT"	START+14, START+19, FO+2
PSO(1	START+14, FO+3, SUMM+1, PRTS+1
PSO(2	START+14, FO+3, SUMM+1, PRTS+1
PSOAB	START+1~, START+18, PRT+4, PRT+6, SUMM+6
PSOAFLAG	START+1~, START+4*
>> PSOD	START+5, START+6, START+7
PSODFN	START+1~, START+10, START+17, START+18, SET+1, SET+2, SUMM+4*, SUMM+5, SUMM+6
>> PSODIV	START+6, START+11
>> PSODIV(	START+5, START+6
>> PSODS	START+12, HD+1, HD+3, HD+4, FO, FO+1, SET
>> PSOED	START+8
>> PSOEDX	HD+3, FO+2
PSOERR	START+1~, START+4, START+15, END, SUMM+2*
PSOION	PSOATRR+3*!, PSOATRR+4!
PSON	START+1~, START+18, START+19, PRT+6
PSOP5	START+1~, PRT+5*, PRT+6
PSOP6	START+1~, PRT+5, SUMM+7
PSOPAT	START+1~, START+17, START+19
PSOQUIT	PSOATRR+3, PSOATRR+4, START+2~, START+3, START+13, START+17, START+18, END, PRT+1, PRT+2 , SUMM+1, SUMM+4, SUMM+5
>> PSORMZ	START+3, HD+2, HD+5, PRT+6
>> PSORST	FO+3
PSORXDV	START+2~, START+10*, START+11, SET+2
PSORXIN	START+2~, START+10, START+11, START+18, SET+2, SUMM+5*, SUMM+6
>> PSOSD	START+8
PSOSD1	START+2~, START+8*, START+9
>> PSOSDX	HD+3, FO+2
PSOT	START+2~
PSOT(	SUMM+7*
PSOT(1	FO, SUMM+1*
PSOT(2	FO, SUMM+1*
>> RDATE	HD+2
>> VA("BID"	SET+2
>> VADM(1	SET+2
VAR	PSOATRR+5~, PSOATRR+6*
X	START+2~
Y	START+2~, PRT+2, PRT+5*
>> ZTDESC	PSOATRR+5*
ZTDTH	PSOATRR+5!
ZTIO	PSOATRR+5!
>> ZTQUEUED	END
>> ZTREQ	END*
>> ZTRTN	PSOATRR+5*
ZTSAVE	PSOATRR+5!
ZTSAVE(	PSOATRR+6*
ZTSAVE("PSODIV*"	PSOATRR+7*
ZTSK	PSOATRR+4!, PSOATRR+5!, PSOATRR+8

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSOATRR

Information

Source Information

Call Graph

Call Graph Total: 6

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: