2.3.415 JMN2693I-W

'@1@'は一意名またはゼロでない整数でなければなりません．
書かれたとおり受け入れます．

引数の説明

@1@:

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

例

      000001 IDENTIFICATION DIVISION.
      000002 PROGRAM-ID.    P2693.
      000003 ENVIRONMENT    DIVISION.
      000004 DATA           DIVISION.
      000005 WORKING-STORAGE SECTION.
      000006 01 WGRP.
      000007  02 WOCC       PIC X(2) OCCURS 26
      000008                         INDEXED BY IX1.
      000009 01 LCNT        PIC S9(4) BINARY.
      000010 PROCEDURE      DIVISION.
      000011     PERFORM TEST BEFORE
      000012       VARYING LCNT FROM IX1 BY 0 UNTIL IX1 = 26
      000013       DISPLAY WOCC(IX1)
      000014     END-PERFORM
      000015 END PROGRAM    P2693.

P2693.cob (12) : JMN2693I-W '0'は一意名またはゼロでない整数でなければなりません．書かれたとおり受け入れます．

詳細な説明

FROM指定に指標名を指定した場合，BY指定には0でない整数あるいは整数項目を指定しなければなりません．