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

2.4.136 JMN3218I-S

相対ファイル@1@には,RELATIVE KEY句を指定しなければなりません.

引数の説明

@1@:

ファイル名

      000001 IDENTIFICATION DIVISION.
      000002 PROGRAM-ID. C3218.
      000003 ENVIRONMENT DIVISION.
      000004 INPUT-OUTPUT SECTION.
      000005 FILE-CONTROL.
      000006     SELECT FILE-1 ASSIGN TO SYS001
      000007     ORGANIZATION IS RELATIVE
      000008     ACCESS MODE IS SEQUENTIAL.
      000009 DATA DIVISION.
      000010 FILE SECTION.
      000011 FD FILE-1.
      000012    01 REC-1 PIC X(80).
      000013 PROCEDURE DIVISION.
      000014     OPEN INPUT FILE-1.
      000015     START FILE-1.
      000016     CLOSE FILE-1.
      000017     STOP RUN.
    

C3218.cob (15) : JMN3218I-S 相対ファイル'FILE-1'には,RELATIVE KEY句を指定しなければなりません.