oracle 游标输出,【讨论】关于动态游标输出问题

DECLARE

v_cursor NUMBER;

v_stat NUMBER;

v_row NUMBER;

v_id NUMBER;

v_no VARCHAR(100);

v_date DATE;

v_sql VARCHAR(200);

s_id NUMBER;

s_date DATE;

col4 varchar2(1000);

BEGIN

s_id := 3000;

s_date := SYSDATE;

v_sql := 'select * from org_organization_definitions';

v_cursor := dbms_sql.open_cursor; --打开游标；

dbms_sql.parse(v_cursor, v_sql, dbms_sql.native); --解析动态SQL语句；

--dbms_sql.bind_variable(v_cursor, ':sid', s_id); --绑定输入参数；

--dbms_sql.bind_variable(v_cursor, ':sdate', s_date);

dbms_sql.define_column(v_cursor, 1, v_id); --定义列

dbms_sql.define_column(v_cursor, 2, v_no, 100);

dbms_sql.define_column(v_cursor, 3, v_date);

dbms_sql.define_column(v_cursor, 4, col4,100);

v_stat := dbms_sql.execute(v_cursor); --执行动态SQL语句。

LOOP

EXIT WHEN dbms_sql.fetch_rows(v_cursor)<=0; --fetch_rows在结果集中移动游标，如果未抵达末尾，返回1。

dbms_sql.column_value(v_cursor, 1, v_id); --将当前行的查询结果写入上面定义的列中。

dbms_sql.column_value(v_cursor, 2, v_no);

dbms_sql.column_value(v_cursor, 3, v_date);

dbms_sql.column_value(v_cursor, 4, col4);

dbms_output.put_line(v_id || ';' || v_no || ';' || v_date||':'||col4);

END LOOP;

dbms_sql.close_cursor(v_cursor); --关闭游标。

END;

以上SQL是我在网上找的，可以输入值，但问题在于我的列是不确定的，因为SQL是配制来的，就没有办法做到先定义列