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