× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.


  • Subject: Re: Delete Records -File Re-org
  • From: "Mike Shaw" <mshaw@xxxxxxxxxxxxxx>
  • Date: Fri, 18 Feb 2000 11:17:01 -0800

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
+---

As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.