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

2.3.233 JMN1390I-S

基底場所節の01または77レベル項目以外に,BASED ON句は指定できません.

例題

[C1390.cob]
000001 IDENTIFICATION  DIVISION.
000002 PROGRAM-ID.     C1390.
000003 DATA            DIVISION.
000004 BASED-STORAGE   SECTION.
000005 01  BS-TBL.
000006   02  DATA-1 PIC X(5) BASED ON P1.
000007 END PROGRAM     C1390.

C1390.cob 6: JMN1390I-S 基底場所節の01または77レベル項目以外に,BASED ON句は指定できません.