Routine: PSGOE81

Call Graph Total: 15

Package	Total	Call Graph
Inpatient Medications	9	($$ENDL,ENE,ENPREV)^PSGDL ($$ENDD,$$ENDTC)^PSGMI ENFF^PSGOE82 (ENFF,ENHLP)^PSGOEM ($$ODD,ENCHK)^PSGS0 ^PSGSICHK ($$DURMIN,$$GETDUR)^PSJLIVMD $$LASTREN^PSJLMPRI ($$ENBCMA,EFDNV)^PSJUTL
VA Fileman	4	^%DT C^%DTC YN^DICN ^DIR
Kernel	1	$$FMADD^XLFDT
Registration	1	PAUSE^VALM1

Package	Total	Caller Graph
Inpatient Medications	1	PSJUTL

Package

Total

Caller Graph

Inpatient Medications

PSJUTL

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

External References

Name	Field # of Occurrence
^%DT	A10+9, A25+7
C^%DTC	A10+9
YN^DICN	DEL+1
^DIR	A8
$$ENDL^PSGDL	A25+6
ENE^PSGDL	A25+6
ENPREV^PSGDL	A10+6
$$ENDD^PSGMI	A10+6, A10+11, A10+13, A25+7
$$ENDTC^PSGMI	A10+6, A10+11, A10+13, A25+7
ENFF^PSGOE82	A39+3, A8+1, A8+9, A10+8, A25+4
ENFF^PSGOEM	FF+1
ENHLP^PSGOEM	A39+5, A39+7, A39+8, A8+2, A8+10, A8+12, A8+13, A10+7, A10+9, A25+5
$$ODD^PSGS0	A39
ENCHK^PSGS0	A39+8
^PSGSICHK	A8+13
$$DURMIN^PSJLIVMD	A10+12
$$GETDUR^PSJLIVMD	A10+12
$$LASTREN^PSJLMPRI	A10+2
$$ENBCMA^PSJUTL	A8+5
EFDNV^PSJUTL	DONE+2
PAUSE^VALM1	A10+3
$$FMADD^XLFDT	A10+13

Interaction Calls

Name	Line Occurrences
Function Call: READ	Timeout: DTIME Variable: X Line Location: A39+1
Function Call: WRITE	Prompt: !,"ADMIN TIMES: "_$S(PSGAT:PSGAT_"// ",1:"") Line Location: A39+1
Function Call: WRITE	Prompt: !,"This is a 'DAY OF THE WEEK' schedule and MUST have admin times." Line Location: A39+5
Function Call: WRITE	Prompt: $C(7)," ??" Line Location: A39+8
Function Call: WRITE	Prompt: $C(7)," ??" Line Location: A8+2
Function Call: READ	Timeout: DTIME Variable: X Line Location: A8+7
Function Call: WRITE	Prompt: !,"SPECIAL INSTRUCTIONS: "_$S(PSGSI]"":PSGSI_"// ",1:"") Line Location: A8+7
Function Call: WRITE	Prompt: $C(7)," ??" Line Location: A8+10
Function Call: WRITE	Prompt: $C(7)," ??" Line Location: A8+13
Function Call: WRITE	Prompt: !?5,"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: !,"START DATE/TIME: "_$S($P(PSGSDN,"^")]"":$P(PSGSDN,"^")_"// ",1:"") Line Location: A10+4
Function Call: WRITE	Prompt: " "_$P(PSGSDN,"^") Line Location: A10+5
Function Call: WRITE	Prompt: A10 Condition for execution: '$D(X) $C(7) G:'$D(X) Line Location: A10+6
Function Call: WRITE	Prompt: " ",$P(PSGSDN,"^") Line Location: A10+6
Function Call: WRITE	Prompt: $C(7),!?5,"* THE START DATE CANNOT BE AFTER THE STOP DATE! *",! Line Location: A10+10
Function Call: READ	Timeout: DTIME Variable: X Line Location: A25+2
Function Call: WRITE	Prompt: !,"STOP DATE/TIME: "_$S($P(PSGFDN,"^")]"":$P(PSGFDN,"^")_"// ",1:"") Line Location: A25+2
Function Call: WRITE	Prompt: " "_$P(PSGFDN,"^") Line Location: A25+3
Function Call: WRITE	Prompt: " ...dose limit..." Line Location: A25+6
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)," <NOTHING DELETED>" Line Location: DEL+1
Routine Call	DIR Line Location: A8

Label References

Name	Line Occurrences
@(	A39+3, A8+1, A8+9, A10+8, A25+4, DONE+3
A10	A10+6, A10+8, A10+9, A10+10
A25	A25+4, A25+6, A25+7
A39	A39+3, A39+4, A39+6, A39+7, A39+8
A8	A8+1, A8+2, A8+3, A8+9, A8+10, A8+11, A8+12, A8+13
DEL	A39+6, A8+3, A8+11
DONE	A39, A39+1, A39+2, A39+6, A39+9, A8, A8+3, A8+4, A8+5, A8+7 , A8+8, A8+11, A8+14, A10+4, A10+5, A10+6, A10+14, A25+2
W25	A25+3

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	A39+6, A8+3, A8+11, DEL+1*
%DT	A10+9!, A25+7!
%DT(0	A10+9, A25+7
>> BACK	39+1, 8+1, 10+1, 25+1, DONE+3
DIR	A8~
DIR("??"	A8*
DIR("A"	A8*
DIR("B"	A8*
DIR(0	A8*
DTIME	A39+1, A8+7, A10+4, A25+2
>> DTOUT	A8
>> DUOUT	A8
DUR	A10+1~, A10+12*
DURMIN	A10+1~, A10+12*, A10+13
>> FB	FF+1*
>> MSG	39+1, 8+1, 10+1, A10+10, 25+1, W25
>> PSGAT	A39+1, A39+6, A39+9
>> PSGDL	A25+6*
PSGDLS	A25+6!
>> PSGDT	W25
>> PSGF2	39+1, 8+1, 10+1, 25+1, DONE+3, FF+1
>> PSGFD	A10+10, A10+13, A25+3, A25+7, W25
>> PSGFDN	A10+13, A25+2, A25+3, A25+7
PSGFDX	A25+1!, A25+7*
>> PSGLI	A10+9
>> PSGNEFD	A25+7*
>> PSGNESD	A10+11*
>> PSGOEE	A39+1, A39+2, A8, A8+7, A10+4, A25+2, DONE+3*
>> PSGOEEF(	39+1, 8+1, 10+1, 25+1, DONE+3
>> PSGORD	A10+2, A10+12
>> PSGP	A10+2, A10+12
>> PSGS0XT	A39, A39+2, A39+4
>> PSGS0Y	A39+2, A39+9*
>> PSGSCH	A25+6
>> PSGSD	A10+5, A10+6, A10+11, A10+13, A25+7
>> PSGSDN	A10+4, A10+5, A10+6, A10+11
PSGSDX	A10+1!, A10+11*
>> PSGSI	A8, A8+2, A8+3, A8+4, A8+5, A8+7, A8+8, A8+10, A8+11, A8+14
>> PSGST	A39+4
TMPFD	A10+1~, A10+13*!
TMPX	A10+9~*
U	A8+1
>> X	A39+1, A39+2, A39+3, A39+4, A39+5, A39+6, A39+7, A39+8, A39+9, A8+1 , A8+2, A8+3, A8+7, A8+8, A8+9, A8+10, A8+11, A8+12, A8+13, A8+14 , A10+4, A10+5, A10+6, A10+7, A10+8, A10+9, A25+2, A25+3, A25+4, A25+5* , A25+6
>> X1	A10+9*
>> X2	A10+9*
>> Y	A39+3, A8+1, A8+4, A8+5, A8+9, A10+8, A10+9, A10+10, A10+11, A25+4 , A25+7, FF+1*

Customize PDF page

Package: Inpatient Medications

Routine: PSGOE81

Information

Source Information

Call Graph

Call Graph Total: 15

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Label References

Local Variables

Legend: