PRCVIBH ;WOIFO/DST - Issue Book Processing, from DynaMed to IFCAP ;7/26/05 17:10
Source file <PRCVIBH.m>
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| CRT | ; Process Issue Book transactions sent from DynaMed to IFCAP
|
|
| MAIN | ; Main routine
; Check HL7 message type and message event ; PRCVEA - Error message array ; PRCVTDT - Transaction Date ; PRCVDAC - Document Action |
|
| HEADER | ||
| START | ||
| ERR | ||
| OK | ; Calling IFCAP and FMS routines for Issue Book and FMS update
|
|
| CHKSEQ(SEG) | ; SEG - Segment name
|
|
| EVN | ; Process EVN segment
|
|
| PID | ; Process PID segment
|
|
| FT1 | ; Process FT1 segment
|
|
| GENACK(PRCVAC,PRCVMCID,PRCVDT,PRCVOCCR) | ;
|
|
| ADDERR(PRCVER,PRCVFD) | ;
; PRCVER - Error message ; PRCVFD - Field number, if any |
|
| XTMP(AC) | ; Move ^TMP(PRCVSUB,$j) to ^XTMP
|
|
| FIN | ; Clean up
|
|
| TXT | ;
|
|
| EVN1 | ;;^EVN^^Missing segment ^100^Missing line item info.
|
|
| PID1 | ;;EVN^^^Missing segment ^100^Missing line item info.
|
|
| FT11 | ;;PID^FT1^^Missing segment ^100^Missing line item info.
|
| HL7 Protocol Name | Call Tags |
|---|---|
| PRCV_IFCAP_06_SU_IB_PROC | CRT |
| FileNo | Call Tags |
|---|---|
| ^VA(200 - [#200] | FIND1^DIC, GET1^DIQ |
| ^DIC(4 - [#4] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^PRC(420 - [#420] | PID+21, PID+22, PID+27, PID+28, PID+36, PID+39 |
| ^PRCD(420.1 - [#420.1] | PID+35, FT1+12 |
| ^PRCD(420.2 - [#420.2] | FT1+13 |
| ^TMP( | CRT+6!, HEADER+6*, PID+40*, PID+41*, FT1+24*, FT1+25*, XTMP+5, XTMP+6, XTMP+7, XTMP+9 , XTMP+10 |
| ^TMP("HLA" | GENACK+36! |
| ^TMP($J | CRT+6!, CRT+8*, CRT+9*, START+5, START+6, START+9! |
| ^XTMP( | XTMP+4*, XTMP+5*, XTMP+7*, XTMP+10*, XTMP+13*, XTMP+16* |
| Name | Line Occurrences |
|---|---|
| $$CHKSEQ | START+9 |
| @( | START+11 |
| ADDERR | HEADER+1, START+13, OK+4, OK+13, OK+17, CHKSEQ+8, EVN+3, EVN+4, EVN+6, EVN+8 , EVN+10, PID+5, PID+7, PID+8, PID+11, PID+13, PID+16, PID+20, PID+21, PID+22 , PID+25, PID+27, PID+28, PID+31, PID+33, PID+35, PID+36, PID+39, FT1+4, FT1+6 , FT1+7, FT1+10, FT1+11, FT1+12, FT1+13, FT1+15, FT1+18, FT1+21, FT1+22 |
| FIN | ERR, OK+23 |
| GENACK | HEADER+2, OK+22, XTMP+12 |
| XTMP | ERR, OK+5, OK+14, OK+18 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | CRT+2~, CRT+4, START+4 |
| AC | XTMP~, XTMP+12 |
| DT | PID+16 |
| >> HL("ECH" | MAIN+9, GENACK+9 |
| >> HL("EID" | GENACK+23 |
| >> HL("EIDS" | GENACK+23 |
| >> HL("ETN" | HEADER, HEADER+1 |
| >> HL("FS" | MAIN+9, GENACK+9 |
| >> HL("MID" | CRT+5, HEADER+2, OK+22, XTMP+12 |
| >> HL("MTN" | HEADER, HEADER+1 |
| >> HLA("HLA" | GENACK+13*, GENACK+19*, GENACK+36! |
| HLERR | CRT+1! |
| >> HLMTIENS | GENACK+23 |
| >> HLNEXT | CRT+7 |
| >> HLNODE | CRT+8 |
| >> HLNODE( | CRT+9 |
| >> HLQUIT | CRT+7 |
| PRCVAC | GENACK~, GENACK+13, GENACK+37! |
| PRCVACC | FT1+1~, FT1+5*, FT1+6, FT1+7, FT1+25 |
| PRCVBID | MAIN+6~, PID+4*, PID+5, PID+40, GENACK+13 |
| PRCVBOC | PID+2~, FT1+1~, FT1+9*, FT1+10, FT1+11, FT1+12, FT1+13, FT1+25 |
| PRCVCC | MAIN+5~, PID+30*, PID+31, PID+34, PID+35, PID+36, PID+41, FT1+12 |
| PRCVCNT | GENACK+7~ |
| PRCVCS | MAIN+5~, MAIN+9*, GENACK+7~, GENACK+9* |
| PRCVDAC | START~, EVN+5*, EVN+6, PID+40 |
| PRCVDT | CRT+2~, CRT+4*, HEADER+2, HEADER+5, HEADER+6, START+4*, OK+22, EVN+10, GENACK~, XTMP+4 , XTMP+12 |
| PRCVDUZ | PID+2~, PID+10*, PID+11, PID+12, PID+13, PID+15, PID+16, PID+39, PID+40 |
| PRCVEA | MAIN+6~, HEADER+2, ERR, OK+22, ADDERR+5*, XTMP+12, XTMP+13, FIN+4! |
| PRCVEA( | ADDERR+8*, XTMP+15, XTMP+16 |
| PRCVER | ADDERR~, ADDERR+8 |
| PRCVER1 | CHKSEQ+1~, CHKSEQ+7*, CHKSEQ+8 |
| PRCVES | MAIN+5~, MAIN+9*, GENACK+9* |
| PRCVFCP1 | PID+2~, PID+19*, PID+20, PID+21, PID+22, PID+39, PID+41 |
| PRCVFCP2 | PID+2~, PID+24*, PID+25, PID+27, PID+28, PID+36, PID+39, PID+41 |
| PRCVFD | ADDERR~, ADDERR+7*, ADDERR+8 |
| PRCVFS | MAIN+5~, MAIN+9*, START+7, EVN+2, EVN+5, EVN+7, PID+4, PID+6, PID+10, PID+19 , PID+24, PID+30, PID+32, FT1+3, FT1+5, FT1+9, FT1+14, FT1+17, FT1+20, GENACK+7~ , GENACK+9*, GENACK+13, GENACK+19, ADDERR+8 |
| PRCVI | CRT+2~, CRT+7*, CRT+8, CRT+9, START+3*, START+5*, START+6, START+9*, GENACK+7~, GENACK+10* , GENACK+18*, GENACK+19, XTMP+5*, XTMP+8*, XTMP+9*, XTMP+10, XTMP+14*, XTMP+15*, XTMP+16 |
| PRCVIBF | CRT+2~, OK+9*, OK+12, OK+13, OK+16 |
| PRCVINV | FT1+1~, FT1+17*, FT1+18, FT1+25 |
| PRCVJ | CRT+2~, CRT+8*, CRT+9*, GENACK+7~, GENACK+10*, GENACK+17*, GENACK+19 |
| PRCVK | CRT+2~, MAIN+8*, ADDERR+4*, ADDERR+5, ADDERR+8 |
| PRCVLID | MAIN+6~, FT1+3*, FT1+4, FT1+24, FT1+25, ADDERR+6*, ADDERR+7*, ADDERR+8 |
| PRCVMCID | GENACK~, GENACK+13 |
| PRCVND | MAIN+6~, START+6*, START+7, EVN+2, EVN+5, EVN+7, PID+4, PID+6, PID+10, PID+19 , PID+24, PID+30, PID+32, FT1+3, FT1+5, FT1+9, FT1+14, FT1+17, FT1+20, GENACK+7~ |
| PRCVOCCR | GENACK~, GENACK+16 |
| PRCVOCCR( | GENACK+17, GENACK+19 |
| PRCVRCD | FT1+1~, FT1+20*, FT1+21, FT1+22, FT1+25 |
| PRCVRES | GENACK+7~, GENACK+10*, GENACK+23, GENACK+24, GENACK+30 |
| PRCVRS | MAIN+5~, MAIN+9*, GENACK+9* |
| PRCVSAL | FT1+1~, FT1+14*, FT1+15, FT1+25 |
| PRCVSCC | MAIN+5~, PID+32*, PID+33, PID+34, PID+35, PID+36, PID+41, FT1+12 |
| PRCVSEG | MAIN+6~, START+7*, START+8, START+9, START+10, START+11, START+13, ADDERR+8 |
| PRCVSITE | CRT+2~, START+1*, EVN+4, PID+21, PID+22, PID+27, PID+28 |
| PRCVSS | MAIN+5~, MAIN+9*, GENACK+9* |
| PRCVSTN | START~, EVN+2*, EVN+3, EVN+4, PID+36, PID+39, PID+40 |
| PRCVSUB | CRT+2~, CRT+5*, CRT+6, HEADER+6, OK+3, OK+9, OK+16, PID+40, PID+41, FT1+24 , FT1+25, XTMP+4, XTMP+5, XTMP+6, XTMP+7, XTMP+9, XTMP+10, XTMP+13, XTMP+16 |
| PRCVTCD | START~, ERR, OK+2, OK+8, PID+6*, PID+7, PID+8, PID+20, PID+21, PID+22 , PID+23, PID+39, PID+40, FT1+8, FT1+19 |
| PRCVTDT | MAIN+6~, START~, EVN+7*, EVN+8, EVN+9*, EVN+10, PID+40 |
| PRCVTERM | PID+2~, PID+15*, PID+16 |
| PRCVY | MAIN+6~ |
| PREV1 | CHKSEQ+1~, CHKSEQ+3*, CHKSEQ+5 |
| PREV2 | CHKSEQ+1~, CHKSEQ+4*, CHKSEQ+5 |
| PREVSEG | START~, START+2*, START+10*, CHKSEQ+5 |
| SEG | CHKSEQ~, CHKSEQ+7 |
| SEGERR | CHKSEQ+1~, CHKSEQ+2*, CHKSEQ+5, CHKSEQ+6*, CHKSEQ+9 |
| U | CRT+3, MAIN+9, HEADER+1, HEADER+6, START+13, OK+4, OK+13, OK+17, CHKSEQ+3, CHKSEQ+4 , CHKSEQ+7, CHKSEQ+8, EVN+3, EVN+4, EVN+6, EVN+8, EVN+10, PID+5, PID+7, PID+8 , PID+11, PID+13, PID+16, PID+20, PID+21, PID+22, PID+25, PID+27, PID+28, PID+31 , PID+33, PID+35, PID+36, PID+39, PID+40, PID+41, FT1+4, FT1+6, FT1+7, FT1+10 , FT1+11, FT1+12, FT1+13, FT1+15, FT1+18, FT1+21, FT1+22, FT1+25, GENACK+9, GENACK+24 , ADDERR+8, XTMP+4 |
| X | MAIN+6~, HEADER+6, GENACK+37! |
| X1 | MAIN+6~, HEADER+5* |
| X2 | MAIN+6~, HEADER+5* |
| XMB | GENACK+25!, GENACK+26*, GENACK+33! |
| XMB(1 | GENACK+27* |
| XMB(2 | GENACK+28* |
| XMB(3 | GENACK+29* |
| XMB(4 | GENACK+30* |
| XMDUZ | GENACK+31*, GENACK+33! |
| XMZ | GENACK+25!, GENACK+33! |
| Name | Field # of Occurrence |
|---|---|
| $T(@(3) | CHKSEQ+3, CHKSEQ+4, CHKSEQ+7 |