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

2.4.64 JMN2108I-S

THROUGH指定の条件名のVALUE句には,ブール定数は指定できません.

例題

[P2108.cob]
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID.    P2108.
000003 ENVIRONMENT    DIVISION.
000004 DATA           DIVISION.
000005 WORKING-STORAGE SECTION.
000006 01 D1          PIC 1(4).
000007 88 CD1         VALUE B"0000".
000008 88 CD2         VALUE B"1111".
000009 88 CD3         VALUE B"0000" THRU B"1111".
000010 PROCEDURE      DIVISION.
000011 END PROGRAM    P2108.

P2108.cob 9: JMN2108I-S THROUGH指定の条件名のVALUE句には,ブール定数は指定できません.