create or replace type schema1.t_type_row as object (id number,	 name VARCHAR2(10) );
										
create or replace type t_type_tab is table of schema1.t_type_row;									 

create or replace type schema2.t_type_row as object (id number,	 name VARCHAR2(10) );
											 
create or replace type t_type_tab is table of schema2.t_type_row;

create or repalce package schema2.pqr
authid current_user
as
procedure p_get_data(p_id number, p_tab t_type_tab );
end pqr;

				 
create or replace package body 	schema2.pqr
as	
procedure p_get_data(p_id number, p_tab t_type_tab )
is
begin
	forall i in p_tab.first .. p_tab.last
	insert into test values(p_tab(i).id,p_tab(i).name);
	
end p_get_data;					 
end;

grant execute on schema2.pqr to schema1;

create or replace package schema1.pkg_data
authid current_user
as
procedure p_abc(p_id number);
end pkg_data;

create or replace package body schema1.pkg_data
as
procedure p_abc(p_id number)
is
l_type_tab t_type_tab;
begin
	begin
		select * bulk collect into l_type_tab
		from (select t_type_row(1,'john') from dual);
	end;
	
	begin
		schema2.pqr.p_get_data(101,l_type_tab);
	end;
end p_abc;
end;

create or replace synonym schema1.pkg_mdy_rds2_util for schema2.pqr;

l_type_tab schema2.t_type_tab;