RGZPFM on AS400

Is there a way to either execute an RGZPFM against the entire system instead of just one object? Also, if not, is there a SQL statement that can be run to list tables that fit a certain criteria (in other words, determine through SQL what objects have a lot of deleted records)? Finally, what is the downside to the RGZPFM? I'm assuming IBM has a reason that deleted records are not reclaimed by the systems ASP.

Thanks

Ryan Hunt

Ryan,

Most AS/400 shops have TAATOOLS. This library contains a command RGZLIB that is probably what you want.

Tom Davidson

If I remember correctly and it has been a while, what I used to do is;

1) execute a dsppfm against "a library" using *mbrlist (will report
deleted records by file) creating a file in a library and then
2) write a query against the file from step 1 and sorting on the deleted
records field

Very simple and quick.

Be real careful if you plan on executing the RGZPFM against the F0911.
You might want to wait for a long weekend because that's how long it
could take depending on the amount of deleted records in the file.

I don't have a system in front of me so I can't check to see if you
could RGZPFM against an entire library or an entire system BUT I'd be
very surprised if you could.

I'm sure someone will confirm real soon.

Michael

Tom, is TAATOOLS all the CL (and more) written by Jim Sloan many years
ago? Last I heard it was not shipped free of charge any longer.

True/False?

Michael

To the List:

It's been a while since I needed to use this command... Aren't most files
on the AS/400 set to "Reuse deleted records: YES"? If not then can this
attribute be changed on live files? That might be a better solution for
rhunt than going in and having to reorganize the physical files every so
often.

Just a thought. When I used this command (years ago) I had a CL program
that analysed the files and determined which ones needed reorging.

Regards,
Gerald





rhunt
<rhunt@highwoods. To: [email protected]
com> cc:
Sent by: Subject: RGZPFM on AS400
jdelist-bounces@j
delist.com


08/25/2003 11:33
AM
Please respond to
JDELIST One World
/ XE Discussions





Is there a way to either execute an RGZPFM against the entire system
instead of just one object? Also, if not, is there a SQL statement that
can be run to list tables that fit a certain criteria (in other words,
determine through SQL what objects have a lot of deleted records)?
Finally, what is the downside to the RGZPFM? I'm assuming IBM has a reason
that deleted records are not reclaimed by the systems ASP.ThanksRyan Hunt
OneWorld XE, XU5, SP21_E1
Citrix 1.8 on Win2k TSE
AS400 Enterprise Server
Win2k Deployment
--------------------------
To view this thread, go to: http://www.jdelist.com/ubb/showthreaded.php?Cat
=&Board=OW&Number=60402

This is the JDELIST One World / XE Mailing List. To stop receiving these
messages, login to http://www.jdelist.com/forums, click Control Panel,
then click Edit by "Subscribe / Unsubscribe from receiving board posts by
email, change message notifications, etc." and adjust your subscription
preferences. JDEList is not affiliated with JDEdwards®

Ryan,

Yes, you can write a CL that does a DSPFD to a OUTFILE, then read that outfile and check for deleted records > 0, execute RGZPFM for that file, go get the next record. Coding it with parameters for the Library and files (*ALL) then you have some flexibility to automating this. If you need an example, email me and we can work out the details.

Darrell Allison
Systems Programmer
AS/400 V4R5 9406-730 8-Way / OneWorld B7332 SP11.3

If I remember correctly and it has been a while, what I used to do is;

1) execute a dsppfm against "a library" using *mbrlist (will report deleted records by file) creating a file in a library and then
2) write a query against the file from step 1 and sorting on the deleted records field

Very simple and quick.

Be real careful if you plan on executing the RGZPFM against the F0911. You might want to wait for a long weekend because that's how long it could take depending on the amount of deleted records in the file.

I don't have a system in front of me so I can't check to see if you could RGZPFM against an entire library or an entire system BUT I'd be very surprised if you could.

I'm sure someone will confirm real soon.

Michael

When prompted via F4, RGZPFM requires you to enter a file name.

To build on previous poster's idea: in a CL program, do a DSPFD *MBRLST to an outfile. Then in a DO loop read that file and issue a RGZPFM for every record found.

Well my email reply to the List seems to have gotten lost so, here it goes again. A CL is a simple solution as has been explained already. Use CL to capture an outfile from DSPFD *MBR and then read it for all records whose deleted records (MBNDTR) >0 and only for Physical Files. Also use parameters for the Library and File names to add flexibility to the CL so you can do multiple libraries as necessary. I usually do SBMJOB for a time immediately after our Full Backup completes. Just in case I need a fallback. If you need more details just drop me an email.

Darrell Allison
Systems Programmer
AS/400 V4R5 9406-730 8-Way / OneWorld B7332 SP11.3

Thanks to all that responded. I don't think the TAATOOLS are a standard shipped item anymore...or for some reason I don't have it. But, I think the CL for DSPFD *MBRLIST is going to do the trick.

Thanks

Ryan Hunt

Michael,

Yes. It is the same tool set. Jim Sloan, Inc. now markets the tools, but I have yet to see an AS/400 that doesn't have it, although this doesn't mean I won't. Its cost is very minimal.

Tom Davidson

I had to change the reuse deleted records back to 'N' for the F0911, due to coexistence and the way that World post program sorts records - by relative record after a certain key.

Gerald,

You are right, *YES does help, but in our environment it doesn't take up enough slack. We still end up with more deleted records than we had the month before. Now if there is more to this than just using *YES to reuse space once occupied by deleted records, someone please chime in.

Darrell Allison
Systems Programmer
AS/400 V4R5 9406-730 8-Way / OneWorld B7332 SP11.3

Specifying Reuse Deleted Records = *YES decreases the performance of the As/400

I've got some programs to do the job that they are explaining. it's not well documented but i can send you a save file with them if you'd like. let me know.