©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
HLOF778 ;ALB/CJM-HL7 - Saving messages to file 778 ;02/04/2004
Source file <HLOF778.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| NEXTMSG(HLMSTATE,MSG) | ;
|
|
| ACKTO(HLMSTATE,ACKTO) | ;if this is an application ack, update the original message
|
|
| SAVEMSG(HLMSTATE) | ;
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^HLA - [#777] | NEXTMSG+17, NEXTMSG+19, ACKTO+21 |
| ^HLB - [#778] | SAVEMSG+41*, SAVEMSG+42*, SAVEMSG+43*, SAVEMSG+44*, SAVEMSG+57, SAVEMSG+64*, SAVEMSG+65*, SAVEMSG+66*, SAVEMSG+67*, ACKTO+7 , ACKTO+13*, ACKTO+16*, ACKTO+17* |
| ^HLB("AE" | SAVEMSG+45*, SAVEMSG+68* |
| ^HLB("ERRORS" | ACKTO+22* |
| Name | Line Occurrences |
|---|---|
| $$NEXTMSG | SAVEMSG+58 |
| ACKTO | SAVEMSG+79, SAVEMSG+87 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ACKTO | SAVEMSG+73~, SAVEMSG+74*, SAVEMSG+79, SAVEMSG+84~, SAVEMSG+85*, SAVEMSG+87, ACKTO~ |
| ACKTO("ACK BY | " , SAVEMSG+77*, SAVEMSG+86*, ACKTO+11, ACKTO+16 |
| ACKTO("IEN" | ACKTO+6, ACKTO+22 |
| ACKTO("STATUS" | ACKTO+5 |
| BODY | ACKTO+19~, ACKTO+20*, ACKTO+21 |
| CS | SAVEMSG+51~, SAVEMSG+53*, SAVEMSG+62 |
| CUR | SAVEMSG+59~, SAVEMSG+60*, SAVEMSG+61, SAVEMSG+64, SAVEMSG+65, SAVEMSG+66, SAVEMSG+67, SAVEMSG+68 |
| FS | SAVEMSG+38~, SAVEMSG+39*, SAVEMSG+40, SAVEMSG+51~, SAVEMSG+52*, SAVEMSG+62, SAVEMSG+63 |
| HDR | SAVEMSG+51~, SAVEMSG+56 |
| HDR(1 | SAVEMSG+65 |
| HDR(2 | SAVEMSG+62*, SAVEMSG+63*, SAVEMSG+66 |
| HLMSTATE | SAVEMSG~, SAVEMSG+25, SAVEMSG+28, SAVEMSG+56, SAVEMSG+58, SAVEMSG+79, SAVEMSG+87, NEXTMSG~, ACKTO~ |
| HLMSTATE("ACK | TO" , SAVEMSG+83, SAVEMSG+85, SAVEMSG+88* |
| HLMSTATE("BATCH" | SAVEMSG+25, SAVEMSG+31, SAVEMSG+41, SAVEMSG+57*, SAVEMSG+60, SAVEMSG+64, SAVEMSG+72, SAVEMSG+74, SAVEMSG+80!, SAVEMSG+86 , NEXTMSG+17, NEXTMSG+22* |
| HLMSTATE("BODY" | SAVEMSG+25, NEXTMSG+16, NEXTMSG+17, NEXTMSG+19 |
| HLMSTATE("DIRECTION" | SAVEMSG+22, SAVEMSG+35, SAVEMSG+49, SAVEMSG+77 |
| HLMSTATE("DT/TM" | SAVEMSG+22* |
| HLMSTATE("HDR" | SAVEMSG+52, SAVEMSG+53, SAVEMSG+54*, SAVEMSG+55*, SAVEMSG+61, SAVEMSG+77, SAVEMSG+86, ACKTO+18, ACKTO+22 |
| HLMSTATE("IEN" | SAVEMSG+28, SAVEMSG+32, SAVEMSG+57, SAVEMSG+90 |
| HLMSTATE("UNS | TORED LINES" , SAVEMSG+25, TORED MSH" , SAVEMSG+35, SAVEMSG+37, SAVEMSG+39, SAVEMSG+40, SAVEMSG+42, SAVEMSG+43, SAVEMSG+46!* |
| IEN | SAVEMSG+32~*, SAVEMSG+41, SAVEMSG+42, SAVEMSG+43, SAVEMSG+44, SAVEMSG+45, SAVEMSG+64, SAVEMSG+65, SAVEMSG+66, SAVEMSG+67 , SAVEMSG+68, ACKTO+4~, ACKTO+6*, ACKTO+7, ACKTO+13, ACKTO+16, ACKTO+17 |
| MSG | SAVEMSG+51~, SAVEMSG+58, NEXTMSG~, NEXTMSG+15! |
| MSG("EVENT" | SAVEMSG+62, NEXTMSG+21* |
| MSG("MESSAGE | TYPE" , SAVEMSG+62, NEXTMSG+20* |
| MSGID | SAVEMSG+38~, SAVEMSG+40*, SAVEMSG+41, SAVEMSG+45, SAVEMSG+59~, SAVEMSG+61*, SAVEMSG+63, SAVEMSG+64, SAVEMSG+68 |
| NODE | NEXTMSG+14~, NEXTMSG+19*, NEXTMSG+20, NEXTMSG+21, ACKTO+4~, ACKTO+7*, ACKTO+11*, ACKTO+12*, ACKTO+13, ACKTO+20 |
| ORDER | SAVEMSG+36~*, SAVEMSG+37*, SAVEMSG+39, SAVEMSG+40, SAVEMSG+41, SAVEMSG+42, SAVEMSG+43, SAVEMSG+44, SAVEMSG+45 |
| STATUS | ACKTO+4~, ACKTO+5*, ACKTO+10*, ACKTO+12, ACKTO+17, ACKTO+18 |
| SUBIEN | SAVEMSG+71~*, SAVEMSG+72*, SAVEMSG+74, SAVEMSG+77, NEXTMSG+14~, NEXTMSG+17*, NEXTMSG+18, NEXTMSG+19, NEXTMSG+22, NEXTMSG+23 , ACKTO+4~, ACKTO+6*, ACKTO+8, ACKTO+16, ACKTO+17 |
| TIME | ACKTO+19~, ACKTO+21*, ACKTO+22 |