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

Package: Accounts Receivable

Routine: RCWROFF1


Information

RCWROFF1 ;WISC/RFJ-partial waiver ;1 Feb 2000

Source Information

Source file <RCWROFF1.m>

Entry Points

Name Comments DBIA/ICR reference
PARTIAL ; enter a partial waived (menu option)
SHOWTRAN(RCTRANDA) ; show data for transaction
SHOWBILL(RCBILLDA) ; show data for bill

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"BILL HAS BEEN REFERRED TO CROSS-SERVICING.",!,"NO TRANSACTIONS ARE ALLOWED.",!,"** THE RECALL PROCESS MUST BE UTILIZED PRIOR TO PERFORMING THIS FUNCTION **"
  • Line Location: PARTIAL+7
Function Call: WRITE
  • Prompt: !,"ANOTHER USER IS CURRENTLY WORKING WITH THIS BILL."
  • Line Location: PARTIAL+9
Function Call: WRITE
  • Prompt: !,"THIS BILL HAS NO PRINCIPAL BALANCE."
  • Line Location: PARTIAL+11
Function Call: WRITE
  • Prompt: !
  • Line Location: PARTIAL+12
Function Call: WRITE
  • Prompt: !,$P(RCTRANDA,"^",2)
  • Line Location: PARTIAL+14
Function Call: WRITE
  • Prompt: !," Transaction number ",RCTRANDA," added ..."
  • Line Location: PARTIAL+15
Function Call: WRITE
  • Prompt: !,$P(Y,"^",2)
  • Line Location: PARTIAL+49
Function Call: WRITE
  • Prompt: !," * * * * * Partial Waiver has been PROCESSED! * * * * *"
  • Line Location: PARTIAL+76
Function Call: WRITE
  • Prompt: !!," * * * * Transmission will be held until "_Y_" * * * *"
  • Line Location: PARTIAL+77
Function Call: WRITE
  • Prompt: !!,RCWRLINE
  • Line Location: SHOWTRAN+5
Function Call: WRITE
  • Prompt: !,"BILL NUMBER: ",$P($G(^PRCA(430,+$P(DATA0,"^",2),0)),"^")
  • Line Location: SHOWTRAN+6
Function Call: WRITE
  • Prompt: ?40,"WAIVED AMOUNT: ",$J($P(DATA1,"^",5),0,2)
  • Line Location: SHOWTRAN+7
Function Call: WRITE
  • Prompt: !?42,"WAIVED DATE: ",Y
  • Line Location: SHOWTRAN+9
Function Call: WRITE
  • Prompt: !!,"FISCAL YEAR",?30,"WAIVED AMOUNT",?50,"NEW PRINCIPAL BALANCE DUE"
  • Line Location: SHOWTRAN+10
Function Call: WRITE
  • Prompt: !,$P(DATA40,"^"),?30,$J($P(DATA40,"^",5),13,2),?50,$J($P(DATA40,"^",2),25,2)
  • Line Location: SHOWTRAN+13
Function Call: WRITE
  • Prompt: !!,RCWRLINE
  • Line Location: SHOWTRAN+14
Function Call: WRITE
  • Prompt: !?8,"Principal Balance: ",$J($P(DATA7,"^"),11,2)
  • Line Location: SHOWBILL+3
Function Call: WRITE
  • Prompt: ?40,"FY: ",$P(DATA20,"^"),?48,"Principal Balance: ",$J($P(DATA20,"^",2),0,2)
  • Line Location: SHOWBILL+7
Function Call: WRITE
  • Prompt: !?40,"FY: ",$P(DATA20,"^"),?48,"Principal Balance: ",$J($P(DATA20,"^",2),0,2)
  • Line Location: SHOWBILL+11
Function Call: WRITE
  • Prompt: !?8," Interest Balance: ",$J($P(DATA7,"^",2),11,2)
  • Line Location: SHOWBILL+13
Function Call: WRITE
  • Prompt: !?8," Admin Balance: ",$J($P(DATA7,"^",3)+$P(DATA7,"^",4)+$P(DATA7,"^",5),11,2)
  • Line Location: SHOWBILL+14
Function Call: WRITE
  • Prompt: !?27,"-----------"
  • Line Location: SHOWBILL+15
Function Call: WRITE
  • Prompt: !?8," TOTAL Balance: ",$J($P(DATA7,"^")+$P(DATA7,"^",2)+$P(DATA7,"^",3)+$P(DATA7,"^",4)+$P(DATA7,"^",5),11,2)
  • Line Location: SHOWBILL+16
Info |  Source |  Entry Points |  Interaction Calls