Fwd: IFS cleanup

[Mark Bauman <mlbauman@xxxxxxxxxxxx>]

Howdie! 

In response to: 

Excerpts from mail: 27-Mar-98 Fwd: IFS cleanup Jeff Parker (2459) 

> I'm looking for a program that I can use to cleanup old files in the IFS 
> file system.  I'd like to be able to call this program and pass in two 
> parameters:  directory, and date.  The program should scan through all 
> the files in the directory and delete (unlink) any which are older than 
> the date parameter.  The QDLS file system is nice because the DLTDLO 
> command lets you specify the date.  The IFS file system commands 
> DEL/ERASE don't have any such parameter. 

> Does anyone have anything like this?  Unfortunately, I don't have a C 
> compiler so my preference would be an ILE RPG program using the IFS 
> API's.  I would like this to strictly be an AS/400 solution, (not a PC 
> program) so I can have it run automatically with our nightly Cleanup. 

> Thanks! 
> Dave 



I received the following from Jeff Parker of the IFS group here in Rochester: 

There is nothing on the native AS/400 side that will help, other than
the brut force approach where the customer codes an application (could
be RPG, COBOL, or C) that scans the directory tree using opendir(),
readdir(), closedir() querying the file's data using stat(), and
deleting old files using unlink().   




Mark L Bauman 




+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---