RE: IFS cleanup

["Leland, David" <dleland@xxxxxxxxxx>]

That's exactly what I was asking for.  A simple program that would do
just what Jeff Parker stated.  Any takers?

Dave

> ----------
> From:         Mark Bauman[SMTP:mlbauman@VNET.IBM.COM]
> Sent:         Friday, March 27, 1998 9:59 AM
> To:   midrange-l@midrange.com
> Subject:      Fwd: IFS cleanup
> 
> 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
> +---
> 
+---
| 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
+---