You are here: Development Standards > Routines > Application-SpecificRoutines > ARAGE.PUB

# ARAGE.PUB

ARAGE.PUB is a public program that ages open invoices in the ARINxxx file.

`0100 ENTER CUST$,INV$,AGEDATE,CUTOFF,BUCKETS[ALL],DAYS[ALL],ARINFNUM,FILE[ALL],`
`0100:TYPE,O2$,UNPDFIN,XPOS,YPOS,COUNT,HELD,YEAR,PERIOD,CUTOFF_TYPE$,OSGUI$`

Variable | Description
CUST$ | Customer ID to age
INV$ | Specific invoice to age; set to “” to age all invoices for the customer
AGEDATE | Aging date
CUTOFF | Cutoff date. Invoices after the Julian date are not aged; set to 0 to age all invoices
BUCKETS[ALL] | Returns aged balances in BUCKETS[1:6]
DAYS[ALL] | DIM DAYS[4] and set to aging days before calling (for example, DAYS[0]=0, DAYS[1]=30, DAYS[2]=60, and so on)
ARINFNUM | FILE[] array index for the ARINxxx file
FILE[ALL] | Standard file array used for the data file channel number
TYPE | Set to 1 for invoice date or 2 for due date
O2$ | Accounts Receivable or Sales Order options string
UNPDFIN | Unused
XPOS | Column position for speedo display; set to 0 to suppress
YPOS | Row position for speedo display; set to 0 to suppress
COUNT | Returns count of invoices processed
HELD | Set to 1 to ignore held invoices or 0 to include them
YEAR | Year to age invoices from
PERIOD | Year to age invoices from
CUTOFF_TYPE$ | Set to "P" to cutoff by period, or "D" to cutoff by date
OSGUI$ | Template for GUI functions

Exit Points | Explanation
EXIT | ARAGE.PUB normally exits with no error.
EXIT ERR | An error is returned when an error occurs.