Sapere quanto spazio occupa una libreria

Il totale della libreria:

SELECT SUM(OBJSIZE) / 1024 / 1024 AS MB
  FROM TABLE(QSYS2.OBJECT_STATISTICS('PRODLIB', '*ALL'))

Ma il totale serve poco: quello che interessa è chi occupa spazio.

SELECT OBJNAME, OBJTYPE,
       OBJSIZE / 1024 / 1024 AS MB,
       LAST_USED_TIMESTAMP
  FROM TABLE(QSYS2.OBJECT_STATISTICS('PRODLIB', '*ALL'))
 ORDER BY OBJSIZE DESC
 FETCH FIRST 20 ROWS ONLY

Le librerie più grandi del sistema, quando non si sa da dove partire:

SELECT OBJNAME AS LIBRERIA, OBJSIZE / 1024 / 1024 AS MB
  FROM TABLE(QSYS2.OBJECT_STATISTICS('QSYS', '*LIB'))
 ORDER BY OBJSIZE DESC
 FETCH FIRST 20 ROWS ONLY

Esempio: la libreria che cresce e nessuno sa perché

Sapere che PRODLIB occupa 40 GB non dice niente. Sapere che sei mesi fa ne occupava 28, e quali oggetti hanno preso i 12 GB di differenza, dice tutto.

Una fotografia al mese, in una tabella creata dalla query stessa:

CREATE TABLE MIALIB/STORDIM AS (
  SELECT CURRENT DATE AS RILEVATO, OBJNAME, OBJTYPE, OBJSIZE
    FROM TABLE(QSYS2.OBJECT_STATISTICS('PRODLIB', '*ALL'))
) WITH NO DATA

Poi il confronto fra due fotografie, che è la query che serve davvero:

SELECT o.OBJNAME, o.OBJTYPE,
       n.OBJSIZE - o.OBJSIZE AS CRESCITA
  FROM MIALIB/STORDIM o
  JOIN MIALIB/STORDIM n
    ON n.OBJNAME = o.OBJNAME AND n.OBJTYPE = o.OBJTYPE
 WHERE o.RILEVATO = '2026-02-01'
   AND n.RILEVATO = '2026-08-01'
 ORDER BY CRESCITA DESC
 FETCH FIRST 20 ROWS ONLY

Di solito la risposta è un file di log applicativo che nessuno ha mai svuotato, o una tabella di lavoro che doveva essere temporanea.

Rilasci. QSYS2.OBJECT_STATISTICS è disponibile dal 7.2; sul 7.1 arrivava con un PTF. La colonna LAST_USED_TIMESTAMP è stata aggiunta dopo la funzione stessa: se la query risponde SQL0206 (colonna non trovata) toglila e il resto continua a funzionare.