Routine: PSOSUCLE

Package	Total	Call Graph
VA Fileman	6	^%DT NOW^%DTC ^DIC FILE^DICN ^DIK ^DIR
Kernel	3	^%ZIS ^%ZISC ^%ZTLOAD
Outpatient Pharmacy	2	SUS1^PSOCMOP ^PSOLSET

Package

Total

Call Graph

VA Fileman

^%DT NOW^%DTC ^DIC FILE^DICN ^DIK ^DIR

Kernel

^%ZIS ^%ZISC ^%ZTLOAD

Outpatient Pharmacy

SUS1^PSOCMOP ^PSOLSET

Package	Total	Caller Graph
Outpatient Pharmacy	3	PSO SUCMOP PRINT REPORT PSO SUCMOP RE-SUSLOCALCMOPPRI PSO SUCMOP RESUSPENDNOTPRI

Package

Total

Caller Graph

Outpatient Pharmacy

PSO SUCMOP PRINT REPORT PSO SUCMOP RE-SUSLOCALCMOPPRI PSO SUCMOP RESUSPENDNOTPRI

Entry Points

Name	Field # of Occurrence
^%DT	QUE+2, BEG, BEG+1
NOW^%DTC	ACT+3, QUE+1
^%ZIS	BEG+3
^%ZISC	END
^%ZTLOAD	QUE+6, BEG+7
^DIC	RESUS+3
FILE^DICN	REQUE+5
^DIK	EN+3, REQUE
^DIR	PSOSUCLE+9, HEADONE
SUS1^PSOCMOP	REQUE+2
^PSOLSET	PSOSUCLE+5, RESUS+1, SURPT+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: PSOSUCLE+6
Function Call: WRITE	Prompt: !! Line Location: QUE+2
Function Call: WRITE	Prompt: !!,"Background Job not queued!",! Line Location: QUE+2
Function Call: WRITE	Prompt: !!,"Date and time Required!",! Line Location: QUE+3
Function Call: WRITE	Prompt: !,"No Division Selected!",! Line Location: RESUS+1
Function Call: WRITE	Prompt: !,"No Division Selected!",! Line Location: SURPT+1
Function Call: WRITE	Prompt: !!,"Enter a date range to see Rxs printed locally with CMOP Drugs from suspense within those dates." Line Location: SURPT+2
Function Call: WRITE	Prompt: ! Line Location: BEG+0
Function Call: WRITE	Prompt: ! Line Location: BEG+1
Function Call: WRITE	Prompt: !!,"Gathering Rxs, please wait...",! Line Location: BEG+8
Function Call: WRITE	Prompt: !!,"There are no locally printed CMOP Rxs printed for specified date range!",! Line Location: LIST+0
Function Call: WRITE	Prompt: @IOF,!?20,"Rxs Printed Locally that have CMOP Drugs" Line Location: HEAD+0
Function Call: WRITE	Prompt: !,"Date Range Requested: "_$E(BEG,4,5)_"/"_$E(BEG,6,7)_"/"_$E(BEG,2,3)_" to "_$E(END,4,5)_"/"_$E(END,6,7)_"/"_$E(END,2,3),! Line Location: HEAD+1
Function Call: WRITE	Prompt: ! Line Location: HEAD+2
Function Call: WRITE	Prompt: "Rx #",?20,"Patient Name",?60,"Date Printed",! Line Location: HEAD+2
Function Call: WRITE	Prompt: "-" Line Location: HEAD+3
Routine Call	DIC Line Location: RESUS+3
Routine Call	DIR Line Location: PSOSUCLE+9 HEADONE
Routine Call	%ZIS Line Location: BEG+3

FileNo	Call Tags
^PS(52.5 - [#52.5]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	LIST+2
^PS(52.5 - [#52.5]	EN+1, EN+2, EN+3, EN+4, ENT+1, ENT+2, ENT+3!, ENT+4, ENT+5, LIST+1 , LIST+2, LIST+3
^PSDRUG - [#50]	LIST+3
^PSDRUG("AQ"	ENT+4
^PSRX - [#52]	REQUE+1, REQUE+7, ACT, ACT+1, ACT+2, ACT+3, ENT+4, LIST+1, LIST+2
^TMP("PSOSUCLE"	EN!, EN+3, EN+4*, EN+5, EXIT!
^TMP($J	ENT!, ENT+5*, END!, LIST, LIST+1

Name	Line Occurrences
ACT	REQUE+6
END	BEG, BEG+1, BEG+3, BEG+4
EXIT	PSOSUCLE+10, QUE+2, QUE+6, RESUS+3
HEAD	LIST, HEADONE+1
HEADONE	LIST+4
LIST	ENT+6
QUE	PSOSUCLE+10, QUE+3
REQUE	EN+5, RESUS+4
RESUS	RESUS+3, RESUS+4

Name	Field # of Occurrence
^("P"	EN+1
^(0	LIST+1, LIST+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	ACT+3!, QUE+1!
%DT	EXIT!, QUE+2, BEG!, BEG+1*!, END!
%DT("A"	QUE+2, BEG, BEG+1*
%DT("B"	QUE+2*
%DT(0	QUE+1, BEG
%H	ACT+3!, QUE+1!
%I	ACT+3!, QUE+1!
%ZIS	BEG+3!*, END!
ACT	EXIT!, REQUE*
BEG	BEG*, END!, HEAD+1
BEGDATE	BEG, BEG+2, ENT+1, END!
>> DA	EN+3, REQUE, REQUE+2, ENT+2, ENT+3, ENT+4, ENT+5
DD	REQUE+5!
DIC	REQUE+3, ACT+3!, RESUS+2, RESUS+3!
DIC("A"	RESUS+2*
DIC("DR"	REQUE+4*
DIC("S"	RESUS+2*
DIC(0	REQUE+3, RESUS+2
DIE	ACT+3!
>> DIK	EN+3, REQUE
DIR	PSOSUCLE+5!, EXIT!, HEADONE!
DIR("A"	PSOSUCLE+7, PSOSUCLE+8, PSOSUCLE+9*
DIR("B"	PSOSUCLE+9*
DIR(0	PSOSUCLE+6, HEADONE
DIROUT	EXIT!
DIRUT	PSOSUCLE+5!, PSOSUCLE+10, EXIT!
DO	REQUE+5!
DR	ACT+3!
DRG	ENT+4, END!, LIST+1, LIST+3
DT	EN+2, REQUE
DTOUT	EXIT!, RESUS+3, BEG, BEG+1, END!
DUOUT	PSOSUCLE+5!, EXIT!, RESUS+3, END!
DUZ	ACT+3
END	BEG+1*, END!, HEAD+1
ENDDATE	BEG+1, BEG+2, ENT+1, END!
FDA	ACT+1*, ACT+3!
G	QUE+5, BEG+6, END!
I	ACT*, ACT+3!
INRX	END!, LIST+1*, LIST+2
IO	LIST, HEAD
IO("Q"	BEG+4, BEG+7!
IOF	HEAD
ION	BEG+3
IOP	BEG+3!*
IOSL	LIST+4
IR	ACT+1, ACT+2, ACT+3!
L	EXIT!, END!, LIST+1*, LIST+2, LIST+3
>> LFD	REQUE+6*, REQUE+7, ACT+3
M	ENT+1*, ENT+2, ENT+3, END!
POP	BEG+3, END!
PSOION	BEG+3*!, BEG+4!
>> PSOOUT	LIST+1, LIST+5, HEADONE*
>> PSOPAR	RESUS+1, SURPT+1
PSOQ	EN!, EXIT!, REQUE+7, QUE+4*
>> PSOSITE	ENT+1
PSOSYS	EXIT!
>> PSXSYS	REQUE+2
>> Q	ENT+2*, ENT+3
RXF	ACT*, ACT+3!
RXN	EXIT!, REQUE, REQUE+1, REQUE+2, REQUE+3, REQUE+7, ACT, ACT+1, ACT+2, ACT+3 , ENT+4, ENT+5, END!
>> RXP	REQUE+3*, REQUE+4
SD	EXIT!, REQUE*, REQUE+4, REQUE+6
SU	EN+1, EN+2, EN+3, EN+4, EN+5, EXIT!, REQUE, RESUS+4*!
SUSDAT	EN!, EN+5!, EXIT!, REQUE, REQUE+3, REQUE+4, RESUS+4!
X	PSOSUCLE+10, EXIT!, REQUE+3, ACT+3!, QUE+1!, ENT+1, ENT+2, ENT+3, END!
XFLAG	EN!, EN+5!, EXIT!, REQUE+2!, RESUS+4!
Y	PSOSUCLE+10, EXIT!, ACT+3!, QUE+2, QUE+3, QUE+4, RESUS+3, RESUS+4!, BEG, BEG+1 , HEADONE
Y(0	RESUS+4
>> Z	ENT+1*, ENT+2, ENT+3, ENT+5
>> ZTDESC	QUE+4, BEG+5
>> ZTDTH	QUE+4*
>> ZTIO	QUE+4*
ZTQUEUED	BEG+3!
>> ZTREQ	EXIT*
>> ZTRTN	QUE+4, BEG+5
>> ZTSAVE(	QUE+5, BEG+6
>> ZTSAVE("ZTREQ"	BEG+5*
ZTSK	QUE+6!, BEG+3!, BEG+7!, HEADONE
ZZZZ	END!, HEAD+3*

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSOSUCLE

Information

Source Information

Call Graph

Call Graph Total: 11

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: