How to Populate a table type variable from a cursor

Question

Hi
I have a stored procedure (P1) that returns a ref cursor as the output.
Another procedure (P2) receives this ref cursor (C).
In this procedure (P2), I want to do a Bulk Collect from this ref cursor (C) in
a table type variable that has been declared locally in the procedure P2. I have created appropriate Object Type and Table Types at the database level.
Please advise how to do it. I tried to do it in different ways, but was not able to do it - each time I faced incompatible data-type related issues.
Regards
Madhup

Answer 1

What I wrote was unclear. Syntactically it is valid and does something. But consider the advantage of a decent design.
SQL> create or replace procedure p1 (o out sys_refcursor) as
  2  begin
  3   open o for select * from emp;
  4  end p1;
  5  /
Procedure created.
SQL> create or replace procedure p2(i sys_refcursor) as
  2   type emp_tab is table of emp%rowtype;
  3   l_emp_tab emp_tab;
  4  begin
  5   fetch i bulk collect into l_emp_tab;
  6   close i;
  7  
  8   for i in 1..l_emp_tab.count loop
  9     NULL;
10   end loop;
11  end p2;
12  /
Procedure created.
SQL> CREATE OR REPLACE PROCEDURE p3 IS
  2 
  3  TYPE myarray IS TABLE OF emp%ROWTYPE;
  4  l_data myarray;
  5 
  6  CURSOR r IS
  7  SELECT * FROM emp;
  8 
  9  BEGIN
10    OPEN r;
11    LOOP
12      FETCH r BULK COLLECT INTO l_data;
13 
14      FOR j IN 1 .. l_data.COUNT
15      LOOP
16        NULL;
17      END LOOP;
18 
19      EXIT WHEN r%NOTFOUND;
20    END LOOP;
21    CLOSE r;
22  END p3;
23  /
Procedure created.
SQL> set serverout on
SQL> set timing on
SQL> declare
  2   r sys_refcursor;
  3  begin
  4    FOR i IN 1 .. 10000 LOOP
  5      p1(r);
  6      p2(r);
  7    END LOOP;
  8  end;
  9  /
PL/SQL procedure successfully completed.
Elapsed: 00:00:01.71
SQL> begin
  2    FOR i IN 1 .. 10000 LOOP
  3      p3;
  4    END LOOP;
  5  end;
  6  /
PL/SQL procedure successfully completed.
Elapsed: 00:00:01.21
SQL> Again sorry for being less than clear.