Routine: PSOELPS2

Package	Total	Call Graph
VA Fileman	4	(,DD)^%DT (C,NOW)^%DTC ^DIC ^DIR
Kernel	3	^%ZTLOAD $$DT^XLFDT (BMES,MES)^XPDUTL
MailMan	1	^XMD
Order Entry Results Reporting	1	$$STATUS^ORQOR2
Outpatient Pharmacy	1	EN^PSOHLSN1

Entry Points

Name	Comments	DBIA/ICR reference
EN	;
CHKARROW	;
ACT	; SET ENTRY IN ACTIVITY LOG
ASK
MAIL	;Send MailMan message upon job completion
UPDCPRS	; UPDATE CPRS ENTRY WITH CORRECT STATUS AND DATE
GETPACRF	;
GETDEL	;
GETDATE	; GET DATE/TIME OF WHEN BACKGROUND JOB SHOULD BE RUN

External References

Name	Field # of Occurrence
^%DT	GETDATE+8
DD^%DT	MAIL+8, MAIL+9, GETDATE+3, GETDATE+11
C^%DTC	UPDCPRS+3
NOW^%DTC	EN+5, MAIL+4, ACT+4, GETDATE+3, GETDATE+7
^%ZTLOAD	PSOELPS2+21
^DIC	GETPACRF+1
^DIR	GETPACRF+6
$$STATUS^ORQOR2	EN+11
EN^PSOHLSN1	UPDCPRS+1
$$DT^XLFDT	EN+4
^XMD	MAIL+12
BMES^XPDUTL	PSOELPS2+10, PSOELPS2+13, PSOELPS2+17, GETPACRF+3, GETPACRF+4, GETPACRF+5, GETDATE+4, ASK, ASK+1
MES^XPDUTL	PSOELPS2+11, PSOELPS2+12, PSOELPS2+14, PSOELPS2+15, PSOELPS2+16, PSOELPS2+18, PSOELPS2+19, GETDATE+5, GETDATE+6, GETDATE+8

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: GETDATE+7
Function Call: READ	Timeout: 300 Variable: XX Line Location: ASK+1
Routine Call	DIC Line Location: GETPACRF+1
Routine Call	DIR Line Location: GETPACRF+6

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD("DILOCKTM"	EN+1
^OR(100 - [#100]	EN+12, EN+13, UPDCPRS+4, UPDCPRS+5
^PSRX - [#52]	EN+8, EN+9, EN+14, EN+24, GETDEL+2, GETDEL+4, ACT+2, ACT+3, ACT+4, CHKARROW+2 , CHKARROW+8
^PSRX("APL"	EN+7
^XTMP("PSOELPS2"	EN+1, MAIL+13, UPDCPRS+3, UPDCPRS+4, UPDCPRS+5, CHKARROW+5

Label References

Name	Line Occurrences
ACT	EN+22
ASK	ASK+1
CHKARROW	EN+10
GETDATE	PSOELPS2+20, ASK+2
GETDEL	EN+16, EN+20
GETPACRF	PSOELPS2+8, EN+3
UPDCPRS	EN+18, EN+23

Naked Globals

Name	Field # of Occurrence
^(	GETDEL+2
^(3	UPDCPRS+5
^(6	UPDCPRS+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	EN+5, MAIL+4, ACT+4, GETDATE+3, GETDATE+7
%DT	GETDATE+7!*, GETDATE+8!
%DT("A"	GETDATE+7*
%DT(0	GETDATE+7*
DIC	GETPACRF+1*!
DIC(0	GETPACRF+1*
DIFROM	MAIL+12~
DIR	GETPACRF+6!
DIR("A"	GETPACRF+6*
DIR(0	GETPACRF+6*
DT	EN+4*, UPDCPRS+2, UPDCPRS+3
>> DTOUT	GETDATE+8
DUZ	MAIL+2, MAIL+3, UPDCPRS+1*, ACT+4
IR	ACT+1~, ACT+2, ACT+3, ACT+4
J	ACT+1~, ACT+2*
>> NOW	GETDATE+2, GETDATE+8, GETDATE+9, ASK
PSOACRL	EN+2~, GETDEL+4*, GETDEL+5
PSOADT	EN+2~, GETDEL+2, GETDEL+5, UPDCPRS+2*, UPDCPRS+4, UPDCPRS+5
PSOALC	EN+2~, GETDEL+5*, GETDEL+6
PSOCOMM	EN+2~, GETDEL+1, GETDEL+5, GETDEL+6*, UPDCPRS+1
PSOCPRS	EN+2~, EN+7*, EN+8, EN+11, EN+12, EN+13, UPDCPRS+4, UPDCPRS+5
PSOCSTAT	EN+2~, EN+14*, EN+15, EN+19
PSOECT	EN+2~, EN+6, MAIL+6, UPDCPRS+1
PSOEND	EN+2~, MAIL+4, MAIL+9, MAIL+11
PSOETEXT	EN+2~
PSOETEXT(1	MAIL+5*
PSOETEXT(2	MAIL+6*
PSOETEXT(3	MAIL+7*
PSOETEXT(4	MAIL+10*
PSOETEXT(5	MAIL+11*
PSOIJ	EN+2~, GETDEL+2*
PSOJJ	EN+2~, EN+17, EN+21, GETDEL+2*, GETDEL+3, GETDEL+4
PSONAT	EN+2~, GETDEL+5*, UPDCPRS+1
PSOPACRF	PSOELPS2+7~, PSOELPS2+9, EN+3, EN+13, MAIL+1!, GETPACRF+7*
PSOPHR	EN+2~, GETDEL+2, GETDEL+5, UPDCPRS+1
PSOREAS	EN+2~, GETDEL+2*
>> PSORX2	EN+6, MAIL+7, CHKARROW+7
PSORXNUM	EN+2~, EN+7*, EN+8, EN+9, EN+12, EN+14, EN+24, GETDEL+2, GETDEL+4, UPDCPRS+1 , ACT+2, ACT+3, ACT+4, CHKARROW+2, CHKARROW+5, CHKARROW+8
PSOSTA	EN+2~, EN+11*, EN+15, EN+19
PSOSTART	EN+2~, EN+5, MAIL+8, MAIL+10
PSOXCOM	EN+2~
PSOXDT	EN+2~
PSOZDUZ	EN+2~, UPDCPRS+1*
RX2	CHKARROW+1~, CHKARROW+2, CHKARROW+3, CHKARROW+4, CHKARROW+5, CHKARROW+6, CHKARROW+8
>> SAVEY	GETDATE+10*, GETDATE+13
>> TODAY	GETDATE+3*
>> X	UPDCPRS+3, GETPACRF+1, GETDATE+12, ASK
>> X1	UPDCPRS+3*
>> X2	UPDCPRS+3*
XMDUZ	MAIL+3*, MAIL+12!
XMSUB	MAIL+3*, MAIL+12!
XMTEXT	MAIL+12*!
>> XMY(	MAIL+3*
>> XX	ASK+1*, ASK+2
Y	MAIL+8, MAIL+9, MAIL+12!, GETPACRF+2, GETPACRF+7, GETDATE+3, GETDATE+8, GETDATE+9, GETDATE+10, GETDATE+12 , GETDATE+13, ASK+3
ZTDESC	PSOELPS2+21*!
ZTDTH	PSOELPS2+21!, GETDATE+1, GETDATE+8, ASK+3, ASK+4
ZTIO	PSOELPS2+21*!
>> ZTQUEUED	PSOELPS2+22, EN+1, MAIL+14
>> ZTREQ	EN+1, MAIL+14
ZTRTN	PSOELPS2+21*!
>> ZTSAVE("PSOPACRF"	PSOELPS2+21*
>> ZTSK	PSOELPS2+22

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSOELPS2

Information

Source Information

Call Graph

Call Graph Total: 10

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: