Zitat Zitat von Liebhoff Beitrag anzeigen
Moin zusammen,
... ich habe ziemlich große Bibliotheken mit vielen Files zu reorganisieren. dafür habe ich ein Programm geschrieben, das sich eine Datei nach der anderen vornimmt und so die Bibliothek abarbeitet. ...
Diese ist Open Source von EcofIT (Objekte & Quellen sind dabei).
Es checkt zuerst für locks (nutzt API's)

EcofIT Support Portal
(man muss sich zuerst dort umsonst registrieren).

RGZPFPCT - RGZPFM by percentage deleted records
This command will perform a RGZPFM for each file (table) found matching the input criteria. The input parameters are soft, i.e. generic (nam*) names can be used and the library selection has also been expanded. Allows for a percentage deleted records threshold to be input (new feature).
Code:
                    RGZPFM by Percentage Deleted (RGZPFPCT)              
 
Type choices, press Enter.                                               
 
File . . . . . . . . . . . . . .   *all          Name, generic*, *ALL    
  Library  . . . . . . . . . . .     *ALLUSR     Name, *LIBL, *USRLIBL...
Percentage deleted records . . .   10            1-100
Important:
1. Member locks are catered for (new feature).
2. The current library/file/member being re-orged is displayed (new feature).
3. No footprint is retained after execution.
4. May be executed in batch or interactively.
5. After restoring on your box, use CHGCMD CMD(RGZPFPCT) PGM(xxxxx/RGZPFPCTC) where xxxx = the library to which you restored.

Objects created to v510. Tested from v530 thru v540.