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: BARRTAR2

Package: IHS Accounts Receivable

Routine: BARRTAR2


Information

BARRTAR2 ; IHS/SD/LSL - Transaction report ;08/20/2008

Source Information

Source file <BARRTAR2.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
IHS Accounts Receivable 3 WHD^BARRHD  PAZ^BARRUTL  EOP^BARUTL  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
IHS Accounts Receivable 2 BARRTAR  BARRTAR3  

Entry Points

Name Comments DBIA/ICR reference
SUB4 ;
; Totals by Sort type
SUB5 ;
; totals by A/R Account
SUB2 ;
; Totals by Collection Batch
SUB ;
; Totals by Visit location.
DETAIL ; EP
; Print Detail
TOT ;
; Report (a/r clerk) totals
SUBHD ;
; If A/R clerk specified
HDB ; EP
; Page and column header
HD ; EP
SUB3 ;
; Totals by Collection Batch Item

External References

Name Field # of Occurrence
WHD^BARRHD HDB+4
PAZ^BARRUTL HD+1
EOP^BARUTL DETAIL+25

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!!!!?25,"*** NO DATA TO PRINT ***"
  • Line Location: DETAIL+24
Function Call: WRITE
  • Prompt: !,BARDASH
  • Line Location: DETAIL+49
Function Call: WRITE
  • Prompt: !
  • Line Location: DETAIL+51
Function Call: WRITE
  • Prompt: !?10,"Visit Location.......: ",$P(BAR("TXT"),U,2)
  • Line Location: DETAIL+52
Function Call: WRITE
  • Prompt: !,BARDASH
  • Line Location: DETAIL+59
Function Call: WRITE
  • Prompt: !
  • Line Location: DETAIL+61
Function Call: WRITE
  • Prompt: !?10,"Collection Batch.....: "
  • Line Location: DETAIL+62
Function Call: WRITE
  • Prompt: $P(^BARCOL($P(BAR("TXT"),U,8),$P(BAR("TXT"),U,3),0),U)
  • Line Location: DETAIL+63
Function Call: WRITE
  • Prompt: $P($G(^BARCOL($P(BAR("TXT"),U,8),$P(BAR("TXT"),U,3),0)),U)
  • Line Location: DETAIL+65
Function Call: WRITE
  • Prompt: $P(BAR("TXT"),U,3)
  • Line Location: DETAIL+66
Function Call: WRITE
  • Prompt: !,BARDASH
  • Line Location: DETAIL+73
Function Call: WRITE
  • Prompt: !
  • Line Location: DETAIL+75
Function Call: WRITE
  • Prompt: !?10,"Collection Batch Item: "
  • Line Location: DETAIL+76
Function Call: WRITE
  • Prompt: $P(^BARCOL($P(BAR("TXT"),U,8),BAR("B"),1,$P(BAR("TXT"),U,4),0),U)
  • Line Location: DETAIL+77
Function Call: WRITE
  • Prompt: $P(^BARCOL($P(BAR("TXT"),U,8),BAR("B"),1,$P(BAR("TXT"),U,4),0),U)
  • Line Location: DETAIL+79
Function Call: WRITE
  • Prompt: $P(BAR("TXT"),U,4)
  • Line Location: DETAIL+80
Function Call: WRITE
  • Prompt: !,BARDASH
  • Line Location: DETAIL+87
Function Call: WRITE
  • Prompt: !
  • Line Location: DETAIL+89
Function Call: WRITE
  • Prompt: !?10,"Clinic Type..........: "
  • Line Location: DETAIL+91
Function Call: WRITE
  • Prompt: "NO CLINIC"
  • Line Location: DETAIL+92
Function Call: WRITE
  • Prompt: $P(^DIC(40.7,$P(BAR("TXT"),U,5),0),U)
  • Line Location: DETAIL+93
Function Call: WRITE
  • Prompt: !?10,"Visit Type...........: "
  • Line Location: DETAIL+95
Function Call: WRITE
  • Prompt: "NO VISIT TYPE"
  • Line Location: DETAIL+96
Function Call: WRITE
  • Prompt: $P($G(^ABMDVTYP($P(BAR("TXT"),U,5),0)),U)
  • Line Location: DETAIL+97
Function Call: WRITE
  • Prompt: !,BARDASH
  • Line Location: DETAIL+104
Function Call: WRITE
  • Prompt: !
  • Line Location: DETAIL+106
Function Call: WRITE
  • Prompt: !?10,"A/R Account..........: ",$P(BAR("TXT"),U,6),!
  • Line Location: DETAIL+107
Function Call: WRITE
  • Prompt: !,$E(BAR(1),1,14)
  • Line Location: DETAIL+109
Function Call: WRITE
  • Prompt: ?15,$J($FN(BAR(2),",",2),10)
  • Line Location: DETAIL+110
Function Call: WRITE
  • Prompt: ?26,$J($FN(BAR(3),",",2),10)
  • Line Location: DETAIL+111
Function Call: WRITE
  • Prompt: ?37,$J($FN(BAR(4),",",2),10)
  • Line Location: DETAIL+112
Function Call: WRITE
  • Prompt: ?48,$J($FN(BAR(5),",",2),10)
  • Line Location: DETAIL+113
Function Call: WRITE
  • Prompt: ?59,$J($FN(BAR(6),",",2),10)
  • Line Location: DETAIL+114
Function Call: WRITE
  • Prompt: ?70,$J($FN(BAR(7),",",2),10)
  • Line Location: DETAIL+115
Function Call: WRITE
  • Prompt: !,BARDASH
  • Line Location: DETAIL+124
Function Call: WRITE
  • Prompt: !,BAR("DASH")
  • Line Location: HDB+7
Function Call: WRITE
  • Prompt: !!,"A/R Entry Clerk: ",$P(^VA(200,$P(BAR("TXT"),U),0),U)
  • Line Location: SUBHD+4
Function Call: WRITE
  • Prompt: !,"Location Tot:"
  • Line Location: SUB+3
Function Call: WRITE
  • Prompt: ?15,$J($FN(BAR("PATOT1"),",",2),10)
  • Line Location: SUB+4
Function Call: WRITE
  • Prompt: ?26,$J($FN(BAR("PCTOT1"),",",2),10)
  • Line Location: SUB+5
Function Call: WRITE
  • Prompt: ?37,$J($FN(BAR("RTOT1"),",",2),10)
  • Line Location: SUB+6
Function Call: WRITE
  • Prompt: ?48,$J($FN(BAR("PTOT1"),",",2),10)
  • Line Location: SUB+7
Function Call: WRITE
  • Prompt: ?59,$J($FN(BAR("BTOT1"),",",2),10)
  • Line Location: SUB+8
Function Call: WRITE
  • Prompt: ?70,$J($FN(BAR("ATOT1"),",",2),10)
  • Line Location: SUB+9
Function Call: WRITE
  • Prompt: !," Batch Tot:"
  • Line Location: SUB2+3
Function Call: WRITE
  • Prompt: ?15,$J($FN(BAR("PATOT2"),",",2),10)
  • Line Location: SUB2+4
Function Call: WRITE
  • Prompt: ?26,$J($FN(BAR("PCTOT2"),",",2),10)
  • Line Location: SUB2+5
Function Call: WRITE
  • Prompt: ?37,$J($FN(BAR("RTOT2"),",",2),10)
  • Line Location: SUB2+6
Function Call: WRITE
  • Prompt: ?48,$J($FN(BAR("PTOT2"),",",2),10)
  • Line Location: SUB2+7
Function Call: WRITE
  • Prompt: ?59,$J($FN(BAR("BTOT2"),",",2),10)
  • Line Location: SUB2+8
Function Call: WRITE
  • Prompt: ?70,$J($FN(BAR("ATOT2"),",",2),10)
  • Line Location: SUB2+9
Function Call: WRITE
  • Prompt: !," Item Tot:"
  • Line Location: SUB3+3
Function Call: WRITE
  • Prompt: ?15,$J($FN(BAR("PATOT3"),",",2),10)
  • Line Location: SUB3+4
Function Call: WRITE
  • Prompt: ?26,$J($FN(BAR("PCTOT3"),",",2),10)
  • Line Location: SUB3+5
Function Call: WRITE
  • Prompt: ?37,$J($FN(BAR("RTOT3"),",",2),10)
  • Line Location: SUB3+6
Function Call: WRITE
  • Prompt: ?48,$J($FN(BAR("PTOT3"),",",2),10)
  • Line Location: SUB3+7
Function Call: WRITE
  • Prompt: ?59,$J($FN(BAR("BTOT3"),",",2),10)
  • Line Location: SUB3+8
Function Call: WRITE
  • Prompt: ?70,$J($FN(BAR("ATOT3"),",",2),10)
  • Line Location: SUB3+9
Function Call: WRITE
  • Prompt: !," Clinic Tot:"
  • Line Location: SUB4+3
Function Call: WRITE
  • Prompt: !," Visit Tot"
  • Line Location: SUB4+4
Function Call: WRITE
  • Prompt: ?15,$J($FN(BAR("PATOT4"),",",2),10)
  • Line Location: SUB4+5
Function Call: WRITE
  • Prompt: ?26,$J($FN(BAR("PCTOT4"),",",2),10)
  • Line Location: SUB4+6
Function Call: WRITE
  • Prompt: ?37,$J($FN(BAR("RTOT4"),",",2),10)
  • Line Location: SUB4+7
Function Call: WRITE
  • Prompt: ?48,$J($FN(BAR("PTOT4"),",",2),10)
  • Line Location: SUB4+8
Function Call: WRITE
  • Prompt: ?59,$J($FN(BAR("BTOT4"),",",2),10)
  • Line Location: SUB4+9
Function Call: WRITE
  • Prompt: ?70,$J($FN(BAR("ATOT4"),",",2),10)
  • Line Location: SUB4+10
Function Call: WRITE
  • Prompt: !,"A/R Acct Tot:"
  • Line Location: SUB5+3
Function Call: WRITE
  • Prompt: ?15,$J($FN(BAR("PATOT5"),",",2),10)
  • Line Location: SUB5+4
Function Call: WRITE
  • Prompt: ?26,$J($FN(BAR("PCTOT5"),",",2),10)
  • Line Location: SUB5+5
Function Call: WRITE
  • Prompt: ?37,$J($FN(BAR("RTOT5"),",",2),10)
  • Line Location: SUB5+6
Function Call: WRITE
  • Prompt: ?48,$J($FN(BAR("PTOT5"),",",2),10)
  • Line Location: SUB5+7
Function Call: WRITE
  • Prompt: ?59,$J($FN(BAR("BTOT5"),",",2),10)
  • Line Location: SUB5+8
Function Call: WRITE
  • Prompt: ?70,$J($FN(BAR("ATOT5"),",",2),10)
  • Line Location: SUB5+9
Function Call: WRITE
  • Prompt: !,BAREQUAL
  • Line Location: TOT+3
Function Call: WRITE
  • Prompt: !,"REPORT TOTAL"
  • Line Location: TOT+4
Function Call: WRITE
  • Prompt: ?15,$J($FN(BAR("PATOT0"),",",2),10)
  • Line Location: TOT+5
Function Call: WRITE
  • Prompt: ?26,$J($FN(BAR("PCTOT0"),",",2),10)
  • Line Location: TOT+6
Function Call: WRITE
  • Prompt: ?37,$J($FN(BAR("RTOT0"),",",2),10)
  • Line Location: TOT+7
Function Call: WRITE
  • Prompt: ?48,$J($FN(BAR("PTOT0"),",",2),10)
  • Line Location: TOT+8
Function Call: WRITE
  • Prompt: ?59,$J($FN(BAR("BTOT0"),",",2),10)
  • Line Location: TOT+9
Function Call: WRITE
  • Prompt: ?70,$J($FN(BAR("ATOT0"),",",2),10)
  • Line Location: TOT+10

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ABMDVTYP - [#9002274.8] DETAIL+97
^BARCOL( DETAIL+64, DETAIL+65, DETAIL+78, DETAIL+79
^DIC(40.7 - [#40.7] DETAIL+93
^VA(200 - [#200] SUBHD+4

Label References

Name Line Occurrences
HD DETAIL+28
HDB DETAIL+4
SUB DETAIL+50, DETAIL+125
SUB2 DETAIL+50, DETAIL+60, DETAIL+125
SUB3 DETAIL+50, DETAIL+60, DETAIL+74, DETAIL+125
SUB4 DETAIL+50, DETAIL+60, DETAIL+74, DETAIL+88, DETAIL+125
SUB5 DETAIL+50, DETAIL+60, DETAIL+74, DETAIL+88, DETAIL+105, DETAIL+125
SUBHD DETAIL+28, DETAIL+43
TOT DETAIL+125

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> BAR DETAIL+22*, DETAIL+23, DETAIL+27*, DETAIL+29, DETAIL+30, DETAIL+33
>> BAR( DETAIL+122
>> BAR("ACCT" DETAIL+20*, DETAIL+53*, DETAIL+67*, DETAIL+81*, DETAIL+98*, DETAIL+101, DETAIL+102, DETAIL+108*
>> BAR("AR" DETAIL+15*, DETAIL+41, DETAIL+44*
>> BAR("ATOT0" TOT+10, TOT+11*
>> BAR("ATOT1" SUB+9, SUB+10*
>> BAR("ATOT2" SUB2+9, SUB2+10*
>> BAR("ATOT3" SUB3+9, SUB3+10*
>> BAR("ATOT4" SUB4+10, SUB4+11*
>> BAR("ATOT5" SUB5+9, SUB5+10*
>> BAR("B" DETAIL+17*, DETAIL+53*, DETAIL+56, DETAIL+57, DETAIL+68*, DETAIL+78, DETAIL+79
>> BAR("BTOT0" TOT+2, TOT+9, TOT+11*
>> BAR("BTOT1" SUB+2, SUB+8, SUB+10*
>> BAR("BTOT2" SUB2+2, SUB2+8, SUB2+10*
>> BAR("BTOT3" SUB3+2, SUB3+8, SUB3+10*
>> BAR("BTOT4" SUB4+2, SUB4+9, SUB4+11*
>> BAR("BTOT5" SUB5+2, SUB5+8, SUB5+10*
>> BAR("COL" DETAIL+2*, HDB+5
>> BAR("DASH" HDB+6*, HDB+7
>> BAR("F1" DETAIL+27, DETAIL+28, DETAIL+48, DETAIL+58, DETAIL+72, DETAIL+86, DETAIL+103, DETAIL+123, HD+2*
>> BAR("HD" DETAIL+3*
>> BAR("I" HDB+3*
>> BAR("IT" DETAIL+18*, DETAIL+53*, DETAIL+67*, DETAIL+70, DETAIL+71, DETAIL+82*
>> BAR("L" DETAIL+16*, DETAIL+42*, DETAIL+46, DETAIL+47, DETAIL+54*
>> BAR("NODE" DETAIL+33*, DETAIL+34, DETAIL+35, DETAIL+36, DETAIL+37, DETAIL+38, DETAIL+39, DETAIL+40
>> BAR("PATOT0" TOT+5, TOT+11*
>> BAR("PATOT1" SUB+4, SUB+10*
>> BAR("PATOT2" SUB2+4, SUB2+10*
>> BAR("PATOT3" SUB3+4, SUB3+10*
>> BAR("PATOT4" SUB4+5, SUB4+11*
>> BAR("PATOT5" SUB5+4, SUB5+10*
>> BAR("PCTOT0" TOT+6, TOT+11*
>> BAR("PCTOT1" SUB+5, SUB+10*
>> BAR("PCTOT2" SUB2+5, SUB2+10*
>> BAR("PCTOT3" SUB3+5, SUB3+10*
>> BAR("PCTOT4" SUB4+6, SUB4+11*
>> BAR("PCTOT5" SUB5+5, SUB5+10*
>> BAR("PG" HDB+2*
>> BAR("PTOT0" TOT+8, TOT+11*
>> BAR("PTOT1" SUB+7, SUB+10*
>> BAR("PTOT2" SUB2+7, SUB2+10*
>> BAR("PTOT3" SUB3+7, SUB3+10*
>> BAR("PTOT4" SUB4+8, SUB4+11*
>> BAR("PTOT5" SUB5+7, SUB5+10*
>> BAR("RTOT0" TOT+7, TOT+11*
>> BAR("RTOT1" SUB+6, SUB+10*
>> BAR("RTOT2" SUB2+6, SUB2+10*
>> BAR("RTOT3" SUB3+6, SUB3+10*
>> BAR("RTOT4" SUB4+7, SUB4+11*
>> BAR("RTOT5" SUB5+6, SUB5+10*
>> BAR("SORT" DETAIL+19*, DETAIL+53*, DETAIL+67*, DETAIL+81*, DETAIL+84, DETAIL+85, DETAIL+99*
>> BAR("TXT" DETAIL+29*, DETAIL+30*, DETAIL+31, DETAIL+32*, DETAIL+41, DETAIL+44, DETAIL+46, DETAIL+52, DETAIL+54, DETAIL+56
, DETAIL+64, DETAIL+65, DETAIL+66, DETAIL+68, DETAIL+70, DETAIL+78, DETAIL+79, DETAIL+80, DETAIL+82, DETAIL+84
, DETAIL+92, DETAIL+93, DETAIL+96, DETAIL+97, DETAIL+99, DETAIL+101, DETAIL+107, DETAIL+108, SUBHD+3, SUBHD+4
>> BAR("TXTO" DETAIL+31*, DETAIL+32
>> BAR("Z" DETAIL+21*, DETAIL+22, DETAIL+27
>> BAR(1 DETAIL+34*, DETAIL+109
>> BAR(132 HDB+6
>> BAR(2 DETAIL+35*, DETAIL+110
>> BAR(3 DETAIL+36*, DETAIL+111
>> BAR(4 DETAIL+37*, DETAIL+112
>> BAR(5 DETAIL+38*, DETAIL+113
>> BAR(6 DETAIL+39*, DETAIL+114
>> BAR(7 DETAIL+40*, DETAIL+115
>> BARDASH DETAIL+13*, DETAIL+49, DETAIL+59, DETAIL+73, DETAIL+87, DETAIL+104, DETAIL+124
>> BAREQUAL DETAIL+14*, TOT+3
>> BARV DETAIL+9*, DETAIL+10, DETAIL+120*, DETAIL+121
>> BARV2 DETAIL+10*, DETAIL+11, DETAIL+121*, DETAIL+122
>> BARY("AR" DETAIL+41, SUBHD+2
>> BARY("SORT" DETAIL+90, SUB4+3
>> DIROUT HD+2
>> DTOUT HD+2
>> DUOUT HD+2
I DETAIL+5*, DETAIL+9, DETAIL+12!, DETAIL+116*, DETAIL+120
IOSL DETAIL+28
U DETAIL+30, DETAIL+32, DETAIL+34, DETAIL+35, DETAIL+36, DETAIL+37, DETAIL+38, DETAIL+39, DETAIL+40, DETAIL+41
, DETAIL+44, DETAIL+46, DETAIL+52, DETAIL+54, DETAIL+56, DETAIL+64, DETAIL+65, DETAIL+66, DETAIL+68, DETAIL+70
, DETAIL+78, DETAIL+79, DETAIL+80, DETAIL+82, DETAIL+84, DETAIL+92, DETAIL+93, DETAIL+96, DETAIL+97, DETAIL+99
, DETAIL+101, DETAIL+107, DETAIL+108, SUBHD+3, SUBHD+4
X DETAIL+7*, DETAIL+9, DETAIL+12!, DETAIL+118*, DETAIL+120
Y DETAIL+6*, DETAIL+8*, DETAIL+12!, DETAIL+117*, DETAIL+119*, DETAIL+122
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All