PRCARPU ;ALB/DRF-CREATE MULTIPLE ACCOUNT REPAYMENT DATE SCHEDULE FUNCTIONS;08/09/2016 4:40 PM
Source file <PRCARPU.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DEBTOR() | ;Look up debtor by name or bill #
|
|
| ACCOUNTS(DEBTOR,ARRALL,ARRPLN,ARRNON,ACT) | ;Find all active accounts for a debtor
; DEBTOR - Pointer to #340 ; ARRALL - Name of array (passed by reference) that holds all the accounts for this debtor ; Ordered by date in the format ARRAY(1,xxxxxxx)="",ARRAY(2,xxxxxx)=""... ; ARRPLN - Name of array (passed by reference) that holds the accounts for this debtor ; that are part of a current payment plan ; Ordered by date in the format ARRAY(1,xxxxxxx)="",ARRAY(2,xxxxxx)=""... ; Check for ARRPLN>0 to see if there is an existing plan for this debtor ; ARRNON - Name of array (passed by reference) that holds the accounts for this debtor ; that are NOT part of a current payment plan ; Ordered by date in the format ARRAY(1,xxxxxxx)="",ARRAY(2,xxxxxx)=""... ; ACT - Variable that tracks the number of active accounts for the debtor. ARRALL displays ; Cross-Serviced accounts, but they are not active for the purposes of repayment plans |
|
| DISPLAY(ARR,NUM,QUIT) | ;Display accounts in ARR
; ARR - An array of bills ; NUM - Display selection numbers in left column (defaults to no (0)) ; QUIT - User requests exit = 1, default = 0 |
|
| MDY(DATE,DEL) | ;Return date format of mm-dd-yy
; DATE - Date in FileMan format ; DEL - Delimiter used to separate month, day, year |
|
| SELECT(ARR) | ;Select items up to number ARR
; ARR - The upper limit that can be chosen ; This function will eliminate duplicates and return choices in numerical error ; regardless of input order. ; Returns: comma delimited list of pointers to file #430 in ascending date order |
|
| RPDIS(DEBTOR,PLN) | ;Display Repayment Plan
; DEBTOR - Pointer to #340 ; PLN - An array of bills |
|
| RPDEL(PLN,TRAN) | ;Delete repayment plan
; PLN - An array of bills |
|
| DBTCOM(DEBTOR,TEXT) | ;Add DEBTOR comments
; DEBTOR - Pointer to #340 ; TEXT - Comment text |
|
| PLNDTL(ARR) | ;Gather existing plan details
; ARR - An array of bills |
|
| SUMM(ARR,LIST,ADD) | ;List bills from ARR to plan, new or existing
; ARR - An array of bills ; LIST - A comma delimited list of bills to be added ; ADD - An array of bills |
|
| CORRECT() | ;Are you sure this is correct?
; Return: 1 for Yes ; 0 for No |
|
| INQPLAN(DUE,PLNDT) | ;Prompt for plan details
; DUE - Total amount due for the current plan ; Returns: 1 if completed |
|
| DUEARR(ARR) | ;Total outstanding balance for array ARR returned in PLNTDUE
; ARR - An array of bills |
|
| ADDPLAN(ADD,PRCAMT,PRCADAY,PRCAFPD,PRCADT,TRAN) | ;Record plan on bills
; ADD - An array of bills to add to the repayment plan ; PRCAMT - Monthly amount the debtor will pay ; PRCADAY - Day of the month payment will be made ; PRCAFPD - Date of first payment ; PRCADT - Date plan is established ; TRAN - Flag to file a transaction for new plan |
|
| ADDTRAN(ADD) | ||
| IXDIK | ||
| TRAN | ||
| TRANDEL | ||
| PAYMENTS(AMT,FP,PAY) | ;How many payments?
; AMT - TOTAL DUE ON BILL ; FP - FIRST PAYMENT AMOUNT ; PAY - AMOUNT DEBTOR AGREES TO MONTHLY |
|
| INCDATE(DATE,PRCADAY) | ;Increment payment date
; DATE - Today's date in FileMan format ; PRCADAY - Day of the month payment is due |
|
| PAYDISP(DEBTOR,PLNDT,QUIT) | ;Display all payments for Debtor since Repayment Plan effective date
; DEBTOR - Pointer to #340 ; PLNDT - Effective date of repayment plan ; QUIT - User requests exit = 1, default = 0 |
|
| PAYDISPP | ;Display all payments for a patient debtor
|
|
| PAYDISPO | ;Display all payments for a vendor, employee, ex-employee or other debtor
|
|
| MERGE(PLN,ADD) | ;Add ADD to PLN
; PLN - An array of bills ; ADD - An array of bills |
|
| MULTI(PLN) | ;Multiple Repayment Plans?
; PLN - An array of bills |
|
| PAUSE | ||
| CMTMULT(DEBTOR) | ;Enter multiple line comment
; DEBTOR - Pointer to #340 |
|
| CMTENTR(DEBTOR) | ;Enter comments question
; DEBTOR - Pointer to #340 |
|
| ADJ(DEBT,TYPE) | ;Adjust an account for DEBT (340 entry)
|
|
| EDT | ||
| Q2 | ||
| OK(EVN) | ||
| DSMPLNS(DEBTOR,PLN) | ;Display multiple plans
; DEBTOR - Pointer to #340 ; PLN - An array of bills |
|
| SCRNCHK | ;Check to see if we need to pause the screen
|
| 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 |
|
| 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 |
|
| 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 |
|
| 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 |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^RCD(340 - [#340] | Classic Fileman Calls |
| ^RC(341 - [#341] | Classic Fileman Calls |
| ^PRCA(430 - [#430] | Classic Fileman Calls |
| ^PRCA(433 - [#433] | Classic Fileman Calls, GET1^DIQ |
