Re: Delete Records -File Re-org

["Mike Shaw" <mshaw@xxxxxxxxxxxxxx>]

Ken,

Setup a job schedule entry and you would not even have to dial in to run it!
:-)

I have a very similar routine that I wrote *many_moons* ago and it has not
let me down yet!  The only problem is that it needs review from release to
release to see if the outfile format for DSPFD has changed.  Other than
that, it works great.

Regards,

Mike Shaw
Senior AS/400 Technical Support
North American Mortgage Company
Santa Rosa, CA

----- Original Message -----

> Hi Rob -
>
> >Date: Thu, 17 Feb 2000 13:14:50 -0500
> >From: Rob Berendt <rob@dekko.com>
> >Subject: Re: Delete Records -File Re-org
> >
> >I too, was under the impression that it saves space.  However, it really
> >has to be something to justify doing it, unless you develop a tool.
>
> Okay, here's a free tool.  I just put on my personal website a little CL
> program that I wrote to reorganize sets of files in sets of libraries.  Go
> to http://www.ke9nr.org/as400/  Click on the obvious link and it will
bring
> up the source as a text file.
>
> Please excuse the ugliness of the page, I threw it together in less than
> five minutes.
>
> The CL program takes two parameters: library and file.  The valid values
are
> any values that work for the file and library on the DSPFD command.  The
> program will attempt to reorganize any physical file members that it finds
> as specified by the file and library parameters, so long as the member has
> deleted records and the file is not in QSYS.  The KEYFILE parameter is not
> used.
>
> If any file cannot be reorganized for any reason; in use, insufficient
> security, etc. it is skipped.  So the only time there should be a conflict
> is if someone tries to use a member, or a member based on it, while the
> reorganization is in process.
>
> I submit it to run with *ALL *ALL about every weekend Saturday evening.
It
> doesn't take that long to run on our 720, but who cares if it does.  The
> system is not doing anything useful anyway, and it's not taking any of MY
> time, except to dial in and submit it.
>
> Ken
> Southern Wine and Spirits of Nevada, Inc.
> Opinions expressed are my own and do not necessarily represent the views
of
> my employer or anyone else.
>


+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@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
+---