Routine: PSJLIFN

Call Graph Total: 19

Package	Total	Call Graph
Inpatient Medications	14	$$ENIVUD^PSGOEF1 Q2^PSGS0 (ENSTOP,ENT)^PSIVCAL (ORDERCHK,SAVEDRG)^PSIVEDRG EDIT^PSIVEDT (53,CKFLDS,COMPLTE)^PSIVORC1 GTIVDRG^PSIVORC2 GT531^PSIVORFA ($$GTPCI,GTOT)^PSIVUTL ORDCHK^PSJLIFNI UDVARS^PSJLIORD $$SCHREQ^PSJLIVFD HOLDHDR^PSJOE $$ENPC^PSJUTL
Registration	3	EN^VALM PAUSE^VALM1 RE^VALM4
Outpatient Pharmacy	1	DRGCHK^PSOORDRG
VA Fileman	1	^%DT

Package

Total

Call Graph

$$ENIVUD^PSGOEF1 Q2^PSGS0 (ENSTOP,ENT)^PSIVCAL (ORDERCHK,SAVEDRG)^PSIVEDRG EDIT^PSIVEDT (53,CKFLDS,COMPLTE)^PSIVORC1 GTIVDRG^PSIVORC2 GT531^PSIVORFA
($$GTPCI,GTOT)^PSIVUTL ORDCHK^PSJLIFNI UDVARS^PSJLIORD $$SCHREQ^PSJLIVFD HOLDHDR^PSJOE $$ENPC^PSJUTL

Registration

EN^VALM PAUSE^VALM1 RE^VALM4

Outpatient Pharmacy

DRGCHK^PSOORDRG

VA Fileman

^%DT

Package	Total	Caller Graph
Inpatient Medications	10	PSIVOPT PSIVOPT2 PSIVORC PSJCOMR PSJLIACT PSJLIFNI PSJLIORD PSJLIPRF PSJOE PSJOEA

Package

Total

Caller Graph

Inpatient Medications

PSIVOPT PSIVOPT2 PSIVORC PSJCOMR PSJLIACT PSJLIFNI PSJLIORD PSJLIPRF
PSJOE PSJOEA

Entry Points

Name	Comments	DBIA/ICR reference
FINISH	; Prompt for missing data
DISPLAY	;
EN	; Display order with numbers.
OCORD	;* Do order check for each drug against the drugs within the order.
ORDCHKA	;* Do order check agaist existing orders on the profile
ORDCHK	;* Do order check for Inpatient Meds IV. ; PSGORQF is defined (CONT^PSGSICHK) if not log an intervention
PENDING	; Process pending order.
GTDATA	;

External References

Name	Field # of Occurrence
^%DT	GTDATA+5, GTDATA+6
$$ENIVUD^PSGOEF1	FINISH+11
Q2^PSGS0	FINISH+22
ENSTOP^PSIVCAL	GTDATA+6, FINISH+25
ENT^PSIVCAL	GTDATA+5
ORDERCHK^PSIVEDRG	ORDCHKA+6
SAVEDRG^PSIVEDRG	OCORD+2, OCORD+27
EDIT^PSIVEDT	FINISH+30
53^PSIVORC1	FINISH+20
CKFLDS^PSIVORC1	FINISH+30
COMPLTE^PSIVORC1	FINISH+32
GTIVDRG^PSIVORC2	FINISH+25
GT531^PSIVORFA	PENDING+8
$$GTPCI^PSIVUTL	PENDING+8
GTOT^PSIVUTL	PENDING+9
ORDCHK^PSJLIFNI	OCORD+22, OCORD+25
UDVARS^PSJLIORD	FINISH+10
$$SCHREQ^PSJLIVFD	FINISH+21
HOLDHDR^PSJOE	FINISH+12
$$ENPC^PSJUTL	FINISH+17
DRGCHK^PSOORDRG	OCORD+20, OCORD+24
EN^VALM	PENDING+17, PENDING+19, DISPLAY+3, DISPLAY+4
PAUSE^VALM1	EN+1, FINISH+16
RE^VALM4	FINISH+16, FINISH+23, FINISH+28, FINISH+34

Name	Line Occurrences
Function Call: WRITE	Prompt: !,$C(7),$C(7),"This order is being edited by another user. Try later." Line Location: EN+1
Routine Call	VALM Line Location: PENDING+17 PENDING+19 DISPLAY+3 DISPLAY+4

Name	Line Occurrences (* Changed, ! Killed)
^PS(51.2 - [#51.2]	GTDATA+7
^PS(52.6 - [#52.6]	OCORD+5
^PS(52.7 - [#52.7]	OCORD+11
^PS(53.1 - [#53.1]	EN+1, EN+3, FINISH+6, FINISH+14
^PSDRUG - [#50]	OCORD+21
^TMP($J	OCORD+21*

Name	Line Occurrences
GTDATA	PENDING+19, FINISH+24
OCORD	ORDCHK+4
ORDCHK	FINISH+26, FINISH+28
PENDING	EN+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	GTDATA+5!, GTDATA+6!
DDRUG	OCORD+1~, OCORD+5, OCORD+6, OCORD+11, OCORD+12, OCORD+20, OCORD+24
DDRUG(	OCORD+6, OCORD+12, OCORD+20!, OCORD+24!
>> DFN	PENDING+7, PENDING+8, OCORD+18, OCORD+26
>> DNE	FINISH+25, FINISH+28
>> DONE	FINISH+31
DRG	FINISH+29!, OCORD+2, OCORD+27
DRG(	ORDCHKA+2, ORDCHKA+3, ORDCHKA+7
DRG("AD"	FINISH+25, OCORD+4, OCORD+5
DRG("SOL"	FINISH+25, OCORD+10, OCORD+11
DRGOC	FINISH+8~, ORDCHK+3~
DRGOC(	ORDCHKA+6, ORDCHKA+7*
DRGTMP	FINISH+8~, ORDCHKA+3*, ORDCHKA+5, ORDCHKA+8
>> EDIT	FINISH+30
FIL	FINISH+8~, ORDCHKA+1*
INTERVEN	OCORD+17~*
NSFF	FINISH+8~*, FINISH+11!, FINISH+35!
>> ON	PENDING+7, PENDING+8, PENDING+12, PENDING+13, PENDING+14, FINISH+9, ORDCHKA+6, ORDCHKA+7, OCORD+21
ON55	FINISH+8~, FINISH+9*
>> P	FINISH+21
>> P("DTYP"	GTDATA+2*
>> P("MR"	GTDATA+7*
>> P("OPI"	FINISH+17*
>> P("OT"	PENDING+9, PENDING+15, DISPLAY+3, DISPLAY+4, FINISH+24, FINISH+28
>> P("PON"	PENDING+7*
>> P("RES"	GTDATA+4, FINISH+20
>> P(15	FINISH+21, FINISH+22
>> P(2	GTDATA+3, GTDATA+5*
>> P(23	GTDATA+2
>> P(3	GTDATA+6, FINISH+25
>> P(4	PENDING+9, GTDATA+2, FINISH+21, FINISH+23, FINISH+29*
>> P(5	GTDATA+2
>> P(9	FINISH+21, FINISH+22
>> PSGACT	DISPLAY+1*
>> PSGORD	FINISH+9*
PSGORQF	FINISH+8~, FINISH+28, FINISH+29, FINISH+34, ORDCHK+2!, ORDCHK+4, ORDCHKA+1, ORDCHKA+2
>> PSGP	PENDING+7, ORDCHKA+6
PSGRDTX	FINISH+7!
PSGS0XT	FINISH+22~*
>> PSIVAC	PENDING+7*
PSIVACEP	PENDING+6~, FINISH+33
>> PSIVAS	ORDCHKA+1*, ORDCHKA+2, ORDCHKA+3, ORDCHKA+7
PSIVFN1	PENDING+6~
PSIVNUM	PENDING+11~*
PSIVOCON	FINISH+8~, FINISH+9*
PSIVOI	PENDING+6~
>> PSIVOK	FINISH+30*
PSIVS	FINISH+8~
>> PSIVUP	PENDING+8*, FINISH+17
PSIVX	ORDCHKA+2, ORDCHKA+3, ORDCHKA+7, OCORD+1~, OCORD+19, OCORD+20, OCORD+21, OCORD+23*, OCORD+24
PSIVXD	FINISH+8~
PSJAD	OCORD+1~
PSJAD(	OCORD+6*, OCORD+19, OCORD+21
PSJADTMP	ORDCHKA+9!
PSJADTMP(	ORDCHKA+5, ORDCHKA+8*
PSJCOM	FINISH+6~*
PSJDFN	OCORD+17~, OCORD+18*, OCORD+20, OCORD+22, OCORD+24, OCORD+25, OCORD+26
PSJDISP	DISPLAY+5!
>> PSJHIS	DISPLAY+6
PSJIVBD	FINISH+7!
PSJL	PENDING+10~
PSJLMX	PENDING+6~, FINISH+15
>> PSJLYN	PENDING+13, FINISH+9
PSJMAI	PENDING+14*, PENDING+20!, FINISH+9
PSJNSS	FINISH+22~*
>> PSJORD	EN+1, EN+3, PENDING+7, PENDING+12, FINISH+6, FINISH+9, FINISH+11, FINISH+14
>> PSJPROT	FINISH+11
PSJREN	EN+2!, GTDATA+4*
PSJSOL	OCORD+1~
PSJSOL(	OCORD+12*, OCORD+23
PSJSTAR	PENDING+11~, PENDING+16, PENDING+18
TMPDRG	OCORD+1~, OCORD+2, OCORD+27
TYPE	OCORD+22~, OCORD+25~
U	OCORD+5, OCORD+11, OCORD+21
>> VALMBCK	DISPLAY+6, FINISH+29, FINISH+31, FINISH+33
>> VALMBG	FINISH+16, FINISH+27, FINISH+34*
>> VALMSG	DISPLAY+2*
X	GTDATA+5, GTDATA+6, FINISH+22~, OCORD+1~, OCORD+4, OCORD+5, OCORD+10*, OCORD+11
Y	GTDATA+5, GTDATA+6, OCORD+1~

Customize PDF page

Package: Inpatient Medications

Routine: PSJLIFN

Information

Source Information

Call Graph

Call Graph Total: 19

Caller Graph

Caller Graph Total: 10

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: