Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: ORCMENU1

Package: Order Entry Results Reporting

Routine: ORCMENU1


Information

ORCMENU1 ;SLC/MKB-Add Orders cont ;2/7/97 15:41

Source Information

Source file <ORCMENU1.m>

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  

Caller Graph

Caller Graph Total: 9

Package Total Caller Graph
Order Entry Results Reporting 9 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

FileMan Files Accessed Via FileMan Db Call

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

Label References

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~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All