Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: RCBMILL2

Package: Accounts Receivable

Routine: RCBMILL2


Information

RCBMILL2 ;WISC/RFJ-millennium bill report (transactions) ; 27 Jun 2001 11:10 AM

Source Information

Source file <RCBMILL2.m>

Entry Points

Name Comments DBIA/ICR reference
PRINT ; print report
TOTALS ; show monthly totals (called by the other reports)
H ; print heading

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"BILL: ",$P(RCDPDATA(430,RCBILLDA,.01,"E"),"-",2)
  • Line Location: PRINT+17
Function Call: WRITE
  • Prompt: ?15,"STATUS: ",$E(RCDPDATA(430,RCBILLDA,8,"E"),1,7)
  • Line Location: PRINT+18
Function Call: WRITE
  • Prompt: ?30,"+------------+----------------------+-----------+"
  • Line Location: PRINT+20
Function Call: WRITE
  • Prompt: !,RCTRANDA
  • Line Location: PRINT+47
Function Call: WRITE
  • Prompt: ?10,DATE
  • Line Location: PRINT+48
Function Call: WRITE
  • Prompt: ?20,TYPE
  • Line Location: PRINT+49
Function Call: WRITE
  • Prompt: ?30,"|"
  • Line Location: PRINT+50
Function Call: WRITE
  • Prompt: $J($P(DATA,"^",2),10,2)
  • Line Location: PRINT+51
Function Call: WRITE
  • Prompt: " |"
  • Line Location: PRINT+52
Function Call: WRITE
  • Prompt: $J($P(DATA,"^",3),10,2)
  • Line Location: PRINT+53
Function Call: WRITE
  • Prompt: $J($P(DATA,"^",4),10,2)
  • Line Location: PRINT+54
Function Call: WRITE
  • Prompt: ?64," |"
  • Line Location: PRINT+55
Function Call: WRITE
  • Prompt: $J(-HSIFBAL,10,2)
  • Line Location: PRINT+63
Function Call: WRITE
  • Prompt: $J("paid",10)
  • Line Location: PRINT+64
Function Call: WRITE
  • Prompt: ?78,"|"
  • Line Location: PRINT+73
Function Call: WRITE
  • Prompt: !?30,"+------------+----------------------+-----------+"
  • Line Location: PRINT+86
Function Call: WRITE
  • Prompt: !?20,"BALANCES"
  • Line Location: PRINT+87
Function Call: WRITE
  • Prompt: ?31,$J(RCTOTAL("PRINCIPAL"),10,2)
  • Line Location: PRINT+88
Function Call: WRITE
  • Prompt: " "
  • Line Location: PRINT+89
Function Call: WRITE
  • Prompt: $J(RCTOTAL("TO MCCF"),10,2)
  • Line Location: PRINT+90
Function Call: WRITE
  • Prompt: $J(RCTOTAL("TO HSIF"),10,2)
  • Line Location: PRINT+91
Function Call: WRITE
  • Prompt: " |"
  • Line Location: PRINT+92
Function Call: WRITE
  • Prompt: $J(-RCTOTAL("TRANSFER TO HSIF"),10,2)
  • Line Location: PRINT+93
Function Call: WRITE
  • Prompt: ?78,"|"
  • Line Location: PRINT+94
Function Call: WRITE
  • Prompt: !?66,"+-----------+"
  • Line Location: PRINT+98
Function Call: WRITE
  • Prompt: !,"+=============================================================================+"
  • Line Location: TOTALS+2
Function Call: WRITE
  • Prompt: !,"|",?2,"TOTAL RX-COPAYMENTS FOR MONTH: ",$J(RCMOYR,10),?78,"|"
  • Line Location: TOTALS+3
Function Call: WRITE
  • Prompt: !,"|",?2," SPLIT PAID TO MCCF: ",$J(RCTOTALM("TO MCCF"),10,2),?78,"|"
  • Line Location: TOTALS+4
Function Call: WRITE
  • Prompt: !,"|",?2," SPLIT PAID TO HSIF: ",$J(RCTOTALM("TO HSIF"),10,2),?78,"|"
  • Line Location: TOTALS+5
Function Call: WRITE
  • Prompt: !,"|",?45,"ALREADY PAID TO HSIF: ",$J(RCTOTALM("PAID TO HSIF"),10,2),?78,"|"
  • Line Location: TOTALS+6
Function Call: WRITE
  • Prompt: !,"|",?45,"BALANCE OWED TO HSIF: ",$J(RCTOTALM("TO HSIF")-RCTOTALM("PAID TO HSIF"),10,2),?78,"|"
  • Line Location: TOTALS+7
Function Call: WRITE
  • Prompt: !,"|",?2," ",$J("----------",10),?78,"|"
  • Line Location: TOTALS+8
Function Call: WRITE
  • Prompt: !,"|",?2," TOTAL RX-COPAYMENTS RECEIVED: ",$J(RCTOTALM("TO MCCF")+RCTOTALM("TO HSIF"),10,2),?78,"|"
  • Line Location: TOTALS+9
Function Call: WRITE
  • Prompt: !,"+=============================================================================+"
  • Line Location: TOTALS+10
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: H+1
Function Call: WRITE
  • Prompt: $C(13),"PAYMENTS SPLIT TO HSIF/MCCF REPORT",?(79-$L(%)),%
  • Line Location: H+2
Function Call: WRITE
  • Prompt: !," FOR THE MONTH/YEAR: ",RCMOYR
  • Line Location: H+4
Function Call: WRITE
  • Prompt: ?30,"+------------+----------------------+-----------+"
  • Line Location: H+5
Function Call: WRITE
  • Prompt: !?30,"|"
  • Line Location: H+7
Function Call: WRITE
  • Prompt: $J("PRINCIP",10)
  • Line Location: H+8
Function Call: WRITE
  • Prompt: " |"
  • Line Location: H+9
Function Call: WRITE
  • Prompt: $J("FUND SPLIT",16)
  • Line Location: H+10
Function Call: WRITE
  • Prompt: " |"
  • Line Location: H+11
Function Call: WRITE
  • Prompt: $J("TRANSFER",10)
  • Line Location: H+12
Function Call: WRITE
  • Prompt: ?78,"|"
  • Line Location: H+13
Function Call: WRITE
  • Prompt: !,"TRANS #"
  • Line Location: H+15
Function Call: WRITE
  • Prompt: ?10,"PROCDATE"
  • Line Location: H+16
Function Call: WRITE
  • Prompt: ?20,"TYPE"
  • Line Location: H+17
Function Call: WRITE
  • Prompt: ?30,"|"
  • Line Location: H+18
Function Call: WRITE
  • Prompt: $J("AMOUNT",10)
  • Line Location: H+19
Function Call: WRITE
  • Prompt: " |"
  • Line Location: H+20
Function Call: WRITE
  • Prompt: $J("TO MCCF",10)
  • Line Location: H+21
Function Call: WRITE
  • Prompt: $J("TO HSIF",10)
  • Line Location: H+22
Function Call: WRITE
  • Prompt: " |"
  • Line Location: H+23
Function Call: WRITE
  • Prompt: $J("TO HSIF",10)
  • Line Location: H+24
Function Call: WRITE
  • Prompt: ?78,"|"
  • Line Location: H+25
Function Call: WRITE
  • Prompt: !,"------------------------------+------------+----------------------+-----------+"
  • Line Location: H+27
Info |  Source |  Entry Points |  Interaction Calls