HLOSRVR1 ;IRMFO-ALB/CJM - Reading messages, sending acks;03/24/2004 14:43 ;09/13/2006
Source file <HLOSRVR1.m>
| Package | Total | Caller Graph |
|---|---|---|
| Health Level Seven | 3 | HLOAPI HLOCLNT1 HLOSRVR |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DEL777(IEN777) | ;delete a record from file 777 where the read did not complete
|
|
| DEL778(IEN778) | ;delete a record from file 778 where the read did not complete
|
|
| SQUISH(SEG) | ;
|
|
| DUP(HLMSTATE) | ;
|
|
| READMSG(HLCSTATE,HLMSTATE) | ;
|
|
| ERROR | ;error trap
|
|
| CHECKMSG(HLMSTATE) | ;
|
|
| SPLITHDR(HDR) | ;
|
|
| ADDAC(HLMSTATE) | ;adds the AC xref for the message that was just received
|
| Name | Field # of Occurrence |
|---|---|
| ^%ZTER | ERROR+5, ERROR+11 |
| UNWIND^%ZTER | ERROR+22 |
| $$ACTION^HLOAPP | CHECKMSG+17 |
| $$SAVEMSG^HLOF778 | READMSG+66 |
| ADDMSG2^HLOMSG | READMSG+57 |
| ADDSEG^HLOMSG | READMSG+52, READMSG+65 |
| $$PARSEHDR^HLOPRS | READMSG+20 |
| END^HLOSRVR | ERROR+2 |
| NEWMSG^HLOSRVR2 | READMSG+23 |
| COUNT^HLOSTAT | READMSG+75 |
| $$READHDR^HLOT | READMSG+16 |
| $$READSEG^HLOT | READMSG+31, READMSG+37 |
| CLOSE^HLOT | READMSG+22, READMSG+77 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^HLA - [#777] | DEL777+2! |
| ^HLB - [#778] | DUP+23, CHECKMSG+23, DEL778+2! |
| ^HLB("AC" | ADDAC+5*, DUP+18 |
| ^HLB("B" | READMSG+44 |
| ^HLTMP("LOG ALL ERRORS" | ERROR+5 |
| ^TMP("HL7 ERRORS" | ERROR+17*, ERROR+19! |
| Name | Line Occurrences |
|---|---|
| $$DUP | READMSG+27 |
| ADDAC | READMSG+74 |
| CHECKMSG | READMSG+73 |
| DEL777 | READMSG+70 |
| DEL778 | READMSG+70 |
| SPLITHDR | READMSG+17, READMSG+55 |
| SQUISH | SPLITHDR+4 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| A | SQUISH+6~, SQUISH+16 |
| A( | SQUISH+12* |
| ACK | READMSG+13~ |
| ACTION | CHECKMSG+10~, CHECKMSG+17, CHECKMSG+18 |
| CODE | READMSG+38~, READMSG+42*, READMSG+43, READMSG+50, READMSG+63 |
| COUNT | SQUISH+6~, SQUISH+8*, SQUISH+13*, SQUISH+14* |
| DUP | DUP+11~, DUP+12*, DUP+18, DUP+19*, DUP+28*, DUP+30 |
| FROM | ADDAC+3~, ADDAC+4*, ADDAC+5, DUP+11~, DUP+17*, DUP+18 |
| FS | READMSG+35~, READMSG+36*, READMSG+42, READMSG+56, SPLITHDR+3~, SPLITHDR+5*, SPLITHDR+6, SPLITHDR+8 |
| HDR | CHECKMSG+11*, CHECKMSG+17, SPLITHDR~, SPLITHDR+4 |
| HDR("ACCEPT A | CK TYPE" , CHECKMSG+12 |
| HDR("PROCESSI | NG ID" , CHECKMSG+27 |
| HDR("RECEIVIN | G FACILITY" , CHECKMSG+35, CHECKMSG+36, CHECKMSG+37, CHECKMSG+38, CHECKMSG+39 |
| HDR(1 | SPLITHDR+5, SPLITHDR+6, SPLITHDR+8, SPLITHDR+10* |
| HDR(2 | SPLITHDR+9* |
| HLCSTATE | READMSG~, READMSG+16, READMSG+22, READMSG+23, READMSG+31, READMSG+37, READMSG+75, READMSG+77 |
| HLCSTATE("LINK" | ERROR+14 |
| HLCSTATE("MES | SAGE ENDED" , READMSG+21*, READMSG+66, READMSG+68, READMSG+77, READMSG+78 |
| HLCSTATE("SYSTEM" | CHECKMSG+27, CHECKMSG+35, CHECKMSG+38, CHECKMSG+39, CHECKMSG+40, SQUISH+7 |
| HLMSTATE | READMSG~, READMSG+23, READMSG+27, READMSG+52, READMSG+57, READMSG+65, READMSG+66, READMSG+73, READMSG+74, ADDAC~ , DUP~, CHECKMSG~ |
| HLMSTATE("ACK | TO" , READMSG+48*, READMSG+49*, READMSG+50*, READMSG+51*, CHECKMSG+17, CHECKMSG+21, CHECKMSG+23, CHECKMSG+24*, CHECKMSG+34 |
| HLMSTATE("BATCH" | READMSG+46, READMSG+60, READMSG+61*, READMSG+62*, READMSG+63*, READMSG+64*, READMSG+75 |
| HLMSTATE("BODY" | READMSG+70, READMSG+71* |
| HLMSTATE("HDR" | READMSG+26, READMSG+36, READMSG+75, ADDAC+4, ADDAC+5, DUP+17, DUP+18, DUP+19, CHECKMSG+11 |
| HLMSTATE("ID" | READMSG+24, READMSG+49, ADDAC+5, DUP+15, DUP+18 |
| HLMSTATE("IEN" | READMSG+70, READMSG+71*, ADDAC+5 |
| HLMSTATE("MSA" | READMSG+26*, DUP+24*, DUP+25, DUP+26*, DUP+27*, CHECKMSG+16*, CHECKMSG+17*, CHECKMSG+24*, CHECKMSG+27*, CHECKMSG+40* , CHECKMSG+41* |
| HLMSTATE("ORI | GINAL MODE" , CHECKMSG+12, CHECKMSG+16 |
| HLMSTATE("STATUS" | CHECKMSG+16*, CHECKMSG+17*, CHECKMSG+18*, CHECKMSG+21, CHECKMSG+24*, CHECKMSG+25*, CHECKMSG+27*, CHECKMSG+40* |
| HLMSTATE("UNS | TORED LINES" , READMSG+66 |
| I | READMSG+13~, SQUISH+6~, SQUISH+8*, SQUISH+9*, SQUISH+10, SQUISH+12 |
| IEN | READMSG+38~, READMSG+44*, READMSG+45*, READMSG+51, READMSG+64, DUP+11~, DUP+12*, DUP+18*, DUP+23 |
| IEN777 | DEL777~, DEL777+2 |
| IEN778 | DEL778~, DEL778+2 |
| J | SQUISH+6~, SQUISH+8*, SQUISH+12, SQUISH+14* |
| K | SQUISH+6~, SQUISH+11*, SQUISH+12 |
| LEN | SQUISH+6~, SQUISH+10*, SQUISH+11 |
| MAX | SQUISH+6~, SQUISH+7*, SQUISH+14 |
| MSA | READMSG+38~, READMSG+41*, READMSG+42 |
| NEWMSGID | READMSG+38~, READMSG+56*, READMSG+62 |
| NODE | DUP+22~, DUP+23*, DUP+24, DUP+26, DUP+27, CHECKMSG+22~, CHECKMSG+23*, CHECKMSG+24, CHECKMSG+25 |
| OLDMSGID | READMSG+38~, READMSG+42*, READMSG+44, READMSG+45, READMSG+48, READMSG+61 |
| PASS | CHECKMSG+10~, CHECKMSG+31*, CHECKMSG+34*, CHECKMSG+35*, CHECKMSG+36*, CHECKMSG+37*, CHECKMSG+38*, CHECKMSG+39*, CHECKMSG+40, CHECKMSG+41 |
| QUEUE | CHECKMSG+10~, CHECKMSG+17, CHECKMSG+18 |
| SEG | READMSG+13~, READMSG+16, READMSG+17, READMSG+20, READMSG+23, READMSG+31, READMSG+37, READMSG+52, READMSG+55, READMSG+57 , READMSG+65, SQUISH~, SQUISH+15!, SQUISH+16* |
| SEG( | SQUISH+9, SQUISH+10, SQUISH+12 |
| SEG(1 | READMSG+39, READMSG+41, SQUISH+4 |
| SEG(2 | READMSG+39, READMSG+41, READMSG+56 |
| SEG(3 | READMSG+41 |
| SEGTYPE | READMSG+38~, READMSG+39*, READMSG+40, READMSG+43*, READMSG+47, READMSG+54, READMSG+59 |
| STORE | READMSG+13~, READMSG+15*, READMSG+25*, READMSG+27*, READMSG+30, READMSG+68, READMSG+72 |
| SUBIEN | READMSG+60~*, READMSG+61, READMSG+62, READMSG+63, READMSG+64 |
| TEMP | SPLITHDR+3~ |
| TEMP(1 | SPLITHDR+6*, SPLITHDR+8, SPLITHDR+10 |
| TEMP(2 | SPLITHDR+7*, SPLITHDR+8*, SPLITHDR+9 |
| WANTACK | CHECKMSG+10~, CHECKMSG+13*, CHECKMSG+15*, CHECKMSG+17, CHECKMSG+24, CHECKMSG+27, CHECKMSG+40, CHECKMSG+41 |