ページの先頭行へ戻る
NetCOBOL V11.1 メッセージ集
FUJITSU Software

2.4.404 JMN2662I-S

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

埋め込みの説明

@1@ : エラーの原因となった手続き名.

例題

[P2662.cob]
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指定とみなします.