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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: ORCHART

Package: Order Entry Results Reporting

Routine: ORCHART


Information

ORCHART ;SLC/MKB/REV-OE/RR ;Jul 10, 2023@09:19:48

Source Information

Source file <ORCHART.m>

Call Graph

Call Graph

Call Graph Total: 18

Package Total Call Graph
Order Entry Results Reporting 9 $$ONEHR^ORACCESS  EN^ORCHANGE  ($$ACCESS,$$LNAMEF,EN)^ORCHTAB  $$DT^ORCHTAB1  REBLD^ORCMENU  ($$MORE,EN1,NOTIF)^ORCMENU2  (EN,SLCT1)^ORQPT  $$CWAD^ORQPT2  
UNLOCK^ORX2  
Kernel 3 $$FMTE^XLFDT  ($$LJ,$$REPEAT,$$UP)^XLFSTR  DISP^XQORM1  
List Manager 3 (CHGCAP,EN,SHOW)^VALM  ($$FDATE,FULL)^VALM1  (CLEAN,CNTRL,WRITE)^VALM10  
Scheduling 1 ($$OUTPTPR,$$OUTPTTM)^SDUTL3  
Toolkit 1 $$GET^XPAR  
VA FileMan 1 ^DIR  

Caller Graph

Caller Graph Total: 70

Package Total Caller Graph
Order Entry Results Reporting 68 OR ADD ORDERS MENU  OR CHART  OR DELAYED ORDERS  OR DETAILED DISPLAY  OR NEW ORDERS  OR OE/RR MENU CLINICIAN  OR OE/RR MENU NURSE  OR OE/RR MENU WARD CLERK  
OR PROFILES  OR REVIEW ORDERS  ORC ADD NOTE  ORC ADD SUMMARY  ORC COVER ACTIONS  ORC DELAY ACTIONS  ORC DELAYED ORDER ACTIONS  ORC INPT MED ACTIONS  
ORC LAB ACTIONS  ORC NEW ACTIONS  ORC ORDER ACTIONS  ORC ORELSE ORDER ACTIONS  ORC OREMAS ORDER ACTIONS  ORC ORES ORDER ACTIONS  ORC OUTPT MED ACTIONS  ORC PATIENT  
ORC PROBLEM ACTIONS  ORC REPORT ACTIONS  ORC TIU ACTIONS  ORC XRAY ACTIONS  ORCACT  ORCACT1  ORCACT2  ORCACT3  
ORCB  ORCB NOTIFICATIONS  ORCHANGE  ORCHART CONSULTS  ORCHART CONSULTS MENU  ORCHART COVER  ORCHART COVER MENU  ORCHART LABS  
ORCHART LABS MENU  ORCHART MEDS  ORCHART MEDS MENU  ORCHART NOTES  ORCHART NOTES MENU  ORCHART ORDERS  ORCHART ORDERS MENU  ORCHART PROBLEMS  
ORCHART PROBLEMS MENU  ORCHART REPORTS  ORCHART REPORTS MENU  ORCHART SUMMARIES  ORCHART SUMMARIES MENU  ORCHART XRAYS  ORCHART XRAYS MENU  ORCMED  
ORCMENU  ORCMENU2  ORCNOTE  ORCONSLT  ORCPROB  ORCSIGN  ORCXPND  ORDERS MENU  
OREVNT  OREVNT1  ORPR01  ORU PATIENT MOVMT  
Kernel 2 ^DIC(19  ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
EN ; -- main entry point
INIT ; -- init variables and list array
PHDR ; -- protocol header code
HDR ; -- header code
; Expects ORPNM, ORSSN, ORL, ORDOB, ORAGE [, ORPD]
; N DFN S DFN=+ORVP D SLCT1^ORQPT if any are missing ??
MSG() ; -- LMgr message bar
HELP ; -- help code
ITEMHELP ; -- help code for action menus
EXIT ; -- exit code
TAB(NEWTAB,REBUILD) ; -- switch focus to new chart tab from ORTAB
NEWPAT ; -- Select new patient
ORDERS(ACTION) ; -- Return order numbers to act on, if action chosen first
ALL ; -- Return all items on ORTAB
SELECT(NMBR) ; -- rev video on selected items
DESELECT(NMBR) ; -- norm video on selected items
CHANGE ; -- Change view of current list
REV(ORVP) ; -- Review orders for patient
VIEW() ; -- return line 3 of header w/current view of tab

External References

Name Field # of Occurrence
^DIR ORDERS+5, ALL+3, REV+9
$$ONEHR^ORACCESS EN+2
EN^ORCHANGE CHANGE+1
$$ACCESS^ORCHTAB REV+4
$$LNAMEF^ORCHTAB HDR+10, HDR+11
EN^ORCHTAB TAB+4
$$DT^ORCHTAB1 VIEW+7
REBLD^ORCMENU NEWPAT+6
$$MORE^ORCMENU2 EXIT+1, NEWPAT+1
EN1^ORCMENU2 EXIT+4, NEWPAT+4
NOTIF^ORCMENU2 EXIT+4, NEWPAT+4
EN^ORQPT EN+8, NEWPAT+6
SLCT1^ORQPT REV+10
$$CWAD^ORQPT2 HDR+14
UNLOCK^ORX2 EXIT+5, NEWPAT+10
$$OUTPTPR^SDUTL3 HDR+11
$$OUTPTTM^SDUTL3 HDR+12
CHGCAP^VALM TAB+9
EN^VALM EN+9, REV+11
SHOW^VALM PHDR+2
$$FDATE^VALM1 VIEW+7
FULL^VALM1 HELP+1, TAB+4
CLEAN^VALM10 TAB+5
CNTRL^VALM10 SELECT+8, DESELECT+9, DESELECT+10, DESELECT+11, DESELECT+12
WRITE^VALM10 SELECT+9, DESELECT+13
$$FMTE^XLFDT HDR+4
$$LJ^XLFSTR HDR+13
$$REPEAT^XLFSTR HDR+8
$$UP^XLFSTR INIT+1
$$GET^XPAR INIT+1, REV+3
DISP^XQORM1 ITEMHELP+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Site has migrated to Electronic Health Record."
  • Line Location: EN+3
Function Call: WRITE
  • Prompt: !,"CPRS List Manager access not allowed."
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: !!,"Enter the display numbers of the items you wish to change or act on; a menu of",!,"available actions will then be presented for selection."
  • Line Location: HELP+2
Function Call: WRITE
  • Prompt: !!,"To see a different 'page' of the chart, enter CC; if you'd like another view of",!,"the current page, by date range for example, enter CV. You may add new orders"
  • Line Location: HELP+3
Function Call: WRITE
  • Prompt: !,"for this patient from any page in the chart by entering AD and review them",!,"using RV. Enter ?? to see a list of actions available for navigating the list."
  • Line Location: HELP+4
Function Call: WRITE
  • Prompt: !!,"Press <return> to continue ..."
  • Line Location: HELP+9
Function Call: WRITE
  • Prompt: !!,"Enter the action you wish to take on the items selected and highlighted",!,"above; each item will be processed in order, one at a time."
  • Line Location: ITEMHELP+2
Function Call: WRITE
  • Prompt: !!,"Press <return> to continue ..."
  • Line Location: ITEMHELP+3
Function Call: WRITE
  • Prompt: !
  • Line Location: ITEMHELP+4
Function Call: WRITE
  • Prompt: !!,"You have new or unsigned orders for this patient!"
  • Line Location: EXIT+3
Function Call: WRITE
  • Prompt: !,"Searching the patient's chart ..."
  • Line Location: TAB+3
Function Call: WRITE
  • Prompt: !!,"You have new or unsigned orders for this patient!"
  • Line Location: NEWPAT+3
Function Call: WRITE
  • Prompt: !,NUM_" is not a valid selection."
  • Line Location: SELECT+3
Routine Call
  • DIR
  • Line Location:
    • ORDERS+5
    • ALL+3
    • REV+9
Routine Call
  • VALM
  • Line Location:
    • TAB+9
Routine Call
  • VALM
  • Line Location:
    • EN+9
    • REV+11
Routine Call
  • VALM
  • Line Location:
    • PHDR+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("XY" HELP+11
^DPT - [#2] HDR+4
^OR(100 - [#100] DESELECT+8, REV+6
^ORD(101 - [#101] PHDR+5, PHDR+6, PHDR+7, PHDR+8, PHDR+9, PHDR+10
^SC - [#44] HDR+6
^TMP("LRRR" EXIT+5!, NEWPAT+10!
^TMP("OR" EN+7!, PHDR+4, EXIT+5!, TAB+2, TAB+5*, TAB+6, TAB+7, TAB+9, TAB+10, TAB+11
, TAB+12, NEWPAT+7, NEWPAT+8!, NEWPAT+9, NEWPAT+10!, NEWPAT+12*, ORDERS+2, ALL+2, DESELECT+10, DESELECT+11
, VIEW+3
^TMP("ORNEW" EXIT+5!, NEWPAT+10!
^TMP("VALM VIDEO" TAB+6*, SELECT+7!, DESELECT+6!

Label References

Name Line Occurrences
$$MSG PHDR+2, HELP+10
$$VIEW HDR+15
EN EN+9
HDR TAB+13
TAB INIT+3, NEWPAT+12

Naked Globals

Name Field # of Occurrence
^( PHDR+7, TAB+9, SELECT+5
^("#" PHDR+4
^("MENU" TAB+11
^("RM" TAB+10
^(0 NEWPAT+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACTION ORDERS~, ORDERS+1*, ORDERS+4
BEGIN VIEW+1~, VIEW+4*, VIEW+7
CTXT NEWPAT+5~, NEWPAT+9*
DFN REV+5~, REV+6*
>> DGPMT PHDR+3
>> DGQUIET REV+1
DIR ORDERS+1~, ALL+1~, REV+5~, REV+9!
DIR("?" ORDERS+4*, REV+8*
DIR("A" ORDERS+3*, REV+7*
DIR("B" ORDERS+3*, REV+7*
DIR("V" ALL+3*
DIR(0 ORDERS+3*, ALL+3*, REV+7*
DIROUT REV+5~
DIRUT REV+5~
DTIME HELP+9, ITEMHELP+3
DTOUT ORDERS+5, REV+5~
DUOUT REV+5~
DX HELP+1~, HELP+11*
DY HELP+1~, HELP+11*
END VIEW+1~, VIEW+4*, VIEW+7
FLD TAB+8~*, TAB+9*
I DESELECT+1~, DESELECT+10*, DESELECT+11*
IDX DESELECT+1~, DESELECT+3*, DESELECT+4
IFN DESELECT+1~, DESELECT+4*, DESELECT+6, DESELECT+8
>> IOINHI DESELECT+7, DESELECT+10, DESELECT+11, DESELECT+12
>> IOINORM DESELECT+7, DESELECT+10, DESELECT+11, DESELECT+12
>> IORVOFF SELECT+8, DESELECT+8
>> IORVON SELECT+8, DESELECT+8
ITEMS VIEW+1~, VIEW+4*, VIEW+5, VIEW+8
L HDR+3~, HDR+6*, HDR+7, HDR+8*
LBL TAB+8~, TAB+9*
MAX ORDERS+1~, ORDERS+2*, ORDERS+3, ALL+1~, ALL+2*, ALL+3
NEWTAB TAB~, TAB+1, TAB+2
NMBR SELECT~, SELECT+2, DESELECT~, DESELECT+2
NUM SELECT+1~, SELECT+2*, SELECT+3, SELECT+5, DESELECT+1~, DESELECT+2*, DESELECT+3
OFF DESELECT+1~, DESELECT+7*, DESELECT+8*, DESELECT+9
OLD NEWPAT+5~*, NEWPAT+6
ON DESELECT+1~, DESELECT+7*, DESELECT+8*, DESELECT+9
ORACTION INIT+3*, EXIT+6!
ORAGE HDR+4, EXIT+6!
ORATTEND HDR+10, EXIT+6!
ORCWAD HDR+3~, HDR+14*, HDR+15
ORDOB EXIT+6!
OREBLD EXIT+6!, NEWPAT+11!
OREBUILD PHDR+1!, EXIT+6!, NEWPAT+6!, NEWPAT+11!
OREVENT EXIT+6!
OREXIT EN+9, EN+10!
ORI PHDR+1~, PHDR+5*, PHDR+6*, PHDR+7, SELECT+1~, SELECT+2*, DESELECT+1~, DESELECT+2*
ORJ SELECT+1~, SELECT+6*, SELECT+7, SELECT+8, SELECT+9, DESELECT+1~, DESELECT+5*, DESELECT+6, DESELECT+9, DESELECT+10
, DESELECT+11, DESELECT+12, DESELECT+13
ORL HDR+5, HDR+6, EXIT+6!
ORL(1 HDR+5
ORM PHDR+1~, PHDR+5*, PHDR+6
ORNEW NEWPAT+11!
ORNMBR PHDR+1!, EXIT+6!
ORNP EXIT+6!
ORPD EXIT+6!
ORPNM HDR+8, HDR+9, EXIT+6!
ORQUIT EXIT+6!
ORRV EXIT+4*, EXIT+6!, NEWPAT+4*, NEWPAT+5!
ORS PHDR+1~, PHDR+7*
ORSC EXIT+6!
ORSEX EXIT+6!
ORSSN HDR+8, HDR+9, EXIT+6!
ORSYN PHDR+1~, PHDR+7*
ORT NEWPAT+5~, NEWPAT+12
ORT( NEWPAT+9*
ORTAB INIT+1*, INIT+2*, INIT+3, PHDR+2, PHDR+5, HDR+15, HELP+5, HELP+6, HELP+7, HELP+8
, HELP+10, EXIT+6!, TAB+1, TAB+2*, TAB+5, NEWPAT+5, NEWPAT+11!, ORDERS+2, ALL+2, DESELECT+8
, DESELECT+10, DESELECT+11, DESELECT+12, REV+11*, VIEW+2, VIEW+3, VIEW+5, VIEW+8
ORTS EXIT+6!
ORVP EN+8, HDR+4, HDR+11, HDR+12, HDR+14, EXIT+1, EXIT+5, EXIT+6!, NEWPAT+5, NEWPAT+6
, NEWPAT+10, REV~, REV+1, REV+6*, REV+10
ORWARD EXIT+6!
ORX HDR+3~, HDR+13*, HDR+15*
ORX1 HDR+3~, HDR+4*, HDR+9*, HDR+10*, HDR+13
ORX2 HDR+3~, HDR+5*, HDR+6*, HDR+7*, HDR+8, HDR+9, HDR+11*, HDR+13
ORX3 HDR+3~, HDR+4*, HDR+8, HDR+9, HDR+12*, HDR+13
REBUILD TAB~, TAB+2
ROW SELECT+1~, SELECT+5*, SELECT+6, DESELECT+1~, DESELECT+4*, DESELECT+5
ROWS SELECT+1~, SELECT+5*, SELECT+6, DESELECT+1~, DESELECT+4*, DESELECT+5
>> SDAMEVT REV+2
SP HDR+3~, HDR+8*, HDR+9
STS VIEW+1~, VIEW+4*, VIEW+5
T NEWPAT+5~, NEWPAT+7*, NEWPAT+8, NEWPAT+9
TAB NEWPAT+5~*, NEWPAT+12
TEXT VIEW+1~, VIEW+3*, VIEW+5*, VIEW+7*, VIEW+8*, VIEW+9*, VIEW+10
U HDR+4, HDR+6, HDR+7, HDR+12, TAB+12, NEWPAT+9, ORDERS+2, ALL+2, SELECT+3, SELECT+5
, DESELECT+4, VIEW+3
VALID SELECT+1~*, SELECT+4*, SELECT+10
>> VALM("LINES" SELECT+6, DESELECT+5
>> VALM("RM" TAB+10*
>> VALM("TITLE" TAB+10*
>> VALMAR SELECT+3, SELECT+5, DESELECT+3
>> VALMBCK HELP+10*, TAB+1*, TAB+13*, NEWPAT+6*, NEWPAT+12*, DESELECT+13
VALMBG EXIT+6!, TAB+1*, SELECT+6, DESELECT+5
VALMCNT EXIT+6!, TAB+12*
>> VALMDDF("DATA" TAB+12
>> VALMEVL TAB+6, SELECT+7, DESELECT+6
VALMHDR HDR+3!, EXIT+6!, NEWPAT+11!
VALMHDR(1 HDR+9*
VALMHDR(2 HDR+13*
VALMHDR(3 HDR+15*
>> VALMLFT TAB+12*
>> VALMSG PHDR+2*, HELP+10*
X HELP+1~, HELP+9*, ITEMHELP+1~, ITEMHELP+3*, ITEMHELP+4*, ORDERS+1~, ALL+1~, ALL+3*, REV+5~, VIEW+1~
, VIEW+3*, VIEW+4
>> XQORM("#" PHDR+4*, PHDR+5
>> XQORM("B" PHDR+3*
>> XQORM("HIJACK" TAB+11*
>> XQORM("KEY" PHDR+7*, PHDR+8*, PHDR+9*, PHDR+10*
>> XQORQUIT SELECT+10*
Y ORDERS+1~, ORDERS+5*, ORDERS+6, ALL+1~, ALL+4, REV+5~, REV+9
>> ZTQUEUED REV+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All