HLOSRVR2 ;ALB/CJM-HL7 - Sends an application ack over an open connection, for original mode ;02/04/2004
Source file <HLOSRVR2.m>
Package | Total | Caller Graph |
---|---|---|
Health Level Seven | 2 | HLOSRVR1 HLOSRVR2 |
Name | Comments | DBIA/ICR reference |
---|---|---|
ACKNOW(MSG,ERROR) | ;
|
|
NEWMSG(HLCSTATE,HLMSTATE,HDR) | ;
|
|
END | ;
|
|
ERROR | ;error trap for ACKNOW
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^HLB - [#778] | END+2, END+5*, END+6* |
^HLB("B" | NEWMSG+36 |
^HLB("ERRORS" | END+7* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> ACK("HDR" | ACKNOW+19 |
ERROR | ACKNOW~, ACKNOW+6*, ACKNOW+8*, ACKNOW+14*, ACKNOW+15*, ACKNOW+17*, END+4, ERROR+1* |
HDR | NEWMSG~, NEWMSG+23 |
HDR("ACCEPT A | CK TYPE" , NEWMSG+39 |
HDR("APP ACK | TYPE" , NEWMSG+39 |
HDR("BATCH CO | NTROL ID" , NEWMSG+17 |
HDR("MESSAGE | CONTROL ID" , NEWMSG+22 |
HDR("SEGMENT | TYPE" , NEWMSG+15 |
HDR("SENDING | FACILITY" , NEWMSG+29 |
HLCSTATE | NEWMSG~, ACKNOW+17, ACKNOW+19 |
HLCSTATE("CONNECTED" | ACKNOW+7 |
HLCSTATE("ERR | OR PURGE" , ACKNOW+12 |
HLCSTATE("LINK" | NEWMSG+28 |
HLCSTATE("SYSTEM" | NEWMSG+24 |
HLMSTATE | NEWMSG~, NEWMSG+8! |
HLMSTATE("ACK | TO" , NEWMSG+34*, NEWMSG+35*, NEWMSG+37*, NEWMSG+38* |
HLMSTATE("BATCH" | NEWMSG+16*, NEWMSG+18*, NEWMSG+21*, NEWMSG+32, NEWMSG+39 |
HLMSTATE("BODY" | NEWMSG+10* |
HLMSTATE("CUR | RENT SEGMENT" , NEWMSG+12* |
HLMSTATE("DIRECTION" | NEWMSG+11* |
HLMSTATE("HDR" | NEWMSG+23* |
HLMSTATE("ID" | NEWMSG+17*, NEWMSG+22*, NEWMSG+32, NEWMSG+34, NEWMSG+36, NEWMSG+44 |
HLMSTATE("IEN" | NEWMSG+9* |
HLMSTATE("LIN | E COUNT" , NEWMSG+14* |
HLMSTATE("MSA" | NEWMSG+43*, NEWMSG+44* |
HLMSTATE("ORI | GINAL MODE" , NEWMSG+40*, NEWMSG+42* |
HLMSTATE("STATUS" | NEWMSG+25*, NEWMSG+26*, NEWMSG+27*, NEWMSG+28*, NEWMSG+29* |
HLMSTATE("SYSTEM" | NEWMSG+24* |
HLMSTATE("UNS | TORED LINES" , NEWMSG+13*, TORED MSH" , NEWMSG+19* |
I | NEWMSG+43~* |
IEN | NEWMSG+33~, NEWMSG+36*, NEWMSG+37, END+7 |
MSG | ACKNOW~, ACKNOW+14, ACKNOW+15, ACKNOW+17 |
MSG("DT/TM CR | EATED" , ACKNOW+11*, ACKNOW+12, END+7 |
MSG("HDR" | END+7 |
MSG("IEN" | END+1, END+2, END+5, END+6 |
MSG("STATUS" | ACKNOW+9*, ACKNOW+10*, ACKNOW+12*, ACKNOW+16, END+1, END+3*, END+4*, END+5, END+6 |
MSG("UNSTORED | LINES" , ACKNOW+14 |
SENT | ACKNOW+5~, ACKNOW+6*, ACKNOW+18*, END+1, END+9, ERROR+1* |