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

2.3.282 JMN2495I-I

CHARACTER TYPE句またはPRINTING POSITION句の指定を持つ報告書レコードが長すぎます.
RECORD CONTAINS @1@が指定されたとみなします.

引数の説明

@1@:

必要とされるレコード長を示す整数値.

      000001 IDENTIFICATION DIVISION.
      000002 PROGRAM-ID.    P2495.
      000003 ENVIRONMENT    DIVISION.
      000004 INPUT-OUTPUT    SECTION.
      000005 FILE-CONTROL.
      000006     SELECT REPFILE ASSIGN TO SYS001.
      000007 DATA           DIVISION.
      000008 FILE            SECTION.
      000009 FD REPFILE
      000010       REPORT IS REP1.
      000011 WORKING-STORAGE SECTION.
      000012 01 WITM         PIC N(20).
      000013 REPORT          SECTION.
      000014 RD REP1 PAGE 66.
      000015 01 TYPE DE CHARACTER TYPE MODE-3.
      000016   02 LINE PLUS 1.
      000017     03 COLUMN 20  PIC N(20) SOURCE WITM.
      000018     03 COLUMN 80  PIC N(20) SOURCE WITM.
      000019 PROCEDURE      DIVISION.
      000020 END PROGRAM    P2495.
    

P2495.cob (9) : JMN2495I-I CHARACTER TYPE句またはPRINTING POSITION句の指定を持つ報告書レコードが長すぎます.RECORD CONTAINS 139が指定されたとみなします.