Routine: PSOSUBCH

Package	Total	Call Graph
Kernel	3	^%ZIS ^%ZISC ^%ZTLOAD

Package

Total

Call Graph

Kernel

^%ZIS ^%ZISC ^%ZTLOAD

Package	Total	Caller Graph
Outpatient Pharmacy	2	PSOSUDP1 PSOSURST

Package

Total

Caller Graph

Outpatient Pharmacy

PSOSUDP1 PSOSURST

Name	Field # of Occurrence
^%ZIS	QUE, DEQUE
^%ZISC	QUE+2, END, DEQUE+2, DEEND
^%ZTLOAD	QUE+2, DEQUE+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"NOTHING PRINTED" Line Location: QUE+0
Function Call: WRITE	Prompt: !!,"This report must be sent to a printer!",! Line Location: QUE+1
Function Call: WRITE	Prompt: !!,"No Rx's to print!",! Line Location: LIST+5
Function Call: WRITE	Prompt: !!,"END OF LIST" Line Location: LIST+6
Function Call: WRITE	Prompt: @IOF Line Location: HEAD+1
Function Call: WRITE	Prompt: !,"ORIGINALLY QUEUED FOR ",$G(PSOPTIME)," BY ",$S($D(^VA(200,+$G(PSOPDUZ),0)):$E($P(^(0),"^"),1,31),1:"UNKNOWN"),!,"RX #",?20,"PATIENT NAME",?51,"SUSPENSE BATCH ",LLL,! Line Location: HEAD+1
Function Call: WRITE	Prompt: !,"ORIGINALLY QUEUED FOR ",$G(PSOPTIME)," BY ",$S($D(^VA(200,+$G(PSOPDUZ),0)):$E($P(^(0),"^"),1,31),1:"UNKNOWN"),!,"RX #",?20,"PATIENT NAME",?51,"SUSPENSE BATCH ",LLL,! Line Location: HEAD+1
Function Call: WRITE	Prompt: @IOF Line Location: END+0
Function Call: WRITE	Prompt: !!,"This report must be sent to a printer!",! Line Location: DEQUE+1
Function Call: WRITE	Prompt: !!,"No Rx's to print!",! Line Location: DELIST+5
Function Call: WRITE	Prompt: !!,"END OF LIST" Line Location: DELIST+6
Function Call: WRITE	Prompt: @IOF Line Location: DEHEAD+1
Function Call: WRITE	Prompt: !,"ORIGINALLY QUEUED FOR ",$G(PSOPTIME)," BY ",$S($D(^VA(200,+$G(PSOPDUZ),0)):$E($P(^(0),"^"),1,31),1:"UNKNOWN"),!,"RX #",?20,"PATIENT NAME",?51,"SUSPENSE BATCH ",LLL,! Line Location: DEHEAD+1
Function Call: WRITE	Prompt: !,"ORIGINALLY QUEUED FOR ",$G(PSOPTIME)," BY ",$S($D(^VA(200,+$G(PSOPDUZ),0)):$E($P(^(0),"^"),1,31),1:"UNKNOWN"),!,"RX #",?20,"PATIENT NAME",?51,"SUSPENSE BATCH ",LLL,! Line Location: DEHEAD+1
Function Call: WRITE	Prompt: @IOF Line Location: DEEND+0
Function Call: WRITE	Prompt: !!,"REPORT of batched Rx's queued to print!",! Line Location: MSQ+0
Function Call: WRITE	Prompt: !!,"REPORT of batched Rx's being sent to print!",! Line Location: MSNQ+0
Routine Call	%ZIS Line Location: QUE DEQUE

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	HEAD, DEHEAD
^DPT - [#2]	LIST+3, DELIST+3
^PS(52.5 - [#52.5]	LIST+1, LIST+2, LIST+3, DELIST+1, DELIST+2, DELIST+3
^PSRX - [#52]	LIST+2, LIST+3, DELIST+2, DELIST+3
^TMP($J	LIST, LIST+1, HEAD, END!, DELIST, DELIST+1, DEHEAD, DEEND!
^VA(200 - [#200]	HEAD+1, DEHEAD+1

Name	Line Occurrences
DEEND	DELIST+7
DEHEAD	DELIST+1, DELIST+4
DEQUE	DEQUE+1
END	LIST+7
HEAD	LIST+1, LIST+4
MSNQ	QUE+3, DEQUE+3
MSQ	QUE+2, DEQUE+2
QUE	QUE+1

Name	Field # of Occurrence
^(0	LIST+2, LIST+3, HEAD+1, DELIST+2, DELIST+3, DEHEAD+1

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%ZIS	QUE!, DEQUE!
GG	LIST+2, LIST+3, END!, DELIST+2, DELIST+3, DEEND!
INRX	LIST+2, LIST+3, END!, DELIST+2, DELIST+3, DEEND!
IO	LIST, DELIST
IO("Q"	QUE+2, DEQUE+2
IOF	HEAD+1, END, DEHEAD+1, DEEND
IOP	QUE!, DEQUE!
IOSL	LIST+4, DELIST+4
IOST	QUE+1, DEQUE+1
LLL	LIST, LIST+1, HEAD, HEAD+1, END!, DELIST, DELIST+1, DEHEAD, DEHEAD+1, DEEND!
POP	QUE!, DEQUE!
PSOPDUZ	HEAD, HEAD+1, END!, DEHEAD, DEHEAD+1, DEEND!
PSOPTIME	HEAD, HEAD+1, END!, DEHEAD, DEHEAD+1, DEEND!
>> PSOSITE	LIST+1, LIST+2
REDT	LIST+1, LIST+2, END!, DELIST+1, DELIST+2, DEEND!
REDUZ	LIST+1, LIST+2, END!, DELIST+1, DELIST+2, DEEND!
RESITE	DELIST+1*, DELIST+2, DEEND!
SBFLAG	LIST, LIST+3, LIST+5, DELIST, DELIST+3, DELIST+5, DEEND!
SS	LIST+1, LIST+2, END!, DELIST+1, DELIST+2, DEEND!
>> Y	HEAD, DEHEAD
>> ZTDESC	QUE+2, DEQUE+2
>> ZTQUEUED	END, DEEND
>> ZTREQ	END, DEEND
>> ZTRTN	QUE+2, DEQUE+2
>> ZTSAVE("PSOSITE"	QUE+2, DEQUE+2
>> ZTSAVE("^TMP($J,""PSODES"","	DEQUE+2*
>> ZTSAVE("^TMP($J,""PSODESPR"","	DEQUE+2*
>> ZTSAVE("^TMP($J,""PSORES"","	QUE+2*
>> ZTSAVE("^TMP($J,""PSORESPR"","	QUE+2*
ZZZZ	HEAD+1, END!, DEHEAD+1, DEEND!

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSOSUBCH

Information

Source Information

Call Graph

Call Graph Total: 3

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: