Routine: PSIVORC2

Call Graph

Call Graph Total: 25

Package	Total	Call Graph
Inpatient Medications	19	NEWNVAL^PSGAL5 ENGNN^PSGOETO (ENSTOP,ENT)^PSIVCAL EDIT^PSIVEDT ENLBL^PSIVOPT DC^PSIVORA (53,CKFLDS,COMPLTE)^PSIVORC1 EN^PSIVORE GSTRING^PSIVORE1 (DEL55,GTPD)^PSIVORE2 (NATURE,ORPARM,RUPDATE)^PSIVOREN (GT531,PUT531,UPD100)^PSIVORFA SETNEW^PSIVORFB GTFLDS^PSIVORFE ^PSIVORV2 (IV,VFYIV)^PSJCOMV EN1^PSJHL2 VF1^PSJLIACT $$ENPC^PSJUTL
VA Fileman	3	^%DT NOW^%DTC (FIND,LIST)^DIC
Order Entry Results Reporting	1	EN1^ORCFLAG
Pharmacy Data Management	1	$$LS^PSSLOCK
Registration	1	EN^VALM

Package	Total	Caller Graph
Inpatient Medications	10	PSIVOPT PSIVORC PSIVORC1 PSIVORE PSJHLV PSJLIACT PSJLIFN PSJLIFNI PSJOE PSJOEA

Package

Total

Caller Graph

Inpatient Medications

PSIVOPT PSIVORC PSIVORC1 PSIVORE PSJHLV PSJLIACT PSJLIFN PSJLIFNI
PSJOE PSJOEA

Entry Points

Name	Comments	DBIA/ICR reference
RESET	;Reset PSIVOI("DILIST") for additives with quick codes
FINISH	; Ask only for missing data in incomplete IV order.
EDCHK	;Update or create new order in 55.
CKPC	;
VF	; Display Verify screen
NONVF()	; Updated 53.1 status to non-verified after finish.
EDIT	; Edit incomplete order
NEWORD	; Create new order, update order links.
GTIVDRG	; Try to find an IV drug from the Orderable Item. ; If there is only 1 match to OI then stuff in DRG otherwise prompt user to select which ; ad/sol matched to OI
OLDORD	; Update old order, update order links.
ACTIVE	;
CKORD	;Check if new order is to be created.
NWNONVF	;Create non-verified due to edit

External References

Name	Field # of Occurrence
^%DT	FINISH+3, FINISH+4
NOW^%DTC	GTIVDRG+4
FIND^DIC	GTIVDRG+6
LIST^DIC	GTIVDRG+9
EN1^ORCFLAG	VF+7
NEWNVAL^PSGAL5	NONVF+10, NWNONVF+10
ENGNN^PSGOETO	NWNONVF+2
ENSTOP^PSIVCAL	FINISH+4
ENT^PSIVCAL	FINISH+3
EDIT^PSIVEDT	FINISH+6
ENLBL^PSIVOPT	ACTIVE+8
DC^PSIVORA	NEWORD+2, NWNONVF+3
53^PSIVORC1	EDIT+3, FINISH+2
CKFLDS^PSIVORC1	FINISH+6
COMPLTE^PSIVORC1	FINISH+6
EN^PSIVORE	ACTIVE+6
GSTRING^PSIVORE1	EDIT+4
DEL55^PSIVORE2	NONVF+11
GTPD^PSIVORE2	NONVF+6, NWNONVF+7
NATURE^PSIVOREN	EDCHK+2
ORPARM^PSIVOREN	EDCHK+1
RUPDATE^PSIVOREN	ACTIVE+4
GT531^PSIVORFA	VF+3
PUT531^PSIVORFA	OLDORD+7, NONVF+9, NWNONVF+8
UPD100^PSIVORFA	OLDORD+7
SETNEW^PSIVORFB	ACTIVE+5
GTFLDS^PSIVORFE	EDIT+4
^PSIVORV2	EDIT+3
IV^PSJCOMV	EDCHK+5
VFYIV^PSJCOMV	ACTIVE+2
EN1^PSJHL2	ACTIVE+9, NEWORD+5, NONVF+12, NWNONVF+11
VF1^PSJLIACT	ACTIVE+7
$$ENPC^PSJUTL	FINISH+1
$$LS^PSSLOCK	NWNONVF+12
EN^VALM	EDIT+7, VF+10

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Either the Inpatient Medications or the IV Medications package is not on, please check the Order Parameters file" Line Location: EDCHK+1
Function Call: WRITE	Prompt: $C(7),"Order unchanged" Line Location: EDCHK+2
Function Call: WRITE	Prompt: !,"...transcribing this non-verified order...." Line Location: NONVF+7
Routine Call	VALM Line Location: EDIT+7 VF+10
Routine Call	DIC Line Location: GTIVDRG+9
Routine Call	DIC Line Location: GTIVDRG+6

FileNo	Call Tags
52.61	LIST^DIC

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ORD(101 - [#101]	EDIT+6
^PS(	GTIVDRG+15
^PS(51.2 - [#51.2]	FINISH+5
^PS(53.1 - [#53.1]	ACTIVE+3, ACTIVE+10, CKORD+2, CKORD+3, CKORD+4, CKORD+10, CKORD+11, CKPC+6, OLDORD+2, OLDORD+6 , OLDORD+7, NEWORD+2, NEWORD+3, NONVF+8, NWNONVF+3, NWNONVF+9*
^PS(55 - [#55]	ACTIVE+9, ACTIVE+10, OLDORD+2, OLDORD+3, OLDORD+4, NEWORD+3

Name	Line Occurrences
$$NONVF	EDCHK+6
@(	ACTIVE+5
CKORD	EDCHK+1
GTIVDRG	EDIT+2, FINISH+1
NWNONVF	NONVF+4
RESET	GTIVDRG+12
VF	NONVF+13, NWNONVF+13

Name	Field # of Occurrence
^(0	OLDORD+4, OLDORD+6
^(2	OLDORD+2, OLDORD+3, NEWORD+3*

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	GTIVDRG+4
%DT	FINISH+3!, FINISH+4!
CNT	RESET+1~, RESET+2, RESET+3*, RESET+5
DA	NWNONVF+2!
>> DFN	ACTIVE+4, ACTIVE+8, ACTIVE+9, ACTIVE+10, OLDORD+2, OLDORD+3, OLDORD+4, NEWORD+3, NEWORD+5, NONVF+12 , NWNONVF+11, VF+3
DNE	CKORD+8~, CKORD+10, CKORD+13, CKPC+4, CKPC+5, CKPC+6, CKPC+7, CKPC+8, GTIVDRG+15, FINISH+1*
>> DONE	EDIT+5
>> DRG	CKPC+7, GTIVDRG+14, GTIVDRG+15
>> DRG(	CKORD+9, CKPC+4, CKPC+5, CKPC+7, GTIVDRG+15*
>> DRG("AD"	CKORD+15, EDIT+2, FINISH+1
>> DRG("DRGC"	CKORD+8, CKORD+11, CKORD+15
>> DRG("SOL"	CKORD+15, EDIT+2, FINISH+1
>> DRGI	CKORD+9, CKORD+10, CKORD+11, CKORD+12, CKPC+5, CKPC+7
>> DRGT	CKORD+9, CKORD+10, CKORD+11, CKORD+12, CKPC+4, CKPC+5, CKPC+6, CKPC+7, GTIVDRG+7, GTIVDRG+15
DUZ	ACTIVE+8, VF+5
>> EDIT	FINISH+6
FIL	CKPC+4, GTIVDRG+3~, GTIVDRG+6, GTIVDRG+7, GTIVDRG+15
LYN	RESET+7!
LYN(	RESET+2, RESET+3, RESET+6
ND	CKORD+2~, CKORD+4, CKORD+5, CKORD+6, CKORD+8~, CKPC+5~, CKPC+6, CKPC+7, CKPC+8!, GTIVDRG+3~ , GTIVDRG+15
ND("CNT"	CKPC+6*, CKPC+8
ND("PD"	CKORD+2*, CKORD+4
ND(0	CKORD+2*, CKORD+4, CKORD+5
>> OD	ACTIVE+6*
>> ON	ACTIVE+3, ACTIVE+4, ACTIVE+5, ACTIVE+6, CKORD+2, CKORD+3, CKORD+4, CKORD+10, CKORD+11, CKPC+6 , OLDORD+2, OLDORD+7, NEWORD+2, NEWORD+3, NONVF+8, NONVF+10, NONVF+11, NONVF+12, NWNONVF+3, NWNONVF+4 , NWNONVF+9, NWNONVF+10, NWNONVF+11, NWNONVF+12, VF+1, VF+3
>> ON1	CKPC+6*
>> ON55	ACTIVE+5, ACTIVE+6*, ACTIVE+8, ACTIVE+9, ACTIVE+10, OLDORD+2, OLDORD+3, OLDORD+4, OLDORD+6, OLDORD+7 , NEWORD+3, NEWORD+5
>> ORSTS	ACTIVE+5*
>> P("21FLG"	EDCHK+4*
>> P("CLRK"	CKORD+5, VF+5
>> P("DO"	NWNONVF+7*
>> P("DTYP"	CKORD+10, CKORD+15, FINISH+2*
>> P("MR"	CKORD+4, CKORD+6, FINISH+5*
>> P("NAT"	EDCHK+2, NEWORD+2, NWNONVF+3
>> P("NEWON"	ACTIVE+4, ACTIVE+5, ACTIVE+6, NEWORD+2, NEWORD+3, NWNONVF+2, NWNONVF+3, NWNONVF+4
>> P("OLDON"	ACTIVE+4, OLDORD+2, OLDORD+3, OLDORD+4, OLDORD+6, NWNONVF+4, NWNONVF+9, VF+5
>> P("OPI"	FINISH+1*
>> P("OT"	CKORD+4, CKORD+6, CKORD+9*, CKPC+1, EDIT+2, FINISH+1, VF+8, VF+9
>> P("PD"	CKORD+4, CKORD+6, GTIVDRG+6
>> P("PRNTON"	ACTIVE+1
>> P("REN"	NONVF+5, NWNONVF+2
>> P("RES"	ACTIVE+3, ACTIVE+4, ACTIVE+5, OLDORD+1, OLDORD+2, OLDORD+3, OLDORD+4, OLDORD+6, NEWORD+1, NWNONVF+5
>> P(17	ACTIVE+5, CKORD+7, NONVF+5, NWNONVF+2*, VF+5
>> P(2	ACTIVE+4, ACTIVE+6, FINISH+3*
>> P(23	FINISH+2
>> P(3	FINISH+4*
>> P(4	EDIT+3, FINISH+2
>> P(5	FINISH+2
>> P(6	ACTIVE+5, CKORD+5, CKORD+6
>> P(8	CKORD+3, CKORD+4, CKORD+6
>> P(9	CKORD+6
>> PSGACT	VF+4, VF+5, VF+6, VF+7
PSGOEAV	NONVF+1~*, NONVF+2, NONVF+3
>> PSGP	NWNONVF+12
>> PSIVAC	NEWORD+2, EDIT+1, NWNONVF+3*
>> PSIVCHG	EDCHK+2, EDCHK+4, ACTIVE+5, CKORD+1, CKORD+2, CKORD+6, CKORD+9, CKORD+13, CKORD+14, CKORD+15* , CKPC+1, CKPC+7, CKPC+8, NONVF+4
>> PSIVCOPY	CKORD+1
>> PSIVENO	EDIT+6, EDIT+7
PSIVOI	GTIVDRG+3!, GTIVDRG+7*, GTIVDRG+8, GTIVDRG+16!
PSIVOI("DILIST"	GTIVDRG+6, GTIVDRG+9, GTIVDRG+10, GTIVDRG+13, GTIVDRG+14, GTIVDRG+16, RESET+2, RESET+3, RESET+4!, RESET+5 , RESET+6*
>> PSIVOK	FINISH+6*
PSIVORFA	NONVF+11~*
>> PSIVQC("DILIST"	GTIVDRG+10, GTIVDRG+11!
>> PSIVUP	FINISH+1
>> PSJCOM	EDCHK+5, ACTIVE+1*, ACTIVE+2
PSJIVBD	VF+2!
>> PSJIVORF	EDCHK+1, EDCHK+2, NEWORD+5
>> PSJNOL	NWNONVF+12*
PSJNOW	GTIVDRG+3~, GTIVDRG+4*
>> PSJORD	ACTIVE+5, ACTIVE+10, NEWORD+3, NWNONVF+3
>> PSJORNAT	NEWORD+2, NWNONVF+3
>> PSJORNP	ACTIVE+5*
>> PSJOSTOP	ACTIVE+4*
>> PSJSTAR	VF+8, VF+9
>> PSJSYSP0	NONVF+1
>> PSJSYSU	NONVF+2, NONVF+3, NONVF+10, NWNONVF+10, VF+6, VF+7
QC	GTIVDRG+9~, GTIVDRG+10*
SCR	GTIVDRG+3~
SCR("S"	GTIVDRG+5*, GTIVDRG+6
TDRG	CKORD+8~, CKPC+5~, CKPC+8!
TDRG(	CKORD+9, CKORD+12, CKPC+5, CKPC+7
TDRG("CNT"	CKPC+5*, CKPC+8
U	ACTIVE+3, CKORD+2, CKORD+3, CKORD+4, CKORD+5, CKORD+6, CKORD+9, CKORD+12, CKPC+5, CKPC+7 , OLDORD+2, OLDORD+3, OLDORD+4, OLDORD+6, OLDORD+7, NEWORD+2, NEWORD+3, GTIVDRG+15, NONVF+1, NONVF+8 , NWNONVF+3, NWNONVF+9
>> VALM("PROTOCOL"	EDIT+6
>> VALMBCK	EDIT+7*
X	CKORD+3~, CKORD+4, CKORD+11, CKORD+12, FINISH+3, FINISH+4
XX	GTIVDRG+9~, GTIVDRG+10, RESET+1~, RESET+2, RESET+3, RESET+6*
XXX	GTIVDRG+9~, RESET+1~, RESET+3
>> Y	FINISH+3, FINISH+4

Customize PDF page

Package: Inpatient Medications

Routine: PSIVORC2

Information

Source Information

Call Graph

Call Graph Total: 25

Caller Graph

Caller Graph Total: 10

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items