Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR |  External References |  Global Variables Directly Accessed |  Local Variables  | All
Print Page as PDF
Global: ^RCRP(340.5

Package: Accounts Receivable

Global: ^RCRP(340.5


Information

FileMan FileNo FileMan Filename Package
340.5 AR REPAYMENT PLAN Accounts Receivable

Description

Directly Accessed By Routines, Total: 27

Package Total Routines
Accounts Receivable 27 AR BILL    AUDIT    FORBEARANCE    PAYMENT    PRCAAPR1    PRCAP377    PRCAP378    PRCAP381
PRCAP389    PRCAP404    RCRPADD    RCRPDR    RCRPENTR    RCRPFB    RCRPINQ    RCRPNP
RCRPSTR    RCRPTLR    RCRPU    RCRPU1    RCRPU2    RCRPU3    RCRPWL    RCRPWL1
RCRPWLUT    SCHEDULE    ^RCRP(340.5    

Accessed By FileMan Db Calls, Total: 22

Package Total Routines
Accounts Receivable 21 PRCAAPR1    PRCAP377    PRCAP378    PRCAP381    PRCAP389    PRCAP404    RCBEPAY2    RCDPBPLM
RCRPADD    RCRPENTR    RCRPFB    RCRPINQ    RCRPNP    RCRPSTR    RCRPU1    RCRPU2
RCRPU3    RCRPWL    RCRPWL1    RCRPWLUT    RCSTATU    
Integrated Billing 1 IBJDF41    

Pointed To By FileMan Files, Total: 2

Package Total FileMan Files
Accounts Receivable 2 ACCOUNTS RECEIVABLE(#430)[45]    AR DEBTOR(#340)[#340.09(.01)]    

Pointer To FileMan Files, Total: 5

Package Total FileMan Files
Accounts Receivable 4 ACCOUNTS RECEIVABLE(#430)[#340.56(.01)]    AR TRANSACTION(#433)[#340.53(2)]    AR DEBTOR(#340)[.02]    AR RPP AUDIT LOG COMMENT(#340.501)[#340.54(5)]    
Kernel 1 NEW PERSON(#200)[#340.54(2), #340.55(3)]    

Fields, Total: 24

Field # Name Loc Type Details
.01 REPAYMENT PLAN ID 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>17!($L(X)<17)!'(X?3N1"-"3A1"-"2N1"-"6N) X
    MAXIMUM LENGTH: 17
  • LAST EDITED:  DEC 04, 2020
  • HELP-PROMPT:  Answer in the following format: -RPP--.
  • DESCRIPTION:  This field contains the full ID of the Repayment Plan. The ID is in the following format:
    -RPP--
    Where:
    Site #
    ------
    The Institution File Station Number
    RPP # for veteran
    -----------------
    The plan # for the veteran (i.e. if the Veteran is on their 5th plan, the plan # would be 05).
    IEN
    ---
    Internal Entry Number for the plan in this file
    Example:
    442-RPP-01-000322
  • CROSS-REFERENCE:  340.5^B
    1)= S ^RCRP(340.5,"B",$E(X,1,30),DA)=""
    2)= K ^RCRP(340.5,"B",$E(X,1,30),DA)
.02 DEBTOR 0;2 POINTER TO AR DEBTOR FILE (#340)
************************REQUIRED FIELD************************
AR DEBTOR(#340)

  • LAST EDITED:  DEC 03, 2020
  • HELP-PROMPT:  Enter the Debtor responsible for the plan.
  • DESCRIPTION:  
    This field contains the Debtor who is responsible for repaying the debt contained in the Repayment Plan.
  • CROSS-REFERENCE:  340.5^E
    1)= S ^RCRP(340.5,"E",$E(X,1,30),DA)=""
    2)= K ^RCRP(340.5,"E",$E(X,1,30),DA)
    This index allows for a lookup of a repayment plan by the Debtor associated with a given plan.
.03 CREATION DATE 0;3 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  NOV 13, 2020
  • HELP-PROMPT:  Enter the Date the Repayment Plan was created.
  • DESCRIPTION:  
    This field contains the Date the Repayment Plan was created.
.04 START DATE 0;4 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  DEC 07, 2020
  • HELP-PROMPT:  Enter the date the plan starts.
  • DESCRIPTION:  
    This field contains the date the first payment is due on the repayment plan. It will be different than the Creation Date. The default date of the month for a Repayment Plan Start Date will be the 28th of the month.
.05 NO. OF PAYMENTS 0;5 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  DEC 07, 2020
  • HELP-PROMPT:  Enter a number between 0 and 999.
  • DESCRIPTION:  
    This field contains the number of payments needed to pay off the Repayment Plan. The maximum number of payments allowed is 999.
.06 AMOUNT PER MONTH 0;6 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>999)!(X<0) X
  • LAST EDITED:  NOV 13, 2020
  • HELP-PROMPT:  Type a dollar amount between 0 and 999, 2 decimal digits.
  • DESCRIPTION:  
    This field contains the monthly payment amount needed to pay off the Repayment Plan in the number of payments listed in NO. OF PAYMENTS field.
.07 STATUS 0;7 SET
************************REQUIRED FIELD************************
  • '1' FOR NEW;
  • '2' FOR CURRENT;
  • '3' FOR LATE;
  • '4' FOR DELINQUENT;
  • '5' FOR DEFAULTED;
  • '6' FOR TERMINATED;
  • '7' FOR CLOSED;
  • '8' FOR PAID IN FULL;

  • LAST EDITED:  DEC 02, 2020
  • HELP-PROMPT:  Enter the Plan's Status
  • DESCRIPTION:  This field contains the status of the Repayment Plan. There are 8 statuses currently defined for the plan. The statuses and their definitions are:
    New
    ---
    The time period starting at the creation of the plan until the first payment is due.
    Current
    -------
    Payments on the plan are equal to or greater than the expected amount of payment.
    Late
    ----
    If the amount paid on the plan is less than the amount expected to be paid, but within the 30 days of the due date.
    Delinquent
    ----------
    The amount paid on the plan is less than the amount expected to be paid and the payment is 31-90 days past due.
    Defaulted
    ---------
    A payment is greater than 90 days past due.
    Terminated
    ----------
    If a plan is greater than 91 days past due and in Defaulted status, the plan will be terminated.
    Closed
    ------
    The plan closed either by request of the Veteran or the VA and Veteran agree to close this plan and create a new plan.
    Paid in Full
    ------------
    All bills paid under the repayment plan.
  • RECORD INDEXES:  D (#838)
.08 STATUS DATE 0;8 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  DEC 02, 2020
  • HELP-PROMPT:  Enter the date the status took effect.
  • DESCRIPTION:  
    This field contains the date the current status took effect.
  • RECORD INDEXES:  D (#838)
.09 NO. OF FORBEARANCES 0;9 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  NOV 13, 2020
  • HELP-PROMPT:  Type a number between 0 and 99, 0 decimal digits.
  • DESCRIPTION:  
    This field contains the total number of forbearances granted to the debtor for this Repayment Plan.
.11 PLAN AMOUNT OWED 0;11 NUMBER

  • INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>99999)!(X<0) X
  • LAST EDITED:  NOV 23, 2020
  • HELP-PROMPT:  Type a dollar amount between 0 and 99999, 2 decimal digits.
  • DESCRIPTION:  
    This field contains the total amount owed by the debtor. This total is calculated by all debt owed on the bills included in the plan at the time they are added to the plan.
.12 AUTO ADD 0;12 SET (BOOLEAN Data Type)
  • Repayment Plan. N or NULL indicates that the Debtor did not give permission.

  • LAST EDITED:  JAN 27, 2021
  • HELP-PROMPT:  Enter Y to allow New Bills to be automatically added to this Debtor's Repayment Plan. No or to prevent.
  • DESCRIPTION:  This field indicates whether or not the Repayment Plan nightly process can add new bills for the Debtor who is linked to this plan. Y indicates that the Debtor has given permission to allow new bills to be added to the
    Repayment Plan. N or NULL indicates that the Debtor did not give permission.
.13 ORIGINAL BALANCE 0;13 NUMBER

  • INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>999999999)!(X<0) X
  • LAST EDITED:  FEB 04, 2021
  • HELP-PROMPT:  Type a dollar amount between 0 and 999999999, 2 decimal digits.
  • DESCRIPTION:  
    This field contains the original balance of the Repayment Plan when it was created using the Enter a New Repayment Plan option.
.14 ORIGINAL NO. PAYMENTS 0;14 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>100)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  FEB 04, 2021
  • HELP-PROMPT:  Enter the number of payments for the plan, between 0 and 100.
  • DESCRIPTION:  
    This field contains the Repayment Plan's originally planned number of payments.
1.01 REVIEW? 1;1 SET (BOOLEAN Data Type)
  • will be cleared when the plan is edited and the # payments remaining drops below 57 months.

  • LAST EDITED:  DEC 01, 2020
  • HELP-PROMPT:  Type (Y)es to have this plan reviewed, (N)o or NULL to not have it reviewed.
  • DESCRIPTION:  This field indicates whether a Repayment Plan needs a review. Plans with this flag set will appear on the REPAYMENT PLAN TERMS EXCEPTION REPORT. This field will be set when a plan's # of payments exceeds 57 months. It
    will be cleared when the plan is edited and the # payments remaining drops below 57 months.
1.02 PRINT DEFAULT? 1;2 SET (BOOLEAN Data Type)
  • This field indicates whether a Repayment Plan needs to have the Repayment Plan Default printed. Plans with this field set to yes will appear on the PRINT DEFAULT LETTER Report.

  • LAST EDITED:  DEC 03, 2020
  • HELP-PROMPT:  Type (Y)es to have a default letter print, (N)o or NULL to prevent it from printing.
  • DESCRIPTION:  
    This field indicates whether a Repayment Plan needs to have the Repayment Plan Default printed. Plans with this field set to yes will appear on the PRINT DEFAULT LETTER Report.
  • CROSS-REFERENCE:  340.5^PRTDEF
    1)= S ^RCRP(340.5,"PRTDEF",$E(X,1,30),DA)=""
    2)= K ^RCRP(340.5,"PRTDEF",$E(X,1,30),DA)
    This index will allow the PRINT DEFAULT LETTER OPTION to quickly locate the plans which need a Repayment Plan Default Letter printed.
1.03 PRINT DELINQUENT? 1;3 SET (BOOLEAN Data Type)
  • This field indicates whether or not a Repayment Plan Delinquency Letter needs to be printed for this plan. Plans with this field set to Yes will appear on the PRINT DELINQUENCY LETTER Report.

  • LAST EDITED:  DEC 03, 2020
  • HELP-PROMPT:  Type (Y)es to have a Delinquency Letter Printed, (N)o or NULL otherwise.
  • DESCRIPTION:  
    This field indicates whether or not a Repayment Plan Delinquency Letter needs to be printed for this plan. Plans with this field set to Yes will appear on the PRINT DELINQUENCY LETTER Report.
  • CROSS-REFERENCE:  340.5^PRTDEL
    1)= S ^RCRP(340.5,"PRTDEL",$E(X,1,30),DA)=""
    2)= K ^RCRP(340.5,"PRTDEL",$E(X,1,30),DA)
    This index will allow the PRINT DELINQUENT LETTER option to quickly identify which Repayment Plans need a Delinquency Letter printed.
1.04 AT CS? 1;4 SET (BOOLEAN Data Type)
  • This field indicates whether or not the Debtor associated with this plan has any bills currently at Treasury for Cross Servicing Debt Referral.

  • LAST EDITED:  NOV 13, 2020
  • HELP-PROMPT:  Type (Y) to indicate if bills are at CS for the Debtor, (N)o or NULL otherwise.
  • DESCRIPTION:  
    This field indicates whether or not the Debtor associated with this plan has any bills currently at Treasury for Cross Servicing Debt Referral.
1.05 TERM LIMIT EXCEEDED DATE 1;5 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  DEC 03, 2020
  • HELP-PROMPT:  Enter the date the number of payments exceeded 57.
  • DESCRIPTION:  
    This field contains the date the number of payments exceeded 57 (term length). This field is cleared when the plan is edited and the number of payments goes below 57.
  • CROSS-REFERENCE:  340.5^C
    1)= S ^RCRP(340.5,"C",$E(X,1,30),DA)=""
    2)= K ^RCRP(340.5,"C",$E(X,1,30),DA)
    This xref is used to find entries with term limit exceeded date populated.
1.06 36 MONTHS REVIEW 1;6 SET
  • '0' FOR NEEDS APPROVAL;
  • '1' FOR APPROVED;
  • '2' FOR DENIED;

  • LAST EDITED:  JUL 14, 2021
  • HELP-PROMPT:  Please select the 36 months review status.
  • DESCRIPTION:  
    This field contains the status of 36 months review for plans that have term length greater than 36 months.
  • FIELD INDEX:  F (#1723) REGULAR IR LOOKUP & SORTING
    Short Descr: This is the index on field 1.06
    Description: This is the index on 36 MONTHS REVIEW field (1.06).
    Set Logic: S ^RCRP(340.5,"F",X,DA)=""
    Kill Logic: K ^RCRP(340.5,"F",X,DA)
    Whole Kill: K ^RCRP(340.5,"F")
    X(1): 36 MONTHS REVIEW (340.5,1.06) (Subscr 1) (forwards)
2 SCHEDULE 2;0 DATE Multiple #340.52 340.52

  • DESCRIPTION:  
    This sub-file contains the payment schedule for the repayment plan.
3 PAYMENT 3;0 DATE Multiple #340.53 340.53

  • DESCRIPTION:  
    This sub-file stores information on all of the payments made against the repayment plan.
4 AUDIT 4;0 DATE Multiple #340.54 340.54

  • DESCRIPTION:  
    This sub-file contains a log of the edits that have occurred to the plan.
5 FORBEARANCE 5;0 DATE Multiple #340.55 340.55

  • DESCRIPTION:  
    This sub-file contains the forbearance information associated with this Repayment Plan.
6 AR BILL 6;0 POINTER Multiple #340.56 340.56

  • DESCRIPTION:  
    This field contains a list of all bills associated with the Repayment Plan.

ICR, Total: 1

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #7221
  • Integrated Billing
    		•  REPAYMENT PLAN ID (.01).
    Access: Read w/Fileman

    DEBTOR (.02).
    Access: Read w/Fileman

    START DATE (.04).
    Access: Read w/Fileman

    AMOUNT PER MONTH (.06).
    Access: Read w/Fileman

    NO. OF PAYMENTS (.05).
    Access: Read w/Fileman

    PLAN AMOUNT OWED (.11).
    Access: Read w/Fileman

    DATE OF PAYMENT (.01).
    Access: Read w/Fileman

    AMOUNT (1).
    Access: Read w/Fileman

    TRANSACTION (2).
    Access: Read w/Fileman

    PLAN DUE DATE (.01).
    Access: Read w/Fileman

    PAYMENT MADE (1).
    Access: Read w/Fileman

    PAYMENT FORBORNE (2).
    Access: Read w/Fileman

    External References

    Name Field # of Occurrence
    ^%DT .03+1, .04+1, .08+1, 1.05+1

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^RCRP(340.5 - [#340.5] IXDSL+1*, IXDKL+1!, IXDKEIC+1!, IXFSL+1*, IXFKL+1!, IXFKEIC+1!, .01(XREF 1S), .01(XREF 1K), .02(XREF 1S), .02(XREF 1K)
    , 1.02(XREF 1S), 1.02(XREF 1K), 1.03(XREF 1S), 1.03(XREF 1K), 1.05(XREF 1S), 1.05(XREF 1K)

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    >> %DT .03+1*, .04+1*, .08+1*, 1.05+1*
    >> DA IXDSL+1, IXDKL+1, IXFSL+1, IXFKL+1, .01(XREF 1S), .01(XREF 1K), .02(XREF 1S), .02(XREF 1K), 1.02(XREF 1S), 1.02(XREF 1K)
    , 1.03(XREF 1S), 1.03(XREF 1K), 1.05(XREF 1S), 1.05(XREF 1K)
    X IXFSL+1, IXFKL+1, .01+1!, .01(XREF 1S), .01(XREF 1K), .02(XREF 1S), .02(XREF 1K), .03+1*!, .04+1*!, .05+1!
    , .06+1*!, .08+1*!, .09+1!, .11+1*!, .13+1*!, .14+1!, 1.02(XREF 1S), 1.02(XREF 1K), 1.03(XREF 1S), 1.03(XREF 1K)
    , 1.05+1*!, 1.05(XREF 1S), 1.05(XREF 1K)
    X(1 IXDSL+1, IXDKL+1
    X(2 IXDSL+1, IXDKL+1
    >> Y .03+1, .04+1, .08+1, 1.05+1
    Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR |  External References |  Global Variables Directly Accessed |  Local Variables  | All