Routine: PSIVOPT

Call Graph

Call Graph Total: 23

Package	Total	Call Graph
Inpatient Medications	19	ENL^PSGVDS CKO^PSIVCHK (EXPIR,HOLD)^PSIVOE ($$IVDUPADD,ENLBL)^PSIVOPT E^PSIVOPT1 (D,R)^PSIVOPT2 LOG^PSIVORAL SHOW1^PSIVORC VF^PSIVORC2 (NATURE,ORPARM)^PSIVOREN GT531^PSIVORFA GT55^PSIVORFB (EN,ENNH)^PSIVORV2 WP^PSJAC EN1^PSJHL2 EN^PSJLIFN EN^PSJLIORD $$LOCK^PSJOEA CHK^PSJOEA1
VA Fileman	4	NOW^%DTC ^DIC ^DIE ^DIK

Package	Total	Caller Graph
Inpatient Medications	15	PSGOEC PSGVBWP PSIVOPT PSIVOPT1 PSIVOPT2 PSIVORA PSIVORC2 PSIVORE PSIVUWL PSJADT0 PSJCOMR PSJLIACT PSJOE PSJOE0 PSJPR

Package

Total

Caller Graph

Inpatient Medications

PSGOEC PSGVBWP PSIVOPT PSIVOPT1 PSIVOPT2 PSIVORA PSIVORC2 PSIVORE
PSIVUWL PSJADT0 PSJCOMR PSJLIACT PSJOE PSJOE0 PSJPR

Entry Points

Name	Comments	DBIA/ICR reference
CK	; Check if drugs are still valid.
ENARI(DFN,ON,PSGUOW,PSIVAL)	; Auto-reinstate IV orders if movement is deleted.
E	; Entry for Pharmacy edit
D	; Discontinue order.
O(DFN,ON,STAT,STOP)	; On/Off Call
UPSTAT	; Update orders status.
K	; Kill variables.
S	; View order.
VA200(X)	;Return the IEN for the user. ; X = User name
ENINP(DFN,ON)	; Entry from Inpatient Profile.
UNLOCK	; Unlock order.
R	; Renew order.
ENIN	; Entry for inpatient order entry/profile options.
EXPIR	; Update status of expired orders.
ACT	; Prompt for order action.
ENLBL(PSGTOL,PSGUOW,PSGP,PSGTOO,DA,RES)	;
IVDUPADD(PSGP,ORDERNUM)	;
H(DFN,ON,STAT,STOP)

External References

Name	Field # of Occurrence
NOW^%DTC	O+1, H+1, ENLBL+5, IVDUPADD+8
^DIC	VA200+2
^DIE	UPSTAT+1, ENARI+17
^DIK	ENARI+25
ENL^PSGVDS	ENLBL+5
CKO^PSIVCHK	O+4, H+5
EXPIR^PSIVOE	EXPIR+2
HOLD^PSIVOE	H+5
$$IVDUPADD^PSIVOPT	ENARI+11
ENLBL^PSIVOPT	H+5, ENARI+26
E^PSIVOPT1	E+1
D^PSIVOPT2	D+1
R^PSIVOPT2	R+1
LOG^PSIVORAL	O+4, H+5, ENARI+19
SHOW1^PSIVORC	ENIN+1
VF^PSIVORC2	ACT+4, ACT+6
NATURE^PSIVOREN	H+3
ORPARM^PSIVOREN	ENARI+21
GT531^PSIVORFA	ACT+4, ACT+6
GT55^PSIVORFB	ENIN+2
EN^PSIVORV2	S+1, ENIN+2
ENNH^PSIVORV2	ENINP+1
WP^PSJAC	ENLBL+2
EN1^PSJHL2	ENARI+22
EN^PSJLIFN	ACT+7, ACT+9
EN^PSJLIORD	ACT+3
$$LOCK^PSJOEA	ACT+5
CHK^PSJOEA1	ACT+8

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,$C(7),$C(7),"This order is being edited by another user. Try later." Line Location: PSIVOPT+11
Function Call: WRITE	Prompt: !,$C(7),$C(7),"This order is being edited by another user. Try later." Line Location: PSIVOPT+12
Function Call: WRITE	Prompt: !,$C(7),"Only active orders may be placed on hold." Line Location: O+2
Function Call: WRITE	Prompt: !,$C(7),"Only active orders may be placed on hold." Line Location: H+2
Function Call: WRITE	Prompt: !!,"Order unchanged." Line Location: H+3
Function Call: WRITE	Prompt: @IOF Line Location: S+1
Function Call: WRITE	Prompt: $C(7)," This order has expired." Line Location: EXPIR+2
Routine Call	DIE Line Location: UPSTAT+1 ENARI+17
Routine Call	DIC Line Location: VA200+2

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

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	ENLBL+2
^PS(	CK+2
^PS(53.1 - [#53.1]	ACT+2, ACT+4, ACT+5, ACT+6, ACT+7
^PS(53.3 - [#53.3]	ENARI+19
^PS(53.41 - [#53.41]	ENARI+25
^PS(55 - [#55]	PSIVOPT+10, UNLOCK+3, ACT+2, ENIN+3, ENARI+4, ENARI+5, ENARI+6, ENARI+8, ENARI+13!, ENARI+14 , ENARI+16, ENARI+21, ENLBL+4, ENLBL+5*, IVDUPADD+5, IVDUPADD+7, IVDUPADD+11, IVDUPADD+14, IVDUPADD+16, IVDUPADD+18 , IVDUPADD+20
^PSDRUG - [#50]	CK+2
^TMP("PSJNOTUNDC"	ENARI+11*
^TMP("PSJUNDC"	ENARI+18*

Name	Line Occurrences
$$VA200	ENARI+9
@(	PSIVOPT+14, S+1, ENINP+1
ACT	PSIVOPT+15
EXPIR	O+1, H+1
K	PSIVOPT+11, PSIVOPT+14
PSIVOPT	ENIN+2
UPSTAT	O+4, H+5, EXPIR+2

Name	Field # of Occurrence
^("I"	CK+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	K+1!, O+1, H+1, ENLBL+5, IVDUPADD+9
CHKIT	ENARI+16~*
DA	K+1!, UPSTAT+1~, ENARI+12~, ENARI+15, ENARI+25!*, ENARI+26!, ENLBL~, ENLBL+4, ENLBL+5
DA(1	UPSTAT+1, ENARI+15, ENARI+25*
DA(2	ENARI+25*
DA(3	ENARI+25*
DA(4	ENARI+25*
>> DATELOOP	IVDUPADD+9, IVDUPADD+11, IVDUPADD+14
DFN	PSIVOPT+10, UNLOCK+3, ACT+2, ACT+3, ACT+4, ACT+5, ACT+6, O~, H~, H+5 , S+1, UPSTAT+1, ENIN+1~, ENIN+2, ENIN+3, ENARI~, ENARI+13, ENARI+14, ENARI+15, ENARI+16 , ENARI+18, ENARI+21, ENARI+22, ENARI+25, ENARI+26, ENINP~, ENINP+1, ENLBL+5
DIC	VA200+2~*
DIC(0	VA200+2*
DIE	K+1!, UPSTAT+1~, ENARI+12~, ENARI+15
DIK	K+1!, ENARI+12~, ENARI+25!*
DLAYGO	K+1!
DNE	K+1!
>> DONE	PSIVOPT+15, ACT+4, ACT+10*
DR	K+1!, UPSTAT+1~, ENARI+12~, ENARI+14, ENARI+16*
DRG	K+1!, CK+2*
DRG(	CK+1, CK+2
DRGI	K+1!, CK+1*, CK+2
DRGT	K+1!, CK+1*, CK+2
DT	CK+2
>> DUPFOUND	IVDUPADD+3, IVDUPADD+5, IVDUPADD+11, IVDUPADD+14, IVDUPADD+18, IVDUPADD+23, IVDUPADD+24
>> DUPLOOP	IVDUPADD+2, IVDUPADD+5, IVDUPADD+7
DUZ	H+5
ENTBY	ENARI+8~, ENARI+9*
ERR	K+1!, CK+2*
>> EXISTADD	IVDUPADD+17, IVDUPADD+18, IVDUPADD+20
>> EXISTORD	IVDUPADD+12, IVDUPADD+14, IVDUPADD+16, IVDUPADD+18, IVDUPADD+20
>> FIL	CK+1*, CK+2
HELP	K+1!
IOF	S+1
J	K+1!
>> MATCHADD	IVDUPADD+20*, IVDUPADD+22
OD	K+1!
ON	PSIVOPT+10, UNLOCK+3, ACT+1, ACT+2, ACT+3, ACT+4, ACT+5~, ACT+6, ACT+7, ACT+9 , O~, H~, ENIN+1~, ENIN+2, ENARI~, ENARI+8, ENARI+13, ENARI+14, ENARI+15, ENARI+16 , ENARI+18, ENARI+19, ENARI+21, ENARI+25, ENARI+26, ENINP~, ENINP+1
ON55	PSIVOPT+10, UNLOCK+3, ACT+1, H+5, S+1, UPSTAT+1, ENIN+2, ENARI+19, ENARI+22, ENINP+1~
>> OR55	ENARI+2
ORDERNUM	IVDUPADD~, IVDUPADD+5, IVDUPADD+7
P	K+1!, ENIN+1~, ENLBL+3~
P("NAT"	H+3
P("PON"	ENIN+1, ENIN+2
P(12	ENARI+21*
P(17	O+3, H+4, EXPIR+1, UPSTAT+1, ENARI+19
P(3	ENARI+21*
P16	K+1!
>> PSGALO	ENARI+11, ENARI+24
>> PSGDT	ENLBL+5*
PSGFDX	ACT+1~
>> PSGORD	ENARI+2
>> PSGORNUM	ENARI+2*, ENARI+3, ENARI+4, ENARI+5, ENARI+6, ENARI+11
PSGP	ENIN+1, ENIN+2, ENARI+4, ENARI+5, ENARI+6, ENARI+8, ENARI+11, ENARI+25, ENLBL~, ENLBL+2 , ENLBL+4, IVDUPADD~, IVDUPADD+5, IVDUPADD+7, IVDUPADD+11, IVDUPADD+14, IVDUPADD+16, IVDUPADD+18, IVDUPADD+20
PSGSDX	ACT+1~
PSGTOL	ENARI+23*, ENARI+26, ENLBL~
PSGTOO	ENLBL~
PSGUOW	ENARI~, ENARI+25, ENARI+26, ENLBL~
PSIVAC	PSIVOPT+13, PSIVOPT+14, ENIN+1~, ENINP+1~*
PSIVACT	UPSTAT+1~, ENARI+14
PSIVAL	K+1!, ENARI~, ENARI+19*
PSIVALCK	ENARI+12~, ENARI+19*
PSIVALT	O+3, H+4, ENARI+12~, ENARI+19*
PSIVC	K+1!
PSIVLOCK	PSIVOPT+8~, PSIVOPT+10, PSIVOPT+11
PSIVLOG	K+1!
PSIVNOL	K+1!
PSIVOK	K+1!
PSIVOPT	K+1!, ENARI+12~, ENARI+19*
PSIVREA	K+1!, O+3, H+4, H+5, EXPIR+1, UPSTAT+1, ENARI+12~, ENARI+19
PSJACNWP	ENLBL+2~
PSJACPF	ENLBL+2~*
PSJCOM	ACT+2, ACT+4, ACT+5, ACT+8, ACT+9, IVDUPADD+1~, IVDUPADD+5, IVDUPADD+16
PSJEDIT1	E+1~
PSJIVBD	ACT+1!
>> PSJIVORF	ENARI+21
PSJO	ACT+5~*
PSJORD	ACT+1, ACT+5~, ACT+8~*, ENIN+1, ENIN+2, ENIN+3, ENARI+2
>> PSJPRF	ENIN+2
>> PSJSENTO(	ENARI+4, ENARI+5, ENARI+6, ENARI+9
>> PSJSYSL	ENLBL+2
>> PSJSYSW0	ENARI+24, ENLBL+2, ENLBL+4
>> PSJUNDC	ENARI+19, ENARI+23, ENARI+24
PSJX	ENARI+8~*, ENARI+9
RES	ENLBL~, ENLBL+5
SCRNPRO	K+1!
STAT	O~, O+1, O+2, O+3, O+4, H~, H+1, H+2, H+4, H+5 , EXPIR+1, EXPIR+2*
STOP	O~, O+1, H~, H+1
>> TARGET	IVDUPADD+7*, IVDUPADD+22
TEX	PSIVOPT+14*, K+1!, O+3, H+4
U	ACT+4, ACT+6, ACT+7, CK+2, ENARI+4, ENARI+5, ENARI+6, ENARI+9, ENARI+14, ENARI+16 , ENARI+19, ENARI+21, ENARI+24, ENLBL+4, ENLBL+5, VA200+4
>> UWLFLAG	PSIVOPT+14
X	CK+2, ENARI+12~, ENARI+13, ENLBL+3~, ENLBL+4*, ENLBL+5, VA200~
XED	PSIVOPT+14*, K+1!
Y	ACT+5, ENARI+12~, ENARI+21, ENLBL+3~, ENLBL+4, ENLBL+5*, VA200+2~, VA200+3, VA200+4

Customize PDF page

Package: Inpatient Medications

Routine: PSIVOPT

Information

Source Information

Call Graph

Call Graph Total: 23

Caller Graph

Caller Graph Total: 15

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: