Voici comment être alerté en cas de disques pleins , en mettant en place une solution simple
Vous avez une valeur limite système qui s’appelle QSTGLOWLMT qui indique la valeur minimum qui doit rester et qui est exprimée en % souvent 15 % ou 10 %.
Vous avez une deuxième valeur système QSTGLOWACN qui indique l’action à effectuer quand vous aurez dépassé ce seuil
par défaut *MSG enverra un message dans QSYSOPR
Vous pouvez changer cette valeur en *REGFAC cette notion veut dire déclenche le programme associé au programme d’exit QIBM_QWC_QSTGLOWACN
le programme que vous devez lancer ne reçoit pas de paramètre
ADDEXITPGM EXITPNT(QIBM_QWC_QSTGLOWACN)
FORMAT(STGL0100)
PGMNBR(1)
PGM(MABIB/MONPGM)
exemple de programme :
PGM
/* MONPGM */
SNDSMTPEMM RCP((‘admin@votresociété.fr’)) +
SUBJECT(‘Limite espace disque’) +
NOTE(‘Attention vous avez dépassé le seuil de mémoire requise’)
ENDPGM
Bien sur il faut que votre partition soit relais de messagerie .
Attention, si vous utilisez le mail, QPGMR devra avoir le droit d’en emettre, utilisez la commande ADDSMTPLE.
Vous pouvez faire un programme beaucoup plus évolué, même en RPGLE, si vous le désirez .
Attention :
La petite subtilité est donc au redémarrage :
Quand on démarre le système (IPL) ou qu’on lance le qstruppgm ou qu’on démarre le sous système qctl avec moins de la valeur QSTGLOWLMT, Il ne peut pas soumettre le Programme d’exit et le système reste en restreint un peu comme la valeur *ENDSYS qui mettrait directement le sous système en restreint. et pour redémarrer vous devrez faire du ménage ….