XUSPURGE ;SFISC/STAFF - PURGE ROUTINE FOR XUSEC ; Oct 23, 2023@14:28:20
Source file <XUSPURGE.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
SCPURG | ;Purge sign-on log to 365 days
|
|
AOLD | ;
|
|
DAYS | ||
A02(XUDAYS) | ;Purge old Access codes in the AOLD x-ref.
|
|
V02(XUDAYS) | ;Purge old Verify code from each users VOLD x-ref
|
|
ENDA | ||
RETENTION() | ; returns number of days to retain SIGN-ON LOG file entries
|
|
EXPIRED(XUDA,XUDT) | ;Is XUDA older (smaller) than XUDT
|
|
DELETE(XUDA,XUNOW) | ; delete entry XUDA from SIGN-ON LOG file
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|