Routine: IBJTBA1

Information

IBJTBA1 ;ALB/TMK/PJH - TPJI BILL CHARGE INFO SCREEN ;Sep 30, 2014@12:07:36

Package	Total	Call Graph
Integrated Billing	7	$$PTRESPI^IBCECOB1 GETEOB^IBCECSA6 $$FT^IBCEF $$ALLOWED^IBCEMU2 ($$SET,$$SETLN)^IBJTBA $$DAT1^IBOUTL $$EXPAND^IBTRE
Accounts Receivable	1	$$BN1^PRCAFN
Kernel	1	$$FMTE^XLFDT
VA FileMan	1	$$EXTERNAL^DILFD

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 1

Package	Total	Caller Graph
Integrated Billing	1	IBJTBA

Entry Points

Name	Comments	DBIA/ICR reference
SHEOB(IBI,IBSPL,IBEOBCT,IBCTOF)	; Format EOB called from IBJTBA ; IBSPL = 0 if EOB represents one bill's payment ; = 1 if AR had to split the EOB between multiple bills ; Assumes IBLN is defined and returns it with line count ; Assumes IBEOBDET may be defined as a flag to control detail level of print
MRA2	;
MOVE
REMOVE	; Display Removal Reason and User
EOBERR	; Display information about any 361.1 message storage or filing errors
GETAUDIT(IB101)	; retrieve audit data ; IB101 - string of data at the MOVE/COPY/REMOVE HISTORY multiple (361.1,101)
OTHERS(IBI,IEN101)	; get other claim(s) ; IBI - ien for entry in 361.1 ; IEN101 - sub-ien for entry in 361.1,101 multiple

External References

Name	Field # of Occurrence
$$EXTERNAL^DILFD	SHEOB+10, GETAUDIT+2, GETAUDIT+3, GETAUDIT+5, GETAUDIT+6, OTHERS+7
$$PTRESPI^IBCECOB1	SHEOB+20
GETEOB^IBCECSA6	SHEOB+39, SHEOB+50
$$FT^IBCEF	SHEOB+20
$$ALLOWED^IBCEMU2	SHEOB+25
$$SET^IBJTBA	SHEOB+28, SHEOB+30, SHEOB+31, SHEOB+33, SHEOB+40, SHEOB+51, MRA2+2, MRA2+4, MRA2+8, MRA2+12 , MRA2+16, MRA2+20, MRA2+25, MRA2+30, MRA2+43, MRA2+45, MRA2+46, MRA2+51, MRA2+58, MRA2+59 , MRA2+62, MOVE+10, MOVE+11, MOVE+14, MOVE+16, MOVE+18, MOVE+20, MOVE+23, MOVE+26, REMOVE+6 , REMOVE+8, REMOVE+10, REMOVE+12, REMOVE+14, REMOVE+16, REMOVE+17, REMOVE+19, EOBERR+4, EOBERR+5, EOBERR+6 , EOBERR+10, OTHERS+10
$$SETLN^IBJTBA	SHEOB+30, SHEOB+31, SHEOB+33, SHEOB+40, SHEOB+51, MRA2+4, MRA2+7, MRA2+9, MRA2+11, MRA2+13 , MRA2+15, MRA2+17, MRA2+19, MRA2+22, MRA2+24, MRA2+27, MRA2+29, MRA2+38, MRA2+42, MRA2+44 , MRA2+51, MRA2+55, MRA2+57, MRA2+59, MRA2+61, MOVE+9, MOVE+13, MOVE+15, MOVE+17, MOVE+19 , MOVE+22, MOVE+25, REMOVE+5, REMOVE+7, REMOVE+9, REMOVE+11, REMOVE+13, REMOVE+15, REMOVE+17, REMOVE+19 , EOBERR+4, EOBERR+5, EOBERR+10, OTHERS+10
$$DAT1^IBOUTL	MRA2+21, MRA2+23, MRA2+54
$$EXPAND^IBTRE	SHEOB+14
$$BN1^PRCAFN	SHEOB+33
$$FMTE^XLFDT	SHEOB+13

FileNo	Call Tags
^IBM(361.1 - [#361.1]	EXTERNAL^DILFD
361.1101	EXTERNAL^DILFD
361.11016	EXTERNAL^DILFD

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(36 - [#36]	SHEOB+12
^IBM(361.1 - [#361.1]	SHEOB+7, SHEOB+15, SHEOB+18, SHEOB+23, SHEOB+31, SHEOB+32, SHEOB+36, SHEOB+49, MRA2+6, MRA2+36 , MRA2+49, MRA2+52, MRA2+59, MOVE+2, MOVE+4, MOVE+6, REMOVE+2, REMOVE+3, EOBERR+3, EOBERR+7 , EOBERR+8, OTHERS+5, OTHERS+6
^RCY(344.4 - [#344.4]	MRA2+37, MRA2+41
^TMP("IBCECSD"	SHEOB+38!, SHEOB+40, SHEOB+41!
^TMP("PRCA_EOB"	SHEOB+47!, SHEOB+51, SHEOB+52!
^VA(200 - [#200]	MRA2+56

Label References

Name	Line Occurrences
EOBERR	SHEOB+42, SHEOB+53
GETAUDIT	MOVE+7, REMOVE+4
MRA2	SHEOB+27
OTHERS	MOVE+28, REMOVE+21
REMOVE	MRA2+6

Naked Globals

Name	Field # of Occurrence
^(	SHEOB+32, MRA2+52, MRA2+59

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DASHES	EOBERR+1~, EOBERR+2*, EOBERR+9
ERRTXT	EOBERR+1~, EOBERR+8, EOBERR+9, EOBERR+10
FIRST101	MOVE+3~, MOVE+8, MOVE+9
IB101	MOVE+5~, MOVE+6, MOVE+7, REMOVE+1~, REMOVE+3, REMOVE+4, GETAUDIT~, GETAUDIT+2, GETAUDIT+3, GETAUDIT+4 , GETAUDIT+5, GETAUDIT+6
IB102	MOVE+5~
IBAPS	MRA2+35~, MRA2+41*, MRA2+42
IBCA	SHEOB+5~, SHEOB+22*, MRA2+28
IBCN	SHEOB+5~, SHEOB+11, MRA2+9, MRA2+52, MRA2+59
IBCTOF	SHEOB~, MRA2+3
IBD	MRA2+1~, MRA2+3, MRA2+4, MRA2+7, MRA2+9, MRA2+10, MRA2+11, MRA2+13, MRA2+14, MRA2+15 , MRA2+17, MRA2+18, MRA2+19, MRA2+21, MRA2+22, MRA2+23, MRA2+24, MRA2+27, MRA2+28, MRA2+29 , MRA2+38, MRA2+42, MRA2+44, MRA2+50, MRA2+51, MRA2+54, MRA2+55, MRA2+56, MRA2+57, MRA2+59*
IBDATE	MOVE+5~, MOVE+13, REMOVE+1~, REMOVE+9, GETAUDIT+2*
IBDIR	MOVE+5~, MOVE+12, MOVE+13, MOVE+15, MOVE+17, REMOVE+1~, GETAUDIT+5
IBEOBCT	SHEOB~, MRA2+3
>> IBEOBDET	SHEOB+29, SHEOB+35
IBERAE	MRA2+35~, MRA2+37*, MRA2+38, MRA2+41
IBI	SHEOB~, SHEOB+7, SHEOB+15, SHEOB+18, SHEOB+20, SHEOB+23, SHEOB+25, SHEOB+31, SHEOB+32, SHEOB+36 , SHEOB+39, SHEOB+49, SHEOB+50, SHEOB+51, MRA2+6, MRA2+36, MRA2+49, MRA2+52, MRA2+59, MOVE+2 , MOVE+4, MOVE+6, MOVE+28, REMOVE+2, REMOVE+3, REMOVE+21, EOBERR+3, EOBERR+7, EOBERR+8, OTHERS~ , OTHERS+5, OTHERS+6
IBJS	MOVE+5~, MOVE+19, REMOVE+1~, REMOVE+15, GETAUDIT+4*
IBJS1	MOVE+5~, MOVE+21, MOVE+22, REMOVE+1~, REMOVE+17, GETAUDIT+4*
IBJS2	MOVE+5~, REMOVE+1~
>> IBLN	SHEOB+28, SHEOB+30, SHEOB+31, SHEOB+33, SHEOB+39, SHEOB+40, SHEOB+51, MRA2+2, MRA2+4, MRA2+8* , MRA2+12, MRA2+16, MRA2+20, MRA2+25, MRA2+30, MRA2+43, MRA2+45, MRA2+46, MRA2+51, MRA2+58 , MRA2+59, MRA2+62, MOVE+10, MOVE+11, MOVE+14, MOVE+16, MOVE+18, MOVE+20, MOVE+23, MOVE+26 , REMOVE+6, REMOVE+8, REMOVE+10, REMOVE+12, REMOVE+14, REMOVE+16, REMOVE+17, REMOVE+19, EOBERR+4, EOBERR+5 , EOBERR+6, EOBERR+10, OTHERS+10*
IBM	SHEOB+5~, SHEOB+7*, SHEOB+8, SHEOB+10, SHEOB+11, SHEOB+13, SHEOB+18, SHEOB+20
IBM1	SHEOB+5~, SHEOB+15*, SHEOB+17, SHEOB+22, MRA2+21, MRA2+23
IBM2	SHEOB+5~, SHEOB+23*, SHEOB+26
IBORIG	MOVE+5~, MOVE+24, MOVE+25, REMOVE+1~, REMOVE+19, GETAUDIT+6*
IBOTH	OTHERS+3~, OTHERS+6, OTHERS+7, OTHERS+8
IBPR	SHEOB+5~, SHEOB+13*, MRA2+17
IBPT	SHEOB+5~, SHEOB+17, SHEOB+18, SHEOB+20*, MRA2+10
IBPY	SHEOB+5~, SHEOB+11, SHEOB+12, MRA2+13
IBSPL	SHEOB~, SHEOB+9, SHEOB+29, MRA2+28
IBST	SHEOB+5~, SHEOB+13, SHEOB+14, MRA2+27, MRA2+52, MRA2+53, MRA2+59*, MRA2+60
IBSTR	SHEOB+5~, SHEOB+30, SHEOB+31, SHEOB+33, SHEOB+40, SHEOB+51, MRA2+4, MRA2+7, MRA2+8, MRA2+9 , MRA2+11, MRA2+12, MRA2+13, MRA2+15, MRA2+16, MRA2+17, MRA2+19, MRA2+20, MRA2+22, MRA2+24* , MRA2+25, MRA2+26, MRA2+27, MRA2+29, MRA2+30, MRA2+38, MRA2+42, MRA2+43, MRA2+44, MRA2+45 , MRA2+51, MRA2+55, MRA2+57, MRA2+58, MRA2+59, MRA2+61, MRA2+62, MOVE+9, MOVE+10, MOVE+13* , MOVE+14, MOVE+15, MOVE+16, MOVE+17, MOVE+18, MOVE+19, MOVE+20, MOVE+22, MOVE+23, MOVE+25* , MOVE+26, REMOVE+5, REMOVE+6, REMOVE+7, REMOVE+8, REMOVE+9, REMOVE+10, REMOVE+11, REMOVE+12, REMOVE+13* , REMOVE+14, REMOVE+15, REMOVE+16, REMOVE+17, REMOVE+19, EOBERR+4, EOBERR+5, EOBERR+10, OTHERS+10*
IBTA	SHEOB+5~, SHEOB+23, SHEOB+25, MRA2+14
IBTRACE	MRA2+35~, MRA2+36*, MRA2+37, MRA2+44
IBTS	SHEOB+5~, SHEOB+26*, MRA2+18
IBTY	SHEOB+5~, SHEOB+8, SHEOB+9, SHEOB+10*, MRA2+6, MRA2+7, MRA2+27, MRA2+34, MRA2+49, MOVE+2
IBUSER	MOVE+5~, MOVE+15, REMOVE+1~, REMOVE+11, GETAUDIT+3*
IEN101	MOVE+3~, MOVE+4, MOVE+6, MOVE+28, OTHERS~, OTHERS+5, OTHERS+6
OTEXT	OTHERS+3~, OTHERS+4, OTHERS+8, OTHERS+9*, OTHERS+10
SUB	REMOVE+1~, REMOVE+2, REMOVE+3, REMOVE+21, OTHERS+3~, OTHERS+4, OTHERS+5*, OTHERS+6
U	SHEOB+8, SHEOB+10, SHEOB+11, SHEOB+12, SHEOB+13, SHEOB+17, SHEOB+18, SHEOB+20, SHEOB+22, SHEOB+23 , SHEOB+26, SHEOB+31, SHEOB+33, SHEOB+36, SHEOB+49, MRA2+6, MRA2+21, MRA2+23, MRA2+36, MRA2+54 , MRA2+56, GETAUDIT+2, GETAUDIT+3, GETAUDIT+4, GETAUDIT+5, GETAUDIT+6, OTHERS+6
VALMCNT	SHEOB+37~, SHEOB+46~
X	SHEOB+5~, SHEOB+6, MRA2+10, MRA2+14, MRA2+18, MRA2+28, MRA2+52, MRA2+54, MRA2+56
Z	SHEOB+5~, SHEOB+32, SHEOB+40, SHEOB+51, EOBERR+1~, EOBERR+7, EOBERR+8
Z0	SHEOB+5~, SHEOB+32*, SHEOB+33

Customize PDF page

Package: Integrated Billing