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

2.4.405 JMN2663I-S

有効なWHENEVER文の名標'@1@'は,手続き名でなければなりません. GO TO手続き名指定をCONTINUE指定とみなします.

埋め込みの説明

@1@ : エラーの原因となった利用者語.

例題

[P2663.cob]
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID.    P2663.
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 01 PROC-NAME   PIC X(8).
000010 PROCEDURE      DIVISION.
000011     EXEC SQL
000012       WHENEVER SQLERROR GO TO :PROC-NAME
000013     END-EXEC.
000014*
000015     EXEC SQL
000016       DECLARE CUR1 CURSOR FOR
000017         SELECT *
000018     END-EXEC
000019*
000020     EXEC SQL
000021       OPEN CUR1
000022     END-EXEC
000023 END PROGRAM    P2663.

P2663.cob 21: JMN2663I-S 有効なWHENEVER文の名標'PROC-NAME'は,手続き名でなければなりません.GO TO手続き名指定をCONTINUE指定とみなします.