NetCOBOL for .NET V8.0 メッセージ集

2.3.402 JMN2662I-S

有効なWHENEVER文の手続き名'@1@'が未定義または多重定義です．
GO TO手続き名指定をCONTINUE指定とみなします．

引数の説明

@1@:

エラーの原因となった手続き名．

例

      000001 IDENTIFICATION DIVISION.
      000002 PROGRAM-ID.    P2662.
      000003 ENVIRONMENT    DIVISION.
      000004 DATA           DIVISION.
      000005 WORKING-STORAGE SECTION.
      000006     EXEC SQL BEGIN DECLARE SECTION END-EXEC.
      000007 01 SQLSTATE    PIC X(5).
      000008     EXEC SQL END   DECLARE SECTION END-EXEC.
      000009 PROCEDURE      DIVISION.
      000010     EXEC SQL
      000011       WHENEVER SQLERROR GO TO :ERR-1
      000012     END-EXEC.
      000013*
      000014     EXEC SQL
      000015       DECLARE CUR1 CURSOR FOR
      000016         SELECT *
      000017     END-EXEC
      000018*
      000019     EXEC SQL
      000020       OPEN CUR1
      000021     END-EXEC
      000022 END PROGRAM    P2662.
    

P2662.cob (20) : JMN2662I-S 有効なWHENEVER文の手続き名'ERR-1'が未定義または多重定義です．GO TO手続き名指定をCONTINUE指定とみなします．