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

2.3.256 JMN2466I-S

@1@句の添字に許されない語'@2@'が現れました.
添字に1が指定されたものとみなします.

引数の説明

@1@:

SOURCEまたはSUM.

@2@:

許されない語.

      000001 IDENTIFICATION DIVISION.
      000002 PROGRAM-ID.    P2466.
      000003 ENVIRONMENT    DIVISION.
      000004 INPUT-OUTPUT    SECTION.
      000005 FILE-CONTROL.
      000006     SELECT SQFILE1 ASSIGN TO SYS001.
      000007 I-O-CONTROL.
      000008 DATA           DIVISION.
      000009 FILE            SECTION.
      000010 FD SQFILE1
      000011       REPORT IS REP1.
      000012 WORKING-STORAGE SECTION.
      000013 01 CTLD         PIC 9(2).
      000014 01 .
      000015   02 WITM       PIC 9(2) OCCURS 10.
      000016 REPORT          SECTION.
      000017 RD REP1 PAGE 66
      000018       CONTROL CTLD.
      000019 01 TYPE CF CTLD.
      000020   02           PIC S9(4) SUM WITM(-2).
      000021 PROCEDURE      DIVISION.
      000022 END PROGRAM    P2466.
    

P2466.cob (20) : JMN2466I-S SUM句の添字に許されない語'-2'が現れました.添字に1が指定されたものとみなします.