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

2.4.190 JMN2385I-S

@1@句のデータ名'@2@'は,基底場所節以外に定義されていなければなりません. データ名は,無効になります.

埋め込みの説明

@1@ : LINAGEまたはOCCURS.

@2@ : エラーの原因となったデータ名.

例題

[C23851.cob]
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. C23851.
000003 ENVIRONMENT DIVISION.
000004 INPUT-OUTPUT SECTION.
000005 FILE-CONTROL.
000006     SELECT AFILE1 ASSIGN DD1
000007            ORGANIZATION INDEXED
000008            RECORD KEY IS RR1.
000009 DATA DIVISION.
000010 BASED-STORAGE SECTION.
000011   01 RK1     PIC X(5).
000012 FILE SECTION.
000013   FD AFILE1 .
000014   01 AREC1.
000015     02 RR1   PIC X(2).
000016 WORKING-STORAGE SECTION.
000017   01 WREC1.
000018     02 BREC2 OCCURS 10 DEPENDING ON RK1 PIC X(2).
000019 PROCEDURE DIVISION.
000020 END PROGRAM C23851.

C23851.cob 18: JMN2385I-S OCCURS句のデータ名'RK1'は,基底場所節以外に定義されていなければなりません.データ名は,無効になります.