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 |
Package | Total | Caller Graph |
---|---|---|
IFCAP | 1 | PRCV_IFCAP_06_SU_IB_PROC |
Kernel | 1 | ^ORD(101 |
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 |