Passer au contenu principal
eLearner.app
COBOL MAINFRAME QUEST

COBOL Mainframe Quest : Le Bug Y2K

Sauvez le système bancaire d'eLearner.app avant minuit le 31 décembre 1999 ! Modifiez les clauses picture, implémentez la logique du siècle et exécutez des boucles PERFORM pour vaincre le bug Y2K.

Temps avant minuit
10:00.66

DIRECTIVE DE LA MISSION

En 1999, les années étaient stockées sur seulement deux chiffres (ex : PIC 99). Cela provoquera des plantages à minuit ! Mettez à jour la variable 'WS-YEAR' dans le WORKING-STORAGE du programme COBOL pour supporter 4 chiffres pour l'année (utilisez PIC 9(4) ou PIC 9999).

Spécification de Variable
05  WS-YEAR    PIC 99.

--> PIC 9(4) o PIC 9999

Bloqué ?

Apprenez les concepts fondamentaux dans le cours COBOL pour résoudre ce défi.

MAINFRAME COBOL EDITOR

Modifier les divisions sources COBOL.

Chargement de l'éditeur…