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

2.5.102 JMN3146I-S

READ文のKEY指定のデータ項目@1@は,主レコードキーまたは副レコードキーとして記述しなければなりません.

埋め込みの説明

@1@ : KEY指定項目名

例題

[C3146.cob]
000001 IDENTIFICATION  DIVISION.
000002 PROGRAM-ID. C3146.
000003 ENVIRONMENT  DIVISION.
000004 INPUT-OUTPUT SECTION.
000005 FILE-CONTROL.
000006     SELECT FILE-1  ASSIGN TO SYS001
000007     ORGANIZATION IS INDEXED
000008     ACCESS MODE IS RANDOM
000009     RECORD KEY IS KEY-REC.
000010 DATA  DIVISION.
000011 FILE SECTION.
000012 FD FILE-1.
000013    01 REC-1.
000014     02 KEY-REC PIC XX.
000015     02 FILLER  PIC X(78).
000016 WORKING-STORAGE SECTION.
000017    77 KEY-DATA PIC XX.
000018 PROCEDURE  DIVISION.
000019     READ FILE-1 KEY IS KEY-DATA.
000020     STOP RUN.

C3146.cob 19: JMN3146I-S READ文のKEY指定のデータ項目 は,主レコードキーまたは副レコードキーとして記述しなければなりません.