©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
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 |