Routine: IBCNEHL1

Package	Total	Call Graph
Integrated Billing	8	(CTD,EBNTE,GT1,IN1,IN3,MSA,PID,ZEB)^IBCNEHL2 ($$CHK1,$$CHK2,WARN)^IBCNEHL3 (ERR,G2OCTD,NTE,ZHS,ZII,ZRF,ZSD,ZTP,ZTY)^IBCNEHL4 ($$EBFILE,AUTOFIL,DG1,GZRF,ROL,ZMP)^IBCNEHL5 ($$BUFLOCK,FIL)^IBCNEHL6 $$SVEICD^IBCNEHL7 ($$ISMCR,$$ONEPOL,$$PATISSUB,SPAR)^IBCNEHLU ($$MGRP,$$PYRAPP)^IBCNEUT5
VA FileMan	5	$$FIND1^DIC (FILE,UPDATE)^DIE ^DIK CLEAN^DILF ($$GET1,GETS)^DIQ
Kernel	1	$$FMDIFF^XLFDT

Package	Total	Caller Graph
Integrated Billing	3	IBCNBAR IBCNEHL5 IBCNEHLI

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
AUTOUPD(RIEN)	;
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

External References

Name	Field # of Occurrence
$$FIND1^DIC	AUTOUPD+20
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+133, EN+138, EN+142, AUTOUPD+28, AUTOUPD+43, AUTOUPD+53, AUTOUPD+56, AUTOUPD+58 , AUTOUPD+60, AUTOUPD+65
GETS^DIQ	GRPFILE+13, GRPFILE+25, GRPFILE+30, GRPFILE+35
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
$$CHK1^IBCNEHL3	AUTOUPD+82
$$CHK2^IBCNEHL3	AUTOUPD+84
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+7
DG1^IBCNEHL5	EN+91
GZRF^IBCNEHL5	EN+52
ROL^IBCNEHL5	EN+88
ZMP^IBCNEHL5	EN+94
$$BUFLOCK^IBCNEHL6	EN+140, EN+147
FIL^IBCNEHL6	FIL+2
$$SVEICD^IBCNEHL7	EN+98
$$ISMCR^IBCNEHLU	AUTOUPD+32
$$ONEPOL^IBCNEHLU	AUTOUPD+67
$$PATISSUB^IBCNEHLU	AUTOUPD+80
SPAR^IBCNEHLU	EN+16
$$MGRP^IBCNEUT5	EN+5
$$PYRAPP^IBCNEUT5	AUTOUPD+38
$$FMDIFF^XLFDT	EXPIRED+5

FileNo	Call Tags
^VA(200 - [#200]	FIND1^DIC
^IBE(350.9 - [#350.9]	GET1^DIQ
^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
^IBE(365.12 - [#365.12]	GET1^DIQ
365.121	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^DIC(36 - [#36]	AUTOUPD+73
^DPT - [#2]	GRPFILE+20, AUTOUPD+74, AUTOUPD+75, AUTOUPD+76
^IBA(355.3 - [#355.3]	AUTOUPD+91, AUTOUPD+94, AUTOUPD+98
^IBCN(365 - [#365]	GRPFILE+23, GRPFILE+24, GRPFILE+28, GRPFILE+29, GRPFILE+33, GRPFILE+34, AUTOUPD+23, AUTOUPD+26
^IBCN(365.18 - [#365.18]	EN+106
^IBE(350.9 - [#350.9]	AUTOUPD+31
^TMP($J	EN+15

Name	Line Occurrences
$$AUTOUPD	EN+119
$$EXPIRED	AUTOUPD+79
AUTOFIL	EN+144, EN+145
AUTOFILX	AUTOFIL+5
FIL	EN+148

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ACK	EN+3~, EN+129
AFLG	GRPFILE~, GRPFILE+16, GRPFILE+26, GRPFILE+31, GRPFILE+36, EBFILE~, EBFILE+9
APPIEN	AUTOUPD+14~, AUTOUPD+38*, AUTOUPD+39, AUTOUPD+65
AUBUFF	EN+131~, EN+133*, EN+135, EN+138, EN+140, EN+142, EN+147
AULOCK	EN+131~, EN+132, EN+140, EN+147
AUOK	EN+131~, EN+132, EN+135, EN+143
AUTO	EN+3~, EN+119*, EN+129, EN+144, EN+145
BUFFSTAT	EN+136~, EN+138, EN+142
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+7, 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+4, EXPIRED+5
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+129
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+129
EVENTYP	EN~, EN+28, EN+29, EN+39, EN+43, EN+98, EN+101
EXPDT	EXPIRED~, EXPIRED+4, EXPIRED+5
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
GDATA	AUTOUPD+14~, AUTOUPD+98*, AUTOUPD+99, AUTOUPD+104
GIEN	AUTOUPD+14~, AUTOUPD+86*, AUTOUPD+90, AUTOUPD+91, AUTOUPD+94, AUTOUPD+97, AUTOUPD+98
GNAME	AUTOUPD+14~
GNUM	AUTOUPD+14~, AUTOUPD+86*, AUTOUPD+92, AUTOUPD+94
GNUM1	AUTOUPD+14~, AUTOUPD+91, AUTOUPD+92, AUTOUPD+94
GOK	AUTOUPD+14~, AUTOUPD+86, AUTOUPD+88, AUTOUPD+90, AUTOUPD+92, AUTOUPD+94, AUTOUPD+96, AUTOUPD+97, AUTOUPD+103, AUTOUPD+108*
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+116~, EN+117*, AUTOUPD+20
IBGETDEF	AUTOUPD+16~, AUTOUPD+51, AUTOUPD+58, AUTOUPD+60
IBGETNOK	AUTOUPD+16~, AUTOUPD+55, AUTOUPD+56, AUTOUPD+58, AUTOUPD+60*
IBGETSTC	AUTOUPD+16~, AUTOUPD+51, AUTOUPD+60
IBGETTQ	AUTOUPD+16~, AUTOUPD+51, AUTOUPD+53, AUTOUPD+56
IBGETWE	AUTOUPD+16~, AUTOUPD+51, AUTOUPD+56
>> 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~
IDATA0	AUTOUPD+14~, AUTOUPD+75*, AUTOUPD+79, AUTOUPD+80, AUTOUPD+86
IDATA3	AUTOUPD+14~, AUTOUPD+75*
IDATA7	AUTOUPD+15~, AUTOUPD+76*
IEN2	AUTOUPD+14~, AUTOUPD+66*, AUTOUPD+67, AUTOUPD+74, AUTOUPD+75, AUTOUPD+76, AUTOUPD+110, AUTOUPD+114
IEN312	AUTOFIL~, AUTOFIL+6, GRPFILE~, GRPFILE+12, GRPFILE+19, GRPFILE+20, GRPFILE+21, AUTOUPD+14~, AUTOUPD+74*, AUTOUPD+75 , AUTOUPD+76, AUTOUPD+102, AUTOUPD+107, AUTOUPD+113, EBFILE~, EBFILE+9
IEN36	AUTOUPD+14~, AUTOUPD+73*, AUTOUPD+74
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, AUTOUPD+36
INSIEN	AUTOFIL+4~, AUTOFIL+6*, AUTOFIL+7
IRIEN	EN+4~
ISBLUE	AUTOUPD+15~, AUTOUPD+28*
ISSUB	AUTOFIL~, AUTOFIL+7, AUTOUPD+14~, AUTOUPD+80*, AUTOUPD+82, AUTOUPD+84, AUTOUPD+110, AUTOUPD+114
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
MWNRA	AUTOUPD+14~, AUTOUPD+31, AUTOUPD+102, AUTOUPD+110
MWNRB	AUTOUPD+14~, AUTOUPD+31, AUTOUPD+107, AUTOUPD+110
MWNRIEN	AUTOUPD+14~, AUTOUPD+31*, AUTOUPD+32
MWNRTYP	AUTOUPD+14~, AUTOUPD+31, AUTOUPD+32, AUTOUPD+36, AUTOUPD+84, AUTOUPD+88, AUTOUPD+96, AUTOUPD+102, AUTOUPD+107, AUTOUPD+110 , AUTOUPD+112
NODE	GRPFILE+9~, GRPFILE+18*, GRPFILE+19, GRPFILE+20
ONEPOL	AUTOUPD+15~, AUTOUPD+67*, AUTOUPD+89, AUTOUPD+93
>> P3	AUTOUPD+113*, AUTOUPD+114
PCE	AUTOFIL+4~, AUTOFIL+6*
PIEN	AUTOUPD+15~, AUTOUPD+27*, AUTOUPD+28, AUTOUPD+32, AUTOUPD+38, AUTOUPD+65, AUTOUPD+67, AUTOUPD+73
PROV	GRPFILE+9~
PROV(	GRPFILE+31
PROV332	GRPFILE+9~, GRPFILE+31!
PROV332(	GRPFILE+31*
RDATA0	AUTOUPD+15~, AUTOUPD+23*, AUTOUPD+27, AUTOUPD+43, AUTOUPD+66
RDATA1	AUTOUPD+15~, AUTOUPD+23*
RDATA13	AUTOUPD+15~, AUTOUPD+26*
RDATA14	AUTOUPD+15~, AUTOUPD+26*, AUTOUPD+86
REF	GRPFILE+9~
REF(	GRPFILE+26
REF3129	GRPFILE+9~, GRPFILE+26!
REF3129(	GRPFILE+26*
RES	AUTOUPD+15~, AUTOUPD+17, AUTOUPD+18, AUTOUPD+20, AUTOUPD+36, AUTOUPD+39, AUTOUPD+43, AUTOUPD+53, AUTOUPD+56, AUTOUPD+65 , AUTOUPD+66, AUTOUPD+110, AUTOUPD+113, AUTOUPD+114*, AUTOUPD+117
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+119, EN+133, AUTOFIL+5, GRPFILE~, GRPFILE+13 , GRPFILE+14, GRPFILE+23, GRPFILE+24, GRPFILE+28, GRPFILE+29, GRPFILE+33, GRPFILE+34, AUTOUPD~, AUTOUPD+18, AUTOUPD+23 , AUTOUPD+26, AUTOUPD+32, AUTOUPD+53, AUTOUPD+60, 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
TQIEN	AUTOUPD+15~
TQN	EN+102~, EN+103*, EN+104, EN+106
TRACE	EN+4~, EN+28, EN+29
TRKIEN	EN+4~, EN+98*
U	EN+144, EN+145, AUTOUPD+27, AUTOUPD+31, AUTOUPD+43, AUTOUPD+66, AUTOUPD+79, AUTOUPD+86, AUTOUPD+91, AUTOUPD+94 , AUTOUPD+99, AUTOUPD+102, AUTOUPD+104, AUTOUPD+107, AUTOUPD+110, AUTOUPD+113, AUTOUPD+114
UP	EN+4~
X1	EXPIRED+3~, EXPIRED+4*, EXPIRED+5
X2	EXPIRED+3~, EXPIRED+4*, EXPIRED+5
Z	GRPFILE+9~, GRPFILE+23, GRPFILE+24, GRPFILE+28, GRPFILE+29, GRPFILE+33*, GRPFILE+34
Z2	GRPFILE+9~, GRPFILE+26, GRPFILE+31, GRPFILE+36*

Customize PDF page

Package: Integrated Billing

Routine: IBCNEHL1

Information

Source Information

Call Graph

Call Graph Total: 14

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 3

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: