COBOL MAINFRAME QUEST

COBOL 大型机探索：Y2K Bug

请在 1999 年 12 月 31 日午夜之前保存 eLearner.app 银行系统！修改图片子句，实现世纪扩展逻辑，并执行 PERFORM 循环来克服 Y2K bug。

Time to Midnight

10:00.32

MISSION DIRECTIVE

1999 年，年份仅以两位数字存储（例如 PIC 99）。这会导致半夜崩溃！更新 COBOL 程序的 WORKING-STORAGE 部分中的“WS-YEAR”变量以支持年份的 4 位数字（使用 PIC 9(4) 或 PIC 9999）。

Variable Spec

05  WS-YEAR    PIC 99.

--> PIC 9(4) o PIC 9999

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

Edit COBOL source divisions.

正在加载编辑器...