-- db2 -td@ -f proc_get_data.sql
CONNECT TO VIPER
@

DROP PROCEDURE PROC_GET_DATA
@

CREATE PROCEDURE PROC_GET_DATA
(
  IN  pi_name     VARCHAR(32)
)
  LANGUAGE SQL
  SPECIFIC PROC_GET_DATA
  NOT DETERMINISTIC
  NO EXTERNAL ACTION
pgd: BEGIN
  DECLARE v_name      VARCHAR(32)   DEFAULT '';

  DECLARE c_trans CURSOR WITH RETURN FOR
    SELECT * FROM TABLE WHERE NAME = v_name;
  SET v_name = pi_name;

  OPEN c_trans;

END pgd
@

COMMIT WORK
@

CONNECT RESET
@