RCRJRCOL ;WISC/RFJ-start of the ar data collector ;1 Mar 97
Source file <RCRJRCOL.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
START(PRCASITE,DATEBEG,DATEEND) | ; start ar1 collector and fms data collector
|
|
KILLTMP | ; kill tmp globals
|
|
GETNEW(DATEBEG,DATEEND,RCRJFSTO) | ; get new receivables between two dates
; rcrjfsto is a flag which is set to 1 for the ndb rollup and it ; will store the data in tmp. If its not a 1, it will count the ; new bills and just return the count ^ amount. |
|
TESTNEW(BILLDA,DATEBEG,DATEEND) | ; test to see if a bill is a new receivable
; returns the principal balance if a bill is new |
|
CRITERIA(BILLDA) | ; find a bills criteria/category 1,3,4,5
; returns 1--3-4-5 where the number is the criteria number ; the second piece is set at settotal^rcrjrco1 |