©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
ORCDLR2 ;SLC/MKB - Silent utilities for LR dialogs ; 11/4/2007
Source file <ORCDLR2.m>
| Package | Total | Call Graph |
|---|---|---|
| Order Entry Results Reporting | 4 | $$NMSP^ORCD ($$IMMCOLL,$$LABCOLL,GETIMES)^ORCDLR1 (AM,NEXT)^ORCSAVE2 $$VALUE^ORX8 |
| Inpatient Medications | 1 | (ENSPU,ENSV)^PSJEEU |
| Kernel | 1 | $$FMADD^XLFDT |
| Pharmacy Data Management | 1 | ZERO^PSS51P1 |
| Toolkit | 1 | $$GET^XPAR |
| VA Fileman | 1 | ^%DT |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| KIDS(ORY,ORL,ORIFN,DATE,TYPE,SCH,DUR) | ; -- get child times, validate LC/IC
; ORL = Hospital Location file #44 vptr ; ORIFN = Orders file #100 ien ; or ; DATE = Start date.time or "AM" or "NEXT" ; TYPE = LC or I ; SCH = Administration Schedule file #51.1 ien ; DUR = # or "X"_# ; Will quit if OREVENT exists <can't check delayed orders> ; ; Returns ORY(n) = child start.time ^ 1 or 0 ^ [error message] ; |
|
| SCHEDULE(ORY,PSJSD,SCH,ORDUR) | ; Returns list of start time(s) from schedule
; PSJEEU - DBIA #2417 ; PSS51P1 - DBIA #4546 |
|
| LC(IEN) | ; -- Return 1 or 0, if order IEN is to Lab for LC or I
|
|
| GUI(ORY,ORL,ORDERS) |
| Name | Field # of Occurrence |
|---|---|
| ^%DT | KIDS+22 |
| $$NMSP^ORCD | LC+2 |
| $$IMMCOLL^ORCDLR1 | KIDS+27 |
| $$LABCOLL^ORCDLR1 | KIDS+26 |
| GETIMES^ORCDLR1 | KIDS+20 |
| AM^ORCSAVE2 | KIDS+21 |
| NEXT^ORCSAVE2 | KIDS+21 |
| $$VALUE^ORX8 | KIDS+15, KIDS+16, KIDS+17, KIDS+18, LC+4 |
| ENSPU^PSJEEU | SCHEDULE+20 |
| ENSV^PSJEEU | SCHEDULE+8 |
| ZERO^PSS51P1 | SCHEDULE+6 |
| $$FMADD^XLFDT | SCHEDULE+11, SCHEDULE+13, SCHEDULE+19 |
| $$GET^XPAR | SCHEDULE+16 |
| RPC Name | Call Tags |
|---|---|
| ORCDLR2 CHECK ONE LC TO WC | KIDS |
| ORCDLR2 CHECK ALL LC TO WC | GUI |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^OR(100 - [#100] | GUI+14, KIDS+13, LC+2 |
| ^TMP($J | GUI+2!, GUI+9*, GUI+10*, GUI+12, GUI+15, SCHEDULE+6, SCHEDULE+7, SCHEDULE+17 |
| Name | Line Occurrences |
|---|---|
| $$LC | GUI+5 |
| KIDS | GUI+6 |
| SCHEDULE | KIDS+23 |
| Name | Field # of Occurrence |
|---|---|
| ^( | GUI+15 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| %DT | KIDS+12~, KIDS+22* |
| DAD | GUI+1~, GUI+12*, GUI+13, GUI+15 |
| DATE | KIDS~, KIDS+14, KIDS+15*, KIDS+19, KIDS+21, KIDS+22 |
| DAYS | SCHEDULE+15~, SCHEDULE+18*, SCHEDULE+19 |
| DUR | KIDS~, KIDS+14, KIDS+18*, KIDS+19, KIDS+23 |
| I | GUI+1~, GUI+7*, GUI+10*, SCHEDULE+3~, SCHEDULE+5*, SCHEDULE+6, SCHEDULE+23* |
| IEN | LC~, LC+2, LC+4 |
| LOCMX | SCHEDULE+15~, SCHEDULE+16*, SCHEDULE+18 |
| N | GUI+1~, GUI+11*, GUI+13*, GUI+14*, GUI+16* |
| NXT | SCHEDULE+3~, SCHEDULE+23* |
| OK | KIDS+12~, KIDS+25*, KIDS+26*, KIDS+27*, KIDS+28 |
| OR0 | KIDS+12~, KIDS+13* |
| ORCNT | GUI+1~, GUI+2*, GUI+9*, GUI+10, GUI+11, GUI+12 |
| ORDERS | GUI~ |
| ORDERS( | GUI+3, GUI+4, GUI+5 |
| ORDIV | KIDS+12~ |
| ORDUR | SCHEDULE~, SCHEDULE+11, SCHEDULE+12, SCHEDULE+21, SCHEDULE+22 |
| >> OREVENT | KIDS+13 |
| ORI | GUI+1~, GUI+3*, GUI+4, GUI+5, GUI+15*, KIDS+12~, KIDS+25*, KIDS+26, KIDS+27, KIDS+28 |
| ORIFN | GUI+1~, GUI+5*, GUI+6, GUI+9, GUI+12*, GUI+14, KIDS~, KIDS+13, KIDS+14, KIDS+15 , KIDS+16, KIDS+17, KIDS+18 |
| ORIMTIME | KIDS+12~ |
| ORL | GUI~, GUI+6, KIDS~, SCHEDULE+8, SCHEDULE+16 |
| ORN | KIDS+12~, KIDS+25*, KIDS+28* |
| ORSCH | SCHEDULE+3~, SCHEDULE+6*, SCHEDULE+7, SCHEDULE+17 |
| ORSTRT | KIDS+12~, KIDS+23, KIDS+24 |
| ORSTRT( | KIDS+25 |
| ORTIME | KIDS+12~ |
| ORY | GUI~, KIDS~, KIDS+24!*, SCHEDULE~, SCHEDULE+4*, SCHEDULE+20!, SCHEDULE+21*, SCHEDULE+22*, SCHEDULE+23 |
| ORY( | GUI+13*, GUI+14*, GUI+16*, KIDS+28*, SCHEDULE+4*, SCHEDULE+23* |
| ORY(1 | GUI+11* |
| ORY(2 | GUI+11* |
| PKG | LC+1~, LC+2*, LC+3 |
| PSJAT | SCHEDULE+3~ |
| PSJAX | SCHEDULE+3~ |
| PSJC | SCHEDULE+3~, SCHEDULE+21, SCHEDULE+22 |
| PSJC( | SCHEDULE+23 |
| PSJFD | SCHEDULE+3~, SCHEDULE+11*, SCHEDULE+13*, SCHEDULE+19* |
| PSJM | SCHEDULE+3~, SCHEDULE+13 |
| PSJNE | SCHEDULE+3~, SCHEDULE+8* |
| PSJOFD | SCHEDULE+3~ |
| PSJOSD | SCHEDULE+3~ |
| PSJPP | SCHEDULE+3~, SCHEDULE+8* |
| PSJSCH | SCHEDULE+3~, SCHEDULE+10* |
| PSJSD | SCHEDULE~, SCHEDULE+4, SCHEDULE+11, SCHEDULE+13, SCHEDULE+19 |
| PSJTS | SCHEDULE+3~, SCHEDULE+9 |
| PSJW | SCHEDULE+3~, SCHEDULE+8* |
| PSJX | SCHEDULE+3~, SCHEDULE+7*, SCHEDULE+8, SCHEDULE+10 |
| PSJY | SCHEDULE+3~ |
| RES | GUI+1~, GUI+6! |
| RES( | GUI+7!, GUI+10 |
| RES(0 | GUI+8 |
| SCH | KIDS~, KIDS+14, KIDS+17*, KIDS+19, KIDS+23, SCHEDULE~, SCHEDULE+4*, SCHEDULE+5 |
| SCHMX | SCHEDULE+15~, SCHEDULE+17*, SCHEDULE+18 |
| TYPE | KIDS~, KIDS+14, KIDS+16*, KIDS+19, KIDS+26, KIDS+27 |
| U | GUI+7, KIDS+13, KIDS+28, LC+2 |
| VALIDT | KIDS+12~, KIDS+20* |
| X | GUI+1~, GUI+15*, GUI+16, KIDS+12~, KIDS+22*, SCHEDULE+3~, SCHEDULE+5*, SCHEDULE+6, SCHEDULE+12*, SCHEDULE+13 , LC+4~*, LC+5 |
| X0 | LC+1~, LC+2* |
| Y | KIDS+12~, KIDS+22, KIDS+23, LC+1~*, LC+5*, LC+6 |