Routine: PSIVOREN

Information

PSIVOREN ;BIR/MLM-UTILITIES FOR IV FLUIDS - OE/RR INTERFACE ; 8/10/09 7:12am

Package	Total	Call Graph
Inpatient Medications	9	EXPOE^PSGOER UPDREN^PSIVOPT2 DONE^PSIVORA1 LOG^PSIVORAL GTPC^PSIVORFB SORTX^PSIVORFE EN1^PSJHL2 $$DATE^PSJUTL2 $$ENNOO^PSJUTL5
VA FileMan	3	C^%DTC ^DIC ^DIE
List Manager	1	PAUSE^VALM1
Registration	1	INP^VADPT

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 17

Package	Total	Caller Graph
Inpatient Medications	17	PSGOEC PSIVOE PSIVOPT PSIVOPT1 PSIVOPT2 PSIVORA PSIVORA1 PSIVORC PSIVORC2 PSIVORE PSIVORFA PSIVORFE PSIVORH PSIVORLB PSIVSPDC PSJCOMR PSJOEA2

Entry Points

Name	Comments	DBIA/ICR reference
ENCPP	; Check Package Parameter
PS	; Check if MD is authorized to write med. orders.
RUPDATE(DFN,ON,NSTRT)	; ; Update renewal orders (called from Pharmacy options).
RUPTXT(DFN,OLDON)	;
ORPARM	;Check if inpatient pkges are on.
NATURE	; Ask nature of order.
CLINIC	;Ask clinic where outpt is being seen for DSS
STIX(OST,OON,DFN)	; Check start index, cleanup old start

External References

Name	Field # of Occurrence
C^%DTC	CLINIC+3
^DIC	PS+3, CLINIC+5
^DIE	RUPDATE+13, RUPDATE+15, RUPDATE+19, RUPDATE+21
EXPOE^PSGOER	RUPDATE+11
UPDREN^PSIVOPT2	RUPDATE+22
DONE^PSIVORA1	ENCPP+3
LOG^PSIVORAL	RUPDATE+25
GTPC^PSIVORFB	RUPTXT+3
SORTX^PSIVORFE	RUPTXT+3
EN1^PSJHL2	RUPDATE+20, RUPDATE+24
$$DATE^PSJUTL2	RUPDATE+22
$$ENNOO^PSJUTL5	NATURE+7
INP^VADPT	ENCPP+4
PAUSE^VALM1	RUPDATE+9

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Inpatient Medications is not turned on for OE/RR.",!,"You will not be able to enter or edit IV or Unit Dose orders." Line Location: ENCPP+1
Function Call: WRITE	Prompt: !!,"IV Medications is not turned on for OE/RR.",!,"You will not be able to enter or edit IV orders." Line Location: ENCPP+2
Function Call: WRITE	Prompt: ! Line Location: PS+3
Function Call: WRITE	Prompt: $C(7)," (Required.)" Line Location: PS+3
Function Call: WRITE	Prompt: !,"CAN'T RENEW THIS ORDER!" Line Location: RUPDATE+9
Routine Call	DIC Line Location: PS+3 CLINIC+5
Routine Call	DIE Line Location: RUPDATE+13 RUPDATE+15 RUPDATE+19 RUPDATE+21

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PS(53.1 - [#53.1]	RUPDATE+3, RUPDATE+6, RUPDATE+17, RUPDATE+19*
^PS(55 - [#55]	RUPDATE+4, RUPDATE+5, RUPDATE+7, RUPDATE+8, RUPDATE+14, RUPDATE+16, RUPDATE+28!, RUPTXT+3, CLINIC+7, STIX+1 , STIX+2, STIX+3!
^VA(200 - [#200]	PS+1

Label References

Name	Line Occurrences
ORPARM	ENCPP+1, RUPDATE+29
STIX	RUPDATE+26

Naked Globals

Name	Field # of Occurrence
^(	RUPDATE+22
^(0	RUPDATE+7

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DA	RUPDATE+2~, RUPDATE+9, RUPDATE+15, RUPDATE+18!, RUPDATE+21
DA(1	RUPDATE+9, RUPDATE+18
DFN	ENCPP+4, RUPDATE~, RUPDATE+2, RUPDATE+4, RUPDATE+5, RUPDATE+7, RUPDATE+8, RUPDATE+9, RUPDATE+11, RUPDATE+14 , RUPDATE+16, RUPDATE+18, RUPDATE+20, RUPDATE+22, RUPDATE+24, RUPDATE+26, RUPDATE+28, RUPTXT~, RUPTXT+3, CLINIC+7 , STIX~, STIX+1, STIX+2, STIX+3
DIC	PS+3!, PS+4!, CLINIC+2~, CLINIC+5
DIC("A"	PS+3, CLINIC+5
DIC("S"	PS+3, CLINIC+4
DIC(0	PS+3, CLINIC+5
DIE	RUPDATE+2~, RUPDATE+7, RUPDATE+8, RUPDATE+15, RUPDATE+18!, RUPDATE+21
DR	RUPDATE+2~, RUPDATE+7, RUPDATE+13, RUPDATE+15, RUPDATE+18!, RUPDATE+19, RUPDATE+21
DT	PS+1, CLINIC+3
DTOUT	PS+3, PS+5!, CLINIC+6
>> DUOUT	PS+3, CLINIC+6
DUZ	ENCPP+5
ND	RUPDATE+2~
NOEORD	RUPDATE+17~*, RUPDATE+18, RUPDATE+19
NOO	RUPDATE+2~, RUPDATE+3, RUPDATE+4, RUPDATE+22
NSTOP	RUPDATE+2~, RUPDATE+9*, RUPDATE+13, RUPDATE+28
NSTRT	RUPDATE~
OLDON	RUPDATE+3, RUPDATE+4, RUPDATE+5, RUPDATE+6, RUPDATE+7, RUPDATE+8, RUPDATE+9, RUPDATE+13, RUPDATE+14, RUPDATE+16 , RUPDATE+22, RUPDATE+25, RUPDATE+26, RUPTXT~, RUPTXT+2, RUPTXT+3
ON	RUPDATE~, RUPDATE+3, RUPDATE+4, RUPDATE+5, RUPDATE+11, RUPDATE+15, RUPDATE+17, RUPDATE+19, RUPDATE+21, RUPDATE+22 , RUPDATE+24, RUPDATE+25*
>> ON55	RUPDATE+7, RUPDATE+18, RUPDATE+20, RUPDATE+21, RUPDATE+25, RUPDATE+26, RUPDATE+28, CLINIC+7
OON	STIX~, STIX+1, STIX+2, STIX+3
ORETURN	RUPDATE+2~
>> ORIFN	RUPTXT+3*
>> OS	STIX+1*, STIX+2, STIX+3
OST	STIX~, STIX+1
OSTOP	RUPDATE+2~, RUPDATE+7, RUPDATE+8, RUPDATE+22, RUPDATE+26
>> P("CLIN"	CLINIC+1, CLINIC+2!, CLINIC+7*
>> P("FRES"	RUPDATE+25, RUPTXT+3
>> P("NAT"	NATURE+2, NATURE+3!, NATURE+7, NATURE+8!
>> P("OPI"	RUPDATE+14
>> P("OT"	ENCPP+5*
>> P(3	RUPDATE+9
>> P(6	RUPDATE+13, RUPDATE+22
PSGOLDOE	RUPDATE+2~, RUPDATE+16*
PSIVACT	RUPDATE+2~, RUPDATE+7*
PSIVAL	RUPDATE+2~, RUPDATE+25*
PSIVALCK	RUPDATE+2~, RUPDATE+25*
>> PSIVCOPY	NATURE+6
>> PSIVREA	RUPDATE+25*
>> PSJDCTYP	NATURE+1
PSJDT	CLINIC+2~, CLINIC+3*
>> PSJIVORF	ENCPP+2, ENCPP+3, RUPDATE+29, ORPARM+1
>> PSJORF	ENCPP+1, ENCPP+3, ORPARM+1*
>> PSJORL	ENCPP+4*
>> PSJORNP	ENCPP+5, PS+1, PS+4
>> PSJORPF	ENCPP+5, PS+1, PS+4*
>> PSJOSTOP	RUPDATE+7, RUPDATE+28
PSJOSTRT	RUPDATE+2~, RUPDATE+7, RUPDATE+8
>> PSJSYSU	NATURE+2
RDT	RUPDATE+22~*
U	PS+1, RUPDATE+5, RUPDATE+6, RUPDATE+7, RUPDATE+8, RUPDATE+17, RUPDATE+19, RUPDATE+22, RUPTXT+3, NATURE+4
>> VAIN(4	ENCPP+4
VN	RUPDATE+17~*, RUPDATE+19, RUPDATE+20
VNDT	RUPDATE+17~*, RUPDATE+19
X	PS+1, RUPDATE+7, RUPDATE+8, NATURE+3~, NATURE+4, NATURE+5, NATURE+6, NATURE+7, CLINIC+2~, CLINIC+3
X1	CLINIC+2~, CLINIC+3*
X2	CLINIC+2~, CLINIC+3*
>> XQORNOD(0	NATURE+4
Y	PS+3, PS+4, CLINIC+2~, CLINIC+7

Customize PDF page

Package: Inpatient Medications