Apprenez les bases du COBOL et développez vos compétences en programmation legacy avec une approche moderne.
L'instruction EVALUATE est une alternative puissante à une série de IF successifs.
Elle joue un rôle similaire au switch/case des autres langages, en permettant de tester plusieurs cas de figure de manière lisible.
EVALUATE expression
WHEN valeur1
instructions
WHEN valeur2
instructions
WHEN OTHER
instructions par défaut
END-EVALUATE.
EVALUATE JOUR-SEM
WHEN "LUN"
DISPLAY "Début de semaine".
WHEN "VEN"
DISPLAY "Fin de semaine".
WHEN OTHER
DISPLAY "Jour normal".
END-EVALUATE.
EVALUATE VAR1 ALSO VAR2
WHEN "A" ALSO 1
instructions...
WHEN "B" ALSO 2
instructions...
END-EVALUATE.
L’instruction ALSO permet d’évaluer plusieurs variables à la fois.
C’est très utile pour gérer des combinaisons de cas.
EVALUATE peut être une variable, une condition, ou plusieurs avec ALSO.WHEN correspond à un cas à tester.WHEN OTHER est optionnel mais recommandé.END-EVALUATE.EVALUATE pour améliorer la lisibilité au lieu de plusieurs IF imbriqués.WHEN = un bloc d’instructions.WHEN OTHER pour gérer les cas non prévus.EVALUATE TRUE que pour simuler une cascade d’IF.
IF est adapté aux décisions simples.
EVALUATE devient plus lisible dès que vous avez 3 cas ou plus à gérer.
Grâce à l’instruction EVALUATE, vous pouvez gérer vos conditions de manière plus claire et plus modulaire.
C’est un outil puissant, notamment dans les programmes de traitement de fichiers, de saisies ou de calculs.