Routine: PSIVOREN

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
Registration	2	INP^VADPT PAUSE^VALM1

Package

Total

Call Graph

EXPOE^PSGOER UPDREN^PSIVOPT2 DONE^PSIVORA1 LOG^PSIVORAL GTPC^PSIVORFB SORTX^PSIVORFE EN1^PSJHL2 $$DATE^PSJUTL2
$$ENNOO^PSJUTL5

VA Fileman

C^%DTC ^DIC ^DIE

Registration

INP^VADPT PAUSE^VALM1

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

Package

Total

Caller Graph

Inpatient Medications

PSGOEC PSIVOE PSIVOPT PSIVOPT1 PSIVOPT2 PSIVORA PSIVORA1 PSIVORC
PSIVORC2 PSIVORE PSIVORFA PSIVORFE PSIVORH PSIVSPDC PSJCOMR PSJOEA2

Entry Points

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

External References

Name	Field # of Occurrence
C^%DTC	CLINIC+2
^DIC	PS+3, CLINIC+4
^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	DIE Line Location: RUPDATE+13 RUPDATE+15 RUPDATE+19 RUPDATE+21
Routine Call	DIC Line Location: PS+3 CLINIC+4

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+6, STIX+1 , STIX+2, STIX+3!
^VA(200 - [#200]	PS+1

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

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+6 , STIX~, STIX+1, STIX+2, STIX+3
DIC	PS+3!, PS+4!, CLINIC+1~, CLINIC+4
DIC("A"	PS+3, CLINIC+4
DIC("S"	PS+3, CLINIC+3
DIC(0	PS+3, CLINIC+4
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+2
DTOUT	PS+3, PS+5!, CLINIC+5
>> DUOUT	PS+3, CLINIC+5
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+6
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+6*
>> 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+1~, CLINIC+2*
>> 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+1~, CLINIC+2
X1	CLINIC+1~, CLINIC+2*
X2	CLINIC+1~, CLINIC+2*
>> XQORNOD(0	NATURE+4
Y	PS+3, PS+4, CLINIC+1~, CLINIC+6

Customize PDF page

Package: Inpatient Medications

Routine: PSIVOREN

Information

Source Information

Call Graph

Call Graph Total: 14

Caller Graph

Caller Graph Total: 16

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: