©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
LR7OF0 ;slc/dcm/JAH - Receive/Route MSG array from OE/RR ;8/10/04
Source file <LR7OF0.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ACK(TYPE,MSG3,COMMENT) | ;Send back ok or nok to OE/RR
|
|
| END | ;Clean-up and get out
|
|
| LC | ;Print to LC Lab device
|
|
| HDRCHK(HDR) | ;Check & return message Header (BHS,MSH,BTS)
|
|
| SPLIT | ;Build array for long segment
|
|
| PIDCHK(PID) | ;Check PID & setup patient variables (DFN,LRDPF,LRDFN,LRPNM)
|
|
| EN(MSG,MSGTYPE) | ;Route all messages from here
|
| Name | Field # of Occurrence |
|---|---|
| EN^LR7OF1 | EN+42 |
| CANC^LR7OF2 | EN+20 |
| NA^LR7OF2 | EN+26 |
| NEW^LR7OF2 | EN+18 |
| NTE^LR7OF2 | EN+31 |
| NUM^LR7OF2 | EN+24 |
| XO^LR7OF2 | EN+23 |
| OBR^LR7OF3 | EN+27, EN+28 |
| PURG^LR7OF4 | EN+22 |
| PURG1^LR7OF4 | EN+21 |
| EN^LR7OFA1 | EN+41 |
| $$LRDFN^LR7OR1 | PIDCHK+4 |
| $$MSH^LR7OU0 | ACK+6 |
| NTE^LR7OU01 | ACK+10 |
| DG1^LRBEBA2 | EN+29 |
| ZCL^LRBEBA2 | EN+30 |
| END^LRDPA | PIDCHK+5 |
| $$DC1^LROR6 | ACK+9 |
| ^LROW2P | LC+7, LC+9 |
| EN^ORERR | ACK+5 |
| MSG^XQOR | ACK+12 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^LAB(69.9 - [#69.9] | EN+38, LC+7, LC+9 |
| ^ORD(100.03 - [#100.03] | ACK+9 |
| ^SC - [#44] | EN+17 |
| ^TMP("OR" | EN+12!, EN+15!, EN+39, EN+40, LC+3, LC+4, END+1! |
| Name | Line Occurrences |
|---|---|
| $$HDRCHK | EN+9 |
| $$PIDCHK | EN+11 |
| ACK | EN+25, EN+32, EN+34, EN+35, EN+43, HDRCHK+1, HDRCHK+3, HDRCHK+4, HDRCHK+5, HDRCHK+6 , HDRCHK+7, PIDCHK+1, PIDCHK+2, PIDCHK+3, PIDCHK+5, PIDCHK+6 |
| END | EN+6, EN+33, EN+34, EN+35, EN+43 |
| LC | EN+14 |
| SPLIT | EN+16 |
| Name | Field # of Occurrence |
|---|---|
| ^( | LC+4 |
| ^("COM" | END+1! |
| ^(0 | ACK+9 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ARRAY | ACK+4~ |
| ARRAY(1 | ACK+10* |
| COMMENT | ACK~, ACK+5, ACK+10 |
| CTR | LC+1~, LC+4* |
| DFN | EN+3~, PIDCHK+4*, PIDCHK+6 |
| DUZ(2 | HDRCHK+6, LC+7, LC+9 |
| HDR | HDRCHK~, HDRCHK+1, HDRCHK+2, HDRCHK+3, HDRCHK+4, HDRCHK+5, HDRCHK+6, HDRCHK+7, HDRCHK+8 |
| I | SPLIT+1~, SPLIT+2* |
| ION | LC+7*, LC+9* |
| LINE | EN+4~, EN+16*, SPLIT+2 |
| LOC | EN+3~, EN+17* |
| LOCA | EN+4~, EN+17*, EN+38 |
| LOCP | EN+3~, EN+17*, EN+38 |
| LRCOM | EN+3~ |
| LRDFN | EN+4~, PIDCHK+4*, PIDCHK+5, PIDCHK+6, LC+3, LC+4 |
| LRDPF | EN+4~, PIDCHK+4*, PIDCHK+6 |
| LRDUZ | EN+3~ |
| LREND | EN+4~, EN+16*, EN+21*, EN+22*, EN+33* |
| LRHDR | EN+4~, EN+9*, EN+10, EN+12, EN+13 |
| LRI | EN+3~, EN+7*, EN+8*, EN+40* |
| LRIO | EN+3~ |
| LRJ | EN+3~ |
| LRLB | EN+3~ |
| LRLLOC | EN+3~, EN+38* |
| LRMSG | ACK+4~, ACK+11*, ACK+12 |
| LRMSG(1 | ACK+6* |
| LRMSG(2 | ACK+7* |
| LRMSG(3 | ACK+8*, ACK+9* |
| LRNT | EN+3~ |
| LRODT | EN+3~, EN+40*, EN+43, LC+1~, LC+6*, LC+8* |
| LROLLOC | EN+3~, EN+38* |
| LRORD | EN+3~, EN+43 |
| LRORDER | EN+4~ |
| LRORDR | EN+3~ |
| LRORIFN | EN+4~ |
| LROT | EN+3~ |
| LROUTINE | EN+3~, EN+38* |
| LRPLACR | EN+4~, EN+43 |
| LRPNM | EN+3~, PIDCHK+4* |
| LRPRAC | EN+3~, EN+38* |
| LRPTR | LC+1~ |
| LRPTR( | LC+5* |
| LRPTR("I" | LC+8 |
| LRPTR("LC" | LC+6 |
| LRQUANT | EN+4~ |
| LRSAMP | EN+3~ |
| LRSDT | EN+3~, EN+4~, EN+39*, EN+40*, LC+1~, LC+2*, LC+3*, LC+4 |
| LRSN | EN+4~, EN+43, LC+1~, LC+6*, LC+8* |
| LRSPEC | EN+3~ |
| LRSUM | EN+4~ |
| LRSX | EN+3~, EN+16* |
| LRSXN | EN+4~ |
| LRTIME | EN+4~ |
| LRTSTS | EN+4~ |
| LRURG | EN+4~ |
| LRVERZ | EN+4~ |
| LRXMSG | EN+3~, EN+16*, EN+17, EN+18, EN+19, EN+20, EN+21, EN+22, EN+23, EN+24 , EN+25, EN+26, EN+27, EN+28, EN+29, EN+30, EN+31, EN+32 |
| LRXMSG( | SPLIT+2* |
| LRXORC | EN+4~, EN+7*, EN+8*, EN+18*, EN+25, EN+32, EN+34, EN+35, HDRCHK+1, HDRCHK+3 , HDRCHK+4, HDRCHK+5, HDRCHK+6, HDRCHK+7, PIDCHK+1, PIDCHK+2, PIDCHK+3, PIDCHK+5, PIDCHK+6 |
| LRXTYPE | EN+4~, EN+18*, EN+19, EN+20, EN+21, EN+22, EN+23, EN+24, EN+25, EN+26 , EN+27, EN+28, EN+36 |
| LRXZ | EN+3~, EN+40*, LC+1~, LC+3*, LC+4, LC+5 |
| MSG | EN~, EN+43, ACK+5, ACK+10~* |
| MSG( | EN+8, EN+16, SPLIT+2 |
| MSG(1 | EN+9 |
| MSG(2 | EN+11, ACK+7 |
| MSG3 | ACK~, ACK+5, ACK+8 |
| MSGTYPE | EN~, EN+41 |
| NOBR | EN+4~, EN+5*, EN+20*, EN+35 |
| NORC | EN+4~, EN+5*, EN+8*, EN+18*, EN+34 |
| ORIFN | EN+3~ |
| PID | PIDCHK~, PIDCHK+1, PIDCHK+2, PIDCHK+3, PIDCHK+4 |
| PROV | EN+3~, EN+38 |
| QUANT | EN+3~ |
| REASON | EN+3~ |
| REJECT | EN+37~ |
| REJECT(0 | ACK+9 |
| ROOM | EN+3~, EN+17* |
| SAMP | EN+3~ |
| SPEC | EN+3~ |
| STARTDT | EN+3~ |
| TEST | EN+3~ |
| TESTN | EN+3~ |
| TYPE | EN+3~, ACK~, ACK+5*, ACK+8 |
| U | LC+7, LC+9 |
| URG | EN+3~ |
| VAR | ACK+4~, ACK+5 |
| VAR("XQY0" | ACK+5* |
| VISIT | EN+3~, EN+17* |
| X | EN+3~, EN+8*, EN+25*, PIDCHK+2, LC+4*, LC+5 |
| X8 | ACK+4~, ACK+9* |