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

2.3.97 JMN2167I-S

RELATIVE KEY指定のデータ名は，文字Pを含まない符号なし整数項目でなければなりません．

例

      000001 IDENTIFICATION DIVISION.
      000002 PROGRAM-ID.    P2167.
      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           PIC X(80).
      000015 WORKING-STORAGE SECTION.
      000016 01 RKEY        PIC P9(2).
      000017 PROCEDURE      DIVISION.
      000018 END PROGRAM    P2167.
    

P2167.cob (8) : JMN2167I-S RELATIVE KEY指定のデータ名は，文字Pを含まない符号なし整数項目でなければなりません．

詳細な説明

ACCESS MODE句のRELATIVE KEYで指定したデータ項目は，プログラムと入出力管理システムの間で相対レコード番号を連絡するために使用されるので，所定の属性である必要があります．