Hi,
is it possible to declare cursor using directly the Working storage Variable.
Ex.
EXEC SQL
DECLARE CR1 CURSOR WITH HOLD FOR
SELECT * FROM Table1
WHERE VAL1 = :WS-VAL1