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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: BAR50R01

Package: IHS Accounts Receivable

Routine: BAR50R01


Information

BAR50R01 ;IHS/DIT/CPC - 20171031 A/R ERA CORRECTED INFORMATION NOTICE

Source Information

Source file <BAR50R01.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
IHS Accounts Receivable 3 CENTER^BAR50R02  SELFL^BAREDP00  EOP^BARUTL  
Kernel 2 (,HOME)^%ZIS  ^%ZISC  
VA Fileman 2 NOW^%DTC  ^DIR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
IHS Accounts Receivable 1 BAR ERA CORRECTIONS RCVD  

Entry Points

Name Comments DBIA/ICR reference
DEVICE ;SET UP DEVICE
HDR ;
FOOTER ;
SUBHDR ;
PNODE ;
CLNUP ;
REPORT
BLD ;
RUNRPT ; EP

External References

Name Field # of Occurrence
NOW^%DTC HDR+5
^%ZIS DEVICE+3
HOME^%ZIS RUNRPT+26
^%ZISC RUNRPT+25
CENTER^BAR50R02 RUNRPT+21, REPORT+10
SELFL^BAREDP00 RUNRPT+5
EOP^BARUTL RUNRPT+3
^DIR FOOTER+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"The file selected is not a 5010 ERA, please select another"
  • Line Location: RUNRPT+7
Function Call: WRITE
  • Prompt: !
  • Line Location: RUNRPT+19
Function Call: WRITE
  • Prompt: !,$G(ENDBNR(I))
  • Line Location: RUNRPT+22
Function Call: WRITE
  • Prompt: !,"No correction information in this ERA",!
  • Line Location: BLD+54
Function Call: WRITE
  • Prompt: !,BARDASH,!
  • Line Location: HDR+9
Function Call: WRITE
  • Prompt: "List Corrections Sent in ERA",?51,BARDTM," Page ",BAR("PG"),!
  • Line Location: HDR+10
Function Call: WRITE
  • Prompt: "Location: ",$P($G(^DIC(4,DUZ(2),0)),U,1),!
  • Line Location: HDR+11
Function Call: WRITE
  • Prompt: "For File Name: ",HSTFILE,!
  • Line Location: HDR+12
Function Call: WRITE
  • Prompt: "For RPMS File: ",$P(^BAREDI("I",DUZ(2),IMPDA,0),U,1),!
  • Line Location: HDR+13
Function Call: WRITE
  • Prompt: BARDASH,!
  • Line Location: HDR+14
Function Call: WRITE
  • Prompt: ?1,"DATA",?10,"LAST NAME",?33,"FIRST NAME",?51,"MI",?57,"SUFFIX",?65,"POLICY NUMBER",!
  • Line Location: SUBHDR+1
Function Call: WRITE
  • Prompt: ?1,"SOURCE",?14,"BILL(s)",!
  • Line Location: SUBHDR+2
Function Call: WRITE
  • Prompt: BARLINE,!
  • Line Location: SUBHDR+3
Function Call: WRITE
  • Prompt: !,BARDASH,!
  • Line Location: SUBHDR+7
Function Call: WRITE
  • Prompt: !,$G(ENDBNR(I))
  • Line Location: REPORT+11
Function Call: WRITE
  • Prompt: !,?14,^TMP($J,"BAR50R01","SORT",PAYER,SORT,"CLAIM",I)
  • Line Location: REPORT+38
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: FOOTER+2
Routine Call
  • %ZIS
  • Line Location:
    • RUNRPT+26
Routine Call
  • DIR
  • Line Location:
    • FOOTER+1
Routine Call
  • %ZIS
  • Line Location:
    • DEVICE+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^BAREDI("I" BLD+3, BLD+4, BLD+6, BLD+8, BLD+9, BLD+10, BLD+11, BLD+15, BLD+16, BLD+19
, BLD+35, BLD+36, BLD+41, BLD+42, BLD+43, BLD+44, BLD+45, BLD+46, BLD+47, BLD+51
, PNODE+1, PNODE+2, PNODE+3, PNODE+4, PNODE+5, PNODE+6, HDR+13
^DD("DD" HDR+7
^DIC(4 - [#4] HDR+11
^TMP($J BLD+1!, BLD+21*, BLD+22*, BLD+23*, BLD+24*, BLD+25*, BLD+26*, BLD+27*, BLD+28*, BLD+29*
, BLD+30*, BLD+34*, BLD+37*, BLD+38*, BLD+40*, BLD+41*, BLD+42*, BLD+43*, BLD+44*, BLD+45*
, BLD+46*, BLD+48*, BLD+52*, BLD+56, PNODE+1*, PNODE+2*, PNODE+3*, PNODE+4*, PNODE+5*, PNODE+6*
, PNODE+8, PNODE+9, PNODE+11*, PNODE+12*, PNODE+13*, PNODE+14*, REPORT+2, REPORT+5, REPORT+7, REPORT+23
, REPORT+26, REPORT+27, REPORT+28, REPORT+29, REPORT+30, REPORT+33, REPORT+34, REPORT+35, REPORT+36, REPORT+37
, REPORT+38, CLNUP+7!

Label References

Name Line Occurrences
BLD RUNRPT+8
CLNUP RUNRPT+27
DEVICE RUNRPT+10
FOOTER RUNRPT+24, REPORT+42, REPORT+46
HDR RUNRPT+16, REPORT+44
PNODE BLD+49, BLD+53
REPORT RUNRPT+17
RUNRPT RUNRPT+7
SUBHDR REPORT+21

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % HDR+6
>> %ZIS DEVICE+2*
>> %ZIS("A" DEVICE+1*
>> BAR("BARTEXT" HDR+1*
>> BAR("COL" SUBHDR+6
>> BAR("HD" HDR+1*
>> BAR("PG" RUNRPT+15*, HDR+2*, HDR+10, CLNUP+1!
>> BAR("PRIVACY" HDR+1*
BARDASH HDR+3*, HDR+9, HDR+14, SUBHDR+7, REPORT+13, CLNUP+1!
>> BARDTM HDR+8*, HDR+10
BARLINE HDR+4*, SUBHDR+3, CLNUP+1!
>> BARSTATC BLD+36*, BLD+37
BARTERM RUNRPT+11, DEVICE+4*, CLNUP+1!
>> BARTYP SUBHDR+5
CLAIM PNODE+9*, PNODE+14, CLNUP+1!
CLMADJ CLNUP+1!
CLMADJ( BLD+16*
CLMPMNT BLD+15*, BLD+33, BLD+34, BLD+35, CLNUP+1!
CLMTST1 CLNUP+1!
CLMTST2 CLNUP+1!
COUNT RUNRPT+9, BLD+2*, BLD+20*, BLD+21, BLD+22, BLD+23, BLD+24, BLD+25, BLD+26, BLD+27
, BLD+28, BLD+29, BLD+30, BLD+34, BLD+37, BLD+38, BLD+40, BLD+41, BLD+42, BLD+43
, BLD+44, BLD+45, BLD+46, BLD+48, BLD+52, BLD+54, PNODE+1, PNODE+2, PNODE+3, PNODE+4
, PNODE+5, PNODE+6, PNODE+8, PNODE+9, PNODE+11, PNODE+12, PNODE+13, PNODE+14, CLNUP+1!
DIR FOOTER+1!
DIR(0 FOOTER+1*
DIROUT RUNRPT+18, REPORT+3, REPORT+6, REPORT+43, REPORT+47, CLNUP+2!
DTOUT RUNRPT+18, REPORT+3, REPORT+6, REPORT+43, REPORT+47, CLNUP+2!
DUOUT RUNRPT+18, REPORT+3, REPORT+6, REPORT+43, REPORT+47, CLNUP+2!
DUZ(2 RUNRPT+1, BLD+3, BLD+4, BLD+6, BLD+8, BLD+9, BLD+10, BLD+11, BLD+15, BLD+16
, BLD+19, BLD+35, BLD+36, BLD+41, BLD+42, BLD+43, BLD+44, BLD+45, BLD+46, BLD+47
, BLD+51, PNODE+1, PNODE+2, PNODE+3, PNODE+4, PNODE+5, PNODE+6, HDR+11, HDR+13
ENDBNR RUNRPT+21, RUNRPT+23!, REPORT+10, REPORT+12!, CLNUP+2!
ENDBNR( RUNRPT+22, REPORT+11
HSTFILE HDR+12, CLNUP+2!
HSTIME CLNUP+2!
I RUNRPT+22*, REPORT+11*, REPORT+14*, REPORT+16*, REPORT+17, REPORT+18, REPORT+38*, CLNUP+3!
ILEAF REPORT+23*, REPORT+24, REPORT+45, CLNUP+3!
ILEAFCLM REPORT+1*, CLNUP+3!
ILEAFTST REPORT+1*, REPORT+24, REPORT+45*, CLNUP+3!
IMP CLNUP+3!
IMPDA BLD+3, BLD+4, BLD+6, BLD+8, BLD+9, BLD+10, BLD+11, BLD+15, BLD+16, BLD+19
, BLD+35, BLD+36, BLD+41, BLD+42, BLD+43, BLD+44, BLD+45, BLD+46, BLD+47, BLD+51
, PNODE+1, PNODE+2, PNODE+3, PNODE+4, PNODE+5, PNODE+6, HDR+13, CLNUP+3!
IND CLNUP+3!
IO RUNRPT+14, FOOTER+1
IO("S" RUNRPT+13, FOOTER+1
IO(0 RUNRPT+12, FOOTER+1
IOF FOOTER+2
IOSL REPORT+40, REPORT+46
J CLNUP+3!
L CLNUP+3!
NOBTCH CLNUP+4!
NODE BLD+2*, BLD+3*, BLD+4, BLD+6, BLD+8, BLD+9, BLD+10, BLD+11, BLD+15, BLD+16
, BLD+19, BLD+41, BLD+42, BLD+43, BLD+44, BLD+45, BLD+46, BLD+47, BLD+51, PNODE+1
, PNODE+2, PNODE+3, PNODE+4, PNODE+5, PNODE+6, CLNUP+4!
NODE30 BLD+35*, BLD+36, CLNUP+4!
PAYER REPORT+1*, REPORT+2*, REPORT+5, REPORT+7, REPORT+23, REPORT+26, REPORT+27, REPORT+28, REPORT+29, REPORT+30
, REPORT+33, REPORT+34, REPORT+35, REPORT+36, REPORT+37, REPORT+38, CLNUP+4!
PAYERADD BLD+5*, BLD+8*, BLD+22, BLD+23, CLNUP+4!
PAYERADD1 CLNUP+4!
PAYERCSZ BLD+5*, BLD+9*, BLD+24, BLD+25, BLD+26, CLNUP+4!
PAYERNAME BLD+5*, BLD+6*, BLD+7*, BLD+21, BLD+22, BLD+23, BLD+24, BLD+25, BLD+26, BLD+27
, BLD+28, BLD+29, BLD+30, BLD+34, BLD+37, BLD+38, BLD+40, BLD+41, BLD+42, BLD+43
, BLD+44, BLD+45, BLD+46, BLD+48, BLD+52, BLD+56, PNODE+1, PNODE+2, PNODE+3, PNODE+4
, PNODE+5, PNODE+6, PNODE+8, PNODE+9, PNODE+11, PNODE+12, PNODE+13, PNODE+14, CLNUP+5!
PAYEROTH BLD+5*, BLD+11*, BLD+28, BLD+29, BLD+30, CLNUP+5!
PAYERTEL BLD+5*, BLD+10*, BLD+27, CLNUP+5!
PLEAF REPORT+1*, REPORT+7*, REPORT+8, REPORT+14, REPORT+19, REPORT+20, REPORT+22, CLNUP+5!
PLEAFTST REPORT+1*, REPORT+8, REPORT+9, REPORT+10, REPORT+22*, CLNUP+5!
PNAME1 REPORT+14*, REPORT+15, REPORT+16, REPORT+17, REPORT+18*, REPORT+19, CLNUP+5!
PNAME2 REPORT+14*, REPORT+18*, REPORT+20, CLNUP+5!
POP DEVICE+4, CLNUP+5!
RPTLOOK RUNRPT+4~*, CLNUP+6!
>> SORT BLD+55*, BLD+56*, BLD+57, BLD+58, PNODE+8*, PNODE+11, PNODE+12, PNODE+13, PNODE+14, REPORT+4*
, REPORT+5*, REPORT+7, REPORT+23, REPORT+26, REPORT+27, REPORT+28, REPORT+29, REPORT+30, REPORT+33, REPORT+34
, REPORT+35, REPORT+36, REPORT+37, REPORT+38
STEST BLD+55*, BLD+57, BLD+58*, CLNUP+6!
TRDA CLNUP+6!
TRNAME RUNRPT+7, CLNUP+6!
U BLD+36, HDR+11, HDR+13, REPORT+10, REPORT+14, REPORT+19, REPORT+20, REPORT+26, REPORT+27, REPORT+28
, REPORT+29, REPORT+30, REPORT+33, REPORT+34, REPORT+35, REPORT+36, REPORT+37
X CLNUP+6!
>> Y RUNRPT+6, HDR+6*, HDR+8
>> ZTQUEUED FOOTER+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All