cursor 里实现动态sql

cursor 里实现sql的动态拼接

declare
  TYPE cur IS ref CURSOR;
  c cur;
  vs_sql varchar2(2000);
  vn_id number;
  vn_name varchar2(40);
begin
vs_sql := 'select name from xxx_t where id=:vn_id';
vn_id := 3;
  open c for vs_sql using vn_id;
  FETCH c
    INTO vn_name;  
  CLOSE c;
  DBMS_OUTPUT.put_line(vn_name);
end;