oracle存储过程执行可输入sql语句并返回结果集
1.建立测试表:
create table AAA ( aa NVARCHAR2(100), bb NVARCHAR2(100), cc NVARCHAR2(100), dd NVARCHAR2(100) ) 并导入测试数据insert into aaa values('1','1','1','1');
2.测试可行性:
DECLARE v_cursor NUMBER; v_stat NUMBER; aa VARCHAR(100); bb VARCHAR(100); cc VARCHAR(100); dd VARCHAR(100); v_sql VARCHAR(200); BEGIN v_sql :='select * from aaa'; v_cursor := dbms_sql.open_cursor; --打开游标; dbms_sql.parse(v_cursor, v_sql, dbms_sql.native); --解析动态SQL语句; dbms_sql.define_column(v_cursor, 1, aa,100); --定义列 dbms_sql.define_column(v_cursor, 2,bb, 100); dbms_sql.define_column(v_cursor, 3,cc,100); dbms_sql.define_column(v_cursor, 4, dd,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, aa); --将当前行的查询结果写入上面定义的列中。 dbms_sql.column_value(v_cursor, 2, bb); dbms_sql.column_value(v_cursor, 3,cc); dbms_sql.column_value(v_cursor, 4, dd); dbms_output.put_line(aa || ';' || bb || ';' || cc || ';'|| dd); END LOOP; dbms_sql.close_cursor(v_cursor); --关闭游标。 END; 输出1,1,1,1
3.建立存储过程,其中,sql为输入参数,系统引用游标为输出参数,如下:
create or replace procedure myproc ( mysqlval in varchar2, rescur out sys_refcursor ) as BEGIN open rescur for mysqlval; END;
4.测试存储过程
sqlplus中,执行如下:
var r refcursor; exec proc2('select * from aaa',:r); print r;
输出是正常的
本站文章为和通数据库网友分享或者投稿,欢迎任何形式的转载,但请务必注明出处.
同时文章内容如有侵犯了您的权益,请联系QQ:970679559,我们会在尽快处理。