3

ref_cursor で結果を取得したいのですが、それができません。

即時実行を使用して ref_cursor で結果を取得する方法を教えてください

CREATE OR REPLACE PROCEDURE TEST_PROC_QT ( p_name IN VARCHAR2,
                                           p_result_set OUT sys_refcursor ) IS

  v_sql VARCHAR2(4000);

BEGIN

   v_sql := '';
   v_sql := 'SELECT * FROM USERS WHERE 1=1 ';

   IF p_name is not null THEN
     v_sql := v_sql || ' AND login_id = :v_name';
   ELSE
     v_sql := v_sql || ' AND ((1=1) or :v_name is null)';
   END IF;

   Dbms_output.put_line(v_sql);

   EXECUTE IMMEDIATE v_sql

   --OPEN p_result_set for v_sql
   --INTO p_result_set using p_name;  

END;
4

2 に答える 2

12

ただ:

OPEN p_result_set for v_sql using p_name;  
于 2011-06-23T16:03:50.007 に答える
1
  1. たとえば、選択したデータが返されるようにするには、型を作成する必要があります。これが自分の users テーブルuser(id number, name varchar2)だと想像してください。タイプは次のようになります。

    create type users_type as object (id number, name varchar2);
    
  2. 上記で作成したオブジェクトを保持する型テーブルを作成します。

    create type users_table_object as table of users_type;
    
  3. プロシージャを作成します。

    create the procedure test(
    cv_1  OUT SYS_REFCURSOR
    ....
    )
    as
    users_table_object;
    v_query VARCHAR2(2000);  
    
    begin
    v_query := N'select users_type(id, name) from users ';
    
    execute immediate
    bulk collect into users_table_object;
    
    open cv_1 for table(users_table_object)     
    
于 2012-07-25T23:11:49.330 に答える