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
MAINFRAME COBOL EDITOR
Edit COBOL source divisions.
Se încarcă editorul...