Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: BAR50EB

Package: IHS Accounts Receivable

Routine: BAR50EB


Information

BAR50EB ; IHS/SD/TPF - AR ERA BALANCE CHECKER ; 01/28/2009

Source Information

Source file <BAR50EB.m>

Call Graph

Call Graph Total: 6

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

Caller Graph

Caller Graph Total: 7

Package Total Caller Graph
IHS Accounts Receivable 7 BAR50EP  BAR50P04  BAR50P05  BAR50P08  BAREDP04  BAREDP05  BAREDP08  

Entry Points

Name Comments DBIA/ICR reference
GETIT()
CHECKTOT(CHECKTOT) ;CHECK ERA CHECK TOTALS AGAINST BATCH/ITEM TOTAL
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 ;BAR*1.8*6 SCR119 IHS/SD/TPF
DONOTPR(IMPDA,CLMDA) ;CALLED FROM 3 DIFFERENT PLACES
GETIEN(BARX,BARBILL) ;EP - FIND AR BILL IEN
XGETIEN(BARX,BARBILL) ;NEW CODEEP - FIND AR BILL IEN 12/10/2013

External References

Name Field # of Occurrence
H^%DTC GETITMTO+16
$$OVERIDE^BAR50EP1 DONOTPR+2
ADDREAS^BAR50P04 NEGBAL+78, CHECKTOT+24
$$BARXCHK^BAREDP09 GETITMTO+4
$$IHSNEGB^BARUFUT NEGBAL+76, GETITMTO+26
$$GET1^DIQ NEGBAL+38, NEGBAL+53, NEGBAL+60, NEGBAL+61, NEGBAL+62, 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+30
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+63
Function Call: WRITE
  • Prompt: ?23,"A/R RSN:",$E(BARREAS,1,27)
  • Line Location: NEGBAL+64
Function Call: WRITE
  • Prompt: ?60,"ADJ:",$J($FN(BARAMT,",",2),15)
  • Line Location: NEGBAL+65
Function Call: WRITE
  • Prompt: !,?28,"BILL BALANCE IF ERA CLAIM IS POSTED: ",$J($FN(BARBAL-BARTOT,",",2),14)
  • Line Location: NEGBAL+71
Function Call: WRITE
  • Prompt: !
  • Line Location: CHECKTOT+3
Function Call: WRITE
  • Prompt: !?2," Matched Bills: ",$J(+$G(BARCNT("MATCHED")),5)," for $",$J($FN(+$G(BARAMT("MATCHED")),",",2),12)
  • Line Location: CHECKTOT+4
Function Call: WRITE
  • Prompt: !?2,"Unmatched Bills: ",$J(+$G(BARCNT("UNMATCHED")),5)," for $",$J($FN(+$G(BARAMT("UNMATCHED")),",",2),12)
  • Line Location: CHECKTOT+5
Function Call: WRITE
  • Prompt: !?2," Total Bills: ",$J(+$G(BARTOT("CNT")),5)," for $",$J($FN(+$G(BARTOT("AMT")),",",2),12)
  • Line Location: CHECKTOT+6
Function Call: WRITE
  • Prompt: !
  • Line Location: CHECKTOT+7
Function Call: WRITE
  • Prompt: !?2,"CHECKING ERA CHECK TOTALS FOR ",ERACHECK," TOTAL ",$J($FN(CHECKTOT(ERACHECK),",",2),15)
  • Line Location: CHECKTOT+12
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

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, XGETIEN+4, XGETIEN+6, XGETIEN+8, XGETIEN+10, GETIT+2
^BARCOL( GETITMTO+5, GETITMTO+12
^BAREDI("I" NEGBAL+12, NEGBAL+13, NEGBAL+21, NEGBAL+24, NEGBAL+25, NEGBAL+26, NEGBAL+27, NEGBAL+28, NEGBAL+34, NEGBAL+50
, NEGBAL+51, NEGBAL+56, NEGBAL+58, NEGBAL+59, NEGBAL+73, CHECKTOT+10, CHECKTOT+11, CHECKTOT+17, DONOTPR+3, DONOTPR+4
, DONOTPR+5
^XTMP("BAR-LIST" NEGBAL+11!, NEGBAL+14*, NEGBAL+16

Label References

Name Line Occurrences
$$DONOTPR NEGBAL+43, CHECKTOT+18
$$GETIEN NEGBAL+32
$$GETIT XGETIEN+4, XGETIEN+6, XGETIEN+8, XGETIEN+10
CHECKTOT NEGBAL+90
GETITMTO CHECKTOT+14

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%H GETITMTO+1~, GETITMTO+17
ADJDA NEGBAL+3~, NEGBAL+57*, NEGBAL+58*, NEGBAL+59, NEGBAL+60, NEGBAL+61, NEGBAL+62
ALLADJ NEGBAL+3~, NEGBAL+5*, NEGBAL+69*
ALLPAY CHECKTOT+1~
BARADJ NEGBAL+3~, NEGBAL+23*, NEGBAL+42*, NEGBAL+68*, NEGBAL+70
BARAMT NEGBAL+8!, NEGBAL+51*, NEGBAL+52, NEGBAL+53, NEGBAL+56, NEGBAL+59*, NEGBAL+65, NEGBAL+68, NEGBAL+69
BARAMT("MATCHED" NEGBAL+27*, CHECKTOT+4
BARAMT("UNMATCHED" NEGBAL+28*, CHECKTOT+5
BARANS NEGBAL+3~
>> BARBAL NEGBAL+5*, NEGBAL+38*, NEGBAL+39*, NEGBAL+40, NEGBAL+71, NEGBAL+74
BARBIEN GETIEN+2*, GETIEN+4*, GETIEN+6, GETIEN+9*, GETIEN+10, GETIT~, GETIT+2*, GETIT+4, GETIT+7*, GETIT+8
BARBILL NEGBAL+3~, NEGBAL+7*, NEGBAL+13*, NEGBAL+14, NEGBAL+15*, NEGBAL+16*, NEGBAL+21, NEGBAL+30, NEGBAL+32, NEGBAL+53
, GETIEN~, GETIEN+3, GETIEN+4, XGETIEN~, XGETIEN+3, XGETIEN+5, XGETIEN+7, XGETIEN+9
>> BARBLIEN NEGBAL+31*, NEGBAL+32*, NEGBAL+33, NEGBAL+36, NEGBAL+38
>> BARCAT NEGBAL+60*, NEGBAL+63
>> BARCATN NEGBAL+61*, NEGBAL+66, NEGBAL+67
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, GETIT+1*, GETIT+3*, GETIT+5, GETIT+6
BARCNT("MATCHED" NEGBAL+27*, CHECKTOT+4
BARCNT("UNMATCHED" NEGBAL+28*, CHECKTOT+5
BARCOLDA GETITMTO+1~, GETITMTO+5*, GETITMTO+6, GETITMTO+7, GETITMTO+12*, GETITMTO+14, GETITMTO+15, GETITMTO+23
>> BARDBG NEGBAL+2, NEGBAL+30, NEGBAL+40, NEGBAL+53, NEGBAL+63, NEGBAL+64, NEGBAL+65, NEGBAL+71, CHECKTOT+12, GETITMTO+9
, GETITMTO+22, GETITMTO+24, GETITMTO+28
BARITMDA GETITMTO+1~
BARPAY NEGBAL+3~, NEGBAL+18*, NEGBAL+23*, NEGBAL+52*, NEGBAL+70
BARREAS NEGBAL+4~, NEGBAL+62*, NEGBAL+64
BARRET XGETIEN+1~, XGETIEN+2*, XGETIEN+4*, XGETIEN+6*, XGETIEN+8*, XGETIEN+10*, XGETIEN+11
>> BARSTAT NEGBAL+25*, NEGBAL+27, NEGBAL+28, NEGBAL+29, NEGBAL+56, NEGBAL+73, NEGBAL+75
BARTMP GETIEN+1~, XGETIEN+1~
BARTMP( GETIEN+6*, GETIT+4*
BARTMP("" GETIEN+9, GETIT+7
BARTODAY GETITMTO+1~, GETITMTO+3*, GETITMTO+18
BARTOT NEGBAL+3~, NEGBAL+5*, NEGBAL+8!, NEGBAL+23*, NEGBAL+70*, NEGBAL+71, NEGBAL+74
BARTOT("AMT" NEGBAL+26*, CHECKTOT+6
BARTOT("CNT" NEGBAL+26*, CHECKTOT+6
BARTYPE NEGBAL+4~
BARX GETIEN~, GETIEN+3*, GETIEN+4, XGETIEN~, XGETIEN+3*, XGETIEN+4, XGETIEN+5*, XGETIEN+6, XGETIEN+7*, XGETIEN+8
, XGETIEN+9*, XGETIEN+10, GETIT+2
BARXBILL XGETIEN+1~, XGETIEN+3*, XGETIEN+4, XGETIEN+5*, XGETIEN+6, XGETIEN+7*, XGETIEN+8, XGETIEN+9*, XGETIEN+10, GETIT+2
BARXCHK GETITMTO+1~, GETITMTO+4*, GETITMTO+5, GETITMTO+12
BILLCHOS NEGBAL+4~, NEGBAL+20*, NEGBAL+24*, NEGBAL+31, NEGBAL+53
>> BPOSTBAL GETITMTO+11*, GETITMTO+23*, GETITMTO+24, GETITMTO+25, GETITMTO+30
BPR02 CHECKTOT+2~, CHECKTOT+11*, CHECKTOT+14, GETITMTO+6
BRP02 GETITMTO~
CHECKTOT NEGBAL+3~, NEGBAL+6!, NEGBAL+90, CHECKTOT~
CHECKTOT( NEGBAL+56*, CHECKTOT+8, CHECKTOT+12, CHECKTOT+14
CLM NEGBAL+4~
>> CLMCNT NEGBAL+9*, NEGBAL+17*, NEGBAL+22*, NEGBAL+30
CLMDA NEGBAL+4~, NEGBAL+10*, NEGBAL+12*, NEGBAL+13, NEGBAL+14, NEGBAL+20*, NEGBAL+21*, NEGBAL+24, NEGBAL+25, NEGBAL+26
, NEGBAL+27, NEGBAL+28, NEGBAL+34, NEGBAL+43, NEGBAL+50, NEGBAL+51, NEGBAL+56, NEGBAL+58, NEGBAL+59, NEGBAL+60
, NEGBAL+61, NEGBAL+62, NEGBAL+73, NEGBAL+78, CHECKTOT+1~, CHECKTOT+9*, CHECKTOT+10*, CHECKTOT+11, CHECKTOT+16*, CHECKTOT+17*
, CHECKTOT+18, CHECKTOT+24, DONOTPR~, DONOTPR+2, DONOTPR+3, DONOTPR+4, DONOTPR+5
CLSTATUS CHECKTOT+1~, DONOTPR+1~, DONOTPR+4*, DONOTPR+5*, DONOTPR+6
DUZ(2 NEGBAL+11, NEGBAL+12, NEGBAL+13, NEGBAL+14, NEGBAL+16, NEGBAL+21, NEGBAL+24, NEGBAL+25, NEGBAL+26, NEGBAL+27
, NEGBAL+28, NEGBAL+34, NEGBAL+50, NEGBAL+51, NEGBAL+56, NEGBAL+58, NEGBAL+59, NEGBAL+73, NEGBAL+76, CHECKTOT+10
, CHECKTOT+11, CHECKTOT+17, GETIEN+3, GETIEN+4, XGETIEN+4, XGETIEN+6, XGETIEN+8, XGETIEN+10, GETIT+2, GETITMTO+5
, GETITMTO+12, GETITMTO+26, DONOTPR+3, DONOTPR+4, DONOTPR+5
ERACHECK NEGBAL+4~, NEGBAL+50*, NEGBAL+56, CHECKTOT+1~, CHECKTOT+8*, CHECKTOT+10, CHECKTOT+12, CHECKTOT+14, CHECKTOT+17, GETITMTO~
, GETITMTO+4
ERATOTAL GETITMTO~, GETITMTO+25, GETITMTO+29
ERRORS NEGBAL+3~, NEGBAL+4~, NEGBAL+78, NEGBAL+88!, CHECKTOT+1~, CHECKTOT+14, CHECKTOT+15, CHECKTOT+24, CHECKTOT+25!, GETITMTO~
ERRORS("BL NF " , NEGBAL+35*
ERRORS("DUPB" NEGBAL+37*, NEGBAL+75
ERRORS("ERA > ITM" , GETITMTO+27*
ERRORS("NB" GETITMTO+8*
ERRORS("NEGR" NEGBAL+77*
IMPDA NEGBAL~, NEGBAL+12, NEGBAL+13, NEGBAL+21, NEGBAL+24, NEGBAL+25, NEGBAL+26, NEGBAL+27, NEGBAL+28, NEGBAL+34
, NEGBAL+43, NEGBAL+50, NEGBAL+51, NEGBAL+56, NEGBAL+58, NEGBAL+59, NEGBAL+60, NEGBAL+61, NEGBAL+62, NEGBAL+73
, NEGBAL+78, CHECKTOT+10, CHECKTOT+11, CHECKTOT+17, CHECKTOT+18, CHECKTOT+24, DONOTPR~, DONOTPR+3, DONOTPR+4, DONOTPR+5
ITEMTOT GETITMTO+1~
TCLMDA NEGBAL+4~
TYPE NEGBAL~, NEGBAL+1
U NEGBAL+13, NEGBAL+24, NEGBAL+25, NEGBAL+26, NEGBAL+27, NEGBAL+28, NEGBAL+50, NEGBAL+51, NEGBAL+59, CHECKTOT+11
, DONOTPR+3, DONOTPR+4, DONOTPR+5, DONOTPR+6
X GETITMTO+13~, GETITMTO+15*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All