RCRPFB ;EDE/SAB - REPAYMENT PLAN FORBEARBANCE;03/31/2021 8:40 AM
Source file <RCRPFB.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Accounts Receivable | 1 | PRCAC GRANT FORBEARANCE |
Name | Comments | DBIA/ICR reference |
---|---|---|
MAIN | ; Entry point for Forbearance Option
|
|
FORBEAR(RPIEN,LN) | ; Ask the user for the month and year to move.
|
|
CORRECT(RCDT,RCNEWDT) | ;Are you sure this is correct?
; Input: (Optional) Prompt to display ; Return: 1 for Yes ; 0 for No |
|
CALCNWDT(RCPIEN) | ;Calculate the next date in the repayment plan.
|
|
UPDFORB(RCRPIEN,RCCHGDT,RCLSTDT,RCNEWDT,RCCMMNT) | ; Update the Audit Log for the Plan
|
|
UPDFRBFG(RCPIEN,RCLSTDT) | ; Update the Forbearance flag in the plan schedule.
|
|
UPDSCHED(RCRPIEN,RCNEWDT) | ; Add another month to the schedule - For Forbearances only.
|
|
INCFRBN(RCPIEN) | ; increase # of forbearances (340.5/.09) by 1 PRCA*4.5*389
|
Name | Field # of Occurrence |
---|---|
ENDR^%ZISS | MAIN+9 |
FILE^DICN | UPDFORB+19 |
^DIE | UPDFRBFG+11, INCFRBN+9 |
^DIR | FORBEAR+10, CORRECT+7 |
$$PRTFORB^RCRPINQ | MAIN+19, FORBEAR+61 |
$$PRTHDR^RCRPINQ | MAIN+13 |
$$PRTSCHED^RCRPINQ | MAIN+16, FORBEAR+57 |
$$WRTLN^RCRPINQ | FORBEAR+9, FORBEAR+48 |
PAUSE^RCRPU | FORBEAR+17, FORBEAR+23, FORBEAR+28, FORBEAR+54 |
UPDSCHED^RCRPU | UPDSCHED+4 |
$$SELRPP^RCRPU1 | MAIN+7 |
UPDAUDIT^RCRPU2 | FORBEAR+41 |
UPDMET^RCSTATU | FORBEAR+51 |
$$DT^XLFDT | FORBEAR+41, FORBEAR+44 |
$$FMTE^XLFDT | FORBEAR+32 |
$$CJ^XLFSTR | MAIN+10, FORBEAR+48 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^RCRP(340.5 - [#340.5] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^RCRP(340.5 - [#340.5] | MAIN+8, FORBEAR+13, FORBEAR+19, FORBEAR+24, CALCNWDT+3, UPDFRBFG+7, INCFRBN+7 |
Name | Line Occurrences |
---|---|
$$CALCNWDT | FORBEAR+31 |
$$CORRECT | FORBEAR+32 |
$$FORBEAR | MAIN+22 |
INCFRBN | FORBEAR+46 |
UPDFORB | FORBEAR+44 |
UPDFRBFG | FORBEAR+38 |
UPDSCHED | FORBEAR+35 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
CURNUM | INCFRBN+5~, INCFRBN+7*, INCFRBN+8 |
DA | UPDFORB+13~, UPDFRBFG+4~, UPDFRBFG+9*, INCFRBN+4~, INCFRBN+8* |
DA(1 | UPDFORB+17*, UPDFRBFG+9*, UPDFRBFG+10 |
DD | UPDFORB+13~ |
DIC | UPDFORB+13~, UPDFORB+17* |
DIC("DR" | UPDFORB+18* |
DIC(0 | UPDFORB+17* |
DIE | UPDFRBFG+4~, UPDFRBFG+10*, INCFRBN+4~, INCFRBN+8* |
DIR | FORBEAR+2~, CORRECT+5~ |
DIR("?" | FORBEAR+7* |
DIR("A" | FORBEAR+6*, CORRECT+6* |
DIR("B" | CORRECT+6* |
DIR(0 | FORBEAR+5*, CORRECT+6* |
DIRUT | FORBEAR+2~, FORBEAR+11 |
DLAYGO | UPDFORB+13~, UPDFORB+17* |
DO | UPDFORB+13~ |
DR | UPDFRBFG+4~, UPDFRBFG+8*, INCFRBN+4~, INCFRBN+8* |
DUZ | UPDFORB+18 |
IOBOFF | MAIN+3~, MAIN+10 |
IOBON | MAIN+3~, MAIN+10 |
IORVOFF | MAIN+3~, MAIN+10 |
IORVON | MAIN+3~, MAIN+10 |
LN | MAIN+3~, MAIN+12*, MAIN+13*, MAIN+14, MAIN+16*, MAIN+17, MAIN+19, MAIN+20, MAIN+22, MAIN+23 , FORBEAR~, FORBEAR+2~, FORBEAR+4*, FORBEAR+9*, FORBEAR+48*, FORBEAR+57*, FORBEAR+58, FORBEAR+61*, FORBEAR+62 |
RCCHGDT | UPDFORB~, UPDFORB+17 |
RCCMMNT | UPDFORB~, UPDFORB+18 |
RCCONT | FORBEAR+2~, FORBEAR+32*, FORBEAR+33 |
RCDONE | MAIN+2~, MAIN+4*, MAIN+5, MAIN+7*, FORBEAR+2~, FORBEAR+3*, FORBEAR+8, FORBEAR+11*, FORBEAR+62*, FORBEAR+64 |
>> RCDONE1 | MAIN+6*, MAIN+19*, MAIN+22* |
RCDT | CORRECT~, CORRECT+6 |
RCFBDT | FORBEAR+2~, FORBEAR+12*, FORBEAR+32, FORBEAR+38, FORBEAR+44 |
RCI | UPDFRBFG+5~, UPDFRBFG+7*, UPDFRBFG+9 |
RCLSTDT | CALCNWDT+1~, CALCNWDT+3*, CALCNWDT+6, UPDFORB~, UPDFORB+15, UPDFRBFG~, UPDFRBFG+7 |
RCLSTMY | UPDFORB+14~, UPDFORB+15*, UPDFORB+18 |
RCMN | CALCNWDT+1~, CALCNWDT+6*, CALCNWDT+9*, CALCNWDT+12*, CALCNWDT+15*, CALCNWDT+18 |
RCNEWDT | FORBEAR+2~, FORBEAR+31*, FORBEAR+32, FORBEAR+35, FORBEAR+44, CORRECT~, CORRECT+6, CALCNWDT+1~, CALCNWDT+18*, CALCNWDT+19 , UPDFORB~, UPDFORB+16, UPDSCHED~, UPDSCHED+4 |
RCNEWMY | UPDFORB+14~, UPDFORB+16*, UPDFORB+18 |
RCPIEN | CALCNWDT~, CALCNWDT+3, UPDFRBFG~, UPDFRBFG+7, UPDFRBFG+9, INCFRBN~, INCFRBN+6, INCFRBN+7, INCFRBN+8 |
RCPROMPT | CORRECT+5~ |
RCRPIEN | MAIN+7*, MAIN+8, MAIN+13, MAIN+16, MAIN+19, MAIN+22, FORBEAR+57, FORBEAR+61, UPDFORB~, UPDFORB+17 , UPDSCHED~, UPDSCHED+4 |
RCSCHIEN | FORBEAR+2~, FORBEAR+13*, FORBEAR+14, FORBEAR+19, FORBEAR+24 |
RCYR | CALCNWDT+1~, CALCNWDT+6*, CALCNWDT+12*, CALCNWDT+18 |
RPIEN | FORBEAR~, FORBEAR+13, FORBEAR+19, FORBEAR+24, FORBEAR+31, FORBEAR+35, FORBEAR+38, FORBEAR+41, FORBEAR+44, FORBEAR+46 |
U | MAIN+8, FORBEAR+19, FORBEAR+24, INCFRBN+7 |
X | MAIN+3~, MAIN+9*, CORRECT+5~, UPDFORB+13~, UPDFORB+17*, UPDFRBFG+4~, INCFRBN+4~ |
Y | FORBEAR+2~, FORBEAR+12, FORBEAR+13, CORRECT+5~, CORRECT+9, UPDFORB+13~, UPDFRBFG+4~, INCFRBN+4~ |