Routine: PSGOE41

Call Graph Total: 12

Package	Total	Call Graph
Inpatient Medications	9	($$ENDL,EN1,ENPREV)^PSGDL $$ENDD^PSGMI (,ENFD)^PSGNE3 1^PSGOE42 (ENFF,ENHLP)^PSGOEM ($$ODD,ENCHK)^PSGS0 ^PSGSICHK $$ENOSD^PSJDCU ($$ENBCMA,EFDNEW)^PSJUTL
VA Fileman	3	^%DT C^%DTC YN^DICN

Package	Total	Caller Graph
Inpatient Medications	2	PSGOE3 PSGOE4

Package

Total

Caller Graph

Inpatient Medications

PSGOE3 PSGOE4

Name	Comments	DBIA/ICR reference
25	; stop date
39	; admin times
A10
10	; start date/time
O25	;
NEXT	;
DEL	; delete entry
W25
DONE	;
FF	; up-arrow to another field
8	; special instructions
A25

External References

Name	Field # of Occurrence
^%DT	A10+5, A25+6
C^%DTC	A10+5
YN^DICN	DEL+1
$$ENDL^PSGDL	A25+5
EN1^PSGDL	A25+5
ENPREV^PSGDL	A10+2
$$ENDD^PSGMI	10+2, A10+2, A10+6, O25+1, A25+6
^PSGNE3	10+1
ENFD^PSGNE3	25+2
1^PSGOE42	NEXT+2
ENFF^PSGOEM	FF+1
ENHLP^PSGOEM	39+8, 39+11, 39+12, 8+4, 8+6, 8+7, A10+3, A10+5, A25+4
$$ODD^PSGS0	39+2
ENCHK^PSGS0	39+12
^PSGSICHK	8+7
$$ENOSD^PSJDCU	O25+1
$$ENBCMA^PSJUTL	8+8
EFDNEW^PSJUTL	W25+2

Interaction Calls

Name	Line Occurrences
Function Call: READ	Timeout: DTIME Variable: X Line Location: 39+3
Function Call: WRITE	Prompt: !,"ADMIN TIMES: "_$S(PSGS0Y:PSGS0Y_"// ",1:"") Line Location: 39+3
Function Call: WRITE	Prompt: !,"This is a 'DAY OF THE WEEK' schedule and MUST have admin times." Line Location: 39+8
Function Call: WRITE	Prompt: $C(7)," ??" Line Location: 39+9
Function Call: WRITE	Prompt: !,"This is a 'DAY OF THE WEEK' schedule and MUST have admin times." Condition for execution: PSGS0XT="D"!(PSGSCH["@") Line Location: 39+9
Function Call: WRITE	Prompt: $C(7)," ??" Line Location: 39+12
Function Call: READ	Timeout: DTIME Variable: X Line Location: 8+1
Function Call: WRITE	Prompt: !,"SPECIAL INSTRUCTIONS: "_$S(PSGSI]"":$P(PSGSI,"^")_"// ",1:"") Line Location: 8+1
Function Call: WRITE	Prompt: $C(7)," ??" Line Location: 8+4
Function Call: WRITE	Prompt: $C(7)," ??" Line Location: 8+7
Function Call: READ	Timeout: DTIME Variable: X Line Location: A10+0
Function Call: WRITE	Prompt: !,"START DATE/TIME: "_PSGSD_"// " Line Location: A10+0
Function Call: WRITE	Prompt: " "_PSGSD Line Location: A10+1
Function Call: WRITE	Prompt: A10 Condition for execution: '$D(X) $C(7) G:'$D(X) Line Location: A10+2
Function Call: WRITE	Prompt: " ",PSGSD Line Location: A10+2
Function Call: READ	Timeout: DTIME Variable: X Line Location: A25+0
Function Call: WRITE	Prompt: !,"STOP DATE/TIME: "_$S(PSGFD]"":PSGFD_"// ",1:"") Line Location: A25+0
Function Call: WRITE	Prompt: " "_PSGFD Line Location: A25+1
Function Call: WRITE	Prompt: " ...dose limit..." Line Location: A25+5
Function Call: WRITE	Prompt: $C(7),!!?13,"* WARNING! THE STOP DATE ENTERED IS IN THE PAST! *",! Line Location: W25+0
Function Call: WRITE	Prompt: $C(7)," ...order not entered..." Line Location: DONE+1
Function Call: WRITE	Prompt: $C(7)," <NOTHING DELETED>" Line Location: DEL+1

Label References

Name	Line Occurrences
10	8+2, 8+5
39	39+6, 39+7, 39+10, 39+11, 39+12
8	39+1, 39+2, 39+4, 39+5, 39+10, 8+3, 8+4, 8+5, 8+6, 8+7
@(	39+6, 8+3, A10+4, A25+2
A10	A10+2, A10+4, A10+5
A25	A25+2, A25+5, A25+6
DEL	39+10, 8+5
DONE	39+3, 8+1, A10, A25
FF	39+6, 8+3, A10+4, A25+2
O25	A10+1, A10+2
W25	A25+1

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	39+10, 8+5, DEL+1*
%DT	A10+5!, A25+6!
%DT(0	A10+5, A25+6
DTIME	39+3, 8+1, A10, A25
F	DONE+2!
F0	DONE+2!
F1	DONE+2!
F3	DONE+2!
>> FB	FF+1*
PSG	DONE+2!
>> PSGAT	39+5, 39+13
>> PSGDL	A25+5*
PSGDLS	A25+5!
>> PSGDT	A10+5, 25+2, W25
PSGF2	39+6, 8+3, A10+3, A25+2, DONE+2!, FF+1
>> PSGFD	A10+6, O25+1, 25+2, A25, A25+1, A25+6
>> PSGFOK(10	O25+1*
>> PSGFOK(25	A25+1, A25+6
>> PSGFOK(39	39+4, 39+10, 39+13*
>> PSGFOK(8	8+2, 8+5, 8+8*
>> PSGNEDFD	39+1, O25+1
>> PSGNEFD	A10+6, O25+1, 25+2, A25+1, A25+6*, W25
>> PSGNEFDO	25+2
>> PSGNESD	10+2, A10+1, A10+2, A10+6, O25+1, A25+6
>> PSGNESDO	10+2*
>> PSGOE3	8+2, 8+5, 8+9, 25+1
>> PSGOROE1	39+3, 8+1, A10, A25, DONE+1
>> PSGP	O25+1
>> PSGS0XT	39+2, 39+4, 39+5, 39+7
>> PSGS0Y	39+3, 39+5, 39+10, 39+13*
>> PSGSCH	39+5, A25+5
>> PSGSD	10+2, A10, A10+1, A10+2, A10+6*
>> PSGSI	8+1, 8+2, 8+4, 8+5, 8+8
>> PSGST	39+7
>> PSJSYSW0	O25+1
SDT	DONE+2!
TMPX	A10+5~*
U	FF+1
>> X	39+3, 39+4, 39+5, 39+6, 39+7, 39+8, 39+10, 39+11, 39+12, 39+13 , 8+1, 8+2, 8+3, 8+4, 8+5, 8+6, 8+7, 8+8, A10, A10+1 , A10+2, A10+3, A10+4, A10+5, A25, A25+1, A25+2, A25+4, A25+5
>> X1	A10+5*
>> X2	A10+5*
Y	39+6, 8+3, A10+4, A10+5, A10+6, A25+2, A25+6, DONE+1!, FF+1*

Customize PDF page

Package: Inpatient Medications

Routine: PSGOE41

Information

Source Information

Call Graph

Call Graph Total: 12

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Label References

Local Variables

Legend: