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

2.3.281 JMN2494I-S

報告書ファイルにRECORD CONTAINS 0 CHARACTERSは,指定できません.

      000001 IDENTIFICATION DIVISION.
      000002 PROGRAM-ID.    P2494.
      000003 ENVIRONMENT    DIVISION.
      000004 INPUT-OUTPUT    SECTION.
      000005 FILE-CONTROL.
      000006     SELECT SQFILE1 ASSIGN TO SYS001.
      000007     SELECT REPFILE ASSIGN TO SYS002.
      000008 I-O-CONTROL.
      000009 DATA           DIVISION.
      000010 FILE            SECTION.
      000011 FD SQFILE1.
      000012 01 SQF1REC      PIC X(80).
      000013 FD REPFILE
      000014      RECORD CONTAINS 0 CHARACTERS
      000015      REPORT IS REP1.
      000016 WORKING-STORAGE SECTION.
      000017 01 WFS1        PIC X(2).
      000018 REPORT          SECTION.
      000019 RD REP1 PAGE 66.
      000020 01 DE-REC TYPE DE.
      000021   02 LINE PLUS 1.
      000022     03 COLUMN 1 PIC X(80) SOURCE SQF1REC.
      000023 PROCEDURE      DIVISION.
      000024 END PROGRAM    P2494.
    

P2494.cob (13) : JMN2494I-S 報告書ファイルにRECORD CONTAINS 0 CHARACTERSは,指定できません.