Routine: PSGOE82

Information

PSGOE82 ;BIR/CML3-NON-VERIFIED ORDER EDIT (CONT.) ;27 Jan 98 / 9:32 AM

Source Information

Source file <PSGOE82.m>

Call Graph

Call Graph Total: 9

Package	Total	Call Graph
Inpatient Medications	5	ENHLP^PSGOEM IVSOL^PSGSICHK $$CODES2^PSIVUTL (DOSECHK,DSPWARN)^PSJDOSE $$LASTREN^PSJLMPRI
VA Fileman	3	^DIC YN^DICN ^DIE
Registration	1	PAUSE^VALM1

Caller Graph

Caller Graph Total: 3

Package	Total	Caller Graph
Inpatient Medications	3	PSGOE8 PSGOE81 PSGOE92

Name	Comments	DBIA/ICR reference
YN	; yes/no as a set of codes
PSGF2	;;2^PSGOE82
DEL	; delete entry
66	; provider comments
1	; provider
DDOC(PSGX)	; Order check on additional dispens drug for allergy and adv. reactions.
40	; comments
A1
2	; dispense drug multiple
A5
6	; hospital supplied self med
5	; self med
A6
ENFF	; up-arrow to another field
F39	;;39^PSGOE81
F10	;;10^PSGOE81
F1	;;1^PSGOE82
F3	;;3^PSGOE8
F5	;;5^PSGOE82
F7	;;7^PSGOE8
F8	;;8^PSGOE81
PSGF25	;;25^PSGOE81
PSGF26	;;26^PSGOE8
F109	;;109^PSGOE8
DONE	;
F101	;;101^PSGOE8

Name	Field # of Occurrence
^DIC	A1+7, ENFF+3
YN^DICN	DEL+1
^DIE	2+5, 40+1
ENHLP^PSGOEM	A1+3, A1+5, A5+5, A5+7, A6+4, A6+6
IVSOL^PSGSICHK	DDOC+4
$$CODES2^PSIVUTL	ENFF+2
DOSECHK^PSJDOSE	2+9
DSPWARN^PSJDOSE	2+10
$$LASTREN^PSJLMPRI	A1
PAUSE^VALM1	A1+1

Name	Line Occurrences
Function Call: WRITE	Prompt: !?5,"This order has been renewed. Provider may not be edited at this point. " 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: 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),"// " Line Location: A5+0
Function Call: WRITE	Prompt: $C(7)," (Required)" Line Location: A5+3
Function Call: WRITE	Prompt: $C(7) Line Location: A5+7
Function Call: READ	Timeout: DTIME Variable: X Line Location: A6+0
Function Call: WRITE	Prompt: !,"HOSPITAL SUPPLIED SELF MED: " Line Location: A6+0
Function Call: WRITE	Prompt: $P("NO^YES","^",PSGHSM+1),"// " Condition for execution: PSGHSM]"" Line Location: A6+0
Function Call: WRITE	Prompt: " (",$P("NO^YES","^",PSGHSM+1),")" Line Location: A6+1
Function Call: WRITE	Prompt: $C(7)," (Required)" Line Location: A6+2
Function Call: WRITE	Prompt: $C(7) Line Location: A6+6
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+6
Function Call: WRITE	Prompt: ! Line Location: 40+1
Function Call: WRITE	Prompt: ! Line Location: 66+1
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+5 40+1
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+3
^PS(53.45 - [#53.45]	2+2, 2+6, DDOC+1, DDOC+6!
^VA(200 - [#200]	A1+4

Customize PDF page

Package: Inpatient Medications

Routine: PSGOE82

Information

Source Information

Call Graph

Call Graph Total: 9

Caller Graph

Caller Graph Total: 3

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

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

Name	Field # of Occurrence
>> %	DEL+1*
>> BACK	1+1, 5+1, 6+1, 2+1, 40+1*, DONE+1
DA	2+5~, 40+1
DIC	A1+7!, 2+5~, ENFF+3!
DIC("S"	A1+7, ENFF+3
DIC(0	A1+7, ENFF+3
DIE	2+5~, 40+1
DIR	2+5~
DR	2+5~, 40+1
DR(2	2+5*
DTIME	A1+2, A5, A6
F	DONE+2!
F0	DONE+2!
F3	DONE+2!
INTERVEN	DDOC+2~, DDOC+3*
>> MSG	1+1, 5+1, 6+1, A6+1, A6+5, 2+1, 2+6, 40+1
PSG	DONE+2!
PSGF2	1+1, 5+1, 6+1, A6+1, A6+5, 2+1, 40+1*, DONE+1, DONE+2!
>> PSGHSM	A6, A6+1, A6+5
PSGND1	DDOC+1~
PSGND3	DDOC+1~
>> PSGOEE	A1+2, A5, A6, DONE+1
>> PSGOEEF	ENFF+1
>> PSGOEEF(	1+1, 5+1, 6+1, DONE+1, ENFF+2
>> PSGOEEF(109	2+10*
>> PSGOEEF(6	5+1!, A5+2, A5+6!*
PSGOEEND	2+1!
>> PSGORD	A1, 2+3
PSGORQF	DDOC+2~, DDOC+5
>> PSGP	A1
>> PSGPR	A1+2, A1+3, A1+4, A1+8*
>> PSGPRN	A1+2, A1+4, A1+8*
>> PSGSM	5+1, A5, A5+2, A5+6
PSGX	2+2~, 2+7, DDOC~, DDOC+1, DDOC+6
PSGXX	2+2~*
PSGY	DDOC+1~*, DDOC+2, DDOC+6
PSJDD	DDOC+2~*
PSJDDI	DDOC+2~
PSJDOSE	2+8~
>> PSJDSFLG	2+10
PSJIREQ	DDOC+2~, DDOC+3*
PSJPDRG	DDOC+2~
PSJPNDRN	2+3~, 2+4, 2+5
PSJRXREQ	DDOC+2~, DDOC+3*
>> PSJSYSP	2+2, 2+5, 2+6, 40+1, DDOC+1, DDOC+6
SDT	DONE+2!
>> X	A1+2, A1+3, A1+4, A1+5, A1+6, A5, A5+2, A5+3, A5+4, A5+5 , A5+6, A6, A6+1, A6+2, A6+3, A6+4, A6+5, ENFF+1, ENFF+2, YN+1* , YN+2, DDOC+3*
>> Y	A1+6, A1+7, A1+8, A5+4, A6+3, ENFF+1, ENFF+2, ENFF+3, YN+1, YN+2* , DDOC+3*
>> Y(0	A1+8

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed