Comme on le sait, il existe en RPG deux structures natives pour traiter les exceptions.
On peut utiliser l'indicateur d'erreur ou l'extension " E ", permettant de traiter
un jeu d'exceptions prédéfini, ou bien utiliser les sous-routines Program Error
(*PSSR) ou File Error (INFSR).
Bien que ces deux méthodes
Le groupe d’opération MONITOR
soient satisfaisantes, quand une erreur se produit
et provoque un branchement à une autre sous-routine d’erreur, il n’est pas possible
de revenir à l’instruction suivante, à moins de coder un TAG et un GOTO (en supposant
que le programmeur sache où l’exception est survenue). Le code opération (ou groupe)
MONITOR a été ajouté pour mieux maîtriser le traitement des exceptions en RPG
IV. Il est constitué d’un bloc MONITOR, d’un ou plusieurs blocs ON-ERROR et d’une
opération ENDMON (ou code opération END).
Le bloc MONITOR contient le code supervisé. Sur la figure 2 on voit le code opération
READ placé dans le groupe Monitor. Les blocs On-Error testent certains codes d’état
ou une suite de codes d’état. Si l’un des tests donne un résultat vrai (une exception
se produit), le bloc On-Error est exécuté et l’erreur est traitée par le programme.
Téléchargez cette ressource
Comment accélérer la transformation des environnements de travail ?
Dans un monde professionnel en pleine mutation, la mobilité, l’efficacité énergétique, la sécurité et l’intelligence embarquée sont devenues des critères décisifs pour les équipements informatiques. Découvrez comment les nouveaux PC Microsoft Surface dotés des processeurs Snapdragon X Series s’imposent comme une réponse stratégique aux nouveaux enjeux IT.
Les articles les plus consultés
A travers cette chaîne
A travers ITPro
Les plus consultés sur iTPro.fr
- Les banques passent à l’action avec l’IA générative et le cloud
- DSI en assurance : gardien du temple ou moteur de la transformation ?
- Ransomware : persistance des cyberattaques à l’échelle mondiale
- Cybersécurité : l’IA générative rebat les cartes du cybercrime
- Le World Cyber Ranking, 1er classement mondial de la cybersécurité des entreprises
