ORCHART ;SLC/MKB/REV-OE/RR ; 11 March 2003 14:02
Source file <ORCHART.m>
Package | Total | Call Graph |
---|---|---|
Order Entry Results Reporting | 8 | 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 |
Registration | 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 |
Name | Comments | DBIA/ICR reference |
---|---|---|
SELECT(NMBR) | ; -- rev video on selected items
|
|
TAB(NEWTAB,REBUILD) | ; -- switch focus to new chart tab from ORTAB
|
|
ALL | ; -- Return all items on ORTAB
|
|
EN | ; -- main entry point
|
|
VIEW() | ; -- return line 3 of header w/current view of tab
|
|
HELP | ; -- help code
|
|
MSG() | ; -- LMgr message bar
|
|
DESELECT(NMBR) | ; -- norm video on selected items
|
|
PHDR | ; -- protocol header code
|
|
ORDERS(ACTION) | ; -- Return order numbers to act on, if action chosen first
|
|
REV(ORVP) | ; -- Review orders for patient
|
|
INIT | ; -- init variables and list array
|
|
NEWPAT | ; -- Select new patient
|
|
EXIT | ; -- exit code
|
|
ITEMHELP | ; -- help code for action menus
|
|
CHANGE | ; -- Change view of current list
|
|
HDR | ; -- header code
; Expects ORPNM, ORSSN, ORL, ORDOB, ORAGE [, ORPD] ; N DFN S DFN=+ORVP D SLCT1^ORQPT if any are missing ?? |
Name | Field # of Occurrence |
---|---|
^DIR | ORDERS+5, ALL+3, REV+9 |
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+2, 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+3, 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 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
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+1!, 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! |
Name | Line Occurrences |
---|---|
$$MSG | PHDR+2, HELP+10 |
$$VIEW | HDR+15 |
EN | EN+3 |
HDR | TAB+13 |
TAB | INIT+3, NEWPAT+12 |
Name | Field # of Occurrence |
---|---|
^( | PHDR+7, TAB+9, SELECT+5 |
^("#" | PHDR+4 |
^("MENU" | TAB+11 |
^("RM" | TAB+10 |
^(0 | NEWPAT+9 |
>> | 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+3, EN+4! |
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+2, 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 |