Routine: IBCECSA5

Package	Total	Call Graph
Integrated Billing	4	($$A10,BLD,SET)^IBCECSA6 ($$FT,$$INPAT,F)^IBCEF (BLD,HDR)^IBCEOB2 $$DAT1^IBOUTL
VA FileMan	4	$$FIND1^DIC ($$EXTERNAL,$$VFILE)^DILFD $$GET1^DIQ ^DIWP
List Manager	3	EN^VALM ($$SETSTR,CLEAR)^VALM1 (CLEAN,CNTRL)^VALM10
Kernel	2	($$LJ,$$RJ)^XLFSTR DISP^XQORM1

Package	Total	Caller Graph
Integrated Billing	4	IBCECOB5 IBCECSA6 IBCECSA7 IBCEM VIEW EOB

Entry Points

Name	Comments	DBIA/ICR reference
EN	; -- main entry point for VIEW EOB
INIT	; -- init variables and list array
INITQ
HELP	; -- help code
EXIT	; -- exit code
MIN	;
MINDAT	; data for MIN tag ; format: piece^label^special format code^special decision for disp
REMARK	; set up remarks and line level details
MRALLA
EOBERR	; Display information about any 361.1 message storage or filing errors
TXT(IBRM,IBLN,IBXY)	;display text over 79 chars
REP
SET(IB,IBSAV)	;
A10(X)	;
A7(X)	; returns a dollar amount right justified to 7 characters
TXT1(IBT,DIWL,DIWR)	; sets up text for over 79 chars ; IBT - pass by ref, array of text to be formatted back in array ; DIWL - left margin, DIWR = right margin
RJ(X,Y)	; right just, default is 10
CARC(IBCDE,IBF,IBML,IBARY)	;new CARC/RACR API for IB2.0547 ; IBCDE = reason code from EOB to lookup in carc/rarc file (REQUIRED) ; IBF = file# to do lookup (either 345-CARC or 346-RARC) REQUIRED ; IBML = max length for each line (default is 79) ; IBARY = (required) subscripted array to return description data in: ; array(1)=first line of word-processed description ; array(2)= 2nd line of wp description, and so on

External References

Name	Field # of Occurrence
$$FIND1^DIC	CARC+16
$$EXTERNAL^DILFD	MRALLA+21
$$VFILE^DILFD	REMARK+19, REMARK+22, REMARK+23, MRALLA+41, MRALLA+42, MRALLA+48, MRALLA+49
$$GET1^DIQ	CARC+17
^DIWP	TXT1+5
$$A10^IBCECSA6	A10+1
BLD^IBCECSA6	INIT+7, INIT+16
SET^IBCECSA6	SET+1
$$FT^IBCEF	MRALLA+11, MRALLA+13
$$INPAT^IBCEF	MIN+3, MIN+11
F^IBCEF	MRALLA+13
BLD^IBCEOB2	INIT+9
HDR^IBCEOB2	INIT+2
$$DAT1^IBOUTL	MRALLA+20
EN^VALM	EN+3
$$SETSTR^VALM1	MIN+5, MIN+21, MRALLA, REP
CLEAR^VALM1	EXIT+2
CLEAN^VALM10	EXIT+2
CNTRL^VALM10	MIN+8, REMARK+7, REMARK+8, MRALLA+3
$$LJ^XLFSTR	REMARK+25
$$RJ^XLFSTR	RJ+1
DISP^XQORM1	HELP+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: HELP+1
Routine Call	DIC Line Location: CARC+16
Routine Call	VALM Line Location: EN+3

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^RC(345 - [#345]	VFILE^DILFD
^RC(346 - [#346]	VFILE^DILFD
361.115	EXTERNAL^DILFD

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^IBM(361.1 - [#361.1]	MIN+10, MIN+13, REMARK+11, REMARK+12, REMARK+17, MRALLA+5, MRALLA+14, MRALLA+23, MRALLA+27, MRALLA+28 , MRALLA+32, MRALLA+33, MRALLA+34, MRALLA+35, MRALLA+46, EOBERR+3, EOBERR+7, EOBERR+8
^TMP("IBCECSD"	INIT+3!, INIT+11, INIT+16, EXIT+1!, MIN+9, MRALLA+4*
^TMP("IBCEOB"	INIT+11
^UTILITY($J	TXT1+3!, TXT1+6, TXT1+7!

Label References

Name	Line Occurrences
$$CARC	REMARK+23, MRALLA+42, MRALLA+49
$$RJ	MRALLA+19, MRALLA+20, MRALLA+21, MRALLA+22, MRALLA+23, MRALLA+24, MRALLA+26, MRALLA+27, MRALLA+28, MRALLA+29 , MRALLA+30, A7+1
EOBERR	INIT+7, INIT+17
INITQ	INIT+1, INIT+7
REMARK	MIN+26
REP	REP
SET	MIN+6, MIN+12, MIN+23, MIN+25, REMARK+3, REMARK+4, REMARK+5, REMARK+25, REMARK+27, REMARK+30 , REMARK+31, MRALLA+1, MRALLA+5, MRALLA+16, MRALLA+31, MRALLA+41, MRALLA+42, MRALLA+44, MRALLA+51, MRALLA+54 , MRALLA+55, MRALLA+56, EOBERR+4, EOBERR+5, EOBERR+6, EOBERR+10, REP
TXT1	REMARK+24, MRALLA+41, MRALLA+42, MRALLA+51, MRALLA+54

Naked Globals

Name	Field # of Occurrence
^(	MRALLA+46

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> CNT	SET+1
DASHES	EOBERR+1~, EOBERR+2*, EOBERR+9
DIWF	TXT1+3~, TXT1+4*
DIWL	TXT1~, TXT1+4, TXT1+6
DIWR	TXT1~
ERRTXT	EOBERR+1~, EOBERR+8, EOBERR+9, EOBERR+10
IB	MIN+5, MIN+6, MIN+13, MIN+21, MIN+23, MIN+25, MRALLA, MRALLA+1, REP, SET~ , SET+1
IBALN	CARC+10~, CARC+19*, CARC+20, CARC+21
IBARY	CARC~, CARC+12, CARC+20, CARC+23, CARC+26
IBC	CARC+10~, CARC+11, CARC+12, CARC+13, CARC+14, CARC+16, CARC+19, CARC+27
IBCDE	CARC~, CARC+13, CARC+16
IBCNT	INIT+3!, INIT+7, INIT+16, MIN+10, MIN+13, REMARK+11, REMARK+12, REMARK+17, MRALLA+5, MRALLA+14 , MRALLA+23, MRALLA+27, MRALLA+28, MRALLA+32, MRALLA+33, MRALLA+34, MRALLA+35, MRALLA+46, EOBERR+3, EOBERR+7 , EOBERR+8, SET+1
IBD	MIN+1~, MIN+16*, MIN+18, MIN+21
IBDSC	CARC+10~
IBDSC(	CARC+18, CARC+19, CARC+20, CARC+21, CARC+25, CARC+26
>> IBEOBIFN	INIT+7
IBF	CARC~, CARC+14, CARC+16, CARC+17
IBFORM	MRALLA+8~, MRALLA+10, MRALLA+11, MRALLA+13, MRALLA+26
IBFULL	MIN+17~*, MIN+18
IBI	CARC+10~, CARC+18*, CARC+19, CARC+20, CARC+21, CARC+23, CARC+25, CARC+26
>> IBIFN	INIT+1
IBLN	TXT~, TXT+2, REP
IBML	CARC~, CARC+15*, CARC+20, CARC+21, CARC+23, CARC+24, CARC+26
IBN	CARC+10~, CARC+24*, CARC+25, CARC+26
IBONE	INIT+3!, INIT+7, INIT+10, INIT+16*
IBP	REMARK+1~, REMARK+15*, REMARK+16, REMARK+17, REMARK+22
IBRC	MRALLA+8~, MRALLA+45, MRALLA+46
>> IBREC	MIN+3, MIN+11, MRALLA+11, MRALLA+13
IBREC1	MIN+1~, MIN+13, MIN+16, REMARK+1~, REMARK+11, REMARK+12, REMARK+16, MRALLA+14, MRALLA+17, MRALLA+19 , MRALLA+20, MRALLA+21, MRALLA+22, MRALLA+24, MRALLA+29, MRALLA+30
IBREC2	MRALLA+8~, MRALLA+33, MRALLA+37, MRALLA+38, MRALLA+39, MRALLA+41, MRALLA+42, MRALLA+46, MRALLA+48, MRALLA+49
IBREC3	MRALLA+8~, MRALLA+35*, MRALLA+37, MRALLA+38, MRALLA+41, MRALLA+42, MRALLA+44
>> IBREM	REMARK+2*
IBRL	MIN+1~, MIN+13, MIN+21, MIN+22, MIN+23, MIN+25
IBRM	TXT~, TXT+2, REP
IBRM1	MIN+1~
IBRM2	MIN+1~
IBRM3	MIN+1~
IBRM4	MIN+1~
IBRM5	MIN+1~
IBS	TXT1+3~
IBSAV	SET~, SET+1
>> IBSRC	MIN+3, MIN+7, MIN+10, MIN+11, REMARK+6, REMARK+32, MRALLA+2, SET+1
IBSTP	CARC+10~, CARC+19, CARC+24, CARC+26
IBT	MIN+1~, MIN+15, REMARK+1~, REMARK+20!, REMARK+24, MRALLA+8~, MRALLA+19, MRALLA+20, MRALLA+21, MRALLA+22* , MRALLA+23, MRALLA+24, MRALLA+26, MRALLA+27, MRALLA+28, MRALLA+29, MRALLA+30, MRALLA+31, MRALLA+41, MRALLA+42* , MRALLA+49, MRALLA+51, MRALLA+54*, TXT1~, TXT1+6!
IBT(	REMARK+22, REMARK+27, TXT1+5, TXT1+6
IBT(1	REMARK+25, MRALLA+49
IBTX	MIN+1~, MIN+15*, MIN+16, MIN+17, MIN+19, MIN+20, MIN+21, MRALLA+8~, MRALLA+41, MRALLA+42 , MRALLA+43!, MRALLA+46!, MRALLA+51!, MRALLA+54
IBTX(	MRALLA+41, MRALLA+42, MRALLA+54
IBTX(1	MRALLA+41, MRALLA+42, MRALLA+46, MRALLA+48, MRALLA+49, MRALLA+50, MRALLA+51
IBTXL	MRALLA+8~, MRALLA+46, MRALLA+53, MRALLA+54
IBTYPE	MIN+1~, MIN+3*
IBX	REMARK+1~, REMARK+26, REMARK+27, MRALLA+14, MRALLA+18, MRALLA+23, MRALLA+27, MRALLA+28, MRALLA+32, MRALLA+33 , MRALLA+34, MRALLA+35, MRALLA+46, TXT1+3~, TXT1+5, TXT1+6, CARC+10~, CARC+17
IBX2	MRALLA+8~, MRALLA+32*, MRALLA+33, MRALLA+34, MRALLA+35
IBX3	MRALLA+8~, MRALLA+33, MRALLA+34, MRALLA+35
IBXY	TXT~, REP
IBY	CARC+10~, CARC+16*, CARC+17
IBZ	MRALLA+8~, MRALLA+46!, MRALLA+51*
IBZ(	MRALLA+51
IBZDATA	MRALLA+8~
IBZDATA(	MRALLA+26
>> IORVOFF	MIN+8, MRALLA+3
>> IORVON	MIN+8, MRALLA+3
>> IOUOFF	REMARK+7, REMARK+8
>> IOUON	REMARK+7, REMARK+8
RCODE	REMARK+1~, REMARK+16*, REMARK+19, REMARK+21, REMARK+23, REMARK+25
RDESC	REMARK+1~, REMARK+17*, REMARK+19, REMARK+22
REXIST	REMARK+1~, REMARK+13, REMARK+22, REMARK+23*, REMARK+30
RVL	MRALLA+15~, MRALLA+17, MRALLA+18, MRALLA+26
U	INIT+16, REMARK+11, REMARK+12, REMARK+16, MRALLA+17, MRALLA+37, MRALLA+38, MRALLA+39, MRALLA+48, MRALLA+49
VALMBG	EN+1~, EN+2*
VALMCNT	EN+1~, EN+2*, INIT+16, MIN+8, MIN+9, REMARK+7, REMARK+8, MRALLA+3, MRALLA+4
VALMHDR	EN+1~
>> VALMQUIT	INIT+1*
X	HELP+1, A10~, A10+1, A7~, A7+1, TXT1+3~, TXT1+5, RJ~, RJ+1
Y	RJ~, RJ+1
Z	EOBERR+1~, EOBERR+7*, EOBERR+8

Marked Items

Name	Field # of Occurrence
$T(MINDAT+IBT	MIN+15

Customize PDF page

Package: Integrated Billing

Routine: IBCECSA5

Information

Source Information

Call Graph

Call Graph Total: 13

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 4

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items