NetCOBOL V11.1 メッセージ集

2.4.493 JMN2840I-S

インデックスつき編成ファイルのRECORD KEY句には，データ名を二つ以上指定できません． 最初のデータ名以外は，無効になります．

例題

[P2840.cob]
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID.    P2840.
000003 ENVIRONMENT    DIVISION.
000004 INPUT-OUTPUT    SECTION.
000005 FILE-CONTROL.
000006     SELECT IXFILE1 ASSIGN TO I-SYS001
000007       RECORD  KEY IS  RKEY1 RKEY2
000008       NOMINAL KEY IS  AKEY
000009       .
000010 I-O-CONTROL.
000011 DATA           DIVISION.
000012 FILE            SECTION.
000013 FD IXFILE1.
000014 01 IXF1REC.
000015   02 RKEY1     PIC X(8).
000016   02 RKEY2     PIC X(8).
000017   02           PIC X(80).
000018 WORKING-STORAGE SECTION.
000019 01 AKEY        PIC X(8).
000020 PROCEDURE      DIVISION.
000021 END PROGRAM    P2840.

P2840.cob 7: JMN2840I-S インデックスつき編成ファイルのRECORD KEY句には，データ名を二つ以上指定できません．最初のデータ名以外は，無効になります．

詳細な説明

インデックスつき編成ファイル（ASSIGN句のファイル識別名がI-名前）は，OSIV系システムの固有機能です．