Salt la conținutul principal
eLearner.app
COBOL MAINFRAME QUEST

COBOL Mainframe Quest: The Y2K Bug

Salvați sistemul bancar eLearner.app înainte de miezul nopții pe 31 decembrie 1999! Modificați clauzele imagine, implementați logica de expansiune a secolului și executați bucle PERFORM pentru a învinge eroarea Y2K.

Time to Midnight
10:00.91

MISSION DIRECTIVE

În 1999, anii au fost stocați cu doar două cifre (de exemplu, PIC 99). Acest lucru va provoca blocări la miezul nopții! Actualizați variabila „WS-YEAR” din secțiunea WORKING-STORAGE a programului COBOL pentru a accepta 4 cifre pentru anul (utilizați PIC 9(4) sau PIC 9999).

Variable Spec
05  WS-YEAR    PIC 99.

--> PIC 9(4) o PIC 9999

Stuck?

Learn the fundamental concepts in the COBOL course to solve this challenge.

MAINFRAME COBOL EDITOR

Edit COBOL source divisions.

Se încarcă editorul...