例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. P2035.
000003 DATA DIVISION.
000004 WORKING-STORAGE SECTION.
000005 01 WNUM PIC 9(3)V99 VALUE -12.34.
000006 PROCEDURE DIVISION.
000007 END PROGRAM P2035.
P2035.cob (5) : JMN2035I-W 符号付き数字定数は，符号なし数字項目に指定できません．数字定数の符号は，無効になります．
詳細な説明
符号なし数字項目の初期値をVALUE句で指定するときは，符号なしの数字定数を記述しなければなりません．
符号付きの数字定数を指定した場合は符号は無効になり，符号なしの数字定数として数字項目に設定されます．