XMA32 ;ISC-SF/GMB-Purge Messages by Date ;04/17/2002 07:20
Source file <XMA32.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| ENTER | ;
 | 
|
| INIT(XMPARM,XMABORT) | ;
 | 
|
| LAST(XMPARM) | ; Find the audit record for the last date purge
 | 
|
| AUDTPURG | ; Kill off the earliest purge entries, so that only a certain # remain.
 | 
|
| SETUP(XMPARM,XMABORT) | ;
 | 
|
| PDATE(XMPARM,XMABORT) | ;
 | 
|
| TESTMODE(XMPARM,XMABORT) | ;
 | 
|
| GRACE(XMPARM,XMABORT) | ;
 | 
|
| PROCESS(XMPARM) | ;
 | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| FileNo | Call Tags | 
|---|---|
| ^XMB(1 - [#4.3] | Classic Fileman Calls |