DGQEHLR ;ALB/RPM - VIC REPLACEMENT HL7 RECEIVE DRIVER ; 10/6/03
Source file <DGQEHLR.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| RCV | ;
|
|
| PARSORR(DGWRK,DGHL,DGORR) | ;Parse ORR Message/Segments
|
|
| SENDBULL(DGLIEN,DGORR) | ;build and send error bulletin
|
|
| MSA(DGSEG,DGCS,DGRS,DGSS,DGORR) | ;
|
|
| MSH(DGSEG,DGCS,DGRS,DGSS,DGORR) | ;
|
|
| RCVORR(DGWRK,DGHL) | ;process a single ORR~O02 message
|
| HL7 Protocol Name | Call Tags |
|---|---|
| DGQE VIC ORM/O01 EVENT | RCV |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^TMP("DGPFHL7" | RCV+7 |
| ^TMP("DGQEBULL" | SENDBULL+38 |
| Name | Line Occurrences |
|---|---|
| @( | PARSORR+26 |
| PARSORR | RCVORR+13 |
| RCVORR | RCV+20 |
| SENDBULL | RCVORR+23 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DGCNT | RCV+1~, RCV+12*, RCV+13, RCV+14*, RCV+15, MSA+14~, MSA+19*, MSA+20, SENDBULL+42*, SENDBULL+43* , SENDBULL+44 |
| DGCS | PARSORR+10~, PARSORR+16*, MSH~, MSH+14, MSH+15, MSA~, MSA+20 |
| DGCURLIN | PARSORR+13~, PARSORR+19*, PARSORR+22, PARSORR+24*, PARSORR+25 |
| DGFS | PARSORR+9~, PARSORR+15*, PARSORR+24 |
| DGHL | RCVORR~, RCVORR+13, PARSORR~ |
| DGHL("ECH" | PARSORR+16, PARSORR+17, PARSORR+18 |
| DGHL("FS" | PARSORR+15 |
| DGLIEN | RCVORR+10~, RCVORR+16*, RCVORR+17, RCVORR+23, RCVORR+26, SENDBULL~, SENDBULL+22, SENDBULL+25 |
| DGLOG | SENDBULL+19~, SENDBULL+25 |
| DGLOG("HLMID" | SENDBULL+35 |
| DGLOG("REQIEN" | SENDBULL+28 |
| DGLOG("XMITDT" | SENDBULL+36 |
| DGMSGTYP | RCV+2~, RCV+19*, RCV+20 |
| DGORR | RCVORR+9~, RCVORR+13, RCVORR+23, PARSORR~, MSH~, MSA~, SENDBULL~ |
| DGORR("ACKCODE" | RCVORR+15, RCVORR+19, MSA+16*, MSA+18 |
| DGORR("ERR" | MSA+19, MSA+20*, SENDBULL+37, SENDBULL+43, SENDBULL+44 |
| DGORR("MSGDTM" | MSH+16* |
| DGORR("MSGID" | RCVORR+15, RCVORR+16, MSA+17* |
| DGORR("RCVFAC" | MSH+15* |
| DGORR("SNDFAC" | MSH+14* |
| DGREQ | SENDBULL+20~, SENDBULL+28 |
| DGREQ("CARDID" | SENDBULL+33 |
| DGREQ("CPRSTAT" | SENDBULL+34 |
| DGREQ("NAME" | SENDBULL+32 |
| DGRS | PARSORR+11~, PARSORR+17*, MSH~, MSA~ |
| DGSEG | RCV+3~, RCV+18, PARSORR+23~, PARSORR+24, MSH~, MSA~ |
| DGSEG("TYPE" | RCV+18, PARSORR+26 |
| DGSEG(1 | MSA+16 |
| DGSEG(2 | MSA+17 |
| DGSEG(4 | MSH+14 |
| DGSEG(6 | MSH+15, MSA+18, MSA+20 |
| DGSEG(7 | MSH+16 |
| DGSEG(9 | RCV+19 |
| DGSEGCNT | RCV+4~, RCV+11*, RCV+13, RCV+15 |
| DGSS | PARSORR+12~, PARSORR+18*, MSH~, MSA~ |
| DGSTAT | RCVORR+11~, RCVORR+19*, RCVORR+21*, RCVORR+26 |
| DGWRK | RCV+5~, RCV+7*, RCV+8, RCV+13, RCV+15, RCV+18, RCV+20, RCV+23, RCVORR~, RCVORR+13 , PARSORR~, PARSORR+24 |
| >> HL | RCV+20 |
| >> HL("ECH" | RCV+19 |
| >> HL("FS" | RCV+18 |
| >> HL("MTN" | RCV+20 |
| >> HLNEXT | RCV+11 |
| >> HLNODE | RCV+13 |
| >> HLNODE( | RCV+14, RCV+15 |
| >> HLQUIT | RCV+11 |
| XMB | SENDBULL+15~, SENDBULL+46* |
| XMB(1 | SENDBULL+31* |
| XMB(2 | SENDBULL+32* |
| XMB(3 | SENDBULL+33* |
| XMB(4 | SENDBULL+34* |
| XMB(5 | SENDBULL+35* |
| XMB(6 | SENDBULL+36* |
| XMDUZ | SENDBULL+16~, SENDBULL+47* |
| XMSUB | SENDBULL+17~, SENDBULL+48* |
| XMTEXT | SENDBULL+18~, SENDBULL+38*, SENDBULL+39, SENDBULL+40, SENDBULL+41, SENDBULL+44, SENDBULL+50 |