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

Package: IHS Accounts Receivable

Routine: BARRADJ2


Information

BARRADJ2 ; IHS/SD/TPF - TRANSACTION/ADJUSTMENT REPORT ;08/20/2008

Source Information

Source file <BARRADJ2.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
IHS Accounts Receivable 4 $$SDT^BARDUTL  WHD^BARRHD  PAZ^BARRUTL  EOP^BARUTL  
Kernel 1 $$CJ^XLFSTR  
VA Fileman 1 $$GET1^DIQ  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
IHS Accounts Receivable 3 BARRADJ  BARRADJ0  BARRADJ3  

Entry Points

Name Comments DBIA/ICR reference
SUB5 ;
SUB2 ;
; Totals by Collection Batch
SUB3 ;
SUBDSRC ;
; Totals by Data Source
SUBTRAN ;EP - TOTALS BY TRANSACTION TYPE
DETAIL ; EP
TOT ;
; Report (a/r clerk) totals
SUBHD ;
; If A/R clerk specified
SUBTYPE ;
SUBSORT ;
; Totals by Sort type
HDB ; EP
; Page and column header
GETCOUNT ;
SUBLOC ;
; Totals by Visit location.
SUBADJ ;
; Totals by adjustment category
GETDOS(BARBILL) ;
HD ; EP

External References

Name Field # of Occurrence
$$SDT^BARDUTL GETDOS+3
WHD^BARRHD HDB+4
PAZ^BARRUTL HD+1
EOP^BARUTL DETAIL+47
$$GET1^DIQ DETAIL+92, DETAIL+93, DETAIL+140, DETAIL+141, DETAIL+182, GETCOUNT+7, GETDOS+2
$$CJ^XLFSTR DETAIL+46

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"TRANSACTION TYPE PARAMETER MUST BE DEFINED!"
  • Line Location: DETAIL+7
Function Call: WRITE
  • Prompt: $$CJ^XLFSTR("*** NO DATA TO PRINT FOR "_$P($G(^DIC(4,DUZ(2),0)),U)_" ***",IOM)
  • Line Location: DETAIL+46
Function Call: WRITE
  • Prompt: !?5,"Adjustment Category.......: "
  • Line Location: DETAIL+136
Function Call: WRITE
  • Prompt: !?5,"Adjustment Category.......: "
  • Line Location: DETAIL+137
Function Call: WRITE
  • Prompt: $P(BAR("TXT"),U,3)
  • Line Location: DETAIL+138
Function Call: WRITE
  • Prompt: $$GET1^DIQ(90052.01,$P(BAR("TXT"),U,3)_",",.01,"E")
  • Line Location: DETAIL+140
Function Call: WRITE
  • Prompt: $$GET1^DIQ(90052.02,$P(BAR("TXT"),U,3)_",",.01,"E")
  • Line Location: DETAIL+141
Function Call: WRITE
  • Prompt: "NO CLINIC"
  • Line Location: DETAIL+161
Function Call: WRITE
  • Prompt: "NO VISIT TYPE"
  • Line Location: DETAIL+165
Function Call: WRITE
  • Prompt: !,$E(BAR(1),1,15)
  • Line Location: DETAIL+168
Function Call: WRITE
  • Prompt: ?15,BAR(10)
  • Line Location: DETAIL+169
Function Call: WRITE
  • Prompt: ?55,$J($FN(BAR(3)+BAR(4)+BAR(5)+BAR(7),",",2),10)
  • Line Location: DETAIL+180
Function Call: WRITE
  • Prompt: $P(BAR("TXT"),U,5)
  • Line Location: DETAIL+181
Function Call: WRITE
  • Prompt: ?67,$E($$GET1^DIQ(90052.02,BAR(12)_",",.01),1,12)
  • Line Location: DETAIL+182
Function Call: WRITE
  • Prompt: ?69,BARDOS
  • Line Location: DETAIL+184
Function Call: WRITE
  • Prompt: !?15,BARDOS
  • Line Location: DETAIL+185
Function Call: WRITE
  • Prompt: !,BARDASH
  • Line Location: DETAIL+208
Function Call: WRITE
  • Prompt: !
  • Line Location: DETAIL+211
Function Call: WRITE
  • Prompt: !
  • Line Location: DETAIL+212
Function Call: WRITE
  • Prompt: !,BAR("DASH")
  • Line Location: HDB+9
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: !?10,"Totals by Transaction type:"
  • Line Location: SUBTRAN+1
Function Call: WRITE
  • Prompt: !?10,"Totals by Adjustment Category:"
  • Line Location: SUBTRAN+2
Function Call: WRITE
  • Prompt: ?42,$J($FN(TRANBTOT,",",2),10)
  • Line Location: SUBTRAN+3
Function Call: WRITE
  • Prompt: ?55,$J($FN(TRANTTOT,",",2),10)
  • Line Location: SUBTRAN+4
Function Call: WRITE
  • Prompt: !,"Location Tot:"
  • Line Location: SUBLOC+2
Function Call: WRITE
  • Prompt: ?42,$J($FN(VLOCBTOT,",",2),10)
  • Line Location: SUBLOC+3
Function Call: WRITE
  • Prompt: ?55,$J($FN(VLOCTTOT,",",2),10)
  • Line Location: SUBLOC+4
Function Call: WRITE
  • Prompt: !,"Adjustment Category Tot:"
  • Line Location: SUBADJ+2
Function Call: WRITE
  • Prompt: ?41,$J($FN(ADJTBTOT,",",2),10)
  • Line Location: SUBADJ+3
Function Call: WRITE
  • Prompt: ?55,$J($FN(ADJTTTOT,",",2),10)
  • Line Location: SUBADJ+4
Function Call: WRITE
  • Prompt: !," Batch Tot:"
  • Line Location: SUB2+4
Function Call: WRITE
  • Prompt: ?41,$J($FN(BAR("BTOT2"),",",2),10)
  • Line Location: SUB2+5
Function Call: WRITE
  • Prompt: ?55,$J($FN(BAR("ATOT2"),",",2),10)
  • Line Location: SUB2+6
Function Call: WRITE
  • Prompt: !," Item Tot:"
  • Line Location: SUB3+4
Function Call: WRITE
  • Prompt: ?41,$J($FN(BAR("BTOT3"),",",2),10)
  • Line Location: SUB3+5
Function Call: WRITE
  • Prompt: ?55,$J($FN(BAR("ATOT3"),",",2),10)
  • Line Location: SUB3+6
Function Call: WRITE
  • Prompt: !?25,"Data Source Tot:"
  • Line Location: SUBDSRC+2
Function Call: WRITE
  • Prompt: !?5,"Subtotal:",?33,$J(DSRCTTOT,5,0)
  • Line Location: SUBDSRC+3
Function Call: WRITE
  • Prompt: ?42,$J($FN(DSRCBTOT,",",2),10)
  • Line Location: SUBDSRC+4
Function Call: WRITE
  • Prompt: ?55,$J($FN(DSRCTTOT,",",2),10)
  • Line Location: SUBDSRC+5
Function Call: WRITE
  • Prompt: !?25,"Clinic Tot:"
  • Line Location: SUBSORT+3
Function Call: WRITE
  • Prompt: !?25,"Visit Type Tot:"
  • Line Location: SUBSORT+4
Function Call: WRITE
  • Prompt: !?5,"Subtotal:",?33,$J(SUBTOT,5,0)
  • Line Location: SUBSORT+7
Function Call: WRITE
  • Prompt: !,"A/R Acct Tot:"
  • Line Location: SUB5+4
Function Call: WRITE
  • Prompt: ?41,$J($FN(BAR("BTOT5"),",",2),10)
  • Line Location: SUB5+5
Function Call: WRITE
  • Prompt: ?55,$J($FN(BAR("ATOT5"),",",2),10)
  • Line Location: SUB5+6
Function Call: WRITE
  • Prompt: !!,BAREQUAL
  • Line Location: TOT+2
Function Call: WRITE
  • Prompt: !,"REPORT TOTAL"
  • Line Location: TOT+3
Function Call: WRITE
  • Prompt: !,"Total:"
  • Line Location: TOT+4
Function Call: WRITE
  • Prompt: ?33,$J($G(TOTBILLS),5,0)
  • Line Location: TOT+5
Function Call: WRITE
  • Prompt: ?42,$J($FN(GRANBILL,",",2),10)
  • Line Location: TOT+6
Function Call: WRITE
  • Prompt: ?55,$J($FN(GRANTRAN,",",2),10)
  • Line Location: TOT+7
Function Call: WRITE
  • Prompt: !,BARDASH
  • Line Location: SUBTYPE+1
Function Call: WRITE
  • Prompt: !,?20,"Adjustment Type Tot:"
  • Line Location: SUBTYPE+2
Function Call: WRITE
  • Prompt: ?41,$J($FN(ADJTBTOT,",",2),10)
  • Line Location: SUBTYPE+3
Function Call: WRITE
  • Prompt: ?55,$J($FN(ADJTTTOT,",",2),10)
  • Line Location: SUBTYPE+4
Function Call: WRITE
  • Prompt: !
  • Line Location: SUBTYPE+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^BARBL(2906 - [#90050.01] GET1^DIQ
^BARAC(2906 - [#90050.02] GET1^DIQ
^BAR(90052.01 - [#90052.01] GET1^DIQ
^BARTBL - [#90052.02] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ABMDVTYP - [#9002274.8] DETAIL+83, DETAIL+166
^DIC(4 - [#4] DETAIL+46
^DIC(40.7 - [#40.7] DETAIL+80, DETAIL+162
^TMP($J GETCOUNT+6, GETCOUNT+9
^VA(200 - [#200] SUBHD+4

Label References

Name Line Occurrences
$$GETDOS DETAIL+85, DETAIL+183
GETCOUNT DETAIL+119, DETAIL+132, DETAIL+146, DETAIL+152, DETAIL+207
HD DETAIL+52
HDB DETAIL+18
SUBDSRC DETAIL+155, DETAIL+210
SUBHD DETAIL+52, DETAIL+114
SUBLOC DETAIL+122, DETAIL+212
SUBSORT DETAIL+148, DETAIL+209
SUBTRAN DETAIL+134, DETAIL+211
SUBTYPE DETAIL+111
TOT DETAIL+213

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> ADJTBTOT DETAIL+190*, SUBADJ+3, SUBADJ+5*, SUBTYPE+3, SUBTYPE+6*
ADJTTTOT DETAIL+22!, DETAIL+200*, SUBADJ+4, SUBADJ+5*, SUBTYPE+4, SUBTYPE+6*
>> ARBTOT DETAIL+192*
ARTTOT DETAIL+22!, DETAIL+202*
>> BAR DETAIL+44*, DETAIL+45, DETAIL+50*, DETAIL+53, DETAIL+54, DETAIL+58
>> BAR("ACCT" DETAIL+37*
>> BAR("ADJCAT" DETAIL+38*
>> BAR("AR" DETAIL+31*, DETAIL+112, DETAIL+115*
>> BAR("ATOT2" SUB2+6, SUB2+7*
>> BAR("ATOT3" SUB3+6, SUB3+7*
>> BAR("ATOT5" SUB5+6, SUB5+7*
>> BAR("B" DETAIL+34*
>> BAR("BTOT2" SUB2+3, SUB2+5, SUB2+7*
>> BAR("BTOT3" SUB3+3, SUB3+5, SUB3+7*
>> BAR("BTOT5" SUB5+3, SUB5+5, SUB5+7*
>> BAR("COL" DETAIL+9*, DETAIL+10*, DETAIL+11*, DETAIL+12*, DETAIL+15*, DETAIL+16*, HDB+5, HDB+6, HDB+7
>> BAR("DASH" HDB+8*, HDB+9
>> BAR("F1" DETAIL+19*, DETAIL+20, DETAIL+48*, DETAIL+50, DETAIL+52, DETAIL+120, DETAIL+131, DETAIL+145, DETAIL+153, DETAIL+206
, HD+2*
>> BAR("HD" DETAIL+13*, DETAIL+17*
>> BAR("I" HDB+3*
>> BAR("IT" DETAIL+35*
>> BAR("L" DETAIL+32*, DETAIL+113*, DETAIL+117, DETAIL+118, DETAIL+127*
>> BAR("NODE" DETAIL+58*, DETAIL+60, DETAIL+61, DETAIL+62, DETAIL+63, DETAIL+64, DETAIL+65, DETAIL+66, DETAIL+67, DETAIL+68
, DETAIL+69, DETAIL+70, DETAIL+71, DETAIL+72, DETAIL+74
>> BAR("O11" DETAIL+40*
>> BAR("OINS" DETAIL+39*
>> BAR("PATOT2" SUB2+7*
>> BAR("PATOT3" SUB3+7*
>> BAR("PATOT5" SUB5+7*
>> BAR("PCTOT2" SUB2+7*
>> BAR("PCTOT3" SUB3+7*
>> BAR("PCTOT5" SUB5+7*
>> BAR("PG" HDB+2*
>> BAR("PTOT2" SUB2+7*
>> BAR("PTOT3" SUB3+7*
>> BAR("PTOT5" SUB5+7*
>> BAR("RTOT2" SUB2+7*
>> BAR("RTOT3" SUB3+7*
>> BAR("RTOT5" SUB5+7*
>> BAR("SORT" DETAIL+36*, DETAIL+143, DETAIL+144, DETAIL+167*, GETCOUNT+4
>> BAR("ST" TOT+8*
>> BAR("TRANS" DETAIL+33*, DETAIL+125*, DETAIL+129, DETAIL+130, DETAIL+142*
>> BAR("TXT" DETAIL+53*, DETAIL+54*, DETAIL+55, DETAIL+57*, DETAIL+59, DETAIL+77, DETAIL+79, DETAIL+80, DETAIL+82, DETAIL+83
, DETAIL+91, DETAIL+92, DETAIL+112, DETAIL+115, DETAIL+117, DETAIL+124, DETAIL+127, DETAIL+129, DETAIL+138, DETAIL+140
, DETAIL+141, DETAIL+142, DETAIL+143, DETAIL+150, DETAIL+157, DETAIL+158, DETAIL+161, DETAIL+162, DETAIL+165, DETAIL+166
, DETAIL+167, DETAIL+181, SUBHD+3, SUBHD+4
>> BAR("TXTO" DETAIL+55*, DETAIL+57, GETCOUNT+3
>> BAR("Z" DETAIL+43*, DETAIL+44
>> BAR(1 DETAIL+60*, DETAIL+84, DETAIL+168
>> BAR(10 DETAIL+69*, DETAIL+86, DETAIL+169
>> BAR(11 DETAIL+70*
>> BAR(12 DETAIL+71*, DETAIL+93, DETAIL+107, DETAIL+109, DETAIL+110, DETAIL+182
>> BAR(13 DETAIL+72*
>> BAR(132 HDB+8
>> BAR(2 DETAIL+61*
>> BAR(3 DETAIL+62*, DETAIL+89, DETAIL+180, DETAIL+198, DETAIL+199, DETAIL+200, DETAIL+201, DETAIL+202, DETAIL+203, DETAIL+205
>> BAR(4 DETAIL+63*, DETAIL+89, DETAIL+180, DETAIL+198, DETAIL+199, DETAIL+200, DETAIL+201, DETAIL+202, DETAIL+203, DETAIL+205
>> BAR(5 DETAIL+64*, DETAIL+89, DETAIL+180, DETAIL+198, DETAIL+199, DETAIL+200, DETAIL+201, DETAIL+202, DETAIL+203, DETAIL+205
>> BAR(6 DETAIL+65*, DETAIL+88, DETAIL+179, DETAIL+188, DETAIL+189, DETAIL+190, DETAIL+191, DETAIL+192, DETAIL+193, DETAIL+196
>> BAR(7 DETAIL+66*, DETAIL+89, DETAIL+180, DETAIL+198, DETAIL+199, DETAIL+200, DETAIL+201, DETAIL+202, DETAIL+203, DETAIL+205
>> BAR(8 DETAIL+67*
>> BAR(9 DETAIL+68*, DETAIL+87, DETAIL+172, DETAIL+174, DETAIL+175, DETAIL+176
BARBILL DETAIL+1~, DETAIL+59*, DETAIL+85, DETAIL+178, DETAIL+183, DETAIL+187, DETAIL+194, GETDOS~, GETDOS+2
BARBILLO DETAIL+1~, DETAIL+49*, DETAIL+178, DETAIL+187, DETAIL+194*
>> BARDASH DETAIL+29*, DETAIL+121, DETAIL+133, DETAIL+147, DETAIL+154, DETAIL+208, SUBTYPE+1
BARDLMTD DETAIL+75~
BARDLMTD("ADJCAT" DETAIL+91*, DETAIL+92*, DETAIL+97, DETAIL+98
BARDLMTD("ADJTYPE" DETAIL+93*, DETAIL+97, DETAIL+98
BARDLMTD("BILLAMT" DETAIL+88*, DETAIL+97, DETAIL+98, DETAIL+103, DETAIL+104
BARDLMTD("BILLNUM" DETAIL+84*, DETAIL+97, DETAIL+98, DETAIL+103, DETAIL+104
BARDLMTD("CLINICVISIT" DETAIL+76*, DETAIL+79*, DETAIL+80*, DETAIL+82*, DETAIL+83*, DETAIL+98, DETAIL+104
BARDLMTD("DOS" DETAIL+85*, DETAIL+97, DETAIL+98, DETAIL+103, DETAIL+104
BARDLMTD("INSURER" DETAIL+87*, DETAIL+97, DETAIL+98, DETAIL+103, DETAIL+104
BARDLMTD("TRANSDATE" DETAIL+86*, DETAIL+97, DETAIL+98, DETAIL+103, DETAIL+104
BARDLMTD("TRXNAMT" DETAIL+89*, DETAIL+97, DETAIL+98, DETAIL+103, DETAIL+104
BARDLMTD("VISIT" DETAIL+77*, DETAIL+97, DETAIL+98, DETAIL+103, DETAIL+104
>> BARDOS DETAIL+183*, DETAIL+184, DETAIL+185
>> BAREQUAL DETAIL+30*, TOT+2
>> BARPREV DETAIL+42*, DETAIL+106, DETAIL+107*, DETAIL+109, DETAIL+110*
>> BARTEXT DETAIL+18, DETAIL+52, DETAIL+73, DETAIL+105, DETAIL+206
>> BARTR("DATA S RC" , DETAIL+41*, DETAIL+150, DETAIL+151, DETAIL+158*
>> BARY("AR" DETAIL+112, SUBHD+2
>> BARY("SORT" DETAIL+78, DETAIL+81, DETAIL+97, DETAIL+98, DETAIL+103, DETAIL+104, DETAIL+159, DETAIL+163, SUBSORT+3, SUBSORT+4
, SUBSORT+6
>> BARY("TRANS T YPE" , DETAIL+3, DETAIL+90, DETAIL+109, DETAIL+136, DETAIL+137, DETAIL+140, DETAIL+182, SUBTRAN+1
BILL GETCOUNT+1~, GETCOUNT+8*, GETCOUNT+9*
>> CNT GETCOUNT+9*, GETCOUNT+10, GETCOUNT+11, GETCOUNT+12
>> DIROUT DETAIL+19, DETAIL+48, HD+2
>> DSRCBTOT DETAIL+193*, SUBDSRC+4, SUBDSRC+6*
>> DSRCTOT DETAIL+26*
>> DSRCTTOT DETAIL+203*, SUBDSRC+3, SUBDSRC+5, SUBDSRC+6*
>> DTOUT DETAIL+19, DETAIL+48, HD+2
>> DUOUT DETAIL+19, DETAIL+48, HD+2
DUZ(2 DETAIL+46
FILL DETAIL+173!, DETAIL+174*, DETAIL+175
>> GRANBILL DETAIL+24*, DETAIL+196*, TOT+6
>> GRANTRAN DETAIL+25*, DETAIL+205*, TOT+7
I DETAIL+28!
INSURER GETCOUNT+1~, GETCOUNT+5*, GETCOUNT+6*, GETCOUNT+7, GETCOUNT+9
IOM DETAIL+46
IOSL DETAIL+52
>> OFFSET DETAIL+170*, DETAIL+171*, DETAIL+175, DETAIL+176
>> SORTBTOT DETAIL+191*, SUBSORT+8, SUBSORT+10*
SORTTTOT DETAIL+22!, DETAIL+201*, SUBSORT+9, SUBSORT+10*
>> SUBS GETCOUNT+3*, GETCOUNT+4*, GETCOUNT+6, GETCOUNT+9
>> SUBTOT SUBSORT+7, GETCOUNT+2*, GETCOUNT+12*
>> SUMMARY DETAIL+8, DETAIL+119, DETAIL+132, DETAIL+146, DETAIL+152, DETAIL+168, DETAIL+169, DETAIL+170, DETAIL+175, DETAIL+176
, DETAIL+177, DETAIL+180, DETAIL+181, DETAIL+182, DETAIL+184, DETAIL+185, DETAIL+207, SUBDSRC+3, SUBSORT+3, SUBSORT+4
, SUBSORT+7, TOT+3, TOT+5
>> TOTBILLS DETAIL+23*, TOT+5, GETCOUNT+11*
>> TRANBTOT DETAIL+126*, DETAIL+189*, SUBTRAN+3, SUBTRAN+5*
TRANTTOT DETAIL+22!, DETAIL+126*, DETAIL+199*, SUBTRAN+4, SUBTRAN+5*
TT DETAIL+3~*, DETAIL+7, DETAIL+9, DETAIL+10, DETAIL+11, DETAIL+12, DETAIL+184, DETAIL+185
U DETAIL+46, DETAIL+54, DETAIL+57, DETAIL+59, DETAIL+60, DETAIL+61, DETAIL+62, DETAIL+63, DETAIL+64, DETAIL+65
, DETAIL+66, DETAIL+67, DETAIL+68, DETAIL+69, DETAIL+70, DETAIL+71, DETAIL+72, DETAIL+74, DETAIL+77, DETAIL+79
, DETAIL+80, DETAIL+82, DETAIL+83, DETAIL+91, DETAIL+92, DETAIL+97, DETAIL+98, DETAIL+103, DETAIL+104, DETAIL+112
, DETAIL+115, DETAIL+117, DETAIL+124, DETAIL+127, DETAIL+129, DETAIL+138, DETAIL+140, DETAIL+141, DETAIL+142, DETAIL+143
, DETAIL+150, DETAIL+157, DETAIL+158, DETAIL+161, DETAIL+162, DETAIL+165, DETAIL+166, DETAIL+167, DETAIL+181, SUBHD+3
, SUBHD+4, GETCOUNT+3, GETCOUNT+4
>> VLOCBTOT DETAIL+188*, SUBLOC+3, SUBLOC+5*
VLOCTTOT DETAIL+22!, DETAIL+198*, SUBLOC+4, SUBLOC+5*
X DETAIL+28!, GETDOS+1~, GETDOS+2*, GETDOS+3
Y DETAIL+28!, GETDOS+1~
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