Routine: PSGOEF1

Information

PSGOEF1 ;BIR/CML3-FINISH ORDERS ENTERED THROUGH OE/RR (CONT) ;02 Feb 2001 12:20 PM

Call Graph

Call Graph Total: 14

Package	Total	Call Graph
Inpatient Medications	9	NEWNVAL^PSGAL5 ENWALL^PSGNE3 ENUD^PSGOEF1 VFY^PSGOEV (ENDDC,IVSOL)^PSGSICHK UPD^PSJCOM EN1^PSJHL2 IV^PSJLIFNI DISACTIO^PSJOE
VA Fileman	4	NOW^%DTC %XY^%RCR ^DIE ^DIR
Registration	1	(FULL,PAUSE)^VALM1

Caller Graph

Caller Graph Total: 10

Package	Total	Caller Graph
Inpatient Medications	10	PSGOE8 PSGOE9 PSGOEE0 PSGOEF PSGOEF1 PSGOER0 PSGOERS PSGOEV PSJLIFN PSJLMGUD

Entry Points

Name	Comments	DBIA/ICR reference
THELP(PKG,COI)	;
ENIVUD(PSJORD)
UPD	;
ENCKDD(PSGP,PSJDRG,Q1)	;
ENUD(PSJORD,PSGPD)
DRGH	;
ENDRG(PSGPDRG,DRGDA)	; enter dispense drug for order w/o one

External References

Name	Field # of Occurrence
NOW^%DTC	ENDRG+1
%XY^%RCR	UPD+10
^DIE	UPD+9, UPD+16, ENDRG+10
^DIR	ENDRG+2, ENDRG+6, ENIVUD+13
NEWNVAL^PSGAL5	UPD+18
ENWALL^PSGNE3	UPD+13
ENUD^PSGOEF1	ENIVUD+21
VFY^PSGOEV	UPD+19, UPD+20
ENDDC^PSGSICHK	ENCKDD+3
IVSOL^PSGSICHK	ENCKDD+6
UPD^PSJCOM	UPD+3
EN1^PSJHL2	UPD+16
IV^PSJLIFNI	ENIVUD+17
DISACTIO^PSJOE	ENUD+3
FULL^VALM1	ENIVUD+9
PAUSE^VALM1	ENIVUD+16, ENIVUD+19, ENIVUD+20

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"...accepting order..." Line Location: UPD+1
Function Call: WRITE	Prompt: "." Line Location: UPD+9
Function Call: WRITE	Prompt: "." Line Location: UPD+10
Function Call: WRITE	Prompt: "." Line Location: UPD+11
Function Call: WRITE	Prompt: $C(7),!!,"No dispense drugs were found for this order's Orderable Item." Line Location: ENDRG+2
Function Call: WRITE	Prompt: !?3,$J(Q,3),". ",$P(DRG(Q),"^",2) Line Location: ENDRG+5
Function Call: WRITE	Prompt: ! Line Location: ENDRG+6
Function Call: WRITE	Prompt: !!,$P(DRG(Q2),U,2) Line Location: ENDRG+10
Function Call: WRITE	Prompt: !!,$P(DRG(Q2),U,2) Line Location: ENDRG+11
Function Call: WRITE	Prompt: !!?2,"This order must have at least one dispense drug before it can be completed.",!,"Select one or more items listed. For each item selected, you will be",!,"prompted for the UNITS PER DOSE for the item." Line Location: DRGH+1
Function Call: WRITE	Prompt: !!!!,"You need the PSJI RNFINISH key to finish this order as IV!" Line Location: ENIVUD+16
Function Call: WRITE	Prompt: !!!!,"You need the PSJ RNFINISH key to finish this order as Unit Dose!" Line Location: ENIVUD+19
Function Call: WRITE	Prompt: !!!!,"You may not finish this order as Unit Dose!" Line Location: ENIVUD+20
Function Call: WRITE	Prompt: !,"Choose the package this order should be completed as a IV or Unit Dose order",! Line Location: THELP+1
Routine Call	DIE Line Location: UPD+9 UPD+16 ENDRG+10
Routine Call	DIR Line Location: ENDRG+2 ENDRG+6 ENIVUD+13

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^PS(53.1 - [#53.1]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PS(53.1 - [#53.1]	UPD+5, UPD+6, UPD+12, UPD+13, UPD+17*, ENIVUD+7, ENUD+1
^PS(53.45 - [#53.45]	ENDRG+8, ENDRG+10, ENDRG+13*
^PS(55 - [#55]	UPD+13, UPD+14, UPD+15
^PSDRUG - [#50]	ENDRG+1
^PSDRUG("ASP"	ENDRG+1

Label References

Name	Line Occurrences
$$ENCKDD	ENDRG+10

Naked Globals

Name	Field # of Occurrence
^("I"	ENDRG+1
^(0	ENDRG+1
^(2	UPD+17*, ENDRG+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	ENDRG+1
>> %X	UPD+10*
>> %Y	UPD+10*
>> CHK	ENDRG+2, ENDRG+4, ENDRG+13*
COI	THELP~
DA	UPD+4!, UPD+5, UPD+6, UPD+13, UPD+15!, ENDRG+10*
DA(1	UPD+15, ENDRG+10
>> DFN	ENUD+1*, ENUD+3
>> DIE	UPD+4, UPD+15, ENDRG+10*
DIR	ENDRG+2!, ENDRG+6~, ENIVUD+6~, ENIVUD+13!
DIR("?"	ENDRG+6*
DIR("??"	ENIVUD+12*
DIR("A"	ENDRG+6, ENIVUD+11
DIR("B"	ENDRG+6, ENIVUD+11, ENIVUD+12
DIR(0	ENDRG+2, ENDRG+6, ENIVUD+11*
DIRUT	ENIVUD+6~
DR	UPD+4!, UPD+7, UPD+8, UPD+15!, ENDRG+10*
DRG	ENDRG+1!, ENDRG+2, ENDRG+3, ENDRG+4, ENDRG+5, ENDRG+6, ENDRG+9*, ENUD+2!, ENCKDD+1~
DRG(	ENDRG+1*, ENDRG+5, ENDRG+10
DRGDA	ENDRG~, ENDRG+8, ENDRG+10*, ENDRG+13
DRGOC	ENUD+2!
DRGT	ENUD+2!
DRGTMP	ENUD+2!
>> DTOUT	ENIVUD+14
>> DUOUT	ENIVUD+14
ERR	ENUD+2!
INTERVEN	ENCKDD+4~, ENCKDD+5*
ON	ENUD+2!
ON55	ENUD+2!
P	ENUD+2!
PKG	THELP~
>> PSGAT	UPD+17
>> PSGDI	ENDRG+12*
>> PSGDO	UPD+17
>> PSGDT	UPD+13
>> PSGFD	UPD+4, UPD+15
>> PSGHSM	UPD+8
>> PSGND	UPD+12*, UPD+14, UPD+15, UPD+16
>> PSGOEAV	UPD+18, UPD+19, UPD+20
>> PSGOEEWF	UPD+10
>> PSGOEFF	UPD+7
>> PSGOHSM	UPD+8
>> PSGORD	UPD+4, UPD+5, UPD+6, UPD+12, UPD+17, UPD+18
PSGORQF	ENCKDD+2*, ENCKDD+3, ENCKDD+4~, ENCKDD+7
PSGP	UPD+13, UPD+14, UPD+15, UPD+16, ENDRG+10, ENCKDD~, ENCKDD+3
PSGPD	ENUD~
PSGPDRG	ENDRG~, ENDRG+1
>> PSGS0XT	UPD+17
>> PSGSCH	UPD+2, UPD+7
>> PSGSD	UPD+4, UPD+14
>> PSGSI	UPD+5, UPD+6
>> PSGSM	UPD+8
>> PSGST	UPD+2*, UPD+4
PSJCOI	ENIVUD+6~, ENIVUD+7*, ENIVUD+12, ENIVUD+17, ENIVUD+21
>> PSJCOM	UPD+3
PSJDD	ENCKDD+4~, ENCKDD+5*
PSJDDI	ENCKDD+4~
PSJDRG	ENCKDD~, ENCKDD+3, ENCKDD+5
PSJIREQ	ENCKDD+4~, ENCKDD+5*
>> PSJIRNF	ENIVUD+16
>> PSJITECH	ENIVUD+20
PSJND0	ENIVUD+6~, ENIVUD+7*, ENIVUD+8, ENIVUD+10, ENIVUD+11
PSJORD	ENIVUD~, ENIVUD+7, ENIVUD+17, ENIVUD+21, ENUD~, ENUD+1, ENUD+3
>> PSJPNV	ENUD+3
>> PSJRNF	UPD+20, ENIVUD+19
PSJRXREQ	ENCKDD+4~, ENCKDD+5*
PSJSTAR	ENUD+2!
>> PSJSYSP	UPD+10, ENDRG+8, ENDRG+10, ENDRG+13
>> PSJSYSU	UPD+18, UPD+19, ENIVUD+16, ENIVUD+19, ENIVUD+20
PSJTIM	ENUD+2!
PSJTUD	ENUD+1~*
>> Q	UPD+10, ENDRG+1, ENDRG+5*
Q1	ENDRG+9*, ENDRG+10, ENCKDD~, ENCKDD+3
>> Q2	ENDRG+9*, ENDRG+10
U	UPD+5, UPD+6, UPD+12, UPD+13, UPD+14, UPD+15, UPD+16, UPD+17, ENDRG+1, ENDRG+6 , ENDRG+10, ENIVUD+8, ENIVUD+10, ENIVUD+11, ENUD+1
UL80	ENUD+2!
>> VALMBCK	ENIVUD+16, ENIVUD+19, ENIVUD+20, ENUD+3
>> X	UPD+12, UPD+13, ENDRG+1, ENCKDD+5
Y	ENDRG+4, ENIVUD+6~, ENIVUD+15, ENIVUD+18, ENCKDD+5*
Y(0	ENDRG+3*, ENDRG+9

Customize PDF page

Package: Inpatient Medications

Routine: PSGOEF1

Information

Source Information

Call Graph

Call Graph Total: 14

Caller Graph

Caller Graph Total: 10

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: