Routine: IBCEOB3

Entry Points

Name	Comments	DBIA/ICR reference
CHGBULL(IBEOB,IBBULL)	; Send bulletin that name and/or id number for insured ; has been reported changed via EDI ; IBEOB = the internal entry # of the entry in file 361.1 ; IBBULL = the flag that has 2 '^' pieces that indicate whether there ; was a name change ('^' piece 1 = 1) or an ID # change ('^' ; piece 2 = 1)
COBBULL(IBEOB)	; Send bulletin that COB may be pending on processing an EOB ; IBEOB = the internal entry # of the entry in file 361.1

FileNo	Call Tags
^IBM(361.1 - [#361.1]	EXTERNAL^DILFD
^DGCR(399 - [#399]	EXTERNAL^DILFD

Name	Line Occurrences (* Changed, ! Killed)
^IBM(361.1 - [#361.1]	CHGBULL+9, COBBULL+5

Name	Field # of Occurrence
IB0	CHGBULL+7~, CHGBULL+9, CHGBULL+11, COBBULL+3~, COBBULL+5, COBBULL+6, COBBULL+7, COBBULL+9, COBBULL+10
IBBILL	COBBULL+3~, COBBULL+6*, COBBULL+8, COBBULL+14
IBBULL	CHGBULL~, CHGBULL+8, CHGBULL+14, CHGBULL+15, CHGBULL+16
IBEOB	CHGBULL~, CHGBULL+9, COBBULL~, COBBULL+5
IBT	CHGBULL+7~, CHGBULL+14, CHGBULL+15, COBBULL+3~
IBT(	CHGBULL+14, CHGBULL+15
IBT(1	CHGBULL+11, COBBULL+8
IBT(2	CHGBULL+12, COBBULL+9
IBT(3	COBBULL+10*
IBT(4	COBBULL+11*
IBT(5	COBBULL+12*
IBT(6	COBBULL+13*
U	CHGBULL+8, CHGBULL+11, CHGBULL+14, CHGBULL+15, CHGBULL+16, COBBULL+9, COBBULL+10
XMBODY	CHGBULL+7~, CHGBULL+10, CHGBULL+18, COBBULL+3~, COBBULL+4, COBBULL+16
XMDUZ	CHGBULL+7~, CHGBULL+17, CHGBULL+18, COBBULL+3~, COBBULL+15, COBBULL+16
XMSUBJ	CHGBULL+7~, CHGBULL+16, CHGBULL+18, COBBULL+3~, COBBULL+14, COBBULL+16
XMTO	CHGBULL+7~, CHGBULL+18, COBBULL+3~, COBBULL+16
XMTO("I:G.IB	EDI" , CHGBULL+10, COBBULL+4
>> XMZ	CHGBULL+18, COBBULL+16
>> Z	CHGBULL+13, CHGBULL+14, CHGBULL+15*