Routine: BAREDEB

Package	Total	Call Graph
IHS Accounts Receivable	4	$$OVERIDE^BAR50EP1 ADDREAS^BAREDP04 $$BARXCHK^BAREDP09 $$IHSNEGB^BARUFUT
VA Fileman	2	H^%DTC $$GET1^DIQ

Package	Total	Caller Graph
IHS Accounts Receivable	1	BAREDEP

Entry Points

Name	Comments	DBIA/ICR reference
CHECKTOT(CHECKTOT)	;CHECK ERA CHECK TOTALS AGAINST BATCH/ITEM TOTAL
GETIEN(BARX,BARBILL)	;EP - FIND AR BILL IEN
NEGBAL(IMPDA,TYPE)	;EP - CHECK FOR NEGATIVE BALANCE W/IN ERA AND IF POSTED AGAINST RPMS
GETITMTO(ERACHECK,ERATOTAL,ERRORS,BRP02)	;EP - GIVEN ERACHECK GET BATCH ITEM TOTALS FOR ERA CHECK ;BAR1.86 SCR119 IHS/SD/TPF
DONOTPR(IMPDA,CLMDA)	;CALLED FROM 3 DIFFERENT PLACES

External References

Name	Field # of Occurrence
H^%DTC	GETITMTO+2, GETITMTO+16
$$OVERIDE^BAR50EP1	DONOTPR+2
ADDREAS^BAREDP04	NEGBAL+85, CHECKTOT+27
$$BARXCHK^BAREDP09	GETITMTO+4
$$IHSNEGB^BARUFUT	NEGBAL+74, GETITMTO+26
$$GET1^DIQ	NEGBAL+38, NEGBAL+53, NEGBAL+59, NEGBAL+60, NEGBAL+61, GETITMTO+14, GETITMTO+15, GETITMTO+23

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!!,"CHECKING FOR NEGATIVE BALANCE IF MATCHED ERA CLAIMS ARE POSTED..." Line Location: NEGBAL+2
Function Call: WRITE	Prompt: !!,CLMCNT,?4,"ERA BILL: ",BARBILL Line Location: NEGBAL+29
Function Call: WRITE	Prompt: ?41,"CURRENT BILL AMT(RPMS): ",$J($FN(BARBAL,",",2),14) Line Location: NEGBAL+40
Function Call: WRITE	Prompt: !?3,"A/R CAT:",$E(BARCAT,1,11) Line Location: NEGBAL+62
Function Call: WRITE	Prompt: ?23,"A/R RSN:",$E(BARREAS,1,27) Line Location: NEGBAL+63
Function Call: WRITE	Prompt: ?60,"ADJ:",$J($FN(BARAMT,",",2),15) Line Location: NEGBAL+64
Function Call: WRITE	Prompt: !,?28,"BILL BALANCE IF ERA CLAIM IS POSTED: ",$J($FN(BARBAL-BARTOT,",",2),14) Line Location: NEGBAL+70
Function Call: WRITE	Prompt: ! Line Location: CHECKTOT+5
Function Call: WRITE	Prompt: !?2," Matched Bills: ",$J(+$G(BARCNT("MATCHED")),5)," for $",$J($FN(+$G(BARAMT("MATCHED")),",",2),12) Line Location: CHECKTOT+6
Function Call: WRITE	Prompt: !?2,"Unmatched Bills: ",$J(+$G(BARCNT("UNMATCHED")),5)," for $",$J($FN(+$G(BARAMT("UNMATCHED")),",",2),12) Line Location: CHECKTOT+7
Function Call: WRITE	Prompt: !?2," Total Bills: ",$J(+$G(BARTOT("CNT")),5)," for $",$J($FN(+$G(BARTOT("AMT")),",",2),12) Line Location: CHECKTOT+8
Function Call: WRITE	Prompt: ! Line Location: CHECKTOT+9
Function Call: WRITE	Prompt: !?2,"CHECKING ERA CHECK TOTALS FOR ",ERACHECK," TOTAL ",$J($FN(CHECKTOT(ERACHECK),",",2),15) Line Location: CHECKTOT+15
Function Call: WRITE	Prompt: !,"NO BATCH FOUND FOR ERA CHECK" Line Location: GETITMTO+9
Function Call: WRITE	Prompt: ! Line Location: GETITMTO+10
Function Call: WRITE	Prompt: !,BARMSG Line Location: GETITMTO+20
Function Call: WRITE	Prompt: !,?2,"CHECKING BATCH: ",BARCB Line Location: GETITMTO+22
Function Call: WRITE	Prompt: " POSTING BALANCE: ",BPOSTBAL Line Location: GETITMTO+24
Function Call: WRITE	Prompt: !,"ERA TOTAL PAYMENTS AND ADJUSTMENTS OF ",ERATOTAL Line Location: GETITMTO+29
Function Call: WRITE	Prompt: !,"IS GREATER THAN BATCH POSTING BALANCE OF ",BPOSTBAL Line Location: GETITMTO+30

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^BARBL(2906 - [#90050.01]	GET1^DIQ
^BARCOL(2906 - [#90051.01]	GET1^DIQ
90056.0208	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^BARBL(	GETIEN+3, GETIEN+4
^BARCOL(	GETITMTO+5, GETITMTO+12
^BAREDI("I"	NEGBAL+12, NEGBAL+13, NEGBAL+20, NEGBAL+23, NEGBAL+24, NEGBAL+25, NEGBAL+26, NEGBAL+27, NEGBAL+34, NEGBAL+50 , NEGBAL+51, NEGBAL+57, NEGBAL+58, NEGBAL+78, CHECKTOT+13, CHECKTOT+14, CHECKTOT+20, DONOTPR+3, DONOTPR+4, DONOTPR+5
^XTMP("BAR-LIST"	NEGBAL+11!, NEGBAL+14*, NEGBAL+16

Label References

Name	Line Occurrences
$$DONOTPR	NEGBAL+43, NEGBAL+79, CHECKTOT+21
$$GETIEN	NEGBAL+31
CHECKTOT	NEGBAL+89
GETITMTO	CHECKTOT+17

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%H	GETITMTO+1~, GETITMTO+3, GETITMTO+17
ADJDA	NEGBAL+3~, NEGBAL+56, NEGBAL+57, NEGBAL+58, NEGBAL+59, NEGBAL+60, NEGBAL+61
ALLADJ	NEGBAL+3~, NEGBAL+5, NEGBAL+68
ALLPAY	CHECKTOT+1~
BARADJ	NEGBAL+3~, NEGBAL+22, NEGBAL+42, NEGBAL+67*, NEGBAL+69
BARAMT	NEGBAL+8!, NEGBAL+51, NEGBAL+52, NEGBAL+53, NEGBAL+55, NEGBAL+58, NEGBAL+64, NEGBAL+67, NEGBAL+68
BARAMT("MATCHED"	NEGBAL+26*, CHECKTOT+6
BARAMT("UNMATCHED"	NEGBAL+27*, CHECKTOT+7
BARANS	NEGBAL+3~
>> BARBAL	NEGBAL+5, NEGBAL+38, NEGBAL+39*, NEGBAL+40, NEGBAL+70, NEGBAL+72
>> BARBIEN	GETIEN+2, GETIEN+4, GETIEN+6, GETIEN+9*, GETIEN+10
BARBILL	NEGBAL+3~, NEGBAL+7, NEGBAL+13, NEGBAL+14, NEGBAL+15, NEGBAL+16, NEGBAL+20, NEGBAL+29, NEGBAL+31, NEGBAL+53 , NEGBAL+78, GETIEN~, GETIEN+3, GETIEN+4
>> BARBLIEN	NEGBAL+30, NEGBAL+31, NEGBAL+32, NEGBAL+36, NEGBAL+38
>> BARCAT	NEGBAL+59*, NEGBAL+62
>> BARCATN	NEGBAL+60*, NEGBAL+65, NEGBAL+66
BARCB	GETITMTO+13~, GETITMTO+14*, GETITMTO+22
BARCBDT	GETITMTO+13~, GETITMTO+17*, GETITMTO+18
>> BARCHK	NEGBAL+12
BARCNT	NEGBAL+8!, GETIEN+2, GETIEN+5, GETIEN+7, GETIEN+8
BARCNT("MATCHED"	NEGBAL+26*, CHECKTOT+6
BARCNT("UNMATCHED"	NEGBAL+27*, CHECKTOT+7
BARCOLDA	GETITMTO+1~, GETITMTO+5, GETITMTO+6, GETITMTO+7, GETITMTO+12, GETITMTO+14, GETITMTO+15, GETITMTO+23
>> BARDBG	NEGBAL+2, NEGBAL+29, NEGBAL+40, NEGBAL+53, NEGBAL+62, NEGBAL+63, NEGBAL+64, NEGBAL+70, CHECKTOT+15, GETITMTO+9 , GETITMTO+22, GETITMTO+24, GETITMTO+28
BARITMDA	GETITMTO+1~
BARPAY	NEGBAL+3~, NEGBAL+18, NEGBAL+22, NEGBAL+52*, NEGBAL+69
BARREAS	NEGBAL+4~, NEGBAL+61*, NEGBAL+63
>> BARSTAT	NEGBAL+24*, NEGBAL+26, NEGBAL+27, NEGBAL+28, NEGBAL+73
BARTMP	GETIEN+1~
BARTMP(	GETIEN+6*
BARTMP(""	GETIEN+9
BARTODAY	GETITMTO+1~, GETITMTO+3*, GETITMTO+18
BARTOT	NEGBAL+3~, NEGBAL+5, NEGBAL+8!, NEGBAL+22, NEGBAL+69*, NEGBAL+70, NEGBAL+72
BARTOT("AMT"	NEGBAL+25*, CHECKTOT+8
BARTOT("CNT"	NEGBAL+25*, CHECKTOT+8
BARTYPE	NEGBAL+4~
BARX	GETIEN~, GETIEN+3*, GETIEN+4
BARXCHK	GETITMTO+1~, GETITMTO+4*, GETITMTO+5, GETITMTO+12
BILLCHOS	NEGBAL+4~, NEGBAL+19, NEGBAL+23, NEGBAL+30, NEGBAL+53
>> BPOSTBAL	GETITMTO+11, GETITMTO+23, GETITMTO+24, GETITMTO+25, GETITMTO+30
BPR02	CHECKTOT+2~, CHECKTOT+14*, CHECKTOT+17, GETITMTO+6
BRP02	GETITMTO~
CHECKTOT	NEGBAL+3~, NEGBAL+6!, NEGBAL+89, CHECKTOT~
CHECKTOT(	NEGBAL+55*, CHECKTOT+11, CHECKTOT+15, CHECKTOT+17
CLM	NEGBAL+4~
>> CLMCNT	NEGBAL+9, NEGBAL+21, NEGBAL+29
CLMDA	NEGBAL+4~, NEGBAL+10, NEGBAL+12, NEGBAL+13, NEGBAL+14, NEGBAL+19, NEGBAL+20, NEGBAL+23, NEGBAL+24, NEGBAL+25 , NEGBAL+26, NEGBAL+27, NEGBAL+34, NEGBAL+43, NEGBAL+50, NEGBAL+51, NEGBAL+57, NEGBAL+58, NEGBAL+59, NEGBAL+60 , NEGBAL+61, NEGBAL+79, CHECKTOT+1~, CHECKTOT+12, CHECKTOT+13, CHECKTOT+14, CHECKTOT+19, CHECKTOT+20, CHECKTOT+21, CHECKTOT+27 , DONOTPR~, DONOTPR+2, DONOTPR+3, DONOTPR+4, DONOTPR+5
CLSTATUS	CHECKTOT+1~, DONOTPR+1~, DONOTPR+4, DONOTPR+5, DONOTPR+6
DT	GETITMTO+2
DUZ(2	NEGBAL+11, NEGBAL+12, NEGBAL+13, NEGBAL+14, NEGBAL+16, NEGBAL+20, NEGBAL+23, NEGBAL+24, NEGBAL+25, NEGBAL+26 , NEGBAL+27, NEGBAL+34, NEGBAL+50, NEGBAL+51, NEGBAL+57, NEGBAL+58, NEGBAL+74, NEGBAL+78, CHECKTOT+13, CHECKTOT+14 , CHECKTOT+20, GETIEN+3, GETIEN+4, GETITMTO+5, GETITMTO+12, GETITMTO+26, DONOTPR+3, DONOTPR+4, DONOTPR+5
ERACHECK	NEGBAL+4~, NEGBAL+50, NEGBAL+55, CHECKTOT+1~, CHECKTOT+3, CHECKTOT+11*, CHECKTOT+13, CHECKTOT+15, CHECKTOT+17, CHECKTOT+20 , GETITMTO~, GETITMTO+4
ERATOTAL	GETITMTO~, GETITMTO+25, GETITMTO+29
ERRORS	NEGBAL+3~, NEGBAL+4~, NEGBAL+76, NEGBAL+85, NEGBAL+86!, CHECKTOT+1~, CHECKTOT+17, CHECKTOT+18, CHECKTOT+27, CHECKTOT+28! , GETITMTO~
ERRORS("BL NF	" , NEGBAL+35*
ERRORS("DUPB"	NEGBAL+37*, NEGBAL+73
ERRORS("ERA >	ITM" , GETITMTO+27*
ERRORS("NB"	GETITMTO+8*
ERRORS("NEGR"	NEGBAL+75*
IMPDA	NEGBAL~, NEGBAL+12, NEGBAL+13, NEGBAL+20, NEGBAL+23, NEGBAL+24, NEGBAL+25, NEGBAL+26, NEGBAL+27, NEGBAL+34 , NEGBAL+43, NEGBAL+50, NEGBAL+51, NEGBAL+57, NEGBAL+58, NEGBAL+59, NEGBAL+60, NEGBAL+61, NEGBAL+78, NEGBAL+79 , NEGBAL+85, CHECKTOT+13, CHECKTOT+14, CHECKTOT+20, CHECKTOT+21, CHECKTOT+27, DONOTPR~, DONOTPR+3, DONOTPR+4, DONOTPR+5
ITEMTOT	GETITMTO+1~
TCLMDA	NEGBAL+4~, NEGBAL+77, NEGBAL+78, NEGBAL+85
TYPE	NEGBAL~, NEGBAL+1
U	NEGBAL+13, NEGBAL+23, NEGBAL+24, NEGBAL+25, NEGBAL+26, NEGBAL+27, NEGBAL+50, NEGBAL+51, NEGBAL+58, CHECKTOT+14 , DONOTPR+3, DONOTPR+4, DONOTPR+5, DONOTPR+6
X	GETITMTO+2, GETITMTO+13~, GETITMTO+15

Customize PDF page

Package: IHS Accounts Receivable

Routine: BAREDEB

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: