oracle执行存储过程返回游标cursor

create or replace procedure TEST(s varchar2,r_result out sys_refcursor) is --作者：lml --功能：根据tokenid查询放行指令 --详情： --1.返回放行指令 --时间：20170921 begin DECLARE v_user_id nvarchar2(40); --用户ID v_sql2 nvarchar2(500); --sql语句 BEGIN DECLARE v_where varchar2(1000); v_sql varchar2(1000); BEGIN v_where := ' and create_date> sysdate-5'; v_sql := 'select * from it_rel_command where rownum<20'; v_sql := v_sql || v_where; dbms_output.put_line('v_sql : ' || v_sql); OPEN r_result FOR v_sql; END; EXCEPTION WHEN OTHERS THEN dbms_output.put_line('sqlcode : ' || sqlcode); dbms_output.put_line('sqlerrm : ' || sqlerrm); ROLLBACK; END; end TEST;