例題
[P2097.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2097. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 01 WVAR PIC 9(2). 000007 88 ZOK VALUE 10. 000008 88 ZNG VALUE -10. 000009 PROCEDURE DIVISION. 000010 END PROGRAM P2097.
P2097.cob 8: JMN2097I-W 条件変数が符号なし数字項目である条件名のVALUE句に，符号付き数字定数は指定できません．数字定数の符号を無効にし，符号なし数字定数として扱います．
詳細な説明
条件変数が符号なし数字項目であるときは，条件名記述項(レベル番号が88)のVALUE句の値として符号なしの数字定数を記述しなければなりません．
符号付きの数字定数を指定した場合は符号は無効になり，符号なしの数字定数が条件変数の値になります．
