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 |