Question

mysql存储过程中，游标与返回参数不兼容吗？

====存储过程1========================
CREATE DEFINER=`root`@`localhost` PROCEDURE `routine_test_1`(
IN a varchar(45),
OUT b varchar(45))
BEGIN
DECLARE c varchar(45);
DECLARE done BOOL DEFAULT False;

-- 定义游标_汇率
DECLARE cur_text
CURSOR FOR SELECT _c FROM table_x;

DECLARE CONTINUE HANDLER FOR NOT FOUND SET done = True;

OPEN cur_text;
REPEAT
FETCH cur_text
INTO c;
IF done = False THEN
SET b = a;
END IF;
UNTIL done = True END REPEAT;
CLOSE cur_text;
END

====存储过程2========================
CREATE DEFINER=`root`@`localhost` PROCEDURE `routine_test_2`(
IN a varchar(45),
OUT b varchar(45))
BEGIN
SET b = a;
END

以上两个MYSQL的存储过程，唯一的区别是1使用了游标，2没有使用游标。
第1个因为有游标的存在，不能在delphi中得到返回值；
第2个没有游标，就可以在delphi中得到返回值？
这是为什么呢？

我的系统是delphi xe2 + mysql 5.6
过程1可以再简化一下：
CREATE DEFINER=`root`@`localhost` PROCEDURE `routine_test_1`(
IN a varchar(45),
OUT b varchar(45))
BEGIN
DECLARE c varchar(45);
DECLARE done BOOL DEFAULT False;

-- 定义游标
DECLARE cur_text
CURSOR FOR SELECT _c FROM table_x;

DECLARE CONTINUE HANDLER FOR NOT FOUND SET done = True;

OPEN cur_text;
SET b = a;
CLOSE cur_text;
END

只要OPEN游标，返回值就不成功。

Answer 1

你是用ado连接数据库的吧，我在VC下也同样出现这样的问题，使用游标的时候获取不到输出值，且还会导致连接中断。估计是mysql存储过程还不够完善,在oracle使用就没有任何问题。
你可以用Mysql Api直接连接mysql,应该没有这样的问题.

Answer 2

这个你可以先在   mysql   里面，   测试一下，  存储过程执行是否有效的啊。

call routine_test_1('a的数值',  @b) ;
 
select @b;

这样先测试运行一下， 看看 存储过程执行是否正常。