Routine: PSJLMGUD

Information

PSJLMGUD ;BIR/MLM-INITIALIZE UNIT DOSE ORDER FIELDS FOR DISPLAY ;05 Feb 99 / 9:46 AM

Source Information

Call Graph

Call Graph Total: 12

Package	Total	Call Graph
Inpatient Medications	7	($$ENDD,$$ENDTC,$$ENNPN,$$ENSTN)^PSGMI GTST^PSGOE6 ENF^PSGOEE (ENDRG,UPD)^PSGOEF1 ENOS^PSGS0 $$ENSET^PSGSICHK $$OINAME^PSJLMUTL
VA Fileman	2	%XY^%RCR ^DIR
Kernel	1	$$LOW^XLFSTR
Order Entry Results Reporting	1	($$ES,ES)^ORX8
Registration	1	EN^VALM

Caller Graph

Caller Graph Total: 10

Package	Total	Caller Graph
Inpatient Medications	10	PSGOD PSGOEE PSGOEF PSGOEI PSGOETO PSGOEVS PSJCOM1 PSJOE PSJOE1 PSJOEA

Entry Points

Name	Comments	DBIA/ICR reference
313	;;25^PSGOE81;PSGOFD;PSGFD;25;0
312	;;10^PSGOE81;PSGOSD;PSGSD;10;0
311	;;66^PSGOE82;;;66;1
310	;;40^PSGOE82;;;40;0
ACCEPT	;
314	;;5^PSGOE82;PSGOSM;PSGSM;5;0
DONE	;
SET	;
EN2	;
BYPASS	;
FINISH	;
AH	;
GETUD(DFN,PSGORD)	;
39	;;2^PSGOE82;;;2;0
38	;;8^PSGOE81;PSGOSI;PSGSI;8;0
EDIT	;
32	;;109^PSGOE8;PSGODO;PSGDO;102;PSGODO]""
31	;;101^PSGOE8;PSGOPD;PSGPD;101;1
37	;;1^PSGOE82;PSGOPR;PSGPR;1;1
36	;;39^PSGOE81;PSGOAT;PSGAT;39;0
35	;;26^PSGOE8;PSGOSCH;PSGSCH;26;1
34	;;7^PSGOE8;PSGOST;PSGST;7;0
33	;;3^PSGOE8;PSGOMR;PSGMR;3;1

External References

Name	Field # of Occurrence
%XY^%RCR	SET+5
^DIR	FINISH+7
$$ES^ORX8	EN2+15
ES^ORX8	EN2+15
$$ENDD^PSGMI	EN2+11, SET+2, SET+3
$$ENDTC^PSGMI	EN2+11, SET+2, SET+3
$$ENNPN^PSGMI	EN2+17
$$ENSTN^PSGMI	SET+2
GTST^PSGOE6	FINISH+8
ENF^PSGOEE	EDIT+1
ENDRG^PSGOEF1	FINISH+6
UPD^PSGOEF1	ACCEPT+1, EDIT+1
ENOS^PSGS0	SET+10, FINISH+2
$$ENSET^PSGSICHK	EN2+14
$$OINAME^PSJLMUTL	EN2+8
EN^VALM	FINISH+8
$$LOW^XLFSTR	EN2+16

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: $C(7),!!,"PLEASE NOTE: This order must have" Line Location: FINISH+4
Function Call: WRITE	Prompt: ! Condition for execution: $L(Y)+$X>78 Line Location: FINISH+4
Function Call: WRITE	Prompt: Y," " Line Location: FINISH+4
Function Call: WRITE	Prompt: !! Line Location: FINISH+7
Function Call: WRITE	Prompt: !!?2,"Answer 'YES' to accept this order as a NON-VERIFIED UNIT DOSE order. Answer",!,"'NO' to edit this order now. Enter '^' to BYPASS this order, leaving it as",!,"a PENDING INPATIENT order." Line Location: AH+1
Routine Call	VALM Line Location: FINISH+8
Routine Call	DIR Line Location: FINISH+7

Name	Line Occurrences (* Changed, ! Killed)
^PS(51.2 - [#51.2]	EN2+9
^PS(53.1 - [#53.1]	EN2+3, FINISH+1*
^PS(53.45 - [#53.45]	SET+5!, SET+6*, FINISH+3
^PS(55 - [#55]	EN2+3
^PSDRUG - [#50]	EN2+13
^VA(200 - [#200]	EN2+13, EN2+14

Name	Line Occurrences
35	FINISH+5
@(	FINISH+5
DONE	FINISH+5, FINISH+6, FINISH+8, ACCEPT+1, BYPASS+1

Name	Field # of Occurrence
^(	EN2+6
^(0	EN2+3
^(14	EN2+6
^(2	EN2+6, SET+5!
^(4	EN2+6
^(6	EN2+6
^(6.5	EN2+6

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%X	EN2+1~, SET+5*
%Y	EN2+1~, SET+5*
CHK	FINISH+6*, DONE+1!
DA	DONE+1!
DFN	GETUD~, EN2+3, EN2+4
DIE	DONE+1!
DIR	FINISH+7!
DIR(0	FINISH+7*
DO	EN2+1~, EN2+6*, EN2+8
DR	DONE+1!
DRG	DONE+1!
DRGI	EN2+1~, EN2+13*
DT	EN2+13
ESIG	EN2+1~, EN2+6, EN2+15, EN2+16
ESIG1	EN2+15~*
>> F1	FINISH+5*
FD	EN2+1~, EN2+10, SET+1, SET+3
FL	EN2+1~, EN2+4*
FQC	EN2+1~, EN2+10*
GMRAL	EN2+2!
MSG	FINISH+5*, FINISH+7, DONE+1!
ND	EN2+1~, EN2+6*, EN2+9, EN2+10, EN2+15, EN2+17
ND2	EN2+1~, EN2+6*, EN2+10
NF	EN2+1~, EN2+3*, EN2+4
ORETURN	DONE+1!
ORIFN	DONE+1!
OSGSD	DONE+1!
P	EN2+2!
PRI	EN2+1~, EN2+13*
PSG0XT	DONE+1!
>> PSG14	EN2+6*, EN2+7
>> PSGCANFL	BYPASS+1*, EDIT+1
PSGDRGN	DONE+1!
PSGEB	EN2+6*, EN2+17, DONE+1!
>> PSGEBN	EN2+17*
PSGEFN	DONE+1!
>> PSGLI	EN2+10*, EN2+11
>> PSGLIN	EN2+11*
>> PSGLRN	EN2+7*
PSGND	DONE+1!
>> PSGOAT	EN2+10*
>> PSGODO	EN2+8*
PSGOEE	FINISH+5*, DONE+1!
PSGOEEF	FINISH+5*, DONE+1!
PSGOEEF(	FINISH+5*
PSGOEEG	DONE+1!
PSGOEEND	EDIT+1!, DONE+1!
>> PSGOEEWF	EN2+4*, EN2+6, EN2+7, SET+5
PSGOEF	DONE+1!
PSGOEFF	FINISH+3*, FINISH+4, FINISH+5, FINISH+6, FINISH+8, DONE+1!
PSGOES	SET+9~, FINISH+2~, DONE+1!
>> PSGOFD	EN2+10*
>> PSGOFDN	SET+2, SET+3
>> PSGOHSM	EN2+9*
>> PSGOINST	EN2+6*
>> PSGOMR	EN2+9*
>> PSGOMRN	EN2+9*
PSGOPD	EN2+8*, EN2+13, FINISH+6, EDIT+1, DONE+1!
PSGOPDN	EN2+8*, EDIT+1, DONE+1!
PSGOPR	EN2+9*, EN2+13, EN2+14, DONE+1!
>> PSGOPRN	EN2+14, EN2+16
PSGORD	GETUD~, EN2+3*, EN2+4, FINISH+1, FINISH+8
PSGOSCH	EN2+10, SET+9~, SET+10, FINISH+1, FINISH+2, FINISH+3, DONE+1!
>> PSGOSD	EN2+10*
>> PSGOSDN	SET+2*
>> PSGOSI	EN2+6, EN2+14
>> PSGOSM	EN2+9*
>> PSGOST	EN2+9*
>> PSGOSTN	SET+2*
PSGPDRG	EDIT+1*, DONE+1!
>> PSGPDRGN	EDIT+1*
>> PSGPRIO	EN2+8*
>> PSGS0XT	EN2+10, SET+9, SET+10, FINISH+1
PSGS0XTO	SET+9~*, SET+10
PSGS0Y	EN2+10*, FINISH+2~, DONE+1!
>> PSGSCH	SET+7, SET+9, SET+10
>> PSGST	FINISH+8
>> PSGSTAT	EN2+18*
PSJNSS	SET+7!
>> PSJPRI	EN2+8*
>> PSJSYSP	SET+5, SET+6, FINISH+3
>> Q	FINISH+4*
Q1	DONE+1!
Q2	DONE+1!
SD	EN2+1~, EN2+10, SET+1, SET+2
SIG	EN2+1~, EN2+6*
ST	EN2+1~, EN2+9, SET+1, SET+2
STD	EN2+1~
>> STT	EN2+9, EN2+17, EN2+18, SET+1
U	EN2+6, EN2+8, EN2+10, EN2+11, EN2+15, EN2+17
X	EN2+1~, EN2+8, EN2+18, SET+4, SET+9, SET+10, FINISH+2, FINISH+3, FINISH+4
XQORM	FINISH+8~
Y	EN2+1~, EN2+4, SET+9~, FINISH+4, FINISH+5*

Customize PDF page

Package: Inpatient Medications

Routine: PSJLMGUD

Information

Source Information

Call Graph

Call Graph Total: 12

Caller Graph

Caller Graph Total: 10

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items