RCRJRCOL ;WISC/RFJ-start of the ar data collector ;1 Mar 97
Source file <RCRJRCOL.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 | 4 | RCRJRCO RCRJRCO1 RCRJRCOC RCRJRTR1 |
| 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 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^PRCA(430 - [#430] | START+17, START+25, START+26, START+29, START+35, START+44, GETNEW+7, GETNEW+8, TESTNEW+3, CRITERIA+5 |
| ^PRCA(430.2 - [#430.2] | CRITERIA+15 |
| ^TMP($J | START+28, START+30*, START+32*, START+36*, START+45*, KILLTMP+1!, KILLTMP+2!, KILLTMP+3!, KILLTMP+4!, KILLTMP+5! , KILLTMP+6!, KILLTMP+7!, KILLTMP+8!, GETNEW+11* |
| Name | Line Occurrences |
|---|---|
| $$GETNEW | START+10 |
| $$TESTNEW | GETNEW+9 |
| KILLTMP | START+2 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | START+1~, START+5, START+10*, CRITERIA+4~, CRITERIA+8*, CRITERIA+9, CRITERIA+15*, CRITERIA+27, CRITERIA+32*, CRITERIA+33 , CRITERIA+34*, CRITERIA+35*, CRITERIA+36*, CRITERIA+37 |
| ACTDATE | START+1~, START+35*, START+36 |
| AYEAROLD | START+1~, START+13*, START+49 |
| BILLDA | START+1~, START+26*, START+28, START+29, START+30, START+32, START+35, START+36, START+44, START+45 , START+49, GETNEW+8*, GETNEW+9, GETNEW+11, TESTNEW~, TESTNEW+3, CRITERIA~, CRITERIA+5, CRITERIA+12, CRITERIA+32 |
| CLOSED | START+1~, START+18*, START+24*, START+39 |
| COUNT | GETNEW+4~, GETNEW+5*, GETNEW+15*, GETNEW+17 |
| CRITER1 | CRITERIA+4~, CRITERIA+9*, CRITERIA+12*, CRITERIA+14, CRITERIA+27*, CRITERIA+31, CRITERIA+39 |
| CRITER35 | CRITERIA+4~, CRITERIA+30*, CRITERIA+33*, CRITERIA+37*, CRITERIA+39 |
| CRITERIA | START+1~ |
| DATA0 | START+1~, START+29*, START+30, START+32, TESTNEW+2~, TESTNEW+3*, TESTNEW+5, TESTNEW+8, TESTNEW+10, TESTNEW+15 , TESTNEW+26, CRITERIA+4~, CRITERIA+5*, CRITERIA+8, CRITERIA+15 |
| DATASTOR | START+1~, START+7* |
| DATE | START+1~, START+18*, START+24*, START+25*, START+26, START+39, GETNEW+4~, GETNEW+6*, GETNEW+7*, GETNEW+8 |
| DATEBEG | START~, START+10, START+24, GETNEW~, GETNEW+6, GETNEW+9, TESTNEW~, TESTNEW+15 |
| DATEEND | START~, START+10, START+13, START+36, START+39, START+49, START+59, GETNEW~, GETNEW+7, GETNEW+9 , TESTNEW~, TESTNEW+15 |
| IBCNS | START+1~ |
| ORIGAMT | GETNEW+4~, GETNEW+9*, GETNEW+11, GETNEW+14, GETNEW+15 |
| PRCASITE | START~ |
| PREVSTAT | START+1~, START+44*, START+45 |
| PRINBAL | GETNEW+4~, GETNEW+5*, GETNEW+15*, GETNEW+17 |
| >> RCRJFBDR | START+59 |
| RCRJFSTO | GETNEW~, GETNEW+11, GETNEW+14 |
| STAT | START+1~, START+17*, START+24, START+25, START+26, TESTNEW+2~, TESTNEW+10*, TESTNEW+12, TESTNEW+15, TESTNEW+17 , TESTNEW+19, TESTNEW+21, TESTNEW+23 |
| STRTTIME | START+1~, START+5* |
| X | CRITERIA+4~ |
