how to assign bind variable to another variable in db2?

BEGIN
DECLARE
lv_ret VARCHAR2(2000);
cur PLS_INTEGER;
fdbk PLS_INTEGER;
v_sql VARCHAR(100);
a varchar(2000);
CALL DBMS_SQL.OPEN_CURSOR(cur);
SET v_sql := 'BEGIN'
|| 'val := 'lv_stack ';' ||
'END;';
CALL DBMS_SQL.PARSE(cur, v_sql, DBMS_SQL.native);
CALL Dbms_Sql.Bind_Variable_VARCHAR(cur, 'lv_ret', 'val', 2000);
CALL Dbms_Sql.EXECUTE (cur, fdbk );
/* --CALL Dbms_Sql.Variable_Value_VARCHAR(cur, 'a', lv_ret);
CALL Dbms_Sql.Close_cursor(cur);
lv_stack := lv_ret ; */
END


error in the assigning part lv_stack := lv_ret

None of this looks like DB2 syntax. I assume you are trying to migrate from some other DBMS to DB2. What DB2 version and OS are you using? What are you trying to do with this SP?

Andy

Andy
Looks like this one
IBM DB2 9.7 for Linux, UNIX and Windows Information Center

Sathyaram

the variable lv_stack is not declared.

The statement

is not correct because there are no || around lv_stack

yes we are migrating from oracle 10g to db2 9.7..before this has been migarted from some other database to oracle...This is a big procedure which does a lot of Calculation.... and this Block is a part of it..

DECLARE

lv_ret VARCHAR2(2000);
cur PLS_INTEGER;
fdbk PLS_INTEGER;
a varchar(2000);
lv_Stack VARCHAR2(500) := (1729.78*2)*5;

CALL DBMS_SQL.OPEN_CURSOR(cur);
CALL DBMS_SQL.PARSE
(cur,'BEGIN :val := '|| lv_stack || ';END;' ,DBMS_SQL.native);
CALL Dbms_Sql.Bind_Variable_VARCHAR(cur, 'a', 'val', 2000);
CALL Dbms_Sql.EXECUTE (cur, fdbk );
CALL Dbms_Sql.Variable_Value_VARCHAR(cur, 'a', lv_ret);
CALL Dbms_Sql.Close_cursor(cur);
lv_stack := lv_ret ;

END;


what i need to do is that just parse the expression which is in lv_stack and return its calculated value back to lv_stack