Routine: PSOLLLH

Package	Total	Call Graph
Kernel	3	^%ZIS ^%ZISC ^%ZTLOAD
Outpatient Pharmacy	3	$$LSTRFL^PSOBPSU1 ^PSOLSET $$ZZ^PSOSUTL
Registration	3	(6,DEM)^VADPT PID^VADPT6 $$SITE^VASITE
VA Fileman	3	NOW^%DTC ^DIC EN^DIQ1
Uncategorized	1	DUR1^BPSNCPD3

Package	Total	Caller Graph
Outpatient Pharmacy	2	PSO SIGLOG REPRINT PSOLLL1

Entry Points

Name	Comments	DBIA/ICR reference
Q1
BARCE
HDR	;
INST	;
NOWINDOW	; ON ORIGINAL PRINT - DON'T PRINT IF ALL ARE MAIL
SIGN	;
QUEUE	; ENTRY POINT TO REPRINT SIGNATURE LOG
LRP
BARC
PLANNM()	; Returns Insurance Name (3rd Party)
GETPT2
PRINT(T,B)	;
KILL	; CLEAN UP VARIABLES
SIGLOG
DQ

External References

Name	Field # of Occurrence
NOW^%DTC	Q1+4
^%ZIS	Q1
^%ZISC	Q1+7
^%ZTLOAD	Q1+7
DUR1^BPSNCPD3	PLANNM+6
^DIC	LRP
EN^DIQ1	INST+2
$$LSTRFL^PSOBPSU1	PLANNM+6
^PSOLSET	QUEUE+1
$$ZZ^PSOSUTL	SIGLOG+21
6^VADPT	GETPT2+3
DEM^VADPT	SIGLOG+1, GETPT2
PID^VADPT6	GETPT2+3
$$SITE^VASITE	INST+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF Line Location: HDR+1
Function Call: WRITE	Prompt: T,! Line Location: PRINT+5
Function Call: WRITE	Prompt: !! Line Location: LRP+0
Function Call: WRITE	Prompt: ! Line Location: LRP+1
Function Call: WRITE	Prompt: ! Line Location: Q1+0
Function Call: WRITE	Prompt: !,"Must specify a laser labels printer for Signature Log Reprint" Line Location: Q1+2
Function Call: WRITE	Prompt: !,"Nothing queued to print." Line Location: Q1+3
Function Call: WRITE	Prompt: X2 Line Location: BARC+3
Routine Call	DIC Line Location: LRP
Routine Call	%ZIS Line Location: Q1

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^PSRX - [#52]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZIS(2 - [#3.2]	Q1+2, DQ
^DD("DD"	SIGLOG+17, Q1+4
^DIC(5 - [#5]	QUEUE+6
^PS(59 - [#59]	QUEUE+3, QUEUE+5
^PSRX - [#52]	SIGLOG+9, SIGLOG+10, SIGLOG+13, SIGLOG+15, SIGLOG+16, LRP+4, NOWINDOW+5, NOWINDOW+6, NOWINDOW+7, NOWINDOW+8 , NOWINDOW+9
^UTILITY("DIQ1"	INST+1!, INST+2, INST+3!

Label References

Name	Line Occurrences
$$PLANNM	SIGN+8
BARC	SIGLOG+14
BARCE	BARC, BARC+1
HDR	SIGLOG+14
INST	BARC+2
KILL	LRP
LRP	GETPT2+1
NOWINDOW	SIGLOG+3
PRINT	SIGLOG+22, SIGN+4, SIGN+6, SIGN+8, SIGN+10, SIGN+12, HDR+3, HDR+4, HDR+9, HDR+10 , HDR+11
Q1	Q1+2
QUEUE	Q1+8
SIGLOG	DQ+2
SIGN	SIGLOG+23, HDR+1

Naked Globals

Name	Field # of Occurrence
^(	DQ
^(0	SIGLOG+16, QUEUE+3, QUEUE+6
^(1	DQ

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	Q1+4
>> %ZIS	Q1*
>> %ZIS("A"	Q1*!
>> %ZIS("B"	Q1*
B	PRINT~, PRINT+1
BLNKLIN	SIGLOG~, SIGLOG+6*, SIGN+6
BLNKLN2	SIGLOG~, SIGLOG+5*, HDR+8
>> BOLD	PRINT+1*, PRINT+2, PRINT+3, PRINT+7
CNT	SIGLOG~, SIGLOG+12*, SIGLOG+14, SIGN+1, SIGN+3
DA	INST+1*, INST+2, INST+3!
DATE	SIGLOG~, SIGLOG+17*
DFN	SIGLOG+11, LRP+5*, KILL+1!
DIC	LRP, KILL+1!, INST+2, INST+3!
DIC("A"	LRP*!
DIC("S"	LRP*
DIC(0	LRP*
>> DIQ(0	INST+2*
DR	INST+2*, INST+3!
DUR	PLANNM+3~, PLANNM+6
DUR(1	PLANNM+6
DUZ	Q1+6
FDT	SIGLOG~, SIGLOG+13, SIGLOG+16, SIGLOG+17, SIGLOG+22
FIRST	SIGLOG~, SIGLOG+2, SIGLOG+14, HDR+1, BARC
G	Q1+5*, Q1+7!
I	DQ, PLANNM+3~, PLANNM+4, NOWINDOW+1~, NOWINDOW+3*
II	SIGN+2~, SIGN+3*, SIGN+4
IOF	HDR+1
ION	Q1
IOST(0	Q1+2, Q1+3, DQ
J	SIGLOG~, SIGN+4*
LAST	SIGLOG~, SIGLOG+2, SIGLOG+23, SIGN+4
MW	NOWINDOW+1~, NOWINDOW+7, NOWINDOW+8, NOWINDOW+9*
>> NOBARC	BARC+1
NOWIN	SIGLOG+3, SIGLOG+4!, NOWINDOW+2, NOWINDOW+3, NOWINDOW+7, NOWINDOW+8, NOWINDOW+9
P	LRP!
>> PDUZ	Q1+6*
>> PLANNM	PLANNM+2, PLANNM+4, PLANNM+6, PLANNM+7
PNM	SIGN+12, GETPT2*, GETPT2+2, KILL+1!
POP	Q1!, Q1+1
PPL	SIGLOG+7, LRP+2*, PLANNM+4, KILL+1!, NOWINDOW+3
PS	HDR+3, HDR+4, QUEUE+2~, QUEUE+3, QUEUE+4, QUEUE+5, QUEUE+6, QUEUE+7
PS2	HDR+4, QUEUE+2~, QUEUE+4*
>> PSLION	Q1*, Q1+6
PSOBIO	DQ~
PSODRNM	SIGLOG+20~, SIGLOG+21*, SIGLOG+22
>> PSOFNOW	Q1+4*
>> PSOFONT	HDR+6, PRINT+2, PRINT+3, PRINT+7
PSOHZIP	HDR+3, QUEUE+2~, QUEUE+7*
>> PSOINST	BARC+2, BARC+3, INST+2*
>> PSOIO	DQ*
>> PSOIO(	PRINT+2, PRINT+3, PRINT+7, DQ*
>> PSOIO("BLB"	HDR+5
>> PSOIO("BLBC"	BARC+1
>> PSOIO("BLH"	HDR+2
>> PSOIO("EBLBC"	BARC+4
>> PSOIO("ET"	PRINT+6
>> PSOIO("LLI"	DQ+1
>> PSOIO("ST"	PRINT+4
>> PSONOW	HDR+4, Q1+4*
>> PSOPAR	QUEUE+1
PSOSEQ	SIGLOG~, SIGLOG+7*
>> PSOSITE	QUEUE+3
>> PSOSYS	QUEUE+5
>> PSOY	SIGN+5, SIGN+7, SIGN+9, SIGN+11, HDR+12*
PSZIP	QUEUE+7*, KILL+1!
REPMSG	HDR+7~, HDR+8*, HDR+9
REPRINT	SIGLOG+3, HDR+9, QUEUE+2~, QUEUE+8*
RX	SIGLOG~, SIGLOG+7, SIGLOG+8, SIGLOG+9, SIGLOG+10, SIGLOG+13, SIGLOG+15, SIGLOG+16, SIGLOG+21, LRP+2 , LRP+4, PLANNM+3~, PLANNM+4, PLANNM+5, PLANNM+6, BARC+3, KILL+1!, NOWINDOW+1~, NOWINDOW+3, NOWINDOW+4 , NOWINDOW+5, NOWINDOW+6, NOWINDOW+7, NOWINDOW+8, NOWINDOW+9
RX2	SIGLOG~, SIGLOG+13*
RXF	SIGLOG~, SIGLOG+15, SIGLOG+16, SIGLOG+19, NOWINDOW+1~, NOWINDOW+8
RXN	SIGLOG~, SIGLOG+18*, SIGLOG+19, SIGLOG+22
RXP	NOWINDOW+1~, NOWINDOW+9*
RXY	SIGLOG~, SIGLOG+10, SIGLOG+11, SIGLOG+18, LRP+3~, LRP+4, LRP+5, NOWINDOW+1~, NOWINDOW+6*, NOWINDOW+7
SSNP	SIGN+12, GETPT2+3*, KILL+1!
STATE	HDR+3, QUEUE+2~, QUEUE+6*
T	SIGLOG+19, SIGLOG+22, SIGN+4, SIGN+6, SIGN+10, SIGN+12, HDR+3, HDR+4, HDR+9, HDR+10 , HDR+11*, PRINT~, PRINT+5
VA	KILL+1!
>> VAADDR1	QUEUE+6*
VADDR1	KILL+1!
VADM	KILL+1!
VADM(1	GETPT2
VADM(6	GETPT2+1, GETPT2+2
VAEL	KILL+1!
VAPA	KILL+1!
VASTREET	QUEUE+6*, KILL+1!
>> X	LRP
>> X0	DQ*
>> X2	BARC+3*
>> XFONT	HDR+6*
>> Y	SIGLOG+17, LRP, LRP+2, Q1+4
>> ZTDESC	Q1+6*
>> ZTDTH	Q1+6*
>> ZTIO	Q1+6*
>> ZTQUEUED	SIGLOG+24
>> ZTREQ	SIGLOG+24*
>> ZTRTN	Q1+6*
>> ZTSAVE(	Q1+5*
ZTSK	Q1!, Q1+7

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSOLLLH

Information

Source Information

Call Graph

Call Graph Total: 13

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: