HLOF778 ;ALB/CJM-HL7 - Saving messages to file 778 ;03/07/2012
Source file <HLOF778.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 |
|---|---|---|
| SAVEMSG(HLMSTATE) | ;
|
|
| NEXTMSG(HLMSTATE,MSG) | ;
|
|
| ACKTO(HLMSTATE,ACKTO) | ;if this is an application ack, update the original message - but do not overlay if already valued
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^HLA - [#777] | NEXTMSG+17, NEXTMSG+19 |
| ^HLB - [#778] | SAVEMSG+41*, SAVEMSG+42*, SAVEMSG+43*, SAVEMSG+44*, SAVEMSG+57, SAVEMSG+64*, SAVEMSG+65*, SAVEMSG+66*, SAVEMSG+67*, ACKTO+8 , ACKTO+13*, ACKTO+14*, ACKTO+15*, ACKTO+16*, ACKTO+19*, ACKTO+20* |
| ^HLB("AE" | SAVEMSG+45*, SAVEMSG+68* |
| ^HLB("ERRORS" | ACKTO+25* |
| Name | Line Occurrences |
|---|---|
| $$NEXTMSG | SAVEMSG+58 |
| ACKTO | SAVEMSG+79, SAVEMSG+88 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ACKTO | SAVEMSG+73~, SAVEMSG+74*, SAVEMSG+79, SAVEMSG+84~, SAVEMSG+85*, SAVEMSG+88, ACKTO~ |
| ACKTO("ACK BY | " , SAVEMSG+77*, SAVEMSG+87*, ACKTO+11, ACKTO+13, ACKTO+19 |
| ACKTO("ERROR | TEXT" , ACKTO+16 |
| ACKTO("IEN" | SAVEMSG+86*, ACKTO+7, ACKTO+25 |
| ACKTO("STATUS" | ACKTO+6 |
| APP | ACKTO+22~, ACKTO+23*, ACKTO+24*, ACKTO+25 |
| 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+88, NEXTMSG~, ACKTO~ |
| HLMSTATE("ACK | TO IEN" , SAVEMSG+83, SAVEMSG+86, TO" , SAVEMSG+83, SAVEMSG+85, SAVEMSG+89* |
| HLMSTATE("BATCH" | SAVEMSG+25, SAVEMSG+31, SAVEMSG+41, SAVEMSG+57*, SAVEMSG+60, SAVEMSG+64, SAVEMSG+72, SAVEMSG+74, SAVEMSG+80!, SAVEMSG+87 , NEXTMSG+17, NEXTMSG+22*, ACKTO+27 |
| 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+87, ACKTO+23, ACKTO+27 |
| 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+7*, ACKTO+8, ACKTO+13, ACKTO+14, ACKTO+15, ACKTO+16, ACKTO+19, ACKTO+20 |
| 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+8*, ACKTO+11 |
| ORDER | SAVEMSG+36~*, SAVEMSG+37*, SAVEMSG+39, SAVEMSG+40, SAVEMSG+41, SAVEMSG+42, SAVEMSG+43, SAVEMSG+44, SAVEMSG+45 |
| SKIP | ACKTO+4~, ACKTO+5*, ACKTO+11*, ACKTO+21 |
| STATUS | ACKTO+4~, ACKTO+6*, ACKTO+12*, ACKTO+15, ACKTO+20, ACKTO+21 |
| SUBIEN | SAVEMSG+71~*, SAVEMSG+72*, SAVEMSG+74, SAVEMSG+77, NEXTMSG+14~, NEXTMSG+17*, NEXTMSG+18, NEXTMSG+19, NEXTMSG+22, NEXTMSG+23 , ACKTO+4~, ACKTO+7*, ACKTO+9, ACKTO+19, ACKTO+20 |