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

2.3.96 JMN2166I-S

RELATIVE KEY指定のデータ名は,そのファイルのレコード中に定義してはなりません.

      000001 IDENTIFICATION DIVISION.
      000002 PROGRAM-ID.    P2166.
      000003 ENVIRONMENT    DIVISION.
      000004 INPUT-OUTPUT    SECTION.
      000005 FILE-CONTROL.
      000006     SELECT RLFILE1 ASSIGN TO SYS001
      000007       ORGANIZATION   IS RELATIVE
      000008       RELATIVE KEY   IS RKEY.
      000009 I-O-CONTROL.
      000010 DATA           DIVISION.
      000011 FILE            SECTION.
      000012 FD RLFILE1.
      000013 01 RLF1REC.
      000014   02 RKEY      PIC 9(2).
      000015   02           PIC X(80).
      000016 PROCEDURE      DIVISION.
      000017 END PROGRAM    P2166.
    

P2166.cob (8) : JMN2166I-S RELATIVE KEY指定のデータ名は,そのファイルのレコード中に定義してはなりません.

詳細な説明

ACCESS MODE句のRELATIVE KEYで指定したデータ項目は,このRELATIVE KEYの指定に関連付けられたファイルのレコード記述項内にあってはなりません.別のファイルのレコード記述項内のデータ項目であれば,RELATIVE KEYに指定することができます.