Saltar al contenido principal
eLearner.app
COBOL MAINFRAME QUEST

COBOL Mainframe Quest: El Bug Y2K

¡Salva el sistema bancario de eLearner.app antes de la medianoche del 31 de diciembre de 1999! Modifica picture clauses, implementa la lógica del siglo y realiza bucles PERFORM para derrotar al bug Y2K.

Tiempo para la medianoche
10:00.10

DIRECTIVA DE LA MISIÓN

En 1999, los años se almacenaban con solo dos dígitos (ej: PIC 99). ¡Esto causará fallos a medianoche! Actualiza la variable 'WS-YEAR' en el WORKING-STORAGE del programa COBOL para soportar 4 dígitos para el año (usa PIC 9(4) o PIC 9999).

Especificación de Variable
05  WS-YEAR    PIC 99.

--> PIC 9(4) o PIC 9999

¿Te has atascado?

Aprende los conceptos fundamentales en el curso de COBOL para resolver este desafío.

MAINFRAME COBOL EDITOR

Modifica las divisiones de origen COBOL.

Cargando editor...