2.3.200 JMN1323I-S

索引ファイルには，RECORD KEY句を指定しなければなりません．

例題

[C1323.cob]
000001 IDENTIFICATION  DIVISION.
000002 PROGRAM-ID.     C1323.
000003 ENVIRONMENT     DIVISION.
000004 INPUT-OUTPUT    SECTION.
000005 FILE-CONTROL.
000006     SELECT INFILE ASSIGN TO DISK
000007     ORGANIZATION IS INDEXED.
000008 DATA            DIVISION.
000009 FILE            SECTION.
000010 FD  INFILE.
000011 01  INREC.
000012   02  KEY1   PIC X(80).
000013 END PROGRAM     C1323.

C1323.cob 6: JMN1323I-S 索引ファイルには，RECORD KEY句を指定しなければなりません．