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

2.3.457 JMN2766I-W

このシステムでは,'@1@'は注釈として扱います.

引数の説明

@1@:

エラーの原因となった文,句,指定を現す予約語.

      000001 IDENTIFICATION DIVISION.
      000002 PROGRAM-ID.    P2766.
      000003 ENVIRONMENT    DIVISION.
      000004 INPUT-OUTPUT    SECTION.
      000005 FILE-CONTROL.
      000006     SELECT SQFILE1 ASSIGN TO SYS001.
      000007 I-O-CONTROL.
      000008     APPLY RECORD-OVERFLOW ON SQFILE1.
      000009 DATA           DIVISION.
      000010 FILE            SECTION.
      000011 FD SQFILE1
      000012     RECORD VARYING IN SIZE DEPENDING ON LRECL.
      000013 01 SQF1REC.
      000014   02           PIC X(80).
      000015 WORKING-STORAGE SECTION.
      000016 01 LRECL       PIC 9(2).
      000017 PROCEDURE      DIVISION.
      000018 END PROGRAM    P2766.
    

P2766.cob (8) : JMN2766I-W このシステムでは,'APPLY RECORD-OVERFLOW'は注釈として扱います.