Routine: PSOTPCLR

Package	Total	Call Graph
Kernel	4	^%ZIS ^%ZISC (,KILL)^%ZTLOAD $$FMTE^XLFDT
VA Fileman	2	$$GET1^DIQ ^DIR

Package

Total

Call Graph

Kernel

^%ZIS ^%ZISC (,KILL)^%ZTLOAD $$FMTE^XLFDT

VA Fileman

$$GET1^DIQ ^DIR

Package	Total	Caller Graph
Outpatient Pharmacy	1	PSO TPB LETTERS PRINTED REPORT

Package

Total

Caller Graph

Outpatient Pharmacy

PSO TPB LETTERS PRINTED REPORT

Name	Comments	DBIA/ICR reference
DEQUE	; DEQUE/PRINT LETTERS
EN	;
HEADER	;
EXIT2
SUMMARY	;
PRINT	; print report
EXIT	;
PG
DEVICE	;

Name	Field # of Occurrence
^%ZIS	DEVICE+2
^%ZISC	DEVICE+7, EXIT2
^%ZTLOAD	DEVICE+7
KILL^%ZTLOAD	EXIT+2
$$GET1^DIQ	DEQUE+4, DEQUE+5, DEQUE+6, PRINT+9, PRINT+11, SUMMARY+9, HEADER+5
^DIR	EN+2, SUMMARY+3, HEADER+2, EXIT+1
$$FMTE^XLFDT	DEQUE+6, PRINT+12, HEADER+8

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Queuing is recommended",! Line Location: DEVICE+1
Function Call: WRITE	Prompt: !!,"Tasked with "_ZTSK Line Location: DEVICE+8
Function Call: WRITE	Prompt: !,$$GET1^DIQ(52.91,DFN,.01) Line Location: PRINT+9
Function Call: WRITE	Prompt: ?35,^TMP($J,"PSOTPBLR",DIVDA,PTNM,DFN) Line Location: PRINT+10
Function Call: WRITE	Prompt: !,@IOF,!!,?10,"SUMMARY of TPB LETTER PRINTING " Line Location: SUMMARY+4
Function Call: WRITE	Prompt: "'PRINTED'" Line Location: SUMMARY+5
Function Call: WRITE	Prompt: "'NOT PRINTED'" Line Location: SUMMARY+6
Function Call: WRITE	Prompt: !! Line Location: SUMMARY+7
Function Call: WRITE	Prompt: !,?5,$$GET1^DIQ(52.92,DIVDA,.01),?40,DIVCNT(DIVDA) Line Location: SUMMARY+9
Function Call: WRITE	Prompt: ! Line Location: SUMMARY+11
Function Call: WRITE	Prompt: ! Line Location: HEADER+1
Function Call: WRITE	Prompt: @IOF Line Location: HEADER+3
Function Call: WRITE	Prompt: ?20,$$GET1^DIQ(52.92,DIVDA,.01) Line Location: HEADER+5
Function Call: WRITE	Prompt: " TPB PATIENTS LETTERS PRINTED REPORT",! Line Location: HEADER+6
Function Call: WRITE	Prompt: " TPB PATIENTS LETTERS NOT PRINTED REPORT",! Line Location: HEADER+7
Function Call: WRITE	Prompt: ?28,$$FMTE^XLFDT(DT,"1D"),?60,"Page: ",PG,!,LINE Line Location: HEADER+8
Function Call: WRITE	Prompt: !,?35,"Inactivation",!,"Patient",?35,"Date",?45,"Reason",! Line Location: HEADER+9
Function Call: WRITE	Prompt: !!,"End of Report",! Line Location: EXIT+1
Routine Call	DIR Line Location: EN+2 SUMMARY+3 HEADER+2 EXIT+1
Routine Call	%ZIS Line Location: DEVICE+2

FileNo	Call Tags
^PS(52.91 - [#52.91]	GET1^DIQ
^PS(52.92 - [#52.92]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^PS(52.91 - [#52.91]	DEQUE+2, DEQUE+3
^TMP($J	DEQUE+1!, DEQUE+7*, PRINT+3, PRINT+5, PRINT+6, PRINT+10, EXIT+2!

Name	Line Occurrences
DEVICE	EN+3, EN+4
EXIT	SUMMARY+12
EXIT2	DEVICE+4
HEADER	PRINT+4, PG
PG	PRINT+8

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%ZIS	DEVICE+2!*
>> DFN	DEQUE+3, DEQUE+4, DEQUE+5, DEQUE+6, DEQUE+7, PRINT+6, PRINT+9, PRINT+10, PRINT+11
DIR	EN+2!, SUMMARY+3!, HEADER+2!, EXIT+1!, EXIT2+1!
DIR("A"	EXIT+1*
DIR(0	EN+2, SUMMARY+3, HEADER+2, EXIT+1
DIVCNT	DEQUE+1!, PRINT+1!, SUMMARY+1, SUMMARY+10, EXIT2+1!
DIVCNT(	DEQUE+8, PRINT+7, SUMMARY+8, SUMMARY+9
DIVDA	DEQUE+2, DEQUE+3, DEQUE+7, DEQUE+8, PRINT+3, PRINT+5, PRINT+6, PRINT+7, PRINT+10, SUMMARY+8* , SUMMARY+9, HEADER+5, EXIT2+1!
DT	HEADER+8
>> EXCODE	PRINT+11*, PRINT+12
>> EXREA	PRINT+11*, PRINT+13
>> INACTDT	PRINT+11*, PRINT+12
IO	PRINT+1
IO("Q"	DEVICE+4
IOF	SUMMARY+4, HEADER+3
IOSL	PG
IOST	SUMMARY+3, HEADER+2, EXIT+1
LINE	PRINT+2*, HEADER+8, EXIT2+1!
PARAM	EN+3, EN+4, DEQUE+4, DEQUE+5, PRINT+10, SUMMARY+5, HEADER+6, HEADER+9, EXIT2+1!
PG	PRINT+2, SUMMARY+3, HEADER+2, HEADER+4, HEADER+8, EXIT2+1!
>> POP	DEVICE+3
PRTDT	DEQUE+6*, DEQUE+7, EXIT2+1!
PRTDTI	DEQUE+4, DEQUE+5, DEQUE+6, EXIT2+1!
PSOSTOP	PRINT+1!, PRINT+3, PRINT+5, PRINT+6, SUMMARY+2, SUMMARY+3, HEADER+2
PTNM	DEQUE+6, DEQUE+7, PRINT+5, PRINT+6, PRINT+10, EXIT2+1!
SRDT	EXIT2+1!
>> Y	EN+3, EN+4, SUMMARY+3, HEADER+2
>> ZTDESC	DEVICE+5*
>> ZTRTN	DEVICE+5*
>> ZTSAVE("PARAM"	DEVICE+6*
ZTSK	DEVICE+4!, DEVICE+8, EXIT+2

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSOTPCLR

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: