Routine: PSIVEDT1

Call Graph Total: 12

Package	Total	Call Graph
Inpatient Medications	8	$$ENDL^PSGDL ($$ODD,ENCHK)^PSGS0 (ENSTOP,ENT)^PSIVCAL DEL^PSIVEDRG ENHLP^PSIVORC1 (EN,ENDL,ENI)^PSIVSP $$COMPLEX^PSJOE $$ENBCMA^PSJUTL
VA Fileman	3	^%DT C^%DTC ^DIR
Registration	1	(FULL,PAUSE)^VALM1

Package

Total

Call Graph

$$ENDL^PSGDL ($$ODD,ENCHK)^PSGS0 (ENSTOP,ENT)^PSIVCAL DEL^PSIVEDRG ENHLP^PSIVORC1 (EN,ENDL,ENI)^PSIVSP $$COMPLEX^PSJOE $$ENBCMA^PSJUTL

VA Fileman

^%DT C^%DTC ^DIR

Registration

(FULL,PAUSE)^VALM1

Package	Total	Caller Graph
Inpatient Medications	4	PSIVEDRG PSIVEDT PSIVORLB PSJUTL

Package

Total

Caller Graph

Inpatient Medications

PSIVEDRG PSIVEDT PSIVORLB PSJUTL

Name	Comments	DBIA/ICR reference
10	; Start Date
26	; Schedule
59	; Infusion Rate
A10
25	; Stop Date
ORFLDS	; Display OE/RR fields during edit.
39	; Admin Times
63	; Remarks
64	; Other Print Info
A25

External References

Name	Field # of Occurrence
^%DT	A10+7, A25+5
C^%DTC	A10+11
^DIR	63+1, 64+1
$$ENDL^PSGDL	A25+6
$$ODD^PSGS0	39+5
ENCHK^PSGS0	39+12
ENSTOP^PSIVCAL	25+2, 39+12
ENT^PSIVCAL	10+1, 39+12
DEL^PSIVEDRG	26+6, 39+8, 59+5, 63+2, 64+2
ENHLP^PSIVORC1	A10+6, A25+4, 26+9, 39+9, 59+7
EN^PSIVSP	26+10
ENDL^PSIVSP	A25+6
ENI^PSIVSP	59+8
$$COMPLEX^PSJOE	A10+2, A25, 26+3, 39+3
$$ENBCMA^PSJUTL	64+3
FULL^VALM1	ORFLDS+1
PAUSE^VALM1	A10+1, A10+3, A25+1, 26+2, 26+4, 39+2, 39+4, 59+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!?5,"This is a Renewal Order. Start Date may not be edited at this point." Line Location: A10+1
Function Call: WRITE	Prompt: !!?5,"This is a Complex Order. Start Date may not be edited at this point." Line Location: A10+3
Function Call: READ	Timeout: DTIME Variable: X Line Location: A10+4
Function Call: WRITE	Prompt: $C(7),!!,"Start date of order being renewed is ",Y,".",!,"Start date of renewal order must be AFTER start date of order being renewed.",! Line Location: A10+10
Function Call: WRITE	Prompt: !!,"Start date/time may not be entered prior to 7 days from the order's LOGIN DATE.",! Line Location: A10+11
Function Call: WRITE	Prompt: !!?5,"This is a Complex Order. Stop Date may not be edited at this point." Line Location: A25+1
Function Call: READ	Timeout: DTIME Variable: X Line Location: A25+2
Function Call: WRITE	Prompt: $C(7)," (Required)" Line Location: A25+4
Function Call: WRITE	Prompt: !!?5,"This is a Renewal Order. Schedule may not be edited at this point." Line Location: 26+2
Function Call: WRITE	Prompt: !!?5,"This is a Complex Order. Schedule may not be edited at this point." Line Location: 26+4
Function Call: READ	Timeout: DTIME Variable: X Line Location: 26+5
Function Call: WRITE	Prompt: $C(7),"??" Line Location: 26+10
Function Call: WRITE	Prompt: !!?5,"This is a Renewal Order. Administration times may not be edited at this point." Line Location: 39+2
Function Call: WRITE	Prompt: !!?5,"This is a Complex Order. Admin Times may not be edited at this point." Line Location: 39+4
Function Call: READ	Timeout: DTIME Variable: X Line Location: 39+6
Function Call: WRITE	Prompt: $C(7)," ??" Line Location: 39+7
Function Call: WRITE	Prompt: !,"This is a 'DAY OF THE WEEK' schedule and MUST have admin times." Condition for execution: (P(15)="D"!(X["@")) Line Location: 39+7
Function Call: WRITE	Prompt: !!?5,"This is a Renewal Order. Infusion Rate may not be edited at this point." Line Location: 59+2
Function Call: READ	Timeout: DTIME Variable: X Line Location: 59+3
Function Call: WRITE	Prompt: $C(7),!!,"An infusion rate must be entered!" Line Location: 59+9
Function Call: WRITE	Prompt: !!,"Orderable Item: ",$P(P("PD"),U,2),!,"Give: ",$P(P("MR"),U,2)," ",P(9),!! Line Location: ORFLDS+2
Routine Call	DIR Line Location: 63+1 64+1

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	A10+4, A10+10, A25+2
^PS(53.1 - [#53.1]	A10, 26+1, 39+1, 59+1
^PS(55 - [#55]	A10+8
^PS(59.5 - [#59.5]	25+2

Name	Line Occurrences
10	A10+5, A10+8
25	A25+3
26	26+6, 26+7, 26+9, 26+10
39	39+7, 39+8, 39+9, 39+10, 39+12
59	59+5, 59+6, 59+7, 59+8, 59+9
63	63+2
64	64+2
A10	A10+6, A10+7, A10+11
A25	25+1, A25+4, A25+6, A25+7
ORFLDS	A10+5, A25+3, 26+7, 39+10, 59+6

Name	Field # of Occurrence
^(0	A10+10

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	26+6, 39+8, 59+5, 63+2, 64+2
%DT	A10+7!, A25+5!
>> DFN	A10+2, A10+8, A25, 26+3, 39+3
DIR	63+1~, 64+1~
DIR("B"	63+1, 64+1
DIR(0	63+1, 64+1
>> DONE	A10+4, A25+2, 26+5, 39+6, 59+3, 63+1, 64+1*
DTIME	A10+4, A25+2, 26+5, 39+6, 59+3
>> DTOUT	63+1, 64+1
>> F1	A10+6, A25+4, 26+9, 39+9, 59+7*
>> F2	A10+6, A25+4, 26+9, 39+9, 59+7*
>> ON	A10, A10+2, A25, 26+1, 26+3, 39+1, 39+3, 59+1
>> P("IVRM"	10+1, 25+2
>> P("LOG"	A10+11
>> P("MR"	ORFLDS+2
>> P("OLDON"	A10+8
>> P("OPI"	64+1, 64+2, 64+3
>> P("OT"	A10+5, A25+3, 26+7, 39+10, 59+6
>> P("PD"	ORFLDS+2
>> P("REM"	63+1, 63+2, 63+3
>> P("RES"	A10, A10+8, 26+1, 39+1, 59+1
>> P(11	26+11, 39+6, 39+8, 39+12*
>> P(15	26+11*, 39+6, 39+7
>> P(2	10+1, A10+4, A10+7, A10+12*, 25+2, A25+2
>> P(3	25+2, A25+2, A25+5, A25+7*
>> P(4	59+4
>> P(5	59+4
>> P(7	26+10*
>> P(8	59+3, 59+5, 59+8, 59+9
>> P(9	A25+6, 26+5, 26+6, 26+11, 39+5, 39+7, ORFLDS+2
>> PSGFDX	25+1, A25+7*
PSGOES	26+10~!
>> PSGSDX	A10+12*
>> PSIVAC	A10+5, 25+2, A25+3, 26+7, 39+10, 59+6
PSIVCAL	39+12!
>> PSIVRENW	A10+1, 26+2, 39+2, 59+2
>> PSIVSITE	25+2*
>> PSJBKDR	A10+3, A25+1, 26+4, 39+4
>> PSJREN	10+1
U	A10+4, A10+8, A10+10, A25+2, 26+5, 39+6, 59+3, ORFLDS+2
X	A10+4, A10+5, A10+6, A10+7, A10+11, A25+2, A25+3, A25+4, A25+5, A25+6 , A25+7, 26+5, 26+6, 26+7, 26+9, 26+10, 26+11, 39+6, 39+7, 39+8 , 39+9, 39+10, 39+12!, 59+3, 59+4, 59+5, 59+6, 59+7, 59+8, 63+1* , 63+2, 63+3, 64+1*, 64+2, 64+3
>> X1	A10+11*
>> X2	A10+11*
>> XT	26+10, 26+11
>> Y	A10+4, A10+7, A10+8, A10+10, A10+11, A10+12, A25+2*, A25+7, 26+11

Customize PDF page

Package: Inpatient Medications

Routine: PSIVEDT1

Information

Source Information

Call Graph

Call Graph Total: 12

Caller Graph

Caller Graph Total: 4

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: