CREATE TABLE QGPL/RGZ as ( Select SUBSTR(TABSCHEMA, 1, 10) as LIB, SUBSTR(TABNAME, 1, 10) as FILE, SUBSTR(TABPART, 1, 10) as MBR, CARD, DELETED, case CARD when 0 then 100.00 else DELETED * 100 / CARD end as Percent_Deleted, DELETES, DSREORGS, SIZE from QSYS2.SYSPARTITIONSTAT where DELETED > 0 AND system_table_schema NOT LIKE 'Q%' order by LIB, FILE, MBR, DELETED desc ) WITH DATA

• Utilisation du REUSEDLT(*YES) (ATTENTION : Fichier SANS CLE, lu en FIFO ou LIFO)
• Fichier volumineux traité sous RGZPFM : délai de réorganisation & verrouillage
• Fichier avec plusieurs *LF : délai de réorganisation & verrouillage