程序中的两个游标序列

Two cursors sequence in procedure

我的程序有以下问题:

CREATE PROCEDURE TEST() 
LANGUAGE SQL
BEGIN

DECLARE V_TEST VARCHAR(100);
DECLARE V_TEST_EXT VARCHAR(100);
DECLARE SQLCODE INTEGER DEFAULT -1;
DECLARE RET_CODE INTEGER DEFAULT -2;
DECLARE LIST_CMD VARCHAR(512);
DECLARE LIST_CMD_EXT VARCHAR(512);

DECLARE CUR_TEST CURSOR WITH RETURN FOR LIST_STMT;
DECLARE CUR_TEST_EXT CURSOR WITH RETURN FOR LIST_EXT_STMT;

DECLARE CONTINUE HANDLER FOR SQLEXECPTION SET RET_CODE = SQLCODE;

SET LIST_CMD = 'SELECT TEST FROM TESTTAB';
PREPARE LIST_STMT FROM LIST_CMD;

OPEN CUR_TEST;
FETCH CUR_TEST INTO V_TEST;
    WHILE (RET_CODE <> 100) DO
        FETCH CUR_TEST INTO V_TEST;
    END WHILE;
CLOSE CUR_TEST;

SET LIST_CMD_EXT = 'SELECT TEST FROM TESTTAB';
PREPARE LIST_STMT_EXT FROM LIST_CMD_EXT;

OPEN CUR_TEST_EXT;
    FETCH CUR_TEST_EXT INTO V_TEST_EXT;
    WHILE (RET_CODE <> 100) DO
        FETCH CUR_TEST_EXT INTO V_TEST_EXT;
    END WHILE;
CLOSE CUR_TEST_EXT;

END;

我遇到的问题是该过程执行第一个游标循环但忽略了第二个。我尝试将 BEGIN 和 END 添加到每个循环,但这也没有帮助。

我是 运行ning DB2 v10.5 Windows。我需要这个作为一个程序来工作。有什么方法可以使程序 运行 都循环吗?

感谢您的帮助。-

在处理第二个游标之前,您没有重置 RET_CODE 变量。 使用这样的东西:

SET RET_CODE = 0;
OPEN CUR_TEST_EXT;
...

顺便说一句,如果您在过程中处理此游标,请不要使用 'WITH RETURN' 子句声明游标。