oracle 遊標中使用 動態 sql

oracle 遊標中使用 動態 sql[@more@]declare
TYPE cursor_test IS REF CURSOR;
cur1 cursor_test;
vsql varchar2(2000);
v_table varchar2(200);
begin
vsql :=' SELECT outstorageformheadid FROM OUTSTORAGEHEAD';
open cur1 for vsql;
loop
fetch cur1 into v_table;
exit when cur1%notfound;
dbms_output.put_line('the result : '|| v_table);
end loop;
end;
/