NetCOBOL V11.1 メッセージ集

2.3.203 JMN1326I-S

ALTERNATE RECORD KEY句は，索引ファイル以外に指定できません．

例題

[C1326.cob]
000001 IDENTIFICATION  DIVISION.
000002 PROGRAM-ID.     C1326.
000003 ENVIRONMENT     DIVISION.
000004 INPUT-OUTPUT    SECTION.
000005 FILE-CONTROL.
000006     SELECT IN-F ASSIGN SYS000
000007     RECORD KEY           IS FNO
000008     ALTERNATE RECORD KEY IS FGPNO
000009     .
000010 DATA            DIVISION.
000011 FILE            SECTION.
000012 FD  IN-F.
000013 01  IN-R.
000014   02  FNO       PIC 9(4).
000015   02  FGP       PIC 9(4).
000016   02  FNAME     PIC X(30).
000017 END PROGRAM C1326.

C1326.cob 8: JMN1326I-S ALTERNATE RECORD KEY句は，索引ファイル以外に指定できません．