Routine: PSO55FX2

Package	Total	Call Graph
VA Fileman	2	^%DT (C,NOW)^%DTC
Kernel	1	^%ZTLOAD
MailMan	1	^XMD
Outpatient Pharmacy	1	(MSG,PH2)^PSO55FX3
Registration	1	$$SITE^VASITE

Entry Points

Name	Comments	DBIA/ICR reference
EN	;
END
ALOG	;
RBP	;rebuild the "P" header rec
BEG	;
CHK2	;for every patient go through the "P","A" x-ref
CHK1	;for every patient go through the "P" x-ref
EN1
SMAIL	;
CREC	;

External References

Name	Field # of Occurrence
^%DT	BEG+4
C^%DTC	EN+3, ALOG+6
NOW^%DTC	BEG+3
^%ZTLOAD	BEG+7
MSG^PSO55FX3	BEG+2
PH2^PSO55FX3	EN+1, EN1+2
$$SITE^VASITE	SMAIL+36
^XMD	SMAIL+38, SMAIL+79

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!!!,"* DUZ NOT DEFINED - QUITTING *" Line Location: BEG+1
Function Call: WRITE	Prompt: !!!?10,"Job not queued - quitting!" Line Location: BEG+5

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DGPM("AMV1"	ALOG+7, ALOG+8
^DPT - [#2]	ALOG+2, CREC+1, CREC+2
^PS(55 - [#55]	EN1+1, CHK1+1, CHK1+3!, CHK1+4!, CHK1+7!, CHK2+1, CHK2+3!, CHK2+4!, CHK2+7!, RBP+1 , RBP+2*
^PS(59 - [#59]	SMAIL+26, SMAIL+40
^PSRX - [#52]	CHK1+3, CHK1+4, CHK1+6, CHK1+8, ALOG+1, ALOG+4, ALOG+5, ALOG+12, ALOG+13, ALOG+14 , CREC+4, CHK2+3, CHK2+4, CHK2+6, CHK2+8
^TMP(	SMAIL+1!, SMAIL+4, SMAIL+5, SMAIL+6, SMAIL+7, SMAIL+8, SMAIL+9, SMAIL+11, SMAIL+12, SMAIL+13* , SMAIL+14, SMAIL+15, SMAIL+16, SMAIL+17, SMAIL+19, SMAIL+21, SMAIL+22, SMAIL+23, SMAIL+24, SMAIL+28 , SMAIL+31, SMAIL+32, SMAIL+33, SMAIL+38!, SMAIL+41, SMAIL+42, SMAIL+43, SMAIL+44, SMAIL+45, SMAIL+46* , SMAIL+47, SMAIL+48, SMAIL+49, SMAIL+50, SMAIL+52, SMAIL+55, SMAIL+56, SMAIL+57, SMAIL+58, SMAIL+59 , SMAIL+60, SMAIL+62, SMAIL+63, SMAIL+64, SMAIL+65, SMAIL+66, SMAIL+68, SMAIL+71, SMAIL+72, SMAIL+74 , SMAIL+75, SMAIL+76, SMAIL+79!, END!
^XTMP(	EN+3, EN+4, EN+5, EN+6, EN+7, EN+8, EN1+1, CREC+4, CREC+5, SMAIL+25 , SMAIL+27, SMAIL+39, SMAIL+53, SMAIL+67, SMAIL+69, SMAIL+70, SMAIL+73, END!
^XTMP("PSO2"	EN+1, EN1+2*

Label References

Name	Line Occurrences
ALOG	CHK1+8, CHK2+8
CHK1	EN1+1
CHK2	EN1+1
EN1	EN+3
RBP	CHK1+9
SMAIL	EN1+2

Naked Globals

Name	Field # of Occurrence
^(	CHK1+1, ALOG+4, ALOG+12

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	BEG+3
%DT	BEG+3!*, BEG+4!
%DT("A"	BEG+3*
%DT(0	BEG+3*
>> AL	ALOG+3, ALOG+11, ALOG+13*, CREC+4
CDFN	ALOG+1*, ALOG+2, ALOG+8, ALOG+9, CREC+1, CREC+2, CREC+4, CREC+5, END!
>> CDT	ALOG+5*, ALOG+6
>> CT	ALOG+3, ALOG+7, ALOG+9, ALOG+10
DFN	EN+2, EN+5, EN1+1*, CHK1+1, CHK1+3, CHK1+4, CHK1+6, CHK1+7, CHK2+1, CHK2+3 , CHK2+4, CHK2+6, CHK2+7, RBP+1, RBP+2, END!
DIV	ALOG+14, CREC+4, CREC+5, SMAIL+26, SMAIL+28, SMAIL+40*, SMAIL+47, SMAIL+78, END!
DT	EN+3
>> DTOUT	BEG+5
DUZ	BEG+1, SMAIL+35, SMAIL+77
>> EDT	ALOG+6*, ALOG+7
I	CHK1+1, CHK1+3, CHK1+4, CHK1+7, RBP+1, SMAIL+27*, END!
>> II	ALOG+3, ALOG+4, ALOG+11, ALOG+12, SMAIL+69*, SMAIL+70
J	CHK2+1, CHK2+3, CHK2+4, CHK2+7, SMAIL+25, SMAIL+26, SMAIL+27, SMAIL+28, SMAIL+39*, SMAIL+40 , SMAIL+41, SMAIL+42, SMAIL+43, SMAIL+44, SMAIL+45, SMAIL+46, SMAIL+47, SMAIL+48, SMAIL+49, SMAIL+50 , SMAIL+52, SMAIL+53, SMAIL+55, SMAIL+56, SMAIL+57, SMAIL+58, SMAIL+59, SMAIL+60, SMAIL+62, SMAIL+63 , SMAIL+64, SMAIL+65, SMAIL+66, SMAIL+67, SMAIL+68, SMAIL+69, SMAIL+70, SMAIL+71, SMAIL+72, SMAIL+73 , SMAIL+74, SMAIL+75, SMAIL+76, SMAIL+79, END!
>> JJ	ALOG+3, ALOG+4, ALOG+5, ALOG+11, ALOG+12, ALOG+13
JN	EN+2*, EN+3, EN+4, EN+5, EN+6, EN+7, EN+8, EN1+1, CREC+4, CREC+5 , SMAIL+25, SMAIL+27, SMAIL+39, SMAIL+53, SMAIL+67, SMAIL+69, SMAIL+70, SMAIL+73, END!
K	SMAIL+51, SMAIL+53, SMAIL+59, SMAIL+60, SMAIL+61, SMAIL+67, SMAIL+69, SMAIL+70, SMAIL+71, SMAIL+72 , END!
L	SMAIL+27, SMAIL+28, SMAIL+67, SMAIL+69, SMAIL+70, END!
LR	RBP+1*, RBP+2, RBP+3!
NAME	CREC+2*, CREC+4, END!
NR	RBP+1*, RBP+2, RBP+3!
>> PDFN	ALOG+8*, ALOG+9
>> QQ	SMAIL+70*, SMAIL+71, SMAIL+72
RB	CHK1+1, CHK1+3, CHK1+4, CHK1+7, CHK1+9, RBP+3!, END!
RX	CHK1+1, CHK1+3, CHK1+4, CHK1+6, CHK1+7, CHK1+8, ALOG+1, ALOG+4, ALOG+5, ALOG+12 , ALOG+13, ALOG+14, CREC+4, CREC+5, CHK2+1, CHK2+3, CHK2+4, CHK2+6, CHK2+7, CHK2+8 , END!
>> S1	SMAIL+51*, SMAIL+59, SMAIL+71, SMAIL+72
>> S2	SMAIL+51*, SMAIL+59, SMAIL+71, SMAIL+72
>> SDT	ALOG+6, ALOG+7, ALOG+8
>> SSN	CREC+1*, CREC+2
STA	EN1*, END!
STAT	END!
TY	EN+2*, EN+3, EN+4, EN+5, EN+6, EN+7, EN+8, EN1+1, CREC+4, CREC+5 , SMAIL+25, SMAIL+27, SMAIL+39, SMAIL+53, SMAIL+67, SMAIL+69, SMAIL+70, SMAIL+73, END!
>> UL	SMAIL+51*, SMAIL+52, SMAIL+64, SMAIL+74
>> X	EN+3, ALOG+6
X1	EN+3, ALOG+6, END!
X2	EN+3, ALOG+6, END!
XMDUZ	SMAIL+37, SMAIL+77, END!
>> XMSUB	SMAIL+36, SMAIL+78
>> XMTEXT	SMAIL+38, SMAIL+79
XMY	SMAIL+1!, SMAIL+38!, SMAIL+79!, END!
XMY(	SMAIL+35, SMAIL+77
XMY("G.PL2 PA	TCH TRACKING@DOMAIN.NAME" , SMAIL+35*
XX	SMAIL+24, SMAIL+28, SMAIL+53, SMAIL+55, SMAIL+56, SMAIL+57, SMAIL+58, SMAIL+59, SMAIL+60, SMAIL+62 , SMAIL+63, SMAIL+64, SMAIL+65, SMAIL+66, SMAIL+68, SMAIL+71, SMAIL+72, SMAIL+74, SMAIL+75, SMAIL+76* , END!
XY	SMAIL+25!, END!
XY(	SMAIL+28*, SMAIL+49
XZ	CHK1+1!, CHK2+9!
XZ(	CHK1+3, CHK1+4, CHK1+7*, CHK2+3, CHK2+4, CHK2+7
>> Y	BEG+5, BEG+6
>> YY	SMAIL+51, SMAIL+54, SMAIL+60, SMAIL+62*
ZA	EN+2, EN+6, EN1+1, CHK1+3, CHK1+4, CHK1+7*, SMAIL+2, SMAIL+6, END!
ZB	EN+2, EN+7, EN1+1, CHK2+3, CHK2+4, CHK2+7*, SMAIL+2, SMAIL+7, END!
ZC	EN+2, EN+8, EN1+1, CREC+4*, SMAIL+2, SMAIL+8, SMAIL+10, SMAIL+20, END!
>> ZTDESC	BEG+6*
>> ZTDTH	BEG+6*
>> ZTIO	BEG+6*
>> ZTRTN	BEG+6*
>> ZTSAVE("DUZ"	BEG+6*
>> ZTSK	BEG+7
ZZ	SMAIL+1*, SMAIL+4, SMAIL+5, SMAIL+6, SMAIL+7, SMAIL+8, SMAIL+9, SMAIL+11, SMAIL+12, SMAIL+13 , SMAIL+14, SMAIL+15, SMAIL+16, SMAIL+17, SMAIL+19, SMAIL+21, SMAIL+22, SMAIL+23, SMAIL+24, SMAIL+28 , SMAIL+31, SMAIL+32, SMAIL+33, SMAIL+38, SMAIL+41, SMAIL+42, SMAIL+43, SMAIL+44, SMAIL+45, SMAIL+46 , SMAIL+47, SMAIL+48, SMAIL+49, SMAIL+50, SMAIL+52, SMAIL+55, SMAIL+56, SMAIL+57, SMAIL+58, SMAIL+59 , SMAIL+60, SMAIL+62, SMAIL+63, SMAIL+64, SMAIL+65, SMAIL+66, SMAIL+68, SMAIL+71, SMAIL+72, SMAIL+74 , SMAIL+75, SMAIL+76, SMAIL+79, END!

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSO55FX2

Information

Source Information

Call Graph

Call Graph Total: 6

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: