NetCOBOL for .NET V7.0 メッセージ集

2.3.489 JMN2840I-S

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

例

      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系システムの固有機能です．