NetCOBOL V11.0 メッセージ集

2.5.185 JMN3309I-S

基底場所節に定義されたデータ名@1@は，@2@文の@3@指定に記述できません．

埋め込みの説明

@1@ : データ名
@2@ : READ文, START文
@3@ : 指定

例題

[C3309.cob]
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID.  C3309.
000003 ENVIRONMENT DIVISION.
000004 INPUT-OUTPUT SECTION.
000005 FILE-CONTROL.
000006     SELECT FILE-1 ASSIGN TO SYS001
000007       ORGANIZATION IS INDEXED
000008       RECORD KEY IS KEY-1
000009       ACCESS MODE IS RANDOM.
000010 DATA DIVISION.
000011 BASED-STORAGE SECTION.
000012  01 BSD-1 PIC X BASED ON PTR1.
000013 FILE SECTION.
000014  FD FILE-1.
000015  01 REC-1.
000016    02 KEY-1 PIC X(5).
000017    02       PIC X(75).
000018 WORKING-STORAGE SECTION.
000019  01 PTR1  POINTER.
000020 PROCEDURE  DIVISION.
000021     OPEN INPUT FILE-1.
000022     READ FILE-1 KEY IS BSD-1.
000023     CLOSE FILE-1.
000024 END PROGRAM  C3309.

C3309.cob 22: JMN3309I-S 基底場所節に定義されたデータ名'BSD-1'は，READ文のKEY指定に記述できません．