Routine: ORCMENU1

Call Graph

Call Graph Total: 15

Package	Total	Call Graph
Order Entry Results Reporting	6	($$CANCEL,$$REASON,LIST,SESSION)^ORCHECK (EN,NOTIF)^ORCMENU2 OC^ORCSAVE2 TEXT^ORQ12 $$ACTLOC^ORWU UNLK1^ORX2
VA Fileman	5	^DIC MIX^DIC1 YN^DICN ^DIK ^DIR
Kernel	1	$$PROVIDER^XUSER
Registration	1	FULL^VALM1
Scheduling	1	$$OUTPTPR^SDUTL3
Toolkit	1	$$GET^XPAR

Package

Total

Call Graph

Order Entry Results Reporting

($$CANCEL,$$REASON,LIST,SESSION)^ORCHECK (EN,NOTIF)^ORCMENU2 OC^ORCSAVE2 TEXT^ORQ12 $$ACTLOC^ORWU UNLK1^ORX2

VA Fileman

^DIC MIX^DIC1 YN^DICN ^DIK ^DIR

$$PROVIDER^XUSER

FULL^VALM1

$$OUTPTPR^SDUTL3

$$GET^XPAR

Package	Total	Caller Graph
Order Entry Results Reporting	9	ORCACT ORCACT2 ORCB ORCMED ORCMENU ORCPROB ORCSIGN OREVNT OREVNT1

Package

Total

Caller Graph

Order Entry Results Reporting

ORCACT ORCACT2 ORCB ORCMED ORCMENU ORCPROB ORCSIGN OREVNT
OREVNT1

Entry Points

Name	Comments	DBIA/ICR reference
PQ
LOCATION(ORQ,ORB,ORS)	; -- Returns patient location ; Optional: ORQ = 1 if not required ; ORB = Default value in vptr format ; ORS = String of location types to allow
SPEC(EVENT)	; -- Return treating specialty
P
LOC1
PROVIDER(ASK)	; -- Return ordering provider [ASK=1: force prompting]
OC1
OC2
ORDCHK	; -- Order Checking [called from ORCSIGN] ; Returns ORQUIT=1 if ^ or timeout
CHANGE	; -- Change location and/or provider

External References

Name	Field # of Occurrence
^DIC	P+2
MIX^DIC1	SPEC+4
YN^DICN	P+5
^DIK	OC1+5
^DIR	OC1+2, LOC1
$$CANCEL^ORCHECK	OC1
$$REASON^ORCHECK	OC2+1
LIST^ORCHECK	ORDCHK+8
SESSION^ORCHECK	ORDCHK+3
EN^ORCMENU2	CHANGE+3
NOTIF^ORCMENU2	CHANGE+3
OC^ORCSAVE2	OC2+3
TEXT^ORQ12	ORDCHK+6
$$ACTLOC^ORWU	LOC1+1
UNLK1^ORX2	OC1+5
$$OUTPTPR^SDUTL3	PROVIDER+5
FULL^VALM1	SPEC+1, CHANGE+4
$$GET^XPAR	PROVIDER+6, P+4, P+5
$$PROVIDER^XUSER	P+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Unsigned orders with order checks:" Line Location: ORDCHK+4
Function Call: WRITE	Prompt: !!,$J(ORY,3)_". "_$G(ORTX(1))_$S($O(ORTX(1)):" ...",1:"") Line Location: ORDCHK+7
Function Call: WRITE	Prompt: !?10,"... orders cancelled.",! Line Location: OC1+7
Function Call: WRITE	Prompt: !!,"Critical order checks remain that require a justification." Line Location: OC2+1
Function Call: WRITE	Prompt: $C(7),!,"This location is inactive!" Line Location: LOC1+1
Function Call: WRITE	Prompt: !,"Requesting CLINICIAN: "_$P($G(^VA(200,Y,0)),U) Line Location: PROVIDER+4
Function Call: WRITE	Prompt: $C(7),!,"This provider is no longer active!" Line Location: P+3
Function Call: WRITE	Prompt: !!,"You are not allowed to choose yourself as the Requesting Clinician",! Line Location: P+4
Function Call: WRITE	Prompt: !!,"There are new orders for this patient from the current location or provider!" Line Location: CHANGE+2
Function Call: WRITE	Prompt: !!,"NOTE: You may now select a new ordering location and/or provider." Line Location: CHANGE+5
Function Call: WRITE	Prompt: !,"===== These changes will remain in effect until the chart is closed unless",!," these values are changed again!",!,$C(7) Line Location: CHANGE+6
Function Call: WRITE	Prompt: !?10,"... "_$S(ORCHNGD:"changes now effective!",1:"nothing changed!") Line Location: CHANGE+10
Routine Call	DIC Line Location: P+2
Routine Call	DIR Line Location: OC1+2 LOC1

FileNo	Call Tags
^OR(100 - [#100]	Classic Fileman Calls
^DIC(45.7 - [#45.7]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^SC - [#44]	LOCATION+9, CHANGE+8
^TMP("ORNEW"	OC1+6!, CHANGE+1, CHANGE+8!
^VA(200 - [#200]	PROVIDER+4, PROVIDER+6, P+5
^XUSEC("ORELSE"	P+4
^XUSEC("OREMAS"	P+4
^XUSEC("ORES"	PROVIDER+2, PROVIDER+6, P+5
^XUSEC("PROVIDER"	PROVIDER+2, PROVIDER+6

Name	Line Occurrences
$$LOCATION	CHANGE+7
$$PROVIDER	CHANGE+9
LOC1	LOC1+1
P	P+3, P+4, P+5
PQ	P+2, P+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	PROVIDER+1~, P+5*
ASK	PROVIDER~, PROVIDER+2
>> D	SPEC+2*
DA	OC1+1~, OC1+5*, OC1+6
DFN	PROVIDER+1~
DIC	PROVIDER+1~, P, SPEC+1~, SPEC+2
DIC("A"	P, SPEC+3
DIC("B"	PROVIDER+6*
DIC("S"	P+1, SPEC+2
DIC(0	P, SPEC+2
DIK	OC1+1~, OC1+3*
DIR	OC1+1~, LOCATION+5~
DIR("?"	OC1+2, LOCATION+8
DIR("A"	OC1+2, LOCATION+6
DIR("B"	LOCATION+9*
DIR("S"	LOCATION+7*
DIR(0	OC1+2, LOCATION+6
>> DTOUT	OC1+2, SPEC+4
>> DUOUT	OC1+2, SPEC+4
DUZ	PROVIDER+2, PROVIDER+3, PROVIDER+6, P+4, P+5
EVENT	SPEC~, SPEC+1*, SPEC+3
NMBR	OC1+1~, OC1+3*, OC1+4
ORB	LOCATION~, LOCATION+9
ORCHECK	ORDCHK+2~, ORDCHK+3
ORCHECK(	ORDCHK+5, OC1+6!, OC2+1, OC2+3
ORCHECK("OK"	OC2+1*, OC2+2!
ORCHNGD	CHANGE+1~, CHANGE+4, CHANGE+8, CHANGE+9*, CHANGE+10
>> ORES(	OC1+6!
ORI	OC1+1~, OC1+4*
ORIFN	ORDCHK+2~, ORDCHK+5, ORDCHK+6, ORDCHK+8, OC2+1, OC2+3*
ORIGVIEW	ORDCHK+2~, ORDCHK+6*
>> ORL	CHANGE+7, CHANGE+8*
>> ORL(0	CHANGE+8*
>> ORL(1	CHANGE+8*
>> ORNP	PROVIDER+3, PROVIDER+4, PROVIDER+6, CHANGE+9*
ORQ	LOCATION~, LOCATION+6
>> ORQUIT	OC2+2*
ORRV	CHANGE+1~, CHANGE+3*
ORS	LOCATION~, LOCATION+5*
ORTX	ORDCHK+2~, ORDCHK+6
ORTX(1	ORDCHK+7
>> ORVP	PROVIDER+5
ORX	CHANGE+1~, CHANGE+7, CHANGE+8, CHANGE+9
ORY	ORDCHK+2~, ORDCHK+5, ORDCHK+6, ORDCHK+7, OC1+1, OC1+2, OC1+6*, OC2
ORY(	ORDCHK+6*, OC1+5, OC1+6!
U	LOCATION+9, PROVIDER+4, PROVIDER+5, PROVIDER+6, CHANGE+8
>> VALMBCK	SPEC+1, CHANGE+4
VALMHDR	CHANGE+8!
X	OC1+1~, OC1+4, OC1+5, OC1+6, LOCATION+5~, PROVIDER+1~, P+4, P+5*, SPEC+1~
Y	OC1+1~, OC1+3, LOCATION+5~, LOC1, LOC1+1, LOC1+2, PROVIDER+1~, PROVIDER+2, PROVIDER+3, PROVIDER+4 , PROVIDER+5, P+2, P+3, P+4, P+5, PQ, SPEC+1~, SPEC+4*, SPEC+5
Z	OC1+1~

Customize PDF page

Package: Order Entry Results Reporting

Routine: ORCMENU1

Information

Source Information

Call Graph

Call Graph Total: 15

Caller Graph

Caller Graph Total: 9

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: