引数の説明
エラーの原因となった利用者語. |
例
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指定とみなします.