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

Package: IHS Accounts Receivable

Routine: BARRPPS


Information

BARRPPS ; IHS/SD/SDR - Patient Payment Summary ;08/20/2008

Source Information

Source file <BARRPPS.m>

Call Graph

Call Graph Total: 11

Package Total Call Graph
VA Fileman 4 NOW^%DTC  ^DIC  ($$GET1,GETS)^DIQ  ^DIR  
IHS Accounts Receivable 3 PAZ^BARRUTL  EOP^BARUTL  $$EN^BARVDF  
Kernel 3 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  
IHS VA Utilities 1 ^XBFMK  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
IHS Accounts Receivable 1 BAR COL PT PYMT SUM  

Entry Points

Name Comments DBIA/ICR reference
ACCTS ;EP
; Select A/R Accounts to sort by
EN ;EP
GATHER ;EP
WRTBILL ;EP
COMMENTS ;EP
SUMMARY ;
; Print report if user selected SORT CRITERIA Billing Entity or
; Allowance Category and Report Type w/o payers
CENTER(X) ;EP
CLEANUP ;CLEAN VARIABLES
QUE ;EP
HDB ; EP
PRINT ; EP
DT ;EP
SEL ;Select device
WRTCOMM ;EP
HD ; EP
CALC ;EP

External References

Name Field # of Occurrence
NOW^%DTC HDB+9
^%ZIS SEL+3, SEL+5
HOME^%ZIS SEL+4
^%ZISC QUE+5
^%ZTLOAD QUE+4
PAZ^BARRUTL HD+1
EOP^BARUTL SUMMARY+8, SUMMARY+26
$$EN^BARVDF HDB+4
^DIC ACCTS+10
$$GET1^DIQ GATHER+9, GATHER+13, CALC+13, SUMMARY+25, WRTBILL+3, WRTBILL+4, HDB+16, HDB+17
GETS^DIQ WRTCOMM+4
^DIR SEL+4, DT+5, DT+12, COMMENTS+6
^XBFMK ACCTS+3, DT+1, COMMENTS+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?5,"REPORT CANCELLED!"
  • Line Location: QUE+6
Function Call: WRITE
  • Prompt: !!?5,"REQUEST QUEUED AS TASK # "_ZTSK_" !",!
  • Line Location: QUE+7
Function Call: WRITE
  • Prompt: !!,"At least one A/R account is required. Enter '^' to exit",!
  • Line Location: ACCTS+14
Function Call: WRITE
  • Prompt: !!," ============ Entry of A/R Collection Batch Range =============",!
  • Line Location: DT+2
Function Call: WRITE
  • Prompt: !
  • Line Location: DT+9
Function Call: WRITE
  • Prompt: !!,*7,"INPUT ERROR: Start Date is Greater than the End Date, TRY AGAIN!",!!
  • Line Location: DT+17
Function Call: WRITE
  • Prompt: !
  • Line Location: COMMENTS+2
Function Call: WRITE
  • Prompt: !,?47,"__________",?68,"__________"
  • Line Location: SUMMARY+23
Function Call: WRITE
  • Prompt: !,?45,$J($FN(+$P($G(^TMP($J,"BAR-PPS","TOT")),U),",",2),12),?66,$J($FN(+$P($G(^TMP($J,"BAR-PPS","TOT")),U,2),",",2),12),!
  • Line Location: SUMMARY+24
Function Call: WRITE
  • Prompt: !!,"REPORT COMPLETE FOR "_$$GET1^DIQ(90050.02,BARACCTI,".01","E")
  • Line Location: SUMMARY+25
Function Call: WRITE
  • Prompt: !
  • Line Location: WRTCOMM+1
Function Call: WRITE
  • Prompt: ?2,"Comment: "
  • Line Location: WRTCOMM+6
Function Call: WRITE
  • Prompt: $$EN^BARVDF("IOF"),!
  • Line Location: HDB+4
Function Call: WRITE
  • Prompt: !
  • Line Location: HDB+6
Function Call: WRITE
  • Prompt: !
  • Line Location: HDB+8
Function Call: WRITE
  • Prompt: $P(Y,":",1,2),?72,"Page ",BAR("PG")
  • Line Location: HDB+12
Function Call: WRITE
  • Prompt: !,BAR("DASH"),!
  • Line Location: HDB+14
Function Call: WRITE
  • Prompt: ?3,"Patient Name: ",$$GET1^DIQ(90050.02,BARACCTI,".01","E")
  • Line Location: HDB+16
Function Call: WRITE
  • Prompt: ?50,"HRN: ",$P($G(^AUPNPAT($P($$GET1^DIQ(90050.02,BARACCTI,".01","I"),";"),41,DUZ(2),0)),U,2),!!
  • Line Location: HDB+17
Function Call: WRITE
  • Prompt: "Total Amount Batched: ",$J($FN(+$P($G(^TMP($J,"BAR-PPS","TOT")),U),",",2),12)
  • Line Location: HDB+18
Function Call: WRITE
  • Prompt: ?50,"Num of Pymts Posted: ",+$P($G(^TMP($J,"BAR-PPS","TOT")),U,4),!
  • Line Location: HDB+19
Function Call: WRITE
  • Prompt: ?7,"Amount Posted: ",$J($FN(+$P($G(^TMP($J,"BAR-PPS","TOT")),U,2),",",2),12),!
  • Line Location: HDB+20
Function Call: WRITE
  • Prompt: ?8,"To Be Posted: ",$J($FN(+$P($G(^TMP($J,"BAR-PPS","TOT")),U,3),",",2),12),!
  • Line Location: HDB+21
Function Call: WRITE
  • Prompt: BAR("DASH"),!
  • Line Location: HDB+22
Function Call: WRITE
  • Prompt: ?50,"Batched",?60,"Bill",?72,"Posted",!
  • Line Location: HDB+23
Function Call: WRITE
  • Prompt: "Collection Batch",?25,"Item",?30,"Receipt#",?42,"Type",?51,"Amount",?60,"Number",?72,"Amount",!
  • Line Location: HDB+24
Function Call: WRITE
  • Prompt: BAR("DASH"),!
  • Line Location: HDB+25
Function Call: WRITE
  • Prompt: ?CENTER-($L(X)/2),X
  • Line Location: CENTER+3
Routine Call
  • %ZIS
  • Line Location:
    • SEL+4
Routine Call
  • DIC
  • Line Location:
    • ACCTS+10
Routine Call
  • DIR
  • Line Location:
    • SEL+4
    • DT+5
    • DT+12
    • COMMENTS+6
Routine Call
  • %ZIS
  • Line Location:
    • SEL+3
    • SEL+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^BARBL(2906 - [#90050.01] GET1^DIQ
^BARAC(2906 - [#90050.02] GET1^DIQ
^BARTR(2906 - [#90050.03] GET1^DIQ
^BARPPAY(2906 - [#90050.06] GET1^DIQ
90051.1101 GETS^DIQ
^BARTBL - [#90052.02] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNPAT - [#9000001] HDB+17
^BARCOL( GATHER+3, GATHER+5, GATHER+7, GATHER+8, GATHER+9, GATHER+11, GATHER+12, GATHER+13, SUMMARY+16
^BARTR( CALC+12, WRTBILL+2, WRTBILL+3
^DD("DD" HDB+11
^DIC(4 - [#4] HDB+7
^TMP($J EN+1!, PRINT+4!, GATHER+14*, CALC+1, CALC+4, CALC+6, CALC+8, CALC+9*, CALC+13*, CALC+15*
, CALC+16*, SUMMARY+6, SUMMARY+10, SUMMARY+12, SUMMARY+14, SUMMARY+18, SUMMARY+19, SUMMARY+20, SUMMARY+24, HDB+18
, HDB+19, HDB+20, HDB+21

Label References

Name Line Occurrences
ACCTS EN+2, ACCTS+14
CALC PRINT+7
CENTER HDB+5, HDB+7
CLEANUP EN+5
COMMENTS EN+4
DT EN+3, DT+7, DT+15, DT+17
GATHER PRINT+6
HD SUMMARY+15
HDB SUMMARY+5
PRINT SEL+6
QUE SEL+4
SUMMARY PRINT+8
WRTBILL SUMMARY+21
WRTCOMM SUMMARY+22

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % HDB+10
>> %ZIS SEL+1*
>> %ZIS("A" SEL+2*
>> BAR("DASH" HDB+13*, HDB+14, HDB+22, HDB+25
>> BAR("F1" HD+2*
>> BAR("I" HDB+3*
>> BAR("PG" PRINT+5*, SUMMARY+4*, HDB+2*, HDB+12
>> BAR(132 HDB+13, CENTER+2
>> BARACCTI PRINT+2*, PRINT+3*, GATHER+8, SUMMARY+25, HDB+16, HDB+17
>> BARCCRDT GATHER+11*, GATHER+14
>> BARCDBT GATHER+12*, GATHER+14
>> BARCLIEN SUMMARY+11*, SUMMARY+12*, SUMMARY+14, SUMMARY+16, SUMMARY+18, SUMMARY+19, SUMMARY+20, WRTBILL+2, WRTCOMM+3
>> BARCNT WRTCOMM+7*, WRTCOMM+8*, WRTCOMM+9
>> BARCOL GATHER+4*, GATHER+5*, GATHER+7, GATHER+8, GATHER+9, GATHER+11, GATHER+12, GATHER+13, GATHER+14, CALC+5*
, CALC+6*, CALC+8, CALC+9, CALC+12
BARCOM WRTCOMM+2!
BARCOM( WRTCOMM+5, WRTCOMM+8, WRTCOMM+9
>> BAREDT GATHER+2*, GATHER+3
BAREND EN+1!, EN+3, EN+4, EN+5, ACCTS+11*, ACCTS+14, DT+6*, DT+14*, COMMENTS+7*, CLEANUP+1!
>> BARHASTR WRTBILL+1*, WRTBILL+5*, WRTCOMM+1
>> BARITEM GATHER+6*, GATHER+7*, GATHER+8, GATHER+9, GATHER+11, GATHER+12, GATHER+13, GATHER+14, CALC+7*, CALC+8*
, CALC+9, CALC+12, SUMMARY+13*, SUMMARY+14*, SUMMARY+17, SUMMARY+18, SUMMARY+19, SUMMARY+20, WRTBILL+2, WRTCOMM+3
>> BARPCNT CALC+2*, CALC+14*, CALC+16
>> BARPTYP GATHER+9*, GATHER+10, GATHER+14
>> BARRCPT GATHER+13*, GATHER+14
>> BARSDT GATHER+1*, GATHER+3*, GATHER+5, GATHER+14, CALC+3*, CALC+4*, CALC+6, CALC+8, CALC+9, SUMMARY+9*
, SUMMARY+10*, SUMMARY+12, SUMMARY+14, SUMMARY+18, SUMMARY+19, SUMMARY+20
>> BARTRANS CALC+11*, CALC+12*, CALC+13, WRTBILL+1*, WRTBILL+2*, WRTBILL+3, WRTBILL+4
>> BARY("ACCT" ACCTS+2!, ACCTS+9, ACCTS+13*, ACCTS+14, PRINT+3
>> BARY("COMM" COMMENTS+8*, SUMMARY+22
>> BARY("DT" DT+8*, DT+16*, DT+17, GATHER+1, GATHER+2
>> CENTER CENTER+2*, CENTER+3
DIC ACCTS+4*, ACCTS+14!, ACCTS+15!, CLEANUP+1!
DIC("A" ACCTS+7*, ACCTS+9*
DIC("S" ACCTS+6*
DIC(0 ACCTS+5*
DIR SEL+4!, DT+13!, COMMENTS+9!, CLEANUP+1!
DIR("A" DT+3*, DT+10*, COMMENTS+3*
DIR("B" COMMENTS+4*
DIR(0 SEL+4*, DT+4*, DT+11*, COMMENTS+5*
>> DIROUT ACCTS+11, DT+6, DT+14, COMMENTS+7, SUMMARY+10, SUMMARY+12, SUMMARY+14, SUMMARY+15, HD+2
>> DIRUT DT+7, DT+15
>> DTOUT ACCTS+11, DT+6, DT+14, COMMENTS+7, SUMMARY+10, SUMMARY+12, SUMMARY+14, SUMMARY+15, HD+2
>> DUOUT ACCTS+11, DT+6, DT+14, COMMENTS+7, SUMMARY+10, SUMMARY+12, SUMMARY+14, SUMMARY+15, HD+2
DUZ(2 GATHER+3, GATHER+5, GATHER+7, GATHER+8, GATHER+9, GATHER+11, GATHER+12, GATHER+13, CALC+12, SUMMARY+16
, WRTBILL+2, WRTBILL+3, HDB+7, HDB+17
>> IENS WRTCOMM+3*, WRTCOMM+4, WRTCOMM+5, WRTCOMM+8, WRTCOMM+9
IO SEL+4
IO("Q" QUE+1!
IO(0 SEL+4
ION SEL+5
>> IOP SEL+5*
IOSL SUMMARY+15
>> POP SEL+3
U GATHER+8, GATHER+9, GATHER+11, GATHER+12, GATHER+13, GATHER+14, CALC+9, CALC+13, CALC+15, CALC+16
, SUMMARY+16, SUMMARY+18, SUMMARY+19, SUMMARY+20, SUMMARY+24, WRTBILL+3, HDB+7, HDB+17, HDB+18, HDB+19
, HDB+20, HDB+21
X CENTER~, CENTER+3
>> Y ACCTS+8, ACCTS+12, ACCTS+13, DT+8, DT+16, COMMENTS+8, HDB+10*, HDB+12
>> ZTDESC QUE+2*
>> ZTRTN QUE+2*
>> ZTSAVE("BAR*" QUE+3*
>> ZTSK QUE+6, QUE+7
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