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

Package Total Call Graph
Accounts Receivable 11 $$DADD^RCAMADD  ($$NAM,$$SSN)^RCFN01  ADJSCHED^RCRPENTR  ($$FMTPHONE,$$GETDOB,$$PRTBILLS,$$PRTHDR)^RCRPINQ  DASH^RCRPRPU  ($$CORRECT,$$GETACTS,$$GETBILLS,$$TOT,ADDPLAN,PAUSE,PRTACTS,UPDBILL)^RCRPU  ($$SELRPP,UPDFLG36,UPDPAO,UPDTERMS)^RCRPU1  UPDAUDIT^RCRPU2  
($$CBAL,$$REMPMNTS)^RCRPU3  $$GET36^RCRPWLUT  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: 3

Package Total Caller Graph
Accounts Receivable 3 PRCAC REPAY ADD  RCRPENTR  RCRPWL1  

Entry Points

Name Comments DBIA/ICR reference
EN1(RCRPIEN) ; entry point from repayment plan worklist, called from ^RCRPWL1 PRCA*4.5*389
MAIN ; Entry point for Forbearance Option
PROCPLAN ;
PROCPLN1 ; PRCA*4.5*389
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 PROCPLN1+1, PRTHDR+22, ADDNEW+8, ADDNEW+43, ADDNEW+44, ADDNEW+84
$$DADD^RCAMADD PRTHDR+8
$$NAM^RCFN01 PRTHDR+12
$$SSN^RCFN01 PRTHDR+11
ADJSCHED^RCRPENTR ADDNEW+91
$$FMTPHONE^RCRPINQ PRTHDR+16
$$GETDOB^RCRPINQ PRTHDR+11
$$PRTBILLS^RCRPINQ PROCPLN1+14, PROCPLN1+43
$$PRTHDR^RCRPINQ PROCPLN1+7, PROCPLN1+34
DASH^RCRPRPU PRTNB+3
$$CORRECT^RCRPU ECHOBL+13
$$GETACTS^RCRPU ADDNEW+11
$$GETBILLS^RCRPU ADDNEW+21
$$TOT^RCRPU ADDNEW+35
ADDPLAN^RCRPU ADDNEW+76
PAUSE^RCRPU PROCPLAN+8, PROCPLAN+13, PROCPLN1+5, PROCPLN1+9, PROCPLN1+18, PROCPLN1+28, PROCPLN1+40, PROCPLN1+44, ADDNEW+15, ADDNEW+28
, ADDNEW+37, ADDNEW+56, ADDNEW+100
PRTACTS^RCRPU PRTNB+5
UPDBILL^RCRPU ADDNEW+74
$$SELRPP^RCRPU1 PROCPLAN+3
UPDFLG36^RCRPU1 ADDNEW+95
UPDPAO^RCRPU1 ADDNEW+81
UPDTERMS^RCRPU1 ADDNEW+90
UPDAUDIT^RCRPU2 ADDNEW+94, ADDNEW+95
$$CBAL^RCRPU3 PRTHDR+18, ADDNEW+47
$$REMPMNTS^RCRPU3 PRTHDR+19
$$GET36^RCRPWLUT ADDNEW+60
UPDMET^RCSTATU ADDNEW+77
$$DT^XLFDT ADDNEW+9, ADDNEW+94, ADDNEW+95
$$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: @IOF
  • Line Location: PROCPLN1+11
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PROCPLN1+22
Function Call: WRITE
  • Prompt: !!,"The Repayment Plan was not updated."
  • Line Location: PROCPLN1+27
Function Call: WRITE
  • Prompt: !
  • Line Location: PROCPLN1+37
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PROCPLN1+42
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: ",$$REMPMNTS^RCRPU3(RPIEN,RAMNT)
  • 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: !,"Bills successfully added to the Plan.",!
  • Line Location: ADDNEW+97
Function Call: WRITE
  • Prompt: !
  • Line Location: ADDNEW+100
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, PROCPLAN+10, PRTHDR+6
^TMP("RCRPP" EN1+9!, MAIN+8!, ADDNEW+7!, ADDNEW+73, ECHOBL+8

Label References

Name Line Occurrences
$$ADDNEW PROCPLN1+23
$$ECHOBL ADDNEW+32
PROCPLAN MAIN+6
PROCPLN1 EN1+7
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 EN1+5~, MAIN+3~, PROCPLAN+7
IOBON EN1+5~, MAIN+3~, PROCPLAN+7
IOF PROCPLAN+2, PROCPLN1+11, PROCPLN1+22, PROCPLN1+42, PRTHDR+10, ADDNEW+29
IORVOFF EN1+5~, MAIN+3~, PROCPLAN+7
IORVON EN1+5~, MAIN+3~, PROCPLAN+7
IOST PROCPLAN+2, PROCPLN1+11, PROCPLN1+22, PROCPLN1+42, PRTHDR+10
LN EN1+4~, EN1+6*, MAIN+2~, MAIN+5*, PROCPLAN+1*, PROCPLN1+7*, PROCPLN1+8, PROCPLN1+13*, PROCPLN1+14*, PROCPLN1+16
, PROCPLN1+17*, PROCPLN1+33*, PROCPLN1+34*, PROCPLN1+35, PROCPLN1+39*, PROCPLN1+43*, PROCPLN1+45, PRTHDR+4~
N0 PRTHDR+4~, PRTHDR+6*, PRTHDR+7, PRTHDR+17, PRTHDR+18, PRTHDR+20, PRTHDR+21
QUIT EN1+4~, EN1+6*, MAIN+2~, MAIN+5*, PROCPLAN+3*, PROCPLAN+5, PROCPLAN+10, PROCPLN1+1, PROCPLN1+10, PROCPLN1+19
, PROCPLN1+26, PROCPLN1+29*, PROCPLN1+41, ADDNEW+3~, ADDNEW+100
RAMNT PRTHDR+4~, PRTHDR+18*, PRTHDR+19, PRTHDR+22
RCACTDT ADDNEW+3~, ADDNEW+9*, ADDNEW+76
RCALLFLG ADDNEW+2~, ADDNEW+22*, ADDNEW+31
RCBILL ECHOBL+3~, ECHOBL+9*, ECHOBL+10
RCBILLDA ADDNEW+3~, ADDNEW+72*, ADDNEW+73*, ADDNEW+74, ADDNEW+76, 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 EN1+4~, EN1+6*, MAIN+2~, MAIN+5*, MAIN+6, PROCPLAN+3*, PROCPLAN+5*, PROCPLAN+10*, PROCPLN1+1*, PROCPLN1+30
, PROCPLN1+45*, ADDNEW+2~, ADDNEW+9*, ADDNEW+31, ADDNEW+32*
RCDONE1 EN1+4~, MAIN+2~, PROCPLAN+1*, PROCPLN1+23*, PROCPLN1+25, PROCPLN1+26
RCFLG36 MAIN+2~, PROCPLAN+10*, ADDNEW+2~, ADDNEW+4*, ADDNEW+60*, ADDNEW+61, ADDNEW+67, ADDNEW+94, ADDNEW+95
RCMNPAY ADDNEW+3~, ADDNEW+44*, ADDNEW+48, ADDNEW+85, ADDNEW+90
RCNEWLN ADDNEW+3~, ADDNEW+48*, ADDNEW+52, ADDNEW+59, ADDNEW+69
RCNEWTOT ADDNEW+3~, ADDNEW+48*
RCNOMN ADDNEW+2~, ADDNEW+84*, ADDNEW+89, ADDNEW+91
RCNWMN ADDNEW+2~, ADDNEW+85*, ADDNEW+86*, ADDNEW+89, ADDNEW+90, ADDNEW+91
RCNWMOD ADDNEW+3~, ADDNEW+85*, ADDNEW+86
RCORBAL ADDNEW+2~, ADDNEW+43*, ADDNEW+47, ADDNEW+80
RCPLNBL ADDNEW+3~, ADDNEW+80*, ADDNEW+81, ADDNEW+85
RCRMBAL ADDNEW+3~, ADDNEW+47*, ADDNEW+48
RCRMLN ADDNEW+3~
RCRPIEN EN1~, MAIN+2~, PROCPLAN+3*, PROCPLAN+5, PROCPLAN+10, PROCPLN1+1, PROCPLN1+7, PROCPLN1+14, PROCPLN1+23, PROCPLN1+34
, PROCPLN1+43, ADDNEW+95
RCRVW EN1+4~, MAIN+2~, PROCPLN1+1*
RCSPFLG ADDNEW+2~, ADDNEW+4*, ADDNEW+65*, ADDNEW+67*, ADDNEW+69, ADDNEW+94, ADDNEW+95
RCTOT ADDNEW+2~, ADDNEW+35*, ADDNEW+36, ADDNEW+40*, ADDNEW+48, ADDNEW+80
RPIEN PRTHDR~, PRTHDR+5, PRTHDR+6, PRTHDR+18, PRTHDR+19, PRTHDR+22, ADDNEW~, ADDNEW+8, ADDNEW+43, ADDNEW+44
, ADDNEW+47, ADDNEW+60, ADDNEW+74, ADDNEW+76, ADDNEW+81, ADDNEW+84, ADDNEW+90, ADDNEW+91, ADDNEW+94, ADDNEW+95
TMP PRTHDR+4~
TMPDT PRTHDR+4~
TMPIEN PRTHDR+4~
U PROCPLAN+5, PROCPLAN+10, PRTHDR+7, PRTHDR+11, PRTHDR+15, PRTHDR+17, PRTHDR+18, PRTHDR+20, PRTHDR+21, ADDNEW+23
, ADDNEW+40, ECHOBL+9
X EN1+5~, 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