IBCNEHL1 ;DAOU/ALA - HL7 Process Incoming RPI Messages ; 26-JUN-2002
Source file <IBCNEHL1.m>
| Package | Total | Call Graph |
|---|---|---|
| Integrated Billing | 9 | $$AUTOUPD^IBCNEHL1A (CTD,EBNTE,GT1,IN1,IN3,MSA,PID,ZEB)^IBCNEHL2 WARN^IBCNEHL3 (ERR,G2OCTD,NTE,ZHS,ZII,ZRF,ZSD,ZTP,ZTY)^IBCNEHL4 ($$EBFILE,AUTOFIL,DG1,GZRF,ROL,ZMP)^IBCNEHL5 ($$BUFLOCK,FIL)^IBCNEHL6 $$SVEICD^IBCNEHL7 SPAR^IBCNEHLU $$MGRP^IBCNEUT5 |
| VA FileMan | 4 | (FILE,UPDATE)^DIE ^DIK CLEAN^DILF ($$GET1,GETS)^DIQ |
| Kernel | 1 | $$FMDIFF^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*497 file data at node 12 & at subfiles 2.312, 9, 10 & 11
; DFN - file 2 ien ; IEN312 - file 2.312 ien ; RIEN - file 365 ien ; AFLG - 1 if called from autoupdate, 0 if called from ins. buffer process entry |
|
| GRPFILEX | ;
|
|
| FIL | ;Finish processing the response message - file into insurance buffer
|
|
| EBFILE(DFN,IEN312,RIEN,AFLG) | ;File eligibility/benefit data from file 365 into file 2.312
|
|
| EXPIRED(EXPDT) | ; check if insurance policy has already expired
; EXPDT - expiration date (2.312/3) ; returns 1 if expiration date is in the past, 0 otherwise |
| Name | Field # of Occurrence |
|---|---|
| FILE^DIE | EN+113, GRPFILE+15 |
| UPDATE^DIE | GRPFILE+26, GRPFILE+31, GRPFILE+36 |
| ^DIK | GRPFILE+20 |
| CLEAN^DILF | EN+113 |
| $$GET1^DIQ | EN+103, EN+104, EN+138, EN+143, EN+147 |
| GETS^DIQ | GRPFILE+13, GRPFILE+25, GRPFILE+30, GRPFILE+35 |
| $$AUTOUPD^IBCNEHL1A | EN+123 |
| CTD^IBCNEHL2 | EN+32 |
| EBNTE^IBCNEHL2 | EN+76 |
| GT1^IBCNEHL2 | EN+39 |
| IN1^IBCNEHL2 | EN+43 |
| IN3^IBCNEHL2 | EN+49 |
| MSA^IBCNEHL2 | EN+28, EN+29 |
| PID^IBCNEHL2 | EN+35 |
| ZEB^IBCNEHL2 | EN+55 |
| WARN^IBCNEHL3 | GRPFILE+16, GRPFILE+26, GRPFILE+31, GRPFILE+36 |
| ERR^IBCNEHL4 | EN+79 |
| G2OCTD^IBCNEHL4 | EN+73 |
| NTE^IBCNEHL4 | EN+82 |
| ZHS^IBCNEHL4 | EN+58 |
| ZII^IBCNEHL4 | EN+67 |
| ZRF^IBCNEHL4 | EN+61 |
| ZSD^IBCNEHL4 | EN+64 |
| ZTP^IBCNEHL4 | EN+85 |
| ZTY^IBCNEHL4 | EN+70 |
| $$EBFILE^IBCNEHL5 | EBFILE+9 |
| AUTOFIL^IBCNEHL5 | AUTOFIL+8 |
| DG1^IBCNEHL5 | EN+91 |
| GZRF^IBCNEHL5 | EN+52 |
| ROL^IBCNEHL5 | EN+88 |
| ZMP^IBCNEHL5 | EN+94 |
| $$BUFLOCK^IBCNEHL6 | EN+145, EN+152 |
| FIL^IBCNEHL6 | FIL+2 |
| $$SVEICD^IBCNEHL7 | EN+98 |
| SPAR^IBCNEHLU | EN+16 |
| $$MGRP^IBCNEUT5 | EN+5 |
| $$FMDIFF^XLFDT | EXPIRED+7 |
| FileNo | Call Tags |
|---|---|
| ^IBA(355.33 - [#355.33] | GET1^DIQ |
| ^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) |
|---|---|
| ^DPT - [#2] | GRPFILE+20 |
| ^IBCN(365 - [#365] | GRPFILE+23, GRPFILE+24, GRPFILE+28, GRPFILE+29, GRPFILE+33, GRPFILE+34 |
| ^IBCN(365.18 - [#365.18] | EN+106 |
| ^TMP($J | EN+15 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ACK | EN+3~, EN+134 |
| AFLG | GRPFILE~, GRPFILE+16, GRPFILE+26, GRPFILE+31, GRPFILE+36, EBFILE~, EBFILE+9 |
| AUBUFF | EN+136~, EN+138*, EN+140, EN+143, EN+145, EN+147, EN+152 |
| AULOCK | EN+136~, EN+137*, EN+145*, EN+152 |
| AUOK | EN+136~, EN+137*, EN+140, EN+148* |
| AUTO | EN+3~, EN+123*, EN+134, EN+149, EN+150 |
| BUFFSTAT | EN+141~, EN+143*, EN+147* |
| D0 | EN+102~, EN+106*, EN+107 |
| D1 | EN+102~, EN+106*, EN+107 |
| DA | GRPFILE+9~, GRPFILE+20* |
| DA(1 | GRPFILE+19* |
| DA(2 | GRPFILE+19* |
| DATA12 | GRPFILE+9~ |
| DATA12( | GRPFILE+14* |
| DFN | AUTOFIL~, AUTOFIL+8, GRPFILE~, GRPFILE+12, GRPFILE+19, GRPFILE+20, GRPFILE+21, EBFILE~, EBFILE+9 |
| DIAG | GRPFILE+9~ |
| DIAG( | GRPFILE+36 |
| DIAG3121 | GRPFILE+9~, GRPFILE+36! |
| DIAG3121( | GRPFILE+36* |
| >> DIK | GRPFILE+19* |
| DT | EXPIRED+6, EXPIRED+7 |
| EBDA | EN+3~, EN+52, EN+55, EN+58, EN+61, EN+64, EN+67, EN+70, EN+73, EN+76 , EN+82 |
| ERACT | EN+3~, EN+28, EN+29, EN+109, EN+134 |
| ERCON | EN+3~, EN+28, EN+29 |
| ERDA | EN+79!, EN+82 |
| ERFLG | EN+3~, EN+5*, EN+15, EN+35, GRPFILE+9~, GRPFILEX+1 |
| ERROR | EN+3~, EN+28, EN+29, EN+32, EN+35, EN+39, EN+43, EN+49, EN+52, EN+55 , EN+58, EN+61, EN+64, EN+67, EN+70, EN+73, EN+79, EN+82, EN+85, EN+88 , EN+91, EN+94, GRPFILE+9~, GRPFILE+16!, GRPFILE+26!, GRPFILE+31!, GRPFILE+36! |
| ERTXT | EN+3~, EN+28, EN+29, EN+109, EN+134 |
| EVENTYP | EN~, EN+28, EN+29, EN+39, EN+43, EN+98, EN+101 |
| EXPDT | EXPIRED~, EXPIRED+6, EXPIRED+7 |
| EXT | EN+102~, EN+104*, EN+105 |
| FDA | EN+102~ |
| FDA( | EN+108*, EN+109*, EN+110*, EN+111*, EN+112* |
| G2OFLG | EN+3~, EN+5*, EN+19*, EN+20*, EN+32, EN+73 |
| 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* |
| IBEIVUSR | EN+120~, EN+121* |
| >> IBSEG | EN+28, EN+29, EN+32, EN+35, EN+39, EN+43, EN+49, EN+52, EN+55, EN+58 , EN+61, EN+64, EN+67, EN+70, EN+73, EN+76, EN+79, EN+82, EN+85, EN+88 , EN+91, EN+94 |
| >> IBSEG(1 | EN+17 |
| IBTRACK | EN+3~ |
| IEN312 | AUTOFIL~, AUTOFIL+7, GRPFILE~, GRPFILE+12, GRPFILE+19, GRPFILE+20, GRPFILE+21, EBFILE~, EBFILE+9 |
| IENS | EN+102~, EN+107*, EN+108, EN+109, EN+110, EN+111, EN+112, GRPFILE+9~, GRPFILE+12*, GRPFILE+14 |
| IENS312 | GRPFILE+9~, GRPFILE+21*, GRPFILE+26, GRPFILE+31, GRPFILE+36 |
| IENS365 | GRPFILE+9~, GRPFILE+24*, GRPFILE+25, GRPFILE+29*, GRPFILE+30, GRPFILE+34*, GRPFILE+35 |
| IIVSTAT | EN+4~, EN+5*, EN+110, EN+111, EN+112 |
| INSIEN | AUTOFIL+5~, AUTOFIL+7*, AUTOFIL+8 |
| IRIEN | EN+4~ |
| ISSUB | AUTOFIL~, AUTOFIL+8 |
| LOAD | EN+120~, EN+121*, EN+155 |
| 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+28, EN+29 |
| >> MIL(365 | GRPFILE+14 |
| NODE | GRPFILE+9~, GRPFILE+18*, GRPFILE+19, GRPFILE+20 |
| P3 | EN+120~ |
| PCE | AUTOFIL+5~, AUTOFIL+7* |
| PROV | GRPFILE+9~ |
| PROV( | GRPFILE+31 |
| PROV332 | GRPFILE+9~, GRPFILE+31! |
| PROV332( | GRPFILE+31* |
| REF | GRPFILE+9~ |
| REF( | GRPFILE+26 |
| REF3129 | GRPFILE+9~, GRPFILE+26! |
| REF3129( | GRPFILE+26* |
| RIEN | EN+4~, EN+28, EN+29, EN+32, EN+35, EN+39, EN+43, EN+49, EN+52, EN+55 , EN+58, EN+61, EN+64, EN+67, EN+70, EN+73, EN+76, EN+79, EN+82, EN+85 , EN+88, EN+91, EN+94, EN+103, EN+108, EN+123, EN+138, AUTOFIL+6, GRPFILE~, GRPFILE+13 , GRPFILE+14, GRPFILE+23, GRPFILE+24, GRPFILE+28, GRPFILE+29, GRPFILE+33, GRPFILE+34, EBFILE~, EBFILE+9 |
| RSUPDT | EN+4~ |
| SEG | EN+4~, EN+17*, EN+19, EN+20, EN+24, EN+28, EN+29, EN+32, EN+35, EN+39 , EN+43, EN+49, EN+52, EN+55, EN+58, EN+61, EN+64, EN+67, EN+70, EN+73 , EN+76, EN+79, EN+82, EN+85, EN+88, EN+91, EN+94 |
| SUBID | EN+4~, EN+5*, EN+39, EN+43 |
| TQN | EN+102~, EN+103*, EN+104, EN+106 |
| TRACE | EN+4~, EN+28, EN+29 |
| TRKIEN | EN+4~, EN+98* |
| U | EN+149, EN+150 |
| UP | EN+4~ |
| X1 | EXPIRED+5~, EXPIRED+6*, EXPIRED+7 |
| X2 | EXPIRED+5~, EXPIRED+6*, EXPIRED+7 |
| Z | GRPFILE+9~, GRPFILE+23*, GRPFILE+24, GRPFILE+28*, GRPFILE+29, GRPFILE+33*, GRPFILE+34 |
| Z2 | GRPFILE+9~, GRPFILE+26*, GRPFILE+31*, GRPFILE+36* |