Routine: PSGOE92

Package	Total	Call Graph
Inpatient Medications	7	NEWUDAL^PSGAL5 DDOC^PSGOE82 ENHLP^PSGOEM $$CODES2^PSIVUTL CMPLX^PSJCOM1 (DOSECHK,DSPWARN)^PSJDOSE $$COMPLEX^PSJOE
VA Fileman	3	^DIC YN^DICN ^DIE
Registration	1	(FULL,PAUSE)^VALM1

Package

Total

Call Graph

Inpatient Medications

NEWUDAL^PSGAL5 DDOC^PSGOE82 ENHLP^PSGOEM $$CODES2^PSIVUTL CMPLX^PSJCOM1 (DOSECHK,DSPWARN)^PSJDOSE $$COMPLEX^PSJOE

VA Fileman

^DIC YN^DICN ^DIE

Registration

(FULL,PAUSE)^VALM1

Package	Total	Caller Graph
Inpatient Medications	2	PSGOE9 PSGOE91

Package

Total

Caller Graph

Inpatient Medications

PSGOE9 PSGOE91

Entry Points

Name	Comments	DBIA/ICR reference
F41	;;41^PSGOE91
YN	; yes/no as a set of codes
PSGF2	;;2^PSGOE92
DEL	; delete entry
1	; provider
A1
2	; dispense drug multiple
A5
6	; hospital supplied self med
5	; self med
A6
ENFF	; up-arrow to another field
F34	;;34^PSGOE91
72	; provider comments
F10	;;10^PSGOE91
F1	;;1^PSGOE92
F3	;;3^PSGOE9
15	; comments
F5	;;5^PSGOE92
F7	;;7^PSGOE9
F8	;;8^PSGOE91
PSGF26	;;26^PSGOE9
F109	;;109^PSGOE9
DONE	;
F101	;;101^PSGOE9

External References

Name	Field # of Occurrence
^DIC	A1+7, ENFF+3
YN^DICN	DEL+1
^DIE	2+7, 15+3
NEWUDAL^PSGAL5	2+26
DDOC^PSGOE82	2+9
ENHLP^PSGOEM	A1+3, A1+5, A5+4, A5+6, A6+6, A6+8
$$CODES2^PSIVUTL	ENFF+2
CMPLX^PSJCOM1	2+3
DOSECHK^PSJDOSE	2+11
DSPWARN^PSJDOSE	2+12
$$COMPLEX^PSJOE	A1, 5+1, A6, 2+1, 15+1
FULL^VALM1	2+3
PAUSE^VALM1	A1+1, 5+2, A6+1, 15+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!?5,"Provider may not be edited for active complex orders." Line Location: A1+1
Function Call: READ	Timeout: DTIME Variable: X Line Location: A1+2
Function Call: WRITE	Prompt: !,"PROVIDER: ",$S(PSGPR:PSGPRN_"// ",1:"") Line Location: A1+2
Function Call: WRITE	Prompt: $C(7)," (Required)" Line Location: A1+3
Function Call: WRITE	Prompt: !!?5,"Self Med may not be edited for active complex orders." Line Location: 5+2
Function Call: READ	Timeout: DTIME Variable: X Line Location: A5+0
Function Call: WRITE	Prompt: !,"SELF MED: " Line Location: A5+0
Function Call: WRITE	Prompt: $P("NO^YES","^",PSGSM+1),"// " Condition for execution: PSGSM]"" Line Location: A5+0
Function Call: WRITE	Prompt: $C(7)," (Required)" Line Location: A5+2
Function Call: WRITE	Prompt: $C(7) Line Location: A5+6
Function Call: WRITE	Prompt: !!?5,"Hospital Supplied Self Med may not be edited for active complex orders." Line Location: A6+1
Function Call: READ	Timeout: DTIME Variable: X Line Location: A6+2
Function Call: WRITE	Prompt: !,"HOSPITAL SUPPLIED SELF MED: " Line Location: A6+2
Function Call: WRITE	Prompt: $P("NO^YES","^",PSGHSM+1),"// " Condition for execution: PSGHSM]"" Line Location: A6+2
Function Call: WRITE	Prompt: " (",$P("NO^YES","^",PSGHSM+1),")" Line Location: A6+3
Function Call: WRITE	Prompt: $C(7)," (Required)" Line Location: A6+4
Function Call: WRITE	Prompt: $C(7) Line Location: A6+8
Function Call: WRITE	Prompt: !!?5,"This order is part of a complex order. Please review the following ",!?5,"associated orders before changing this order." Line Location: 2+3
Function Call: WRITE	Prompt: $C(7),!!,"WARNING: This order must have at least one dispense drug before pharmacy can",!?9,"verify it!",! Line Location: 2+8
Function Call: WRITE	Prompt: !!?5,"Comments may not be edited for active complex orders." Line Location: 15+2
Function Call: WRITE	Prompt: ! Line Location: 15+3
Function Call: WRITE	Prompt: $C(7)," ??" Line Location: ENFF+1
Function Call: WRITE	Prompt: $C(7)," <NOTHING DELETED>" Line Location: DEL+1
Function Call: WRITE	Prompt: $P(Y,X,2) Line Location: YN+2
Routine Call	DIE Line Location: 2+7 15+3
Routine Call	DIC Line Location: A1+7 ENFF+3

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

Name	Line Occurrences (* Changed, ! Killed)
^PS(53.1 - [#53.1]	2+2
^PS(53.45 - [#53.45]	2+5, 2+8, 2+17, 2+18
^PS(55 - [#55]	2+2, 2+20, 2+21
^PSDRUG - [#50]	2+19, 2+22
^VA(200 - [#200]	A1+4

Label References

Name	Line Occurrences
6	A5+1, A5+5
@(	A1+6, A5+3, A6+5, DONE+1
A1	A1+3, A1+6, A1+7
A5	A5+2, A5+3, A5+4, A5+6
A6	A6+4, A6+5, A6+6, A6+8
DONE	A1, A1+2, A1+4, A1+8, 5+1, A5, A5+1, A5+5, A6, A6+2 , A6+3, A6+7, 2+27, 15+1, 15+3
ENFF	A1+6, A5+3, A6+5
YN	A5+5, A6+7

Name	Field # of Occurrence
^("PS"	A1+4

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	DEL+1*
>> BACK	1+1, 5+3, 6+1, 2+4, 15+3*, DONE+1
DA	2+7~, 15+3
>> DFN	2+20, 2+21, 2+26
DIC	A1+7!, ENFF+3!
DIC("S"	A1+7, ENFF+3
DIC(0	A1+7, ENFF+3
DIE	2+7~, 15+3
DR	2+7~, 15+3
DR(2	2+7*
DTIME	A1+2, A5, A6+2
F	DONE+2!
F0	DONE+2!
F3	DONE+2!
>> MSG	1+1, 5+3, 6+1, A6+3, A6+7, 2+4, 2+8, 15+3
>> ON	2+20, 2+21, 2+26
P2ND	2+2~*
PARENT	2+2~*, 2+3
PSG	DONE+2!
PSGF2	1+1, 5+3, 6+1, A6+3, A6+7, 2+4, 15+3*, DONE+1, DONE+2!
>> PSGHSM	A6+2, A6+3, A6+7
>> PSGOEE	A1, A1+2, 5+1, A5, A6, A6+2, 15+1, DONE+1
>> PSGOEEF	ENFF+1
>> PSGOEEF(	1+1, 5+3, 6+1, DONE+1, ENFF+2
>> PSGOEEF(109	2+12*
>> PSGOEEF(6	5+3!, A5+1, A5+5!*
PSGOEEND	2+4*, 2+27!
>> PSGORD	2+1, 2+2, 2+3
>> PSGP	A1, 5+1, A6, 2+1, 2+2, 2+3, 15+1
>> PSGPR	A1+2, A1+3, A1+4, A1+8*
>> PSGPRN	A1+2, A1+4, A1+8*
>> PSGSM	5+3, A5, A5+1, A5+5
PSGX	2+5~*, 2+9
PSGXX	2+5~*, 2+6!
PSJDD55	2+16, 2+20, 2+21, 2+22, 2+27!
PSJDD55(	2+21*, 2+22
PSJDD551	2+16, 2+22, 2+26, 2+27!
PSJDDTMP	2+16, 2+17, 2+18, 2+19, 2+27!
PSJDDTMP(	2+18*, 2+19
PSJDOSE	2+10~
>> PSJDSFLG	2+12
PSJDTMP1	2+16, 2+19, 2+26, 2+27!
>> PSJORD	A1, 5+1, A6, 15+1
>> PSJSYSP	2+5, 2+7, 2+8, 2+17, 2+18, 15+3
SDT	DONE+2!
X	A1+2, A1+3, A1+4, A1+5, A1+6, A5, A5+1, A5+2, A5+3, A5+4 , A5+5, A6+2, A6+3, A6+4, A6+5, A6+6, A6+7, 2+2~, ENFF+2, YN+1* , YN+2
Y	A1+6, A1+7, A1+8, A5+3, A6+5, 2+2~, ENFF+1, ENFF+2, ENFF+3, YN+1 , YN+2*
Y(0	A1+8

Customize PDF page

Package: Inpatient Medications

Routine: PSGOE92

Information

Source Information

Call Graph

Call Graph Total: 11

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items