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
Guide de facturation électronique, voie royale pour le DAF et la digitalisation de la fonction finance
Ce livre blanc expose les problématiques auxquelles sont confrontés les DAF modernes et souligne les bénéfices de la facturation électronique pour la trésorerie. Il dévoile également le processus de déploiement de ce projet de transformation digitale que la réglementation rendra bientôt obligatoire.
Les articles les plus consultés
A travers cette chaîne
A travers ITPro
Les plus consultés sur iTPro.fr
- Protection des données : les investissements sont-ils suffisants ?
- 4 conseils pour un modèle de travail hybride durable
- Vidéo Formation : Certification AZ-104 EP03
- Plateforme de protection applicative : le couteau suisse indispensable pour les développeurs et les équipes de sécurité
- Cohésion d’équipe & Collaboration numérique : un duo gagnant ?
