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

2.4.76 JMN2123I-S

PICTURE句の文字列が上位集団項目に指定したUSAGE句の指定と矛盾しています. PICTURE句の文字列を有効とみなします.

例題

[P2123.cob]
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID.    P2123.
000003 ENVIRONMENT    DIVISION.
000004 DATA           DIVISION.
000005 WORKING-STORAGE SECTION.
000006 01 GR1 USAGE BINARY.
000007   02 E1        PIC X(4).
000008 PROCEDURE      DIVISION.
000009 END PROGRAM    P2123.

P2123.cob 7: JMN2123I-S PICTURE句の文字列が上位集団項目に指定したUSAGE句の指定と矛盾しています.PICTURE句の文字列を有効とみなします.

詳細な説明

PICTURE句では基本項目の項類を,USAGE句ではデータ項目の用途を規定します.なおUSAGE句を集団項目に指定したとき,その指定は集団に従属する各項目にも適用されます.したがって,従属する基本項目に明にUSAGE句が書かれていなくても用途が指定されているとみなされます.各項類に対して指定できる用途はそれぞれ決められており,それ以外の組み合わせはできません.