Counting from 1 to 5 recursively...
* Recursive procedure (OK):
CREATE PROCEDURE suma (IN number INTEGER)
LANGUAGE SQL
BEGIN
DECLARE error_message CHAR(30);
DECLARE procedure_call CHAR(20);
SET number = number + 1;
IF number = 5 THEN
SET error_message = 'OK 5 recusive calls!';
SIGNAL SQLSTATE '75002'
SET MESSAGE_TEXT = error_message;
END IF;
-- DB2 recursive procedure call
SET procedure_call = 'CALL suma(?)';
PREPARE proc_exec FROM procedure_call;
EXECUTE proc_exec USING number;
END;
CALL suma(0);
* Recursive function (ERROR):
CREATE FUNCTION suma (number INTEGER)
RETURNS INTEGER
NO EXTERNAL ACTION NOT DETERMINISTIC READS SQL DATA
BEGIN ATOMIC
DECLARE error_message CHAR(30);
DECLARE function_call CHAR(20);
SET number = number + 1;
IF number = 5 THEN
SET error_message = '5 recusive calls';
SIGNAL SQLSTATE '75002'
SET MESSAGE_TEXT = error_message;
END IF;
-- DB2 recursive function call
SET function_call = 'CALL suma(?)';
PREPARE func_exec FROM function_call;
EXECUTE func_exec INTO number USING number;
END;
CALL suma(0);
Not recursive functions in DB2?
dBforums
>
Recursive procedures / functions
03-10-05, 12:08
Linear Mode
