RCRJRBD ;WISC/RFJ,TJK-bad debt extractor and report ;10/18/10 9:00am
Source file <RCRJRBD.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
START(DATEEND) | ; run bad debt report
; the DATEEND is the last day of the month being run ; from the routine RCRJRCOL which is the data extractor. The ; current receivable dollars is stored in ^TMP($J,"RCRJRBD",SGL) ; where SGL is the standard general ledger 1319, 1338, or 1339. |
|
STORE(SGL,DR) | ; store data for Standard Ledger Account
|
|
DELETALL | ; delete all the entries from the bad debt file
|
|
WD3() | ; return the third work day of the month
|
|
PREVMONT(FORDATE) | ; return the previous month's date
|
|
SGL(CATEGORY,FUND) | ;
|
|
BDRSGL(CAT,FUND,MRATYPE) | ; Calculate SGLs for the BDR process
|
FileNo | Call Tags |
---|---|
^RC(348.1 - [#348.1] | Classic Fileman Calls |
^PRCA(430 - [#430] | GET1^DIQ |