RCRJR ;WISC/RFJ,TJK-nightly process, monthly data extractors ;1 Mar 98
Source file <RCRJR.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
START | ; start the nightly process
; called by PRCABJ |
|
QUEUE(ZTDESC,ZTRTN) | ; create taskmanager task
|
|
CLEANXMB | ; clean up old mailman messages generated by AR
|
|
GETXMZ(RCSUBJCT,RCVERIFY) | ; find a message to delete
; loop through a subject, execute a check on the message, kill it |
|
KILLXMZ(XMZ) | ; kills a message and responses
|
|
WARNKILL(RCXMZ) | ; enter response to the message warning the user the message
; will deleted on the first of the month |
|
LDATE(X) | ; DETERMINE CUT-OFF DATE FOR THE MONTH
|
|
LDAY(X) | ;SECOND LAST WORKDAY OF THE MONTH
|