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

2.3.553 JMN2940I-S

@1@に記述された'@2@'は一意名または定数でなければなりません.

引数の説明

@1@:

PICTURE句のFROM指定またはPROMPT句

@2@:

エラーの原因となった語.

      000001 IDENTIFICATION DIVISION.
      000002 PROGRAM-ID.    P2940.
      000003 ENVIRONMENT    DIVISION.
      000004 DATA           DIVISION.
      000005 WORKING-STORAGE SECTION.
      000006 01 WTBL.
      000007   02 TBL-EL OCCURS 10 INDEXED BY IDX.
      000008     03 TBL-EL1    PIC 9(1).
      000009     03 TBL-EL2    PIC 9(1).
      000010 SCREEN SECTION.
      000011 01 SC1          PIC 9(2) FROM IDX.
      000012 PROCEDURE      DIVISION.
      000013 END PROGRAM    P2940.
    

P2940.cob (11) : JMN2940I-S PICTURE句のFROM指定に記述された'IDX'は一意名または定数でなければなりません.