Routine: RCRPENTR

Information

RCRPENTR ;EDE/SAB - CREATE NEW REPAYMENT PLAN;11/16/2020 7:40 AM

Package	Total	Call Graph
Accounts Receivable	6	$$ECHOBL^RCRPADD PAUSE^RCRPRPU ($$CHKACT,$$CORRECT,$$GETACTS,$$GETBILLS,$$GETDBTR,$$GETDET,$$GETPLN,$$TOT,PAUSE,PRTACTS,UPDSCHED)^RCRPU ($$AUTOADD,$$GETRSN,$$SELRPP,UPDAUTO)^RCRPU1 ($$CALCTOT,$$DISPREF,ASKRCL,BLDPLN)^RCRPU2 ($$CPYPLAN,CLSPLAN)^RCRPU3
VA FileMan	3	^DIK ($$GET1,GETS)^DIQ ^DIR
Kernel	1	$$FMTE^XLFDT

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 6

Package	Total	Caller Graph
Accounts Receivable	6	RCRP EDIT REPAYMENT PLAN RCRP ENTER PAYMENT PLAN RCRPADD RCRPNP RCRPU1 RCRPWL1

Entry Points

Name	Comments	DBIA/ICR reference
ENTER	; Main Entry Point
EDIT	;Edit A Repayment Plan
GETPLAN()	;Get the Plan IEN using Debtor or Repayment Plan ID.
EDITPLAN(RCIEN)	; edit selected plan, entry point from repayment plan worklist PRCA4.5389
GETTYPE()	;Get the user requested type of editing.
EDMN(RCDBTR,RCIEN,RCORLN,RCEXIT)	;Edit the monthly payment
CLOSE(RCIEN)	; Close the plan PRCA4.5422
ADJSCHED(RCIEN,RCORLN,RCNEWLN)	; Add or subtract payments from a plan's Schedule.

External References

Name	Field # of Occurrence
^DIK	ADJSCHED+31
$$GET1^DIQ	EDITPLAN+6
GETS^DIQ	EDITPLAN+11
^DIR	GETTYPE+11
$$ECHOBL^RCRPADD	ENTER+37
PAUSE^RCRPRPU	EDITPLAN+6
$$CHKACT^RCRPU	ENTER+16
$$CORRECT^RCRPU	EDMN+18, CLOSE+5, CLOSE+10
$$GETACTS^RCRPU	ENTER+24
$$GETBILLS^RCRPU	ENTER+28
$$GETDBTR^RCRPU	ENTER+9
$$GETDET^RCRPU	ENTER+46
$$GETPLN^RCRPU	EDMN+12
$$TOT^RCRPU	ENTER+39
PAUSE^RCRPU	ENTER+21, ENTER+33, ENTER+41, EDMN+24, CLOSE+14
PRTACTS^RCRPU	ENTER+26
UPDSCHED^RCRPU	ADJSCHED+43
$$AUTOADD^RCRPU1	ENTER+42, EDITPLAN+46
$$GETRSN^RCRPU1	CLOSE+7
$$SELRPP^RCRPU1	GETPLAN+9
UPDAUTO^RCRPU1	EDITPLAN+46
$$CALCTOT^RCRPU2	EDMN+9
$$DISPREF^RCRPU2	ENTER+51
ASKRCL^RCRPU2	ENTER+49
BLDPLN^RCRPU2	ADJSCHED+38
$$CPYPLAN^RCRPU3	EDMN+22
CLSPLAN^RCRPU3	EDMN+20, CLOSE+12
$$FMTE^XLFDT	EDITPLAN+35

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF Line Location: ENTER+7
Function Call: WRITE	Prompt: !,"This Debtor already has a Repayment Plan that is active." Line Location: ENTER+19
Function Call: WRITE	Prompt: !,"A new plan was not created.",! Line Location: ENTER+20
Function Call: WRITE	Prompt: !,"This Debtor does not have a Repayment Plan",!!,"List of Active Bills:",!! Line Location: ENTER+23
Function Call: WRITE	Prompt: @IOF Line Location: ENTER+25
Function Call: WRITE	Prompt: !,"No Bills selected",! Line Location: ENTER+32
Function Call: WRITE	Prompt: @IOF Line Location: ENTER+34
Function Call: WRITE	Prompt: !!,"Can't edit a closed repayment plan.",! Line Location: EDITPLAN+6
Function Call: WRITE	Prompt: !!,"You are changing the monthly payment for this repayment plan ",$P(N0,U),", this plan will be administratively closed. A new plan will be generated.",! Line Location: EDMN+15
Function Call: WRITE	Prompt: !,"Repayment plan ",$P(N0,U)," has been closed.",! Line Location: EDMN+21
Function Call: WRITE	Prompt: !,"Plan Closed. " Line Location: CLOSE+14
Routine Call	DIR Line Location: GETTYPE+11

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

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^RCRP(340.5 - [#340.5]	EDMN+14, ADJSCHED+13, ADJSCHED+14, ADJSCHED+18, ADJSCHED+24, ADJSCHED+26, ADJSCHED+36, ADJSCHED+37
^TMP("RCRPP"	ENTER+13!, ENTER+54!, ADJSCHED+8!, ADJSCHED+43, ADJSCHED+46!
^TMP($J	EDITPLAN+44!

Label References

Name	Line Occurrences
$$GETPLAN	EDIT+6
$$GETTYPE	EDITPLAN+40
CLOSE	EDITPLAN+44
EDITPLAN	GETPLAN+11
EDMN	EDITPLAN+45

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DA	ADJSCHED+30*, ADJSCHED+32!
DA(1	ADJSCHED+30*
DIK	ADJSCHED+30*, ADJSCHED+32!
DIR	GETTYPE+2~, GETTYPE+11!
DIR("?"	GETTYPE+9*
DIR("A"	GETTYPE+6*
DIR("B"	GETTYPE+7*
DIR(0	GETTYPE+8*
DIROUT	GETTYPE+2~
DIRUT	GETTYPE+2~
DTOUT	GETTYPE+2~, GETTYPE+13
DUOUT	GETTYPE+2~, GETTYPE+13
IOF	ENTER+7, ENTER+25, ENTER+34, GETPLAN+8, EDITPLAN+28
N0	EDMN+5~, EDMN+14*, EDMN+15, EDMN+21
RCACPL	ENTER+2~, ENTER+16*, ENTER+18
RCAFLG	GETPLAN+2~, EDITPLAN+4~, EDITPLAN+20*, EDITPLAN+36
RCALLFLG	ENTER+2~, ENTER+29*, ENTER+36
RCAUTO	ENTER+2~, ENTER+42, ENTER+46, GETPLAN+2~, EDITPLAN+46
RCBLCH	ENTER+2~, ENTER+28, ENTER+29, ENTER+31, ENTER+37, ENTER+39, ENTER+46
RCCTS	ENTER+2~, ENTER+24*, ENTER+26, ENTER+28
RCDATA	GETPLAN+1~, EDITPLAN+8*, EDITPLAN+10!~
RCDATA(	EDITPLAN+13, EDITPLAN+14, EDITPLAN+15, EDITPLAN+16, EDITPLAN+17, EDITPLAN+18, EDITPLAN+19, EDITPLAN+20, EDITPLAN+23, EDITPLAN+24
RCDBTR	ENTER+2~, ENTER+4, ENTER+9, ENTER+10, ENTER+16, ENTER+24, ENTER+46, GETPLAN+1~, EDITPLAN+4~, EDITPLAN+15 , EDITPLAN+45, EDMN~, EDMN+12
RCDBTRN	GETPLAN+1~, EDITPLAN+4~, EDITPLAN+14*, EDITPLAN+29
RCDONE	ENTER+2~, ENTER+6, ENTER+36, ENTER+37
RCEDTYPE	GETPLAN+1~, EDITPLAN+40*, EDITPLAN+41, EDITPLAN+43, EDITPLAN+44, EDITPLAN+45, EDITPLAN+46
RCEND	EDIT+2~, EDIT+4, EDIT+6*
RCERROR	GETPLAN+1~, EDITPLAN+4~, EDITPLAN+8*
RCEXIT	GETPLAN+2~, GETPLAN+6, GETPLAN+7, GETPLAN+10, GETPLAN+14, EDITPLAN+45, EDMN~, EDMN+7, EDMN+23
RCEXIT1	GETPLAN+2~, EDITPLAN+4~, EDITPLAN+7, EDITPLAN+39, EDITPLAN+41, EDITPLAN+43, EDITPLAN+44, EDITPLAN+46*
RCFB	ADJSCHED+5~, ADJSCHED+14*, ADJSCHED+15
RCFBCT	ADJSCHED+5~, ADJSCHED+12, ADJSCHED+15, ADJSCHED+21
RCFBFLG	ADJSCHED+5~, ADJSCHED+26*, ADJSCHED+27
RCIEN	GETPLAN+1~, GETPLAN+9*, GETPLAN+10, GETPLAN+11, EDITPLAN~, EDITPLAN+6, EDITPLAN+8, EDITPLAN+44, EDITPLAN+45, EDITPLAN+46 , EDMN~, EDMN+9, EDMN+14, EDMN+20, EDMN+22, CLOSE~, CLOSE+12, ADJSCHED~, ADJSCHED+13, ADJSCHED+14 , ADJSCHED+18, ADJSCHED+24, ADJSCHED+26, ADJSCHED+30, ADJSCHED+36, ADJSCHED+37, ADJSCHED+38, ADJSCHED+43
RCIENC	GETPLAN+2~, EDITPLAN+4~, EDITPLAN+8*, EDITPLAN+11, EDITPLAN+13, EDITPLAN+14, EDITPLAN+15, EDITPLAN+16, EDITPLAN+17, EDITPLAN+18 , EDITPLAN+19, EDITPLAN+20
RCLNG	GETPLAN+1~, EDITPLAN+4~, EDITPLAN+18*, EDITPLAN+32
RCLP	GETPLAN+1~, EDITPLAN+4~, EDITPLAN+22, EDITPLAN+23, EDITPLAN+24, ADJSCHED+5~, ADJSCHED+12, ADJSCHED+13, ADJSCHED+14, ADJSCHED+18* , ADJSCHED+21
RCLP1	ADJSCHED+5~, ADJSCHED+21, ADJSCHED+24, ADJSCHED+26, ADJSCHED+30
RCMNAMT	GETPLAN+1~, EDITPLAN+4~, EDITPLAN+17*, EDITPLAN+31
RCMSCT	GETPLAN+2~, EDITPLAN+4~, EDITPLAN+22, EDITPLAN+25, EDITPLAN+33, EDITPLAN+45
RCNEWLN	ADJSCHED~, ADJSCHED+10, ADJSCHED+21, ADJSCHED+38
RCORIEN	ADJSCHED+5~, ADJSCHED+36*, ADJSCHED+37
RCORLN	EDMN~, ADJSCHED~, ADJSCHED+10, ADJSCHED+38
RCPD	ADJSCHED+5~, ADJSCHED+18*
RCPLN	EDMN+5~, EDMN+12*, EDMN+13, EDMN+22
RCPYFB	GETPLAN+2~, EDITPLAN+24*, EDITPLAN+25
RCPYMD	GETPLAN+2~, EDITPLAN+4~, EDITPLAN+24*, EDITPLAN+25
RCREASON	CLOSE+2~, CLOSE+7*, CLOSE+8, CLOSE+12
RCRPID	GETPLAN+1~, EDITPLAN+4~, EDITPLAN+13*, EDITPLAN+30
RCSTAT	GETPLAN+1~, EDITPLAN+4~, EDITPLAN+19*, EDITPLAN+34
RCSTDT	GETPLAN+2~, EDITPLAN+4~, EDITPLAN+16, EDITPLAN+35, ADJSCHED+5~, ADJSCHED+37, ADJSCHED+38
RCSUB	ADJSCHED+5~, ADJSCHED+42, ADJSCHED+43
RCSVFLG	ENTER+2~, ENTER+46*, ENTER+47
RCTOT	ENTER+2~, ENTER+39, ENTER+40, ENTER+44, ENTER+46, EDMN+5~, EDMN+9*, EDMN+12
U	ENTER+29, ENTER+37, ENTER+44, EDITPLAN+6, EDMN+15, EDMN+21, ADJSCHED+14, ADJSCHED+18, ADJSCHED+26, ADJSCHED+37
X	GETTYPE+2~
Y	GETTYPE+2~, GETTYPE+13, GETTYPE+15
Z	ENTER+2~, ENTER+51*

Customize PDF page

Package: Accounts Receivable

Routine: RCRPENTR

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 6

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: