例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. P2039.
000003 ENVIRONMENT DIVISION.
000004 DATA DIVISION.
000005 WORKING-STORAGE SECTION.
000006 01 WDX PIC 9(2) VALUE "ABC".
000007 PROCEDURE DIVISION.
000008 END PROGRAM P2039.
P2039.cob (6) : JMN2039I-S 数字項目のVALUE句には，数字定数または表意定数のZEROを指定しなければなりません．表意定数ZEROが指定されたものとみなします．
詳細な説明
数字項目の初期値としてVALUE句に指定できる値は，数字定数または表意定数ZEROです．これら以外の値は指定できません．
翻訳を続行するために表意定数ZEROが指定されたものとみなして処理しますが，このときオブジェクトファイルや実行形式ファイルは生成されません．