ORMBLDLR ; SLC/MKB - Build outgoing Lab ORM msgs ;Jan 27, 2021@09:24:22
Source file <ORMBLDLR.m>
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| HL7DATE(DATE) | ; -- FM -> HL7 format
|
|
| PTR(NAME) | ; -- Returns ptr value of prompt in Dialog file
|
|
| AP | ; -- new Lab AP order
; fall through to CH - no difference at this time |
|
| CH | ; -- new Lab CH order
|
|
| BB | ; -- new Lab BB order
|
|
| COLLTYPE() | ; -- Returns collection type for current INST
|
|
| SPEC() | ; -- Returns specimen/sample string for current INST
|
|
| XO | ; -- Send XO message to Lab
|
|
| XO1 | ||
| APSUB(ORIFN) | ;* - determine if Anatomic Path test subscript for AP1 segment and make call to get LR CPRS SCREEN pointer
|
| FileNo | Call Tags |
|---|---|
| ^ORD(101.43 - [#101.43] | GET1^DIQ |
| ^LAB(60 - [#60] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^LAB(61 - [#61] | SPEC+3 |
| ^LAB(62 - [#62] | SPEC+5 |
| ^LAB(62.05 - [#62.05] | CH+8 |
| ^OR(100 - [#100] | CH+2, BB+3, XO+2, XO+4, XO+7, XO+8 |
| ^ORD(100.98 - [#100.98] | XO+2 |
| ^ORD(101.41 - [#101.41] | PTR+1 |
| ^ORD(101.42 - [#101.42] | XO1+3, XO1+11 |
| ^TMP("ORWORD" | CH+12, CH+13, CH+14, BB+6, BB+7, BB+8, XO1+4, XO1+5, XO1+6, XO1+12 , XO1+13, XO1+14 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ANS | APSUB+1~, APSUB+5 |
| ANS( | APSUB+8 |
| ANS(0 | APSUB+6 |
| AP1 | CH+10~*, CH+11 |
| CMMT | CH+1~, CH+4*, CH+12, CH+13, CH+14, XO+1~, XO+6*, XO1+4, XO1+5, XO1+6 , XO1+12, XO1+13, XO1+14 |
| CNT | XO+1~, XO+6*, XO1+2*, XO1+3, XO1+5*, XO1+6, XO1+10*, XO1+11, XO1+13*, XO1+14 |
| DATE | HL7DATE~, HL7DATE+1 |
| DG | XO+1~, XO+2*, XO+3*, XO+4, XO1+15 |
| DIERR | APSUB+1~ |
| ERR | APSUB+1~ |
| I | CH+1~, CH+7*, CH+9*, CH+11*, CH+13*, CH+14, CH+16, BB+1~, BB+6*, BB+7 , BB+8*, XO+1~, XO+7*, XO+8*, XO1+1*, XO1+2, XO1+7*, XO1+9*, XO1+10 |
| >> IFN | CH+2, CH+16, BB+3, XO+2, XO+4, XO+7, XO1 |
| INST | CH+1~, CH+7*, CH+8, CH+9, CH+12, CH+13, CH+14, COLLTYPE+2, SPEC+2, SPEC+4 , XO+1~, XO1+2*, XO1+3, XO1+4, XO1+5, XO1+6, XO1+10*, XO1+11, XO1+12, XO1+13 , XO1+14 |
| IP | CH+1~, CH+5*, CH+9 |
| ITEM | APSUB+1~, APSUB+2*, APSUB+3 |
| J | CH+1~, CH+12*, CH+13, CH+14*, BB+1~, BB+7*, BB+8*, XO+1~, XO1+4*, XO1+5 , XO1+6*, XO1+12*, XO1+13, XO1+14* |
| L | CH+14*, XO+1~, XO1+6*, XO1+14* |
| LST | CH+11~ |
| NAME | PTR~, PTR+1 |
| NUM | APSUB+1~, APSUB+6*, APSUB+8 |
| OI | CH+1~, CH+3*, CH+7, CH+9, XO+1~, XO+5*, XO+7, XO+8 |
| OR0 | XO+1~, XO+2*, XO+3 |
| ORDIALOG | XO+1~, XO+3*, XO1, XO1+7!*, XO1+8 |
| ORDIALOG( | CH+7, CH+8, CH+9, BB+2, BB+5, COLLTYPE+2, SPEC+2, SPEC+4, XO1+3, XO1+11 |
| ORIFN | CH+10, CH+11, APSUB~, APSUB+2 |
| ORMSG | XO+1~, XO1+15 |
| ORMSG( | CH+9*, CH+11*, CH+13*, CH+14*, XO1+3*, XO1+5*, XO1+6*, XO1+11*, XO1+13*, XO1+14* |
| ORMSG(4 | CH+6*, BB+4*, XO+4* |
| ORMSG(5 | BB+5* |
| ORMSG(6 | BB+7*, BB+8* |
| ORNEW | XO+1~ |
| ORNEW( | XO+7*, XO1+1, XO1+2, XO1+9 |
| OROLD | XO+1~, XO+4*, XO+8, XO1+8 |
| OROLD( | XO+8*, XO1+1, XO1+9, XO1+10 |
| QUAN | BB+1~, BB+2*, BB+4 |
| SAMP | SPEC+1~, SPEC+4*, SPEC+5 |
| SPEC | SPEC+1~, SPEC+2*, SPEC+3, SPEC+5 |
| START | CH+1~, CH+2*, CH+6, BB+1~, BB+3*, BB+4 |
| STOP | CH+1~, CH+2*, CH+6 |
| SUB | APSUB+1~, APSUB+4*, APSUB+7, APSUB+8 |
| TEST | XO+1~, XO+7*, XO+8*, XO1+2*, XO1+3, XO1+10*, XO1+11 |
| TESTIEN | APSUB+1~, APSUB+3*, APSUB+4, APSUB+5 |
| TYPE | COLLTYPE+1~, COLLTYPE+2*, COLLTYPE+3 |
| U | CH+2, CH+6, CH+8, BB+3, SPEC+3, SPEC+5, XO+2, XO+3, XO+4, XO+7 , XO+8, XO1+2, XO1+3, XO1+10, XO1+11 |
| URG | CH+1~, CH+3*, CH+8, XO+1~, XO+5*, XO1+3, XO1+11 |
| WP | BB+1~, BB+3*, BB+6, BB+7, BB+8 |
| X | CH+1~, CH+8*, CH+9, COLLTYPE+1~, COLLTYPE+3*, COLLTYPE+4, SPEC+1~, SPEC+3*, SPEC+5*, SPEC+6 |
| X0 | SPEC+1~, SPEC+3*, SPEC+5 |
