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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: RCDPR215

Package: Accounts Receivable

Routine: RCDPR215


Information

RCDPR215 ;WISC/RFJ-receipt processing sf215 report ;1 Jun 99

Source Information

Source file <RCDPR215.m>

Entry Points

Name Comments DBIA/ICR reference
DQ ; queued report starts here, input RECEIPDA
; RCTYPE="D"etail or "A"ccrual
Q
GETTYPE() ; ask the type of report to print
DEBTOR(DA) ; returns the debtor name for ien of bill (da) in file 430
H ; header
PAUSE ; pause at end of page

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?5,"Appropriation: ",FUND
  • Line Location: DQ+35
Function Call: WRITE
  • Prompt: !
  • Line Location: DQ+36
Function Call: WRITE
  • Prompt: !?5,COUNT,")",?10,BILL,?30,$J($P(DATA,"^"),10,2),?45,"DEBTOR: ",$E($$DEBTOR(BILLDA),1,25)
  • Line Location: DQ+51
Function Call: WRITE
  • Prompt: !?15,"INT:",$J($P(DATA,"^",2),10,2)," ADMIN:",$J($P(DATA,"^",3),10,2)," MARS: ",$J($P(DATA,"^",4),10,2)," CC: ",$J($P(DATA,"^",5),10,2)
  • Line Location: DQ+52
Function Call: WRITE
  • Prompt: !?30,"----------",!?5,"TOTAL for ",FUND
  • Line Location: DQ+55
Function Call: WRITE
  • Prompt: ?30,$J(PRINTOTL,10,2)
  • Line Location: DQ+56
Function Call: WRITE
  • Prompt: ?45,"0160a1 sub-totals Champva receipts",!?45,"not sent to FMS on the CR document."
  • Line Location: DQ+57
Function Call: WRITE
  • Prompt: !
  • Line Location: DQ+64
Function Call: WRITE
  • Prompt: !?5,"INTEREST : (APP: 1435)",?30,$J($P(TOTAL,"^",2),10,2)
  • Line Location: DQ+65
Function Call: WRITE
  • Prompt: !?5,"ADMIN : (APP: 3220)",?30,$J($P(TOTAL,"^",3),10,2)
  • Line Location: DQ+66
Function Call: WRITE
  • Prompt: !?5,"MARSHALL : (APP: 0869)",?30,$J($P(TOTAL,"^",4),10,2)
  • Line Location: DQ+67
Function Call: WRITE
  • Prompt: !?5,"COURTCOST: (APP: 0869)",?30,$J($P(TOTAL,"^",5),10,2)
  • Line Location: DQ+68
Function Call: WRITE
  • Prompt: !?30,"----------"
  • Line Location: DQ+69
Function Call: WRITE
  • Prompt: !?30,$J($P(TOTAL,"^",2)+$P(TOTAL,"^",3)+$P(TOTAL,"^",4)+$P(TOTAL,"^",5),10,2)
  • Line Location: DQ+70
Function Call: WRITE
  • Prompt: !!?5,"Appropriation: 3875"
  • Line Location: DQ+85
Function Call: WRITE
  • Prompt: !
  • Line Location: DQ+86
Function Call: WRITE
  • Prompt: !?5,COUNT,")",?10,UNAPPLY,?30,$J(AMOUNT,10,2),?45,"COMMENTS: ",$E(COMMENTS,1,25)
  • Line Location: DQ+99
Function Call: WRITE
  • Prompt: !?25,$E(COMMENTS,26,80)
  • Line Location: DQ+100
Function Call: WRITE
  • Prompt: !,?45,"COMMENTS: "_$E(RCCOM,1,25)
  • Line Location: DQ+110
Function Call: WRITE
  • Prompt: !?25,$E(RCCOM,26,80)
  • Line Location: DQ+113
Function Call: WRITE
  • Prompt: !,?45,"ADDED BY USER: "_$P(RCCHIS(RCSUB),U,2)
  • Line Location: DQ+115
Function Call: WRITE
  • Prompt: !,?45,"ADDED: "_$P(RCCHIS(RCSUB),U,1)
  • Line Location: DQ+117
Function Call: WRITE
  • Prompt: !?30,"----------",!?5,"TOTAL for 3875"
  • Line Location: DQ+121
Function Call: WRITE
  • Prompt: ?30,$J(PRINTOTL,10,2)
  • Line Location: DQ+122
Function Call: WRITE
  • Prompt: !!,"TOTALS: "
  • Line Location: DQ+126
Function Call: WRITE
  • Prompt: !?5,"TOTAL AMOUNT POSTED:",?30,$J(TOTLAMT,10,2)
  • Line Location: DQ+127
Function Call: WRITE
  • Prompt: !,"Press RETURN to continue: "
  • Line Location: DQ+129
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: H+2
Function Call: WRITE
  • Prompt: $C(13),"Page ",PAGE,?(80-$L(NOW)),NOW
  • Line Location: H+3
Function Call: WRITE
  • Prompt: !,$E($TR(RCYLINE,"-","*"),1,34)," 215 REPORT ",$E($TR(RCYLINE,"-","*"),1,34)
  • Line Location: H+4
Function Call: WRITE
  • Prompt: !!,"RECEIPT #: ",RECEIPT,?25,"for DEPOSIT #: ",DEPOSIT
  • Line Location: H+5
Function Call: WRITE
  • Prompt: ?51,"FMS Document #: ",FMSDOCNO
  • Line Location: H+6
Function Call: WRITE
  • Prompt: !,Z
  • Line Location: H+9
Function Call: WRITE
  • Prompt: !,RCYLINE
  • Line Location: H+10
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: PAUSE+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PRCA(430 - [#430] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call