Routine: PSOTPPOS

Information

PSOTPPOS ;BIR/RTR-Patch 145 Post Install routine ;07/27/03

Call Graph

Call Graph Total: 16

Package	Total	Call Graph
VA Fileman	5	(,DD)^%DT (C,NOW)^%DTC FILE^DICN ^DIE EN^DIQ1
Kernel	4	^%ZTLOAD $$DT^XLFDT $$UP^XLFSTR (BMES,MES)^XPDUTL
Outpatient Pharmacy	2	EN^PSO145PS ($$ENR,$$RX,EWL,SCH)^PSOTPCRX
Registration	2	DEM^VADPT PID^VADPT6
Scheduling	2	^SDPBE ^SDPHARM
MailMan	1	^XMD

Entry Points

Name	Comments	DBIA/ICR reference
MAILX	;
START	;Build TPC Eligibility file
PNM	;
FILE	;Populate TPB file
PASS	;
ASK	;
MAIL	;
GETDATE	;

External References

Name	Field # of Occurrence
^%DT	GETDATE+8
DD^%DT	START+9, PASS+4, GETDATE+3, GETDATE+11
C^%DTC	START+8
NOW^%DTC	START+9, PASS+4, MAIL+14, GETDATE+3, GETDATE+7
^%ZTLOAD	FILE+15
FILE^DICN	START+38
^DIE	START+20, START+23, START+26, START+29, PASS+9
EN^DIQ1	START+21, START+27, START+35
EN^PSO145PS	PASS+3
$$ENR^PSOTPCRX	START+32
$$RX^PSOTPCRX	START+33
EWL^PSOTPCRX	START+33
SCH^PSOTPCRX	START+44
^SDPBE	START+11
^SDPHARM	START+10
DEM^VADPT	PNM+4
PID^VADPT6	PNM+7
$$DT^XLFDT	START+1
$$UP^XLFSTR	ASK+2
^XMD	MAILX+1
BMES^XPDUTL	PSOTPPOS+12, PSOTPPOS+13, FILE+5, FILE+13, FILE+16, GETDATE+4, GETDATE+6, ASK+1
MES^XPDUTL	PSOTPPOS+12, PSOTPPOS+13, GETDATE+5

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: GETDATE+7
Function Call: WRITE	Prompt: "Task will be queued to run NOW" Line Location: GETDATE+8
Function Call: READ	Timeout: 300 Variable: PSOXXX Line Location: ASK+2
Function Call: WRITE	Prompt: "Enter Y or N" Line Location: ASK+2
Routine Call	DIE Line Location: START+20 START+23 START+26 START+29 PASS+9

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DIC(19 - [#19]	Classic Fileman Calls
^PS(52.91 - [#52.91]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("PROD"	MAIL+6
^%ZOSF("UCI"	MAIL+6
^DD("DD"	MAIL+14
^DIC(19 - [#19]	PASS+9
^DIC(4 - [#4]	MAIL+3
^PS(52.91 - [#52.91]	START+14, START+18, START+19, START+20, START+25, START+26, START+31, START+37, MAIL+21, MAIL+22
^PS(53 - [#53]	PSOTPPOS+10, PSOTPPOS+11
^XMB(1 - [#4.3]	MAIL+2
^XTMP("SDPDO145"	MAIL+22
^XTMP("SDPSO145"	FILE+4, FILE+13, FILE+14, START+6, START+7!, START+8, START+9, START+12, START+13, START+16 , START+17, START+32, START+36, START+39, START+41!, START+42!, PASS+1, PASS+2, PASS+4, PASS+8 , MAIL+18, MAIL+19, MAIL+21!, MAIL+22!, MAIL+23, MAIL+25, MAIL+27, MAIL+29, MAIL+32, MAIL+34

Label References

Name	Line Occurrences
ASK	ASK+2
FILE	PSOTPPOS+7
GETDATE	GETDATE+13, ASK+3
MAIL	START+6, PASS+7
MAILX	MAIL+13
PASS	START+12
PNM	MAIL+26, MAIL+33

Naked Globals

Name	Field # of Occurrence
^(0	PSOTPPOS+11*

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	START+9, PASS+4, MAIL+1~, MAIL+14, GETDATE+3, GETDATE+7
%DT	GETDATE+7!*, GETDATE+8!
%DT("A"	GETDATE+7*
%DT(0	GETDATE+7*
DA	START+20!, START+21!, START+23!, START+26!, START+27!, START+29!, START+35!, PASS+9!
DD	START+21!, START+27!, START+35!, START+38!
DFN	PNM+1~, PNM+3, PNM+7
DIC	START+21!, START+27!, START+35!, START+37!
DIC("DR"	START+37*
DIC(0	START+37*
DIE	START+20!, START+23!, START+26!, START+29!, START+38!, PASS+9!*
DIFROM	MAILX+1~
DINUM	START+37*, START+38!
DIQ	START+21!, START+27!, START+35!*
DIQ(0	START+21, START+27, START+35*
DO	START+38!
DR	START+20!, START+21!, START+23!, START+26!, START+27!, START+29!, START+35!, PASS+9!
DT	START+1*, START+8, START+37
>> DTOUT	GETDATE+8
DUZ	MAIL+5
DUZ(2	MAIL+2
PSOACTRX	START+3~, START+33!*
PSOENRLD	START+3~, START+32!*
PSOETOT	START+3~, START+4, START+40, PASS+1
PSOITOT	START+3~, START+4*, PASS+2
PSOLPQT	START+3~, START+15, START+16, START+32, START+33*
PSOMLCT	MAIL+1~, MAIL+20, MAIL+24, MAIL+27, MAIL+28, MAIL+30, MAIL+31, MAIL+34*
PSOMLIN	MAIL+1~, MAIL+2*, MAIL+3, MAIL+4
PSOMLINN	MAIL+1~, MAIL+2, MAIL+3, MAIL+4
PSOMLLP	MAIL+1~, MAIL+25, MAIL+27, MAIL+32, MAIL+34, PNM+3, PNM+7
PSOMNAME	MAIL+1~, MAIL+27, MAIL+34, PNM+5, PNM+8
PSOMNANE	PNM+2!
PSONODAD	START+3~, START+17*, START+18, START+25, START+37
PSONOW	GETDATE+1~, GETDATE+2, GETDATE+8, GETDATE+10, GETDATE+13!, ASK+1, ASK+3!
PSOQTIME	MAIL+1~, MAIL+14*, MAIL+15
PSOSAVEX	GETDATE+1~, GETDATE+12*, GETDATE+13!, ASK+1, ASK+3!
PSOSAVEY	GETDATE+1~, GETDATE+9*, GETDATE+10, GETDATE+11, GETDATE+13!, ASK+3!, ASK+4
PSOSTATI	START+3~, START+21!, START+27!, START+35!
PSOSTATI(4	START+21, START+27, START+35
PSOSTEXT	MAIL+1~, MAIL+15!, MAILX+2!
PSOSTEXT(	MAIL+24, MAIL+27, MAIL+28, MAIL+30, MAIL+31, MAIL+34
PSOSTEXT(1	MAIL+15, MAIL+17
PSOSTEXT(2	MAIL+15, MAIL+17
PSOSTEXT(3	MAIL+15, MAIL+17
PSOSTEXT(4	MAIL+16, MAIL+18
PSOSTEXT(5	MAIL+16, MAIL+18
PSOSTEXT(6	MAIL+18*
PSOSTEXT(7	MAIL+19*
PSOSTEXT(8	MAIL+19*
PSOSTEXT(9	MAIL+19*
PSOTDEL	MAIL+1~, MAIL+21, MAIL+22
PSOTG1	START+3~, START+13*, START+14, START+16, START+17, START+18, START+19, START+20, START+23, START+25 , START+26, START+29, START+31, START+32, START+33, START+36, START+37, START+39, START+41, START+42
PSOTG2	START+3~, START+16*, START+17, START+20, START+21, START+23, START+26, START+27, START+29, START+35 , START+37
PSOTG3	START+3~, START+16*, START+17, START+19, START+20, START+23, START+26, START+29, START+37
PSOTLOCK	START+3~, START+5, START+6, MAIL+13
PSOTODAY	GETDATE+1~, GETDATE+3*, GETDATE+13!, ASK+3!
PSOTPFLG	PSOTPPOS+8~, PSOTPPOS+9, PSOTPPOS+11, PSOTPPOS+12, PSOTPPOS+13
PSOTPLLZ	PSOTPPOS+8~, PSOTPPOS+10*, PSOTPPOS+11
PSOTPSNM	START+3~, START+21!, START+22!, START+23, START+24!, START+27!, START+28!, START+29, START+30!, START+34! , START+35*, START+36!, START+37
PSOTUCI	MAIL+1~, MAIL+6*
PSOTUCI1	MAIL+1~, MAIL+6*
PSOXXX	GETDATE+1~, GETDATE+13!, ASK+2*, ASK+3!
U	START+2*
VA	PNM+1~, PNM+7!, PNM+9!
VA("BID"	PNM+8
VADM	PNM+1~, PNM+2!, PNM+4!, PNM+6!
VADM(1	PNM+4, PNM+5
VAERR	PNM+1~, PNM+7!, PNM+9!
X	START+8, START+37*, START+38!, MAIL+1~, GETDATE+1~, GETDATE+13!, ASK+3!
X1	START+8*!
X2	START+8*!
XMDUZ	MAIL+1~, MAIL+5*, MAILX+2!
XMSUB	MAIL+1~, MAIL+4*, MAILX+2!
XMTEXT	MAIL+1~, MAILX+1*, MAILX+2!
XMY	MAIL+1~, MAILX+2!
XMY(	MAIL+5*
XMY(""	MAILX+1
XMY("HELPDESK@DOMAIN.NAME"	MAIL+7, MAIL+8, MAIL+9, MAIL+10, MAIL+11, MAIL+12
Y	START+9, START+39, PASS+4!, MAIL+1~, MAIL+6, MAIL+14, GETDATE+1~, GETDATE+3, GETDATE+8, GETDATE+9 , GETDATE+11*, GETDATE+12, GETDATE+13!, ASK+3!
ZTDESC	FILE+15*!
ZTDTH	FILE+14, FILE+15!, GETDATE+2, GETDATE+8, ASK+4, ASK+5*
ZTIO	FILE+15*!
>> ZTQUEUED	FILE+16, START+6, PASS+10
>> ZTREQ	START+6, PASS+10
ZTRTN	FILE+15*!
>> ZTSK	FILE+16

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSOTPPOS

Information

Source Information

Call Graph

Call Graph Total: 16

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: