DGQEACK ;ALB/JFP - Process VIC ACK message (Batch/Single) ; 09/01/96
Source file <DGQEACK.m>
Package | Total | Call Graph |
---|---|---|
MailMan | 1 | ^XMB |
Registration | 1 | ($$DEL,$$REJ)^DGQEHL74 |
Name | Comments | DBIA/ICR reference |
---|---|---|
DELACK | ; -- Deletes all entries from 39.4, related to message ID
|
|
EN | ; - entry point to process HL7 ACK message
; -- Declare variables |
|
END | ; -- End of code
|
|
EXC | ; -- Processes of exceptions in batch ACK
|
|
BATCH | ; -- Parse batch ACK message
; -- get batch control ID from BHS segment |
|
NEXT | ; -- Gets the next HL7 segment to process
|
|
NOTIFY(REASON) | ; -- Sends error bulletin on negative acknowledgment
|
|
START | ; -- Get first segment
|
|
SINGLE | ; -- Parse single ACK message
|
|
MSH | ; -- Process MSH segment
|
|
BLD | ; -- Builds HL7 message text for error processing
|
|
BLDMSG | ; -- GET MESSAGE TEXT
|
|
MSA | ; -- Process MSA segment
|
HL7 Protocol Name | Call Tags |
---|---|
DGQE HL7 A08 VIC SERVER | EN |
DGQE VIC A08 CLIENT | EN |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^VAT(39.4 - [#39.4] | DELACK+4 |
Name | Line Occurrences |
---|---|
BATCH | START+4 |
BLDMSG | BLD+1 |
DELACK | BATCH+6, BATCH+10, BATCH+14 |
EXC | BATCH+12 |
MSA | SINGLE+2, EXC+3, EXC+10 |
MSH | EXC+1, EXC+8 |
NEXT | START+1, SINGLE+1, BATCH+4, EXC+2, EXC+5, EXC+9 |
NOTIFY | START+7, BATCH+9, MSH+3, MSA+3, MSA+13 |
SINGLE | START+3 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ACKCODE | EN+2~, MSA+6*, MSA+9 |
BCID | EN+2~, BATCH+2*, DELACK+1, DELACK+3, DELACK+4 |
DELFLG | EN+3~, SINGLE+4*, DELACK+5* |
DGQEMSG | EN+4~ |
DGQEMSG( | BLDMSG+2*, BLDMSG+4*, NOTIFY+22, NOTIFY+24, NOTIFY+25 |
DGQEMSG(1 | NOTIFY+17 |
DGQEND | EN+3~, BATCH+2, MSA+6, MSA+7, MSA+11, NEXT+1*, NEXT+4*, NEXT+8*, NEXT+10, NEXT+11* |
DGQESEG | EN+2~, START+3, START+4, START+6, BATCH+6, BATCH+7, BATCH+8, EXC+7, MSH+1, MSH+2 , MSA+1, MSA+2, NEXT+1*, NEXT+10* |
DONE | EN+4~, EN+12*, START+1, SINGLE+1, BATCH+4, EXC+1, EXC+2, EXC+3, EXC+5, EXC+6 , EXC+7*, EXC+8, EXC+9, EXC+10, MSH+4*, MSA+4*, NEXT+3* |
EXCARR | EN+2~, EN+7*, EN+8, SINGLE+5, BATCH+15, MSA+10 |
>> HL("FS" | EN+10*, EN+11 |
>> HLFS | EN+11*, BATCH+2, MSA+6, MSA+7, MSA+11, NEXT+11 |
HLMSG | EN+2~, EN+12*, START+6*, START+7, BATCH+8*, BATCH+9, MSH+2*, MSH+3, MSA+2*, MSA+3 |
>> HLNEXT | NEXT+2, BLDMSG+1 |
>> HLNODE | NEXT+4, BLDMSG+2 |
>> HLNODE( | NEXT+8, BLDMSG+4 |
>> HLNODE(1 | NEXT+6 |
>> HLQUIT | NEXT+3, BLDMSG+1 |
I | EN+3~, BLDMSG+1*, BLDMSG+2, BLDMSG+4 |
ID | DELACK+2~, DELACK+3*, DELACK+4*, DELACK+5 |
J | EN+3~, NEXT+7*, NEXT+8* |
LINE | NOTIFY+9~, NOTIFY+21*, NOTIFY+25, NOTIFY+26* |
MCID | EN+2~, SINGLE+4, MSA+7*, MSA+10, MSA+12 |
MSGTXT | NOTIFY+9~ |
MSGTXT( | NOTIFY+25* |
MSGTXT(1 | NOTIFY+11* |
MSGTXT(2 | NOTIFY+12* |
MSGTXT(3 | NOTIFY+13* |
MSGTXT(4 | NOTIFY+14* |
MSGTXT(5 | NOTIFY+18* |
MSGTXT(6 | NOTIFY+19* |
MSGTXT(7 | NOTIFY+20* |
REASON | EN+4~, MSA+11*, MSA+12, MSA+13, NOTIFY~, NOTIFY+6, NOTIFY+7*, NOTIFY+14 |
REFFLG | EN+3~, MSA+12* |
X | EN+3~, BLDMSG+4*, NOTIFY+16~, NOTIFY+21*, NOTIFY+22*, NOTIFY+24, NOTIFY+25 |
XMB | NOTIFY+9~, NOTIFY+30* |
XMB(1 | NOTIFY+28* |
XMDT | NOTIFY+9~ |
XMDUZ | NOTIFY+9~ |
XMTEXT | NOTIFY+9~, NOTIFY+31* |
XMY | NOTIFY+9~ |
XMZ | NOTIFY+9~ |
Y | NOTIFY+16~, NOTIFY+23*, NOTIFY+24*, NOTIFY+25 |