Funtion calling a procedure (getting errors)

Question

HI,
I am calling a procedure inside a function(see code below).
Please see my second post for the code:
Message was edited by:
SeshuGiri

Answer 1

Ok here's a working example, though it doesn't use your data:
set echo on
drop table data1
drop table data1 succeeded.
create table data1 (id number,
                    sel number,
                    col1 varchar2(15),
                    col2 varchar2(15),
                    col3 varchar2(15))
create table succeeded.
insert into data1
select 1, 1, 'one-1','two-1','three-1' from dual union all
select 1, 1, 'one-2','two-2','three-2' from dual union all
select 1, 1, 'one-3','two-3','three-3' from dual union all
select 2, 2, 'one-4','two-4','three-4' from dual union all
select 2, 2, 'one-5','two-5','three-5' from dual union all
select 3, 1, 'one-6','two-6','three-6' from dual
6 rows inserted
drop type temp_data_tt
drop type temp_data_tt succeeded.
create or replace type temp_data as object (
  id number,
  col1 varchar2(15),
  col2 varchar2(15),
  col3 varchar2(15));
type temp_data Compiled.
create type temp_data_tt as table of temp_data;
type temp_data_tt Compiled.
create or replace procedure get_recs(criteria number, recs out sys_refcursor) is
begin
  open recs for select id, col1, col2, col3 from data1 where id=criteria;
end;
procedure get_recs(criteria Compiled.
create or replace function get_data(criteria number) return temp_data_tt pipelined is
  l_id number;
  col1 varchar2(15);
  col2 varchar2(15);
  col3 varchar2(15);
  rs sys_refcursor;
begin
  for drv in (select distinct id from data1 where sel=criteria) loop
    get_recs(drv.id, rs);
    loop
      fetch rs into l_id, col1, col2, col3;
      exit when rs%notfound;
      pipe row(temp_data(l_id, col1,col2,col3));
    end loop;
    close rs;
  end loop;
  return;
end;
function get_data(criteria Compiled.
select * from table(get_data(1))
ID                     COL1            COL2            COL3           
1                      one-1           two-1           three-1        
1                      one-2           two-2           three-2        
1                      one-3           two-3           three-3        
3                      one-6           two-6           three-6        
4 rows selected
select * from table(get_data(2))
ID                     COL1            COL2            COL3           
2                      one-4           two-4           three-4        
2                      one-5           two-5           three-5        
2 rows selected
select * from data1
ID                     SEL                    COL1            COL2            COL3           
1                      1                      one-1           two-1           three-1        
1                      1                      one-2           two-2           three-2        
1                      1                      one-3           two-3           three-3        
2                      2                      one-4           two-4           three-4        
2                      2                      one-5           two-5           three-5        
3                      1                      one-6           two-6           three-6        
6 rows selected