Routine: PSJOREN

Package	Total	Call Graph
Inpatient Medications	8	^PSGAL5 ^PSGOE6 ^PSGOE7 ^PSGOES ^PSGOETO LOG^PSIVORAL EN1^PSJHL2 $$DATE^PSJUTL2
VA Fileman	1	^DIC

Package

Total

Call Graph

Inpatient Medications

^PSGAL5 ^PSGOE6 ^PSGOE7 ^PSGOES ^PSGOETO LOG^PSIVORAL EN1^PSJHL2 $$DATE^PSJUTL2

VA Fileman

^DIC

Package	Total	Caller Graph
Inpatient Medications	3	PSGOER PSIVOPT2 PSJHL2

Package

Total

Caller Graph

Inpatient Medications

PSGOER PSIVOPT2 PSJHL2

Name	Comments	DBIA/ICR reference
PS	;
ENUDTX(DFN,ON,RES)	; Set up ORTX( Array for UD orders.
DONE	;
GO	; get orders
ENTRY	;
OUT	;
ENBKOUT(DFN,ON)	; Undo Renew.

Name	Field # of Occurrence
^DIC	PS+2
^PSGAL5	ENBKOUT+16
^PSGOE6	GO+2
^PSGOE7	GO+2
^PSGOES	GO+2
^PSGOETO	GO+2
LOG^PSIVORAL	ENBKOUT+11
EN1^PSJHL2	ENBKOUT+17
$$DATE^PSJUTL2	ENBKOUT+8, ENBKOUT+14

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"THIS PATIENT HAS NOT BEEN ADMITTED.",!,"(Any non-IV orders entered will be discontinued by the pharmacist...)" Line Location: ENTRY+2
Function Call: WRITE	Prompt: $C(7),!!,"The selected PROVIDER is NOT qualified to write MEDICATION orders. You must",!,"select a valid provider to be able to continue with Inpatient Medications." Line Location: PS+1
Function Call: WRITE	Prompt: ! Line Location: PS+2
Function Call: WRITE	Prompt: $C(7)," (Required.)" Line Location: PS+2
Routine Call	DIC Line Location: PS+2

FileNo	Call Tags
^VA(200 - [#200]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	ENTRY+2
^ORD(100.98 - [#100.98]	GO+1
^PS(50.3 - [#50.3]	ENUDTX+4
^PS(51.2 - [#51.2]	GO+1, ENUDTX+5
^PS(53.1 - [#53.1]	ENBKOUT+4, ENUDTX+3
^PS(53.3 - [#53.3]	ENBKOUT+10
^PS(55 - [#55]	ENBKOUT+7, ENBKOUT+8, ENBKOUT+9, ENBKOUT+13, ENBKOUT+14, ENBKOUT+15, ENUDTX+2, ENUDTX+6*

Name	Field # of Occurrence
^(	ENUDTX+2, ENUDTX+3
^(0	ENBKOUT+8, ENBKOUT+9, ENBKOUT+13, ENBKOUT+15
^(2	ENBKOUT+9*, ENUDTX+2, ENUDTX+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DA	ENBKOUT+2~, ENBKOUT+15*
DA(1	ENBKOUT+15*
DFN	ENBKOUT~, ENBKOUT+7, ENBKOUT+8, ENBKOUT+9, ENBKOUT+13, ENBKOUT+14, ENBKOUT+15, ENBKOUT+17, ENUDTX~, ENUDTX+2 , ENUDTX+6
DIC	PS+2!*, PS+3!
DIC("A"	PS+2*
DIC("S"	PS+2*
DIC(0	PS+2*
DO	ENUDTX+1~
>> DTOUT	PS+2
>> DUOUT	PS+2
MRN	ENUDTX+1~
ND0	ENUDTX+1~, ENUDTX+2, ENUDTX+3, ENUDTX+5
ND2	ENUDTX+1~, ENUDTX+2, ENUDTX+3, ENUDTX+5
NDP1	ENUDTX+1~, ENUDTX+2, ENUDTX+3, ENUDTX+4, ENUDTX+5
ON	ENBKOUT~, ENBKOUT+1, ENBKOUT+4, ENUDTX~, ENUDTX+2, ENUDTX+3, ENUDTX+6
ON55	ENBKOUT+2~, ENBKOUT+10*
ORTX	ENUDTX+1!
ORTX(	ENUDTX+2, ENUDTX+3
ORTX(1	ENUDTX+4*
ORTX(2	ENUDTX+5*
>> ORVP	ENTRY+2
PD	ENUDTX+1~
PSGAL	ENBKOUT+2~
PSGAL("C"	ENBKOUT+15*
>> PSGOEAV	GO+1*
>> PSGOEDMR	GO+1*
PSGOEE	ENTRY+1!, GO+2!
>> PSGOEORF	GO+1*
>> PSGOEOS	GO+2*
>> PSGOEPR	GO+1*
PSGOES	ENTRY+1!
PSIVACT	ENBKOUT+2~, ENBKOUT+10*
PSIVAL	ENBKOUT+2~, ENBKOUT+3, ENBKOUT+10
PSIVALT	ENBKOUT+2~, ENBKOUT+10*
PSIVREA	ENBKOUT+2~, ENBKOUT+10*
>> PSJHLMTN	ENBKOUT+3, ENBKOUT+17*
PSJNOW	ENBKOUT+8~, ENBKOUT+9, ENBKOUT+14~, ENBKOUT+15
PSJOC	ENBKOUT+2~, ENBKOUT+3*, ENBKOUT+17
PSJOC2	ENBKOUT+2~, ENBKOUT+3*, ENBKOUT+17
PSJOLD	ENBKOUT+2~, ENBKOUT+5*, ENBKOUT+6, ENBKOUT+7, ENBKOUT+8, ENBKOUT+9, ENBKOUT+10, ENBKOUT+12, ENBKOUT+13, ENBKOUT+14 , ENBKOUT+15, ENBKOUT+17
>> PSJORPF	PS+3*
>> PSJORPV	GO+1, PS+3*
>> PSJORPVN	PS+3*
>> PSJORTOU	GO+1*
PSJOSTOP	ENBKOUT+8~, ENBKOUT+9, ENBKOUT+14~, ENBKOUT+15
PSJRES	ENBKOUT+2~, ENBKOUT+5*
PSJSTAT	ENBKOUT+8~, ENBKOUT+9, ENBKOUT+13~, ENBKOUT+15
PSJUNDC	ENBKOUT+2~, ENBKOUT+10*
>> PSOC	ENBKOUT+3, ENBKOUT+10, ENBKOUT+17*
RES	ENUDTX~, ENUDTX+4
SCH	ENUDTX+1~
ST	ENUDTX+1~
U	ENBKOUT+5, ENBKOUT+9, ENBKOUT+10, ENBKOUT+15, ENUDTX+4, ENUDTX+5
>> X	GO+2, ENBKOUT+4, ENBKOUT+5, ENUDTX+2, ENUDTX+3
>> Y	GO+2, PS+2, PS+3, ENUDTX+2, ENUDTX+3
>> Y(0	PS+3

Customize PDF page

Package: Inpatient Medications

Routine: PSJOREN

Information

Source Information

Call Graph

Call Graph Total: 9

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Naked Globals

Local Variables

Legend: