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

Package: Accounts Receivable

Routine: RCRPADD


Information

RCRPADD ;EDE/YMG - REPAYMENT PLAN FORBEARBANCE;03/31/2021 8:40 AM

Source Information

Source file <RCRPADD.m>

Call Graph

Call Graph

Call Graph Total: 14

Package Total Call Graph
Accounts Receivable 9 $$DADD^RCAMADD  ($$NAM,$$SSN)^RCFN01  ADJSCHED^RCRPENTR  ($$FMTPHONE,$$GETDOB,$$PMNTS,$$PRTBILLS,$$PRTHDR)^RCRPINQ  DASH^RCRPRPU  ($$CORRECT,$$GETACTS,$$GETBILLS,$$SUPAPPR,$$TOT,ADDPLAN,PAUSE,PRTACTS,UPDBILL)^RCRPU  ($$SELRPP,UPDPAO,UPDTERMS)^RCRPU1  (UPDAUDIT,UPDRVW)^RCRPU2  
UPDMET^RCSTATU  
Kernel 3 ENDR^%ZISS  ($$DT,$$FMTE)^XLFDT  $$CJ^XLFSTR  
VA FileMan 2 $$EXTERNAL^DILFD  $$GET1^DIQ  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Accounts Receivable 2 PRCAC REPAY ADD  RCRPENTR  

Entry Points

Name Comments DBIA/ICR reference
MAIN ; Entry point for Forbearance Option
PROCPLAN ;
PRTHDR(RPIEN) ; display repayment plan data
ADDNEW(RPIEN) ; Ask the user for the bills to add.
PRTNB(RCCTS) ;Print the new Bills to be added, with header
ECHOBL(RCBLCH) ; Echo the Lits of Bills selected
; Input: RCBLCH - List of bills to added.

External References

Name Field # of Occurrence
ENDR^%ZISS PROCPLAN+6
$$EXTERNAL^DILFD PRTHDR+17
$$GET1^DIQ PROCPLAN+8, PRTHDR+22, ADDNEW+8, ADDNEW+43, ADDNEW+44, ADDNEW+79
$$DADD^RCAMADD PRTHDR+8
$$NAM^RCFN01 PRTHDR+12
$$SSN^RCFN01 PRTHDR+11
ADJSCHED^RCRPENTR ADDNEW+86
$$FMTPHONE^RCRPINQ PRTHDR+16
$$GETDOB^RCRPINQ PRTHDR+11
$$PMNTS^RCRPINQ PRTHDR+18, ADDNEW+47
$$PRTBILLS^RCRPINQ PROCPLAN+21, PROCPLAN+50
$$PRTHDR^RCRPINQ PROCPLAN+14, PROCPLAN+41
DASH^RCRPRPU PRTNB+3
$$CORRECT^RCRPU ECHOBL+13
$$GETACTS^RCRPU ADDNEW+11
$$GETBILLS^RCRPU ADDNEW+21
$$SUPAPPR^RCRPU ADDNEW+63
$$TOT^RCRPU ADDNEW+35
ADDPLAN^RCRPU ADDNEW+71
PAUSE^RCRPU PROCPLAN+13, PROCPLAN+16, PROCPLAN+25, PROCPLAN+35, PROCPLAN+47, PROCPLAN+51, ADDNEW+15, ADDNEW+28, ADDNEW+37, ADDNEW+58
, ADDNEW+95
PRTACTS^RCRPU PRTNB+5
UPDBILL^RCRPU ADDNEW+69
$$SELRPP^RCRPU1 PROCPLAN+3
UPDPAO^RCRPU1 ADDNEW+76
UPDTERMS^RCRPU1 ADDNEW+85
UPDAUDIT^RCRPU2 ADDNEW+89, ADDNEW+90
UPDRVW^RCRPU2 ADDNEW+57
UPDMET^RCSTATU ADDNEW+72
$$DT^XLFDT ADDNEW+9, ADDNEW+89, ADDNEW+90
$$FMTE^XLFDT PRTHDR+17
$$CJ^XLFSTR PROCPLAN+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PROCPLAN+2
Function Call: WRITE
  • Prompt: !!,IOBON,IORVON,$$CJ^XLFSTR("*** WARNING: YOU HAVE SELECTED A CLOSED REPAYMENT PLAN ***",80),IORVOFF,IOBOFF,!!
  • Line Location: PROCPLAN+7
Function Call: WRITE
  • Prompt: !,"The selected plan currently has more than 60 payments outstanding."
  • Line Location: PROCPLAN+10
Function Call: WRITE
  • Prompt: !,"Unable to add new bills to this plan until the plan's terms"
  • Line Location: PROCPLAN+11
Function Call: WRITE
  • Prompt: !,"are adjusted."
  • Line Location: PROCPLAN+12
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PROCPLAN+18
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PROCPLAN+29
Function Call: WRITE
  • Prompt: !!,"The Repayment Plan was not updated."
  • Line Location: PROCPLAN+34
Function Call: WRITE
  • Prompt: !
  • Line Location: PROCPLAN+44
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PROCPLAN+49
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PRTHDR+10
Function Call: WRITE
  • Prompt: !!,"Debtor: ",$$NAM^RCFN01(DEBTOR)
  • Line Location: PRTHDR+12
Function Call: WRITE
  • Prompt: ?40,"SSN/TIN: ",$S(DEBSSN>0:$E(DEBSSN,1,3)_"-"_$E(DEBSSN,4,5)_"-"_$E(DEBSSN,6,9),1:"N/A")
  • Line Location: PRTHDR+13
Function Call: WRITE
  • Prompt: ?64,"DOB: ",$S(DEBDOB="":"N/A",1:DEBDOB)
  • Line Location: PRTHDR+14
Function Call: WRITE
  • Prompt: !,"Address: ",$P(ADDRSTR,U)," ",$P(ADDRSTR,U,2)," ",$P(ADDRSTR,U,3),", ",$P(ADDRSTR,U,4),", ",$P(ADDRSTR,U,5)," ",$P(ADDRSTR,U,6)
  • Line Location: PRTHDR+15
Function Call: WRITE
  • Prompt: !,"Phone: ",$S(DEBPHN>0:$$FMTPHONE^RCRPINQ(DEBPHN),1:"N/A"),!
  • Line Location: PRTHDR+16
Function Call: WRITE
  • Prompt: !,"Plan #: ",$P(N0,U),?28,"Status: ",$$EXTERNAL^DILFD(340.5,.07,"",$P(N0,U,7)),?49,"Last status date: ",$$FMTE^XLFDT($P(N0,U,8),"5DZ"),!
  • Line Location: PRTHDR+17
Function Call: WRITE
  • Prompt: !,?2,"Current balance: $",$FN(CBAL,"",2),?37,"Number of payments remaining: ",CBAL\RAMNT+$S(CBAL#RAMNT:1,1:0)
  • Line Location: PRTHDR+19
Function Call: WRITE
  • Prompt: !,?1,"Orig amount owed: $",$FN($P(N0,U,13),"",2),?38,"Original number of payments: ",$P(N0,U,14)
  • Line Location: PRTHDR+20
Function Call: WRITE
  • Prompt: !,"Total amount owed: $",$FN($P(N0,U,11),"",2),?41,"Total number of payments: ",$P(N0,U,5)
  • Line Location: PRTHDR+21
Function Call: WRITE
  • Prompt: !,?1,"Repayment amount: $",$FN(RAMNT,"",2),?47,"Auto-add New Bills: ",$$GET1^DIQ(340.5,RPIEN_",",.12,"E"),!!
  • Line Location: PRTHDR+22
Function Call: WRITE
  • Prompt: !!,"No new bills available to add to this Debtor's plan.",!
  • Line Location: ADDNEW+14
Function Call: WRITE
  • Prompt: !,"No Bills selected",!
  • Line Location: ADDNEW+27
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: ADDNEW+29
Function Call: WRITE
  • Prompt: !,"Adding these bills will make the number of remaining payments on the"
  • Line Location: ADDNEW+54
Function Call: WRITE
  • Prompt: !,"plan > 60 months. Unable to add new bills to this plan until the"
  • Line Location: ADDNEW+55
Function Call: WRITE
  • Prompt: !,"plan's terms are adjusted."
  • Line Location: ADDNEW+56
Function Call: WRITE
  • Prompt: !,"Adding these bills will make the number of remaining payments on the"
  • Line Location: ADDNEW+61
Function Call: WRITE
  • Prompt: !,"plan > 36 months. This requires supervisor approval."
  • Line Location: ADDNEW+62
Function Call: WRITE
  • Prompt: !,"Bills successfully added to the Plan.",!
  • Line Location: ADDNEW+92
Function Call: WRITE
  • Prompt: !
  • Line Location: ADDNEW+95
Function Call: WRITE
  • Prompt: !!,?26,"Bills Available for Selection"
  • Line Location: PRTNB+2
Function Call: WRITE
  • Prompt: !
  • Line Location: PRTNB+3
Function Call: WRITE
  • Prompt: !,"You chose to add the following bill(s) to this plan:",!!
  • Line Location: ECHOBL+7
Function Call: WRITE
  • Prompt: RCBILL,!
  • Line Location: ECHOBL+10

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RCRP(340.5 - [#340.5] EXTERNAL^DILFD,  GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRCA(430 - [#430] ECHOBL+9
^RCRP(340.5 - [#340.5] PROCPLAN+5, PRTHDR+6
^TMP("RCRPP" MAIN+8!, ADDNEW+7!, ADDNEW+68, ECHOBL+8

Label References

Name Line Occurrences
$$ADDNEW PROCPLAN+30
$$ECHOBL ADDNEW+32
PROCPLAN MAIN+6
PRTNB ADDNEW+18

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ADDRSTR PRTHDR+4~, PRTHDR+8*, PRTHDR+11, PRTHDR+15
BAMNT PRTHDR+4~
BILL PRTHDR+4~
BSTAT PRTHDR+4~
CBAL PRTHDR+4~, PRTHDR+18*, PRTHDR+19
CNT PRTHDR+4~
DEBDOB PRTHDR+4~, PRTHDR+11*, PRTHDR+14
DEBPHN PRTHDR+4~, PRTHDR+11*, PRTHDR+16
DEBSSN PRTHDR+4~, PRTHDR+11*, PRTHDR+13
DEBTOR PRTHDR+4~, PRTHDR+7*, PRTHDR+8, PRTHDR+11, PRTHDR+12
DIRUT ADDNEW+2~
IO PRTHDR+9
IOBOFF MAIN+3~, PROCPLAN+7
IOBON MAIN+3~, PROCPLAN+7
IOF PROCPLAN+2, PROCPLAN+18, PROCPLAN+29, PROCPLAN+49, PRTHDR+10, ADDNEW+29
IORVOFF MAIN+3~, PROCPLAN+7
IORVON MAIN+3~, PROCPLAN+7
IOST PROCPLAN+2, PROCPLAN+18, PROCPLAN+29, PROCPLAN+49, PRTHDR+10
LN MAIN+2~, MAIN+5*, PROCPLAN+1*, PROCPLAN+14*, PROCPLAN+15, PROCPLAN+20*, PROCPLAN+21*, PROCPLAN+23, PROCPLAN+24*, PROCPLAN+40*
PROCPLAN+41*, PROCPLAN+42, PROCPLAN+46*, PROCPLAN+50*, PROCPLAN+52, PRTHDR+4~
N0 PRTHDR+4~, PRTHDR+6*, PRTHDR+7, PRTHDR+17, PRTHDR+18, PRTHDR+20, PRTHDR+21
QUIT MAIN+2~, MAIN+5*, PROCPLAN+3*, PROCPLAN+17, PROCPLAN+26, PROCPLAN+33, PROCPLAN+36*, PROCPLAN+48, ADDNEW+3~, ADDNEW+95
RAMNT PRTHDR+4~, PRTHDR+18*, PRTHDR+19, PRTHDR+22
RCACTDT ADDNEW+3~, ADDNEW+9*, ADDNEW+71
RCALLFLG ADDNEW+2~, ADDNEW+22*, ADDNEW+31
RCBILL ECHOBL+3~, ECHOBL+9*, ECHOBL+10
RCBILLDA ADDNEW+3~, ADDNEW+67*, ADDNEW+68*, ADDNEW+69, ADDNEW+71, ECHOBL+3~, ECHOBL+5*, ECHOBL+8*, ECHOBL+9
RCBLCH ADDNEW+2~, ADDNEW+21*, ADDNEW+22, ADDNEW+23*, ADDNEW+26, ADDNEW+32, ADDNEW+35, ECHOBL~
RCCTS ADDNEW+2~, ADDNEW+11*, ADDNEW+13, ADDNEW+18, ADDNEW+21, PRTNB~, PRTNB+5
RCDBTR ADDNEW+2~, ADDNEW+8*, ADDNEW+11
RCDONE MAIN+2~, MAIN+5*, MAIN+6, PROCPLAN+3*, PROCPLAN+37, PROCPLAN+52*, ADDNEW+2~, ADDNEW+9*, ADDNEW+31, ADDNEW+32*
RCDONE1 MAIN+2~, PROCPLAN+1*, PROCPLAN+30*, PROCPLAN+32, PROCPLAN+33
RCMNPAY ADDNEW+3~, ADDNEW+44*, ADDNEW+48, ADDNEW+80, ADDNEW+85
RCNEWLN ADDNEW+3~, ADDNEW+48*, ADDNEW+53, ADDNEW+60, ADDNEW+64
RCNEWTOT ADDNEW+3~, ADDNEW+48*
RCNOMN ADDNEW+2~, ADDNEW+79*, ADDNEW+84, ADDNEW+86
RCNWMN ADDNEW+2~, ADDNEW+80*, ADDNEW+81*, ADDNEW+84, ADDNEW+85, ADDNEW+86
RCNWMOD ADDNEW+3~, ADDNEW+80*, ADDNEW+81
RCORBAL ADDNEW+2~, ADDNEW+43*, ADDNEW+47, ADDNEW+75
RCPLNBL ADDNEW+3~, ADDNEW+75*, ADDNEW+76, ADDNEW+80
RCRMBAL ADDNEW+3~, ADDNEW+47*, ADDNEW+48
RCRMLN ADDNEW+3~
RCRPIEN MAIN+2~, PROCPLAN+3*, PROCPLAN+5, PROCPLAN+8, PROCPLAN+14, PROCPLAN+21, PROCPLAN+30, PROCPLAN+41, PROCPLAN+50
RCRVW MAIN+2~, PROCPLAN+8*, PROCPLAN+9
RCSPFLG ADDNEW+2~, ADDNEW+4*, ADDNEW+63*, ADDNEW+64, ADDNEW+89, ADDNEW+90
RCTOT ADDNEW+2~, ADDNEW+35*, ADDNEW+36, ADDNEW+40*, ADDNEW+48, ADDNEW+75
RPIEN PRTHDR~, PRTHDR+5, PRTHDR+6, PRTHDR+18, PRTHDR+22, ADDNEW~, ADDNEW+8, ADDNEW+43, ADDNEW+44, ADDNEW+47
, ADDNEW+57, ADDNEW+63, ADDNEW+69, ADDNEW+71, ADDNEW+76, ADDNEW+79, ADDNEW+85, ADDNEW+86, ADDNEW+89, ADDNEW+90
TMP PRTHDR+4~
TMPDT PRTHDR+4~
TMPIEN PRTHDR+4~
U PROCPLAN+5, PRTHDR+7, PRTHDR+11, PRTHDR+15, PRTHDR+17, PRTHDR+18, PRTHDR+20, PRTHDR+21, ADDNEW+23, ADDNEW+40
, ECHOBL+9
X MAIN+3~, PROCPLAN+6*
Y ADDNEW+2~
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