Recette SQL IBM i (AS/400) · Journaux
Les récepteurs de journal détachés depuis plus de 30 jours
Les récepteurs de journal détachés depuis plus de 30 jours, avec leur taille et leur date de sauvegarde : ceux qu'on peut supprimer.
Le besoin
Les récepteurs de journal s'accumulent et finissent par occuper une place énorme. Un récepteur détaché et sauvegardé peut être supprimé ; pas un récepteur jamais sauvegardé.
La requête
SELECT JOURNAL_RECEIVER_LIBRARY, JOURNAL_RECEIVER_NAME, JOURNAL_NAME, STATUS,
DETACH_TIMESTAMP, SAVE_TIMESTAMP, DECIMAL(SIZE / 1048576.0, 15, 2) AS TAILLE_MO
FROM QSYS2.JOURNAL_RECEIVER_INFO
WHERE DETACH_TIMESTAMP < CURRENT TIMESTAMP - 30 DAYS
ORDER BY SIZE DESC
FETCH FIRST 10 ROWS ONLY
QSYS2.JOURNAL_RECEIVER_INFO donne pour chaque récepteur sa date de détachement, son statut (SAVED s'il a été sauvegardé) et sa taille.
Le résultat sur un IBM i 7.5
Ce que l'IBM i a renvoyé le 01/10/2026 (5 lignes au plus) :
| JOURNAL_RECEIVER_LIBRARY Bibliothèque du récepteur de journal | JOURNAL_RECEIVER_NAME Nom du récepteur de journal | JOURNAL_NAME Nom du journal | STATUS Statut | DETACH_TIMESTAMP Horodatage du détachement | SAVE_TIMESTAMP Horodatage de la sauvegarde | TAILLE_MO Taille (Mo) |
|---|---|---|---|---|---|---|
| BIBAPP466 | JRNMCENTR | JOURNAL001 | SAVED | 2026-01-09 19:20:02.000000 | 2026-09-26 05:04:31.000000 | 0.35 |
| BIBAPP057 | QSQJRN0001 | QSQJRN | SAVED | 2026-06-06 17:33:17.000000 | 2026-09-26 05:01:59.000000 | 0.21 |
| BIBAPP332 | QSQJRN0001 | QSQJRN | SAVED | 2026-01-09 19:20:04.000000 | 2026-09-26 05:03:45.000000 | 0.11 |
| BIBAPP026 | QSQJRN0001 | QSQJRN | SAVED | 2026-06-06 17:33:18.000000 | 2026-09-26 05:01:39.000000 | 0.07 |
| BIBAPP594 | QSQJRN0001 | QSQJRN | SAVED | 2026-01-09 19:20:02.000000 | 2026-09-26 05:15:54.000000 | 0.05 |
Chez nous, tous les récepteurs anciens sont déjà sauvegardés (SAVED) : ils peuvent partir sans risque.
Données anonymisées : les noms de système, de profils, de bibliothèques, de postes et les adresses IP ont été remplacés.
L'adapter à votre système
Ajoutez AND STATUS = 'SAVED' pour ne garder que les supprimables. SYSTOOLS.DELETE_OLD_JOURNAL_RECEIVERS les supprime, avec un mode aperçu PREVIEW => 'YES'.