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

2.3.85 JMN2136I-W

順ファイル(編成VSまたはAS),相対ファイルまたは索引ファイルに対してRESERVE句を指定した場合,RESERVE整数指定でなければなりません.
RESERVE句は,無効になります.

      000001 IDENTIFICATION DIVISION.
      000002 PROGRAM-ID.    P2136.
      000003 ENVIRONMENT    DIVISION.
      000004 INPUT-OUTPUT    SECTION.
      000005 FILE-CONTROL.
      000006     SELECT SQFILE1 ASSIGN TO VS-SYS001
      000007       RESERVE NO AREA.
      000008 I-O-CONTROL.
      000009 DATA           DIVISION.
      000010 FILE            SECTION.
      000011 FD SQFILE1.
      000012 01 SQF1REC.
      000013   02           PIC X(80).
      000014 WORKING-STORAGE SECTION.
      000015 PROCEDURE      DIVISION.
      000016 END PROGRAM    P2136.
    

P2136.cob (7) : JMN2136I-W 順ファイル(編成VSまたはAS),相対ファイルまたは索引ファイルに対してRESERVE句を指定した場合,RESERVE整数指定でなければなりません.RESERVE句は,無効になります.

詳細な説明

RESERVE AREA句は,OSIV系システムの固有機能です.