Aller au contenu

Recette SQL IBM i (AS/400) · PTF et licences

Les licences de produits, leur usage et leur expiration

Les licences des produits IBM i installés : limite d'utilisation, usage actuel et date d'expiration.

Le besoin

Une licence qui expire arrête le produit. Les licences temporaires (essai, période de grâce) sont les plus dangereuses.

La requête

SELECT PRODUCT_ID, FEATURE_ID, LICENSE_TERM, RELEASE_LEVEL, USAGE_LIMIT, USAGE_COUNT,
       LICENSE_EXPIRATION, PRODUCT_TEXT
FROM QSYS2.LICENSE_INFO
ORDER BY LICENSE_EXPIRATION, PRODUCT_ID
FETCH FIRST 10 ROWS ONLY

QSYS2.LICENSE_INFO donne une ligne par produit et par fonction, avec USAGE_LIMIT, USAGE_COUNT et LICENSE_EXPIRATION (vide si la licence est permanente).

Le résultat sur un IBM i 7.5

Ce que l'IBM i a renvoyé le 01/10/2026 (5 lignes au plus) :

PRODUCT_ID Identifiant du produit FEATURE_ID Identifiant de la fonction LICENSE_TERM Durée de la licence RELEASE_LEVEL Niveau de release USAGE_LIMIT Limite d'utilisation USAGE_COUNT Nombre d'utilisations LICENSE_EXPIRATION Date d'expiration de la licence PRODUCT_TEXT Texte descriptif du produit
5770BR1 5050 V7R5M0 V7R5M0 NULL 8 NULL Backup Recovery and Media Services for IBM i
5770BR1 5101 V7R5M0 V7R5M0 NULL 13 NULL BRMS-Network Feature
5770BR1 5102 V7R5M0 V7R5M0 0 0 NULL BRMS-Advanced Functions Feature
5770SS1 5050 V7R5M0 V7R5M0 NULL 0 NULL IBM i
5770SS1 5051 V7 V7R5M0 1 1 NULL IBM i

Chez nous, toutes les licences sont permanentes (pas de date d'expiration) ; on voit l'usage, par exemple de BRMS.

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

Pour ne garder que les licences à durée limitée : WHERE LICENSE_EXPIRATION IS NOT NULL. La procédure SYSTOOLS.LICENSE_EXPIRATION_CHECK envoie un message à QSYSOPR avant l'échéance.