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

2.3.499 JMN2870I-S

APPLY WRITE-ONLY句に指定されたファイル'@1@'は可変長形式の順ファイルでなければなりません．

引数の説明

@1@:

エラーの原因となったファイル名．

例

      000001 IDENTIFICATION DIVISION.
      000002 PROGRAM-ID.    P2870.
      000003 ENVIRONMENT    DIVISION.
      000004 INPUT-OUTPUT    SECTION.
      000005 FILE-CONTROL.
      000006     SELECT SQFILE1 ASSIGN TO SYS001.
      000007 I-O-CONTROL.
      000008     APPLY WRITE-ONLY ON SQFILE1.
      000009 DATA           DIVISION.
      000010 FILE            SECTION.
      000011 FD SQFILE1 BLOCK CONTAINS 160.
      000012 01 SQF1REC.
      000013   02           PIC X(80).
      000014 WORKING-STORAGE SECTION.
      000015 PROCEDURE      DIVISION.
      000016 END PROGRAM    P2870.
    

P2870.cob (11) : JMN2870I-S APPLY WRITE-ONLY句に指定されたファイル'SQFILE1'は可変長形式の順ファイルでなければなりません．

詳細な説明

APPLY WRITE-ONLY句は，OSIV系システムの固有機能です．