Routine: PSGOE0

Information

PSGOE0 ;BIR/CML3-PROFILE AND ORDER ENTRY ;25 SEP 97 / 7:42 AM

Package	Total	Call Graph
Inpatient Medications	15	ENSET0^PSGNE3 ^PSGO ^PSGOE1 ^PSGOE3 ^PSGOE4 ^PSGOE7 EN^PSGOECS EN^PSGOERS ^PSGOES EN^PSGOESF ^PSGOETO EN^PSGOEVS ENASR^PSGON ENL^PSGOU EN1^PSGVW
VA Fileman	1	^DIR

Package	Total	Caller Graph
Inpatient Medications	1	PSGPR

Name	Line Occurrences
Function Call: READ	Timeout: DTIME Variable: CONT Line Location: ENVO+8
Function Call: WRITE	Prompt: !!,"Press RETURN to continue: " Line Location: ENVO+8
Function Call: WRITE	Prompt: @IOF Line Location: ENVO+8
Function Call: WRITE	Prompt: ! Line Location: ENVO+9
Function Call: READ	Timeout: DTIME Variable: X Line Location: ASK+2
Function Call: WRITE	Prompt: !!,"New order(s) for ",$P(PSGP(0),"^"),"? Y// " Line Location: ASK+2
Function Call: WRITE	Prompt: X="^" Condition for execution: '$T $C(7) S:'$T Line Location: ASK+2
Function Call: WRITE	Prompt: " (NO)" Condition for execution: "Nn"[X Line Location: ASK+3
Function Call: WRITE	Prompt: " (YES)" Line Location: ASK+3
Function Call: WRITE	Prompt: !!?2,"Answer 'YES' (or press the RETURN key) to enter new UNIT DOSE orders for this",!,"patient. Answer 'NO' (or '^') if there are no new orders for this patient." Line Location: AM+1
Routine Call	DIR Line Location: ENVO+9

Name	Line Occurrences (* Changed, ! Killed)
^PS(51.2 - [#51.2]	ASK+6
^PS(55 - [#55]	ASK+4, ASK+5*
^TMP("PSJON"	ASK+1!
^VA(200 - [#200]	ASK+5

Name	Field # of Occurrence
CONT	ENVO+7!, ENVO+8*, ENVO+9
DIR	ENVO+9!, ASK+1!, DONE+1!
DIR(0	ENVO+9*
DIROUT	ASK+1!, DONE+1!
DIRUT	ENVO+9, ASK+1!, DONE+1!
DRGI	ASK+1!
DT	ASK+5
DTIME	ENVO+8, ASK+2
DTOUT	ASK+1!, DONE+1!
DUOUT	ASK+1!, DONE+1!
DUZ	ASK+6
IOF	ENVO+8
>> PR	ASK+4, ASK+5, ASK+6
PRI	ASK+1!
PSG	DONE+1!
PSGCANFL	ASK+1!
PSGDL	DONE+1!
PSGDLS	DONE+1!
PSGDO	DONE+1!
PSGDRG	DONE+1!
PSGDRGN	DONE+1!
PSGFD	DONE+1!
PSGHSM	DONE+1!
PSGLMT	ENVO+1*, ASK+1!
PSGMR	DONE+1!
PSGMRN	DONE+1!
PSGNEDFD	DONE+1!
PSGNEFD	DONE+1!
PSGNESD	DONE+1!
PSGNEWDT	DONE+1!
PSGODDD	ENVO+6, ENVO+7, ASK+1!
PSGODDD(	ENVO+7
>> PSGOE	ENVO+7*
PSGOE1	ENVO+7*, ASK+1!
PSGOE2	ENVO+7*, ASK+1!
PSGOEA	ENVO+6, ENVO+7, ENVO+8, ENVO+9, ASK+1!
>> PSGOEAV	START+1, ASK+6
>> PSGOEDMR	ASK+6*
PSGOEE	ASK+1!, DRG+2!
PSGOEOS	DRG+2!
PSGOEPR	ASK+6*, DONE+2!
PSGOES	DONE+2!
PSGOL	START+1, ASK+1!
PSGON	START+1, ENVO+1, ASK+1!
PSGONC	ASK+1!
PSGONF	ASK+1!
PSGONR	ASK+1!
PSGONV	ASK+1!
PSGOPR	DONE+2!
PSGORD	ENVO+9, DONE+2!
PSGOROE1	DONE+2!
>> PSGP	ASK+4, ASK+5
>> PSGP(0	ASK+2
PSGPR	START+1!, DONE+2!
>> PSGPRF	ENVO+8, ENVO+9, ASK+1
PSGPRN	DONE+2!
PSGS0XT	DONE+2!
PSGS0Y	DONE+2!
PSGSCH	DONE+2!
PSGSD	DONE+2!
PSGSI	DONE+2!
PSGSM	DONE+2!
PSGST	DONE+2!
PSGSTN	DONE+2!
PSGUD	DONE+2!
PSGX	DONE+2!
PSJNARC	START+1*, DONE+2!
PSJOPC	START+1*, DONE+2!
>> PSJPCAF	ASK+1
>> PSJPTSP	ASK+6
>> PSJSYSP0	ASK+6, DRG+2
>> PSJSYSU	ASK+4, ASK+6
>> X	START+1, ENVO+1, ENVO+2, ENVO+3, ENVO+4, ENVO+5, ENVO+9, ASK+2, ASK+3, ASK+5 , DRG+1
>> Y	DRG+1, DRG+2