IBCNEHL1 ;DAOU/ALA - HL7 Process Incoming RPI Messages ;26-JUN-2002
Source file <IBCNEHL1.m>
Package | Total | Call Graph |
---|---|---|
Integrated Billing | 14 | DELDATA^IBCNBED STATUS^IBCNBEE $$EXPIRED^IBCNEDE2 (CTD,EBNTE,GT1,IN1,IN3,MSA,PID,ZEB)^IBCNEHL2 ($$CHK1,$$CHK2,LCKERR,UPDIREC,WARN)^IBCNEHL3 (ERR,G2OCTD,NTE,ZHS,ZII,ZRF,ZSD,ZTP,ZTY)^IBCNEHL4 ($$EBFILE,DG1,GZRF,ROL,ZMP)^IBCNEHL5 FIL^IBCNEHL6 $$SVEICD^IBCNEHL7 ($$ISMCR,$$ONEPOL,$$PATISSUB,$$PREL,SPAR)^IBCNEHLU MSG003^IBCNEMS1 SST^IBCNEUT2 ($$MGRP,$$PYRAPP,MSG)^IBCNEUT5 RSTA^IBCNEUT7 |
VA FileMan | 5 | $$FIND1^DIC (FILE,UPDATE)^DIE ^DIK CLEAN^DILF ($$GET1,GETS)^DIQ |
Kernel | 1 | $$NOW^XLFDT |
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 |
---|---|---|
EN(EVENTYP) | ;Entry Point
|
|
ENX | ;
|
|
AUTOFIL(DFN,IEN312,ISSUB) | ;Finish processing the response message - file directly into patient insurance
|
|
AUTOFILX | ;
|
|
GRPFILE(DFN,IEN312,RIEN,AFLG) | ;ib*2*497 file data at node 12 & at subfiles 2.312,9, 10 & 11
|
|
GRPFILEX | ;
|
|
FIL | ;Finish processing the response message - file into insurance buffer
|
|
AUTOUPD(RIEN) | ;
|
|
EBFILE(DFN,IEN312,RIEN,AFLG) | ;File eligibility/benefit data from file 365 into file 2.312
|
Name | Field # of Occurrence |
---|---|
$$FIND1^DIC | AUTOUPD+18 |
FILE^DIE | EN+110, AUTOFIL+63, AUTOFIL+74, AUTOFIL+82, GRPFILE+13 |
UPDATE^DIE | AUTOFIL+113, GRPFILE+24, GRPFILE+29, GRPFILE+34 |
^DIK | GRPFILE+18 |
CLEAN^DILF | EN+110 |
$$GET1^DIQ | EN+100, EN+101, AUTOFIL+10, AUTOFIL+12, AUTOFIL+14, AUTOFIL+16, AUTOFIL+19, AUTOFIL+20, AUTOFIL+32, AUTOFIL+33 , AUTOFIL+39, AUTOFIL+41, AUTOFIL+43, AUTOFIL+45, AUTOFIL+47, AUTOFIL+49, AUTOFIL+51, AUTOFIL+103, AUTOFIL+104, AUTOFIL+107 , AUTOFIL+108, AUTOUPD+40 |
GETS^DIQ | GRPFILE+11, GRPFILE+23, GRPFILE+28, GRPFILE+33 |
DELDATA^IBCNBED | AUTOFIL+99 |
STATUS^IBCNBEE | AUTOFIL+98 |
$$EXPIRED^IBCNEDE2 | AUTOUPD+51 |
CTD^IBCNEHL2 | EN+31 |
EBNTE^IBCNEHL2 | EN+75 |
GT1^IBCNEHL2 | EN+38 |
IN1^IBCNEHL2 | EN+42 |
IN3^IBCNEHL2 | EN+48 |
MSA^IBCNEHL2 | EN+27, EN+28 |
PID^IBCNEHL2 | EN+34 |
ZEB^IBCNEHL2 | EN+54 |
$$CHK1^IBCNEHL3 | AUTOUPD+54 |
$$CHK2^IBCNEHL3 | AUTOUPD+56 |
LCKERR^IBCNEHL3 | AUTOFIL+62 |
UPDIREC^IBCNEHL3 | AUTOFIL+78, AUTOFIL+91 |
WARN^IBCNEHL3 | AUTOFIL+64, AUTOFIL+75, GRPFILE+14, GRPFILE+24, GRPFILE+29, GRPFILE+34 |
ERR^IBCNEHL4 | EN+78 |
G2OCTD^IBCNEHL4 | EN+72 |
NTE^IBCNEHL4 | EN+81 |
ZHS^IBCNEHL4 | EN+57 |
ZII^IBCNEHL4 | EN+66 |
ZRF^IBCNEHL4 | EN+60 |
ZSD^IBCNEHL4 | EN+63 |
ZTP^IBCNEHL4 | EN+84 |
ZTY^IBCNEHL4 | EN+69 |
$$EBFILE^IBCNEHL5 | EBFILE+9 |
DG1^IBCNEHL5 | EN+90 |
GZRF^IBCNEHL5 | EN+51 |
ROL^IBCNEHL5 | EN+87 |
ZMP^IBCNEHL5 | EN+93 |
FIL^IBCNEHL6 | FIL+2 |
$$SVEICD^IBCNEHL7 | EN+96 |
$$ISMCR^IBCNEHLU | AUTOUPD+31 |
$$ONEPOL^IBCNEHLU | AUTOUPD+45 |
$$PATISSUB^IBCNEHLU | AUTOUPD+52 |
$$PREL^IBCNEHLU | AUTOFIL+22 |
SPAR^IBCNEHLU | EN+16 |
MSG003^IBCNEMS1 | AUTOFIL+115 |
SST^IBCNEUT2 | AUTOFIL+94 |
$$MGRP^IBCNEUT5 | EN+5, AUTOFIL+116 |
$$PYRAPP^IBCNEUT5 | AUTOUPD+35 |
MSG^IBCNEUT5 | AUTOFIL+116 |
RSTA^IBCNEUT7 | AUTOFIL+94 |
$$NOW^XLFDT | AUTOFIL+5, AUTOFIL+105 |
FileNo | Call Tags |
---|---|
2.312 | GET1^DIQ |
^VA(200 - [#200] | FIND1^DIC |
^IBCN(365 - [#365] | GET1^DIQ, GETS^DIQ |
365.01 | GETS^DIQ |
365.04 | GETS^DIQ |
365.09 | GETS^DIQ |
^IBCN(365.1 - [#365.1] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(36 - [#36] | AUTOUPD+47 |
^DPT - [#2] | AUTOFIL+62, AUTOFILX+1, GRPFILE+18, AUTOUPD+48, AUTOUPD+49, AUTOUPD+50 |
^IBA(355.3 - [#355.3] | AUTOUPD+63, AUTOUPD+67, AUTOUPD+73 |
^IBCN(365 - [#365] | AUTOFIL+6, AUTOFIL+7, AUTOFIL+96, GRPFILE+21, GRPFILE+22, GRPFILE+26, GRPFILE+27, GRPFILE+31, GRPFILE+32, AUTOUPD+22 , AUTOUPD+25 |
^IBCN(365.1 - [#365.1] | AUTOUPD+42 |
^IBCN(365.18 - [#365.18] | EN+103 |
^IBE(350.9 - [#350.9] | AUTOUPD+30 |
^IBE(365.12 - [#365.12] | AUTOUPD+43 |
^TMP($J | EN+15 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ACK | EN+3~, EN+113 |
AFLG | GRPFILE~, GRPFILE+14, GRPFILE+24, GRPFILE+29, GRPFILE+34, EBFILE~, EBFILE+9 |
APPIEN | AUTOUPD+13~, AUTOUPD+35*, AUTOUPD+36, AUTOUPD+43 |
AUTO | EN+3~, EN+112*, EN+113, EN+114, EN+115 |
BUFF | AUTOFIL+2~, AUTOFIL+96*, AUTOFIL+97, AUTOFIL+98, AUTOFIL+99, AUTOFIL+102~, AUTOFIL+104*, AUTOFIL+111, AUTOFIL+115 |
D0 | EN+99~, EN+103*, EN+104 |
D1 | EN+99~, EN+103*, EN+104 |
DA | GRPFILE+8~, GRPFILE+18* |
DA(1 | GRPFILE+17* |
DA(2 | GRPFILE+17* |
DATA | AUTOFIL+2~, AUTOFIL+63, AUTOFIL+69!, AUTOFIL+80! |
DATA( | AUTOFIL+11*, AUTOFIL+13*, AUTOFIL+15*, AUTOFIL+17*, AUTOFIL+22*, AUTOFIL+35*, AUTOFIL+53*, AUTOFIL+54*, AUTOFIL+55*, AUTOFIL+56* , AUTOFIL+57*, AUTOFIL+58*, AUTOFIL+59*, AUTOFIL+70*, AUTOFIL+71*, AUTOFIL+72*, AUTOFIL+73* |
DATA(365 | AUTOFIL+81* |
DATA12 | GRPFILE+8~ |
DATA12( | GRPFILE+12* |
DFN | AUTOFIL~, AUTOFIL+5, AUTOFIL+62, AUTOFIL+84, AUTOFIL+87, AUTOFILX+1, GRPFILE~, GRPFILE+10, GRPFILE+17, GRPFILE+18 , GRPFILE+19, EBFILE~, EBFILE+9 |
DIAG | GRPFILE+8~ |
DIAG( | GRPFILE+34 |
DIAG3121 | GRPFILE+8~, GRPFILE+34! |
DIAG3121( | GRPFILE+34* |
>> DIK | GRPFILE+17* |
EBDA | EN+3~, EN+51, EN+54, EN+57, EN+60, EN+63, EN+66, EN+69, EN+72, EN+75 , EN+81 |
ERACT | EN+3~, EN+27, EN+28, EN+106, EN+113 |
ERCON | EN+3~, EN+27, EN+28 |
ERDA | EN+78!, EN+81 |
ERFLG | EN+3~, EN+5*, EN+15, EN+34, AUTOFIL+84*, AUTOFIL+85, AUTOFIL+87*, AUTOFIL+89, GRPFILE+8~, GRPFILEX+1 |
ERROR | EN+3~, EN+27, EN+28, EN+31, EN+34, EN+38, EN+42, EN+48, EN+51, EN+54 , EN+57, EN+60, EN+63, EN+66, EN+69, EN+72, EN+78, EN+81, EN+84, EN+87 , EN+90, EN+93, EN+113, AUTOFIL+2~, AUTOFIL+64!, AUTOFIL+75, AUTOFIL+102~, AUTOFIL+114, AUTOFIL+115, GRPFILE+8~ , GRPFILE+14!, GRPFILE+24!, GRPFILE+29!, GRPFILE+34! |
ERTXT | EN+3~, EN+27, EN+28, EN+106, EN+113 |
EVENTYP | EN~, EN+27, EN+28, EN+38, EN+42, EN+96, EN+98 |
EXT | EN+99~, EN+101*, EN+102 |
FDA | EN+99~, AUTOFIL+102~ |
FDA( | EN+105*, EN+106*, EN+107*, EN+108*, EN+109*, AUTOFIL+105*, AUTOFIL+106*, AUTOFIL+107*, AUTOFIL+108*, AUTOFIL+109* , AUTOFIL+110*, AUTOFIL+111*, AUTOFIL+112* |
G2OFLG | EN+3~, EN+5*, EN+19*, EN+20*, EN+31, EN+72 |
GDATA | AUTOUPD+13~, AUTOUPD+73*, AUTOUPD+74, AUTOUPD+80 |
GIEN | AUTOUPD+13~, AUTOUPD+58*, AUTOUPD+62, AUTOUPD+63, AUTOUPD+67, AUTOUPD+72, AUTOUPD+73 |
GNAME | AUTOUPD+13~ |
GNUM | AUTOUPD+13~, AUTOUPD+58*, AUTOUPD+64, AUTOUPD+67 |
GNUM1 | AUTOUPD+13~, AUTOUPD+63*, AUTOUPD+64, AUTOUPD+67* |
GOK | AUTOUPD+13~, AUTOUPD+58*, AUTOUPD+60, AUTOUPD+62*, AUTOUPD+64*, AUTOUPD+67*, AUTOUPD+71, AUTOUPD+72*, AUTOUPD+78*, AUTOUPD+84* |
HCT | EN+3~, EN+5*, EN+15* |
>> HL("ECH" | EN+7, EN+8, EN+9 |
HLCMP | EN+3~, EN+7* |
HLREP | EN+3~, EN+9* |
HLSCMP | EN+3~, EN+8* |
>> IBMSG | AUTOFIL+115 |
>> IBSEG | EN+27, EN+28, EN+31, EN+34, EN+38, EN+42, EN+48, EN+51, EN+54, EN+57 , EN+60, EN+63, EN+66, EN+69, EN+72, EN+75, EN+78, EN+81, EN+84, EN+87 , EN+90, EN+93 |
>> IBSEG(1 | EN+17 |
IBTRACK | EN+3~ |
IDATA0 | AUTOUPD+13~, AUTOUPD+49*, AUTOUPD+51, AUTOUPD+52, AUTOUPD+58 |
IDATA3 | AUTOUPD+13~, AUTOUPD+49* |
IDATA7 | AUTOUPD+14~, AUTOUPD+50* |
IEN2 | AUTOUPD+13~, AUTOUPD+44*, AUTOUPD+45, AUTOUPD+48, AUTOUPD+49, AUTOUPD+50, AUTOUPD+87 |
IEN312 | AUTOFIL~, AUTOFIL+5, AUTOFIL+62, AUTOFIL+78, AUTOFIL+84, AUTOFIL+87, AUTOFIL+91, AUTOFILX+1, GRPFILE~, GRPFILE+10 , GRPFILE+17, GRPFILE+18, GRPFILE+19, AUTOUPD+13~, AUTOUPD+48*, AUTOUPD+49, AUTOUPD+50, AUTOUPD+77, AUTOUPD+83, AUTOUPD+87 , EBFILE~, EBFILE+9 |
IEN36 | AUTOUPD+13~, AUTOUPD+47*, AUTOUPD+48 |
IENS | EN+99~, EN+104*, EN+105, EN+106, EN+107, EN+108, EN+109, AUTOFIL+2~, AUTOFIL+5*, AUTOFIL+10 , AUTOFIL+11, AUTOFIL+12, AUTOFIL+13, AUTOFIL+14, AUTOFIL+15, AUTOFIL+16, AUTOFIL+17, AUTOFIL+20, AUTOFIL+22, AUTOFIL+32 , AUTOFIL+35, AUTOFIL+39, AUTOFIL+41, AUTOFIL+43, AUTOFIL+45, AUTOFIL+47, AUTOFIL+49, AUTOFIL+51, AUTOFIL+53, AUTOFIL+54 , AUTOFIL+55, AUTOFIL+56, AUTOFIL+57, AUTOFIL+58, AUTOFIL+59, AUTOFIL+70, AUTOFIL+71, AUTOFIL+72, AUTOFIL+73, GRPFILE+8~ , GRPFILE+10*, GRPFILE+12 |
IENS312 | GRPFILE+8~, GRPFILE+19*, GRPFILE+24, GRPFILE+29, GRPFILE+34 |
IENS365 | GRPFILE+8~, GRPFILE+22*, GRPFILE+23, GRPFILE+27*, GRPFILE+28, GRPFILE+32*, GRPFILE+33 |
IIVSTAT | EN+4~, EN+5*, EN+107, EN+108, EN+109, AUTOUPD+34 |
IRIEN | EN+4~ |
ISSUB | AUTOFIL~, AUTOFIL+11, AUTOFIL+17, AUTOFIL+21, AUTOUPD+13~, AUTOUPD+52*, AUTOUPD+54, AUTOUPD+56, AUTOUPD+88 |
MAP | EN+4~ |
MAP("MBI#" | EN+12* |
MAP("MBI%" | EN+12* |
MAP("V" | EN+11* |
MAP(1 | EN+11* |
MAP(6 | EN+11* |
MGRP | EN+4~, EN+5*, EN+27, EN+28 |
MIL | AUTOFIL+2~ |
MIL(365 | GRPFILE+12 |
MWNRA | AUTOUPD+13~, AUTOUPD+30*, AUTOUPD+77*, AUTOUPD+87 |
MWNRB | AUTOUPD+13~, AUTOUPD+30*, AUTOUPD+83*, AUTOUPD+87 |
MWNRIEN | AUTOUPD+13~, AUTOUPD+30*, AUTOUPD+31 |
MWNRTYP | AUTOUPD+13~, AUTOUPD+30*, AUTOUPD+31*, AUTOUPD+34, AUTOUPD+48, AUTOUPD+56, AUTOUPD+60, AUTOUPD+71, AUTOUPD+77, AUTOUPD+83 , AUTOUPD+87 |
NODE | GRPFILE+8~, GRPFILE+16*, GRPFILE+17, GRPFILE+18 |
OKAY | AUTOFIL+2~ |
ONEPOL | AUTOUPD+14~, AUTOUPD+45*, AUTOUPD+61, AUTOUPD+66 |
PIEN | AUTOUPD+14~, AUTOUPD+26*, AUTOUPD+31, AUTOUPD+35, AUTOUPD+43, AUTOUPD+45, AUTOUPD+47 |
PREL | AUTOFIL+2~, AUTOFIL+19*, AUTOFIL+21, AUTOFIL+22 |
PROV | GRPFILE+8~ |
PROV( | GRPFILE+29 |
PROV332 | GRPFILE+8~, GRPFILE+29! |
PROV332( | GRPFILE+29* |
RDATA0 | AUTOFIL+2~, AUTOFIL+6*, AUTOFIL+8, AUTOUPD+14~, AUTOUPD+22*, AUTOUPD+26, AUTOUPD+40, AUTOUPD+42, AUTOUPD+44 |
RDATA1 | AUTOFIL+2~, AUTOFIL+6*, AUTOFIL+13, AUTOFIL+15, AUTOFIL+17, AUTOUPD+14~, AUTOUPD+22* |
RDATA13 | AUTOFIL+2~, AUTOFIL+7*, AUTOFIL+11, AUTOUPD+14~, AUTOUPD+25* |
RDATA14 | AUTOUPD+14~, AUTOUPD+25*, AUTOUPD+58 |
RDATA5 | AUTOFIL+2~, AUTOFIL+6*, AUTOFIL+53, AUTOFIL+54, AUTOFIL+55, AUTOFIL+56, AUTOFIL+57, AUTOFIL+58, AUTOFIL+59 |
REF | GRPFILE+8~ |
REF( | GRPFILE+24 |
REF3129 | GRPFILE+8~, GRPFILE+24! |
REF3129( | GRPFILE+24* |
RES | AUTOUPD+14~, AUTOUPD+15*, AUTOUPD+16, AUTOUPD+18, AUTOUPD+34, AUTOUPD+36, AUTOUPD+40, AUTOUPD+42, AUTOUPD+43, AUTOUPD+44 , AUTOUPD+47, AUTOUPD+48, AUTOUPD+87*, AUTOUPD+88*, AUTOUPD+91 |
RIEN | EN+4~, EN+27, EN+28, EN+31, EN+34, EN+38, EN+42, EN+48, EN+51, EN+54 , EN+57, EN+60, EN+63, EN+66, EN+69, EN+72, EN+75, EN+78, EN+81, EN+84 , EN+87, EN+90, EN+93, EN+100, EN+105, EN+112, AUTOFIL+4, AUTOFIL+6, AUTOFIL+7, AUTOFIL+19 , AUTOFIL+78, AUTOFIL+81, AUTOFIL+84, AUTOFIL+87, AUTOFIL+91, AUTOFIL+96, AUTOFIL+104, AUTOFIL+108, AUTOFIL+110, AUTOFIL+115 , GRPFILE~, GRPFILE+11, GRPFILE+12, GRPFILE+21, GRPFILE+22, GRPFILE+26, GRPFILE+27, GRPFILE+31, GRPFILE+32, AUTOUPD~ , AUTOUPD+16, AUTOUPD+22, AUTOUPD+25, AUTOUPD+31, EBFILE~, EBFILE+9 |
RSTYPE | AUTOFIL+2~, AUTOFIL+8*, AUTOFIL+94 |
RSUPDT | EN+4~ |
SEG | EN+4~, EN+17*, EN+19, EN+20, EN+24, EN+27, EN+28, EN+31, EN+34, EN+38 , EN+42, EN+48, EN+51, EN+54, EN+57, EN+60, EN+63, EN+66, EN+69, EN+72 , EN+75, EN+78, EN+81, EN+84, EN+87, EN+90, EN+93 |
SUBID | EN+4~, EN+5*, EN+38, EN+42 |
TQIEN | AUTOUPD+14~ |
TQN | EN+99~, EN+100*, EN+101, EN+103, AUTOFIL+2~, AUTOFIL+8*, AUTOFIL+33, AUTOFIL+94, AUTOFIL+103, AUTOFIL+107 , AUTOFIL+109, AUTOFIL+115 |
TRACE | EN+4~, EN+27, EN+28 |
TRKIEN | EN+4~, EN+96* |
TSTAMP | AUTOFIL+2~, AUTOFIL+5*, AUTOFIL+70, AUTOFIL+72 |
U | EN+114, EN+115, AUTOFIL+8, AUTOFIL+11, AUTOFIL+13, AUTOFIL+15, AUTOFIL+17, AUTOFIL+53, AUTOFIL+54, AUTOFIL+55 , AUTOFIL+56, AUTOFIL+57, AUTOFIL+58, AUTOFIL+59, AUTOFIL+96, AUTOFIL+106, AUTOUPD+26, AUTOUPD+30, AUTOUPD+40, AUTOUPD+42 , AUTOUPD+43, AUTOUPD+44, AUTOUPD+51, AUTOUPD+58, AUTOUPD+63, AUTOUPD+67, AUTOUPD+74, AUTOUPD+77, AUTOUPD+80, AUTOUPD+83 , AUTOUPD+87, AUTOUPD+88 |
UP | EN+4~ |
WE | AUTOFIL+102~, AUTOFIL+103*, AUTOFIL+106, AUTOFIL+112 |
XX | AUTOFIL+2~, AUTOFIL+10*, AUTOFIL+11, AUTOFIL+12*, AUTOFIL+13, AUTOFIL+14*, AUTOFIL+15, AUTOFIL+16*, AUTOFIL+17, AUTOFIL+20* , AUTOFIL+21, AUTOFIL+33*, AUTOFIL+34*, AUTOFIL+35, AUTOFIL+39*, AUTOFIL+40, AUTOFIL+41*, AUTOFIL+42, AUTOFIL+43*, AUTOFIL+44 , AUTOFIL+45*, AUTOFIL+46, AUTOFIL+47*, AUTOFIL+48, AUTOFIL+49*, AUTOFIL+50, AUTOFIL+51*, AUTOFIL+52 |
Z | GRPFILE+8~, GRPFILE+21*, GRPFILE+22, GRPFILE+26*, GRPFILE+27, GRPFILE+31*, GRPFILE+32 |
Z2 | GRPFILE+8~, GRPFILE+24*, GRPFILE+29*, GRPFILE+34* |