例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. P2105.
000003 ENVIRONMENT DIVISION.
000004 DATA DIVISION.
000005 WORKING-STORAGE SECTION.
000006 01 D1 PIC X(1).
000007 88 CD1 VALUE "1".
000008 88 CD2 VALUE B"1".
000009 PROCEDURE DIVISION.
000010 END PROGRAM P2105.
P2105.cob (8) : JMN2105I-W 条件名のVALUE句に指定したブール定数の長さは，8の倍数でなければなりません．8の倍数になるように右端に0を補います．
詳細な説明
条件変数が英字，英数字，英数字編集または集団項目のとき，条件名記述項(レベル番号が88)のVALUE句にブール定数が指定されたならば，ブール文字('0'または'1')1個が１ビットの領域を占めるもの(ブール文字8個で1バイト)とみなして条件名の値とするため，ブール文字の個数は8の倍数である必要があります．
8の倍数でない場合，ブール定数の右側にブール文字'0'を補って8の倍数とみなします．