Przejdź do głównej treści
eLearner.app
COBOL MAINFRAME QUEST

COBOL Mainframe Quest: Błąd Y2K

Ocal system bankowy eLearner.app przed północą 31 grudnia 1999 roku! Modyfikuj klauzule picture, zaimplementuj logikę stulecia i uruchamiaj pętle PERFORM, aby pokonać błąd Y2K.

Czas do północy
10:00.86

DYREKTYWA MISJI

W 1999 roku lata były przechowywane tylko z dwiema cyframi (np. PIC 99). Spowoduje to awarię o północy! Zaktualizuj zmienną 'WS-YEAR' w sekcji WORKING-STORAGE programu COBOL, aby obsługiwała 4 cyfry roku (użyj PIC 9(4) lub PIC 9999).

Specyfikacja Zmiennej
05  WS-YEAR    PIC 99.

--> PIC 9(4) o PIC 9999

Utknąłeś?

Poznaj podstawowe pojęcia w kursie COBOL, aby rozwiązać to wyzwanie.

MAINFRAME COBOL EDITOR

Edytuj sekcje źródłowe COBOL.

Ładowanie edytora...