ページの先頭行へ戻る
NetCOBOL V11.0 メッセージ集
FUJITSU Software

2.4.60 JMN2104I-W

条件変数が英字,英数字,英数字編集または集団項目である条件名のVALUE句に,ブール定数は指定できません. 1ブール文字を1ビットとみなして,左づめで格納します.

例題

[P2104.cob]
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID.    P2104.
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"10101010".
000009 PROCEDURE      DIVISION.
000010 END PROGRAM    P2104.

P2104.cob 8: JMN2104I-W 条件変数が英字,英数字,英数字編集または集団項目である条件名のVALUE句に,ブール定数は指定できません.1ブール文字を1ビットとみなして,左づめで格納します.

詳細な説明

条件変数が英字,英数字,英数字編集または集団項目のとき,条件名記述項(レベル番号が88)のVALUE句でブール定数が指定されたならば,ブール文字("0"または"1")1個が1ビットの領域を占めるもの(ブール文字8個で1バイト)とみなして,条件名の値とします.このとき,条件変数の項目長に合わせて値は左詰めされ,残りの領域には空白文字が設定されます.