create or replace package pac_provide as type
results is ref cursor;
end pac_provide;create or replace procedure select_provide
(
l_league_id in varchar2,
p_results out pac_provide.results
) asbegin
open p_results
for
select provide_id,brand_id,class_id,power_id,league_id,address,content from provide where league_id=l_league_id;end select_provide;call select_provide('l_001');
results is ref cursor;
end pac_provide;create or replace procedure select_provide
(
l_league_id in varchar2,
p_results out pac_provide.results
) asbegin
open p_results
for
select provide_id,brand_id,class_id,power_id,league_id,address,content from provide where league_id=l_league_id;end select_provide;call select_provide('l_001');
p_results pac_provide.results;
begin
-- Call the procedure
select_provide(l_league_id => 1,
p_results => p_results);
end;