Le programme de la figure 1 est simple. Il ajoute 1 à un nombre et l’affiche sur l’écran. Compilez ce programme avec la commande suivante :
CRTBNDPRG PGM(ADDONE) SRCFILE(mylib/QRPGLESRC)
Essayez d’appeler ce programme trois fois. La première fois, il affiche le chiffre 1. La deuxième fois, il
Tester le comportement
affiche 2, et la troisième fois il affiche 3. Tapez la commande
RCLACTGRP ACTGRP(ADDONE)
et exécutez à nouveau le programme. Observez que la commande précédente fait redémarrer le programme au début.
Bien que je n’aie jamais activé l’indicateur LR (on), la récupération du groupe d’activation fait que le programme est transféré de la mémoire (c’est-à-dire désactivé) et c’est pourquoi, quand vous exécutez le programme à nouveau, le numéro repart à 1. Si j’ai des fichiers ouverts, la commande RCLACTGRP les ferme. Si d’autres programmes supplémentaires ou programmes de service sont en train de s’exécuter dans le groupe d’activation, ils sont tous désactivés au moment où le groupe d’activation ADDONE est récupéré.
Téléchargez gratuitement cette ressource
Comment sécuriser la Digital Workplace ?
Avec le recours généralisé au télétravail, les entreprises ont ouvert davantage leur SI. En dépit des précautions prises, elles ont mécaniquement élargi leur surface d’exposition aux risques. Découvrez 5 axes à ne pas négliger dans ce Top 5 Sécurité du Télétravail.
Les articles les plus consultés
A travers cette chaîne
A travers ITPro
