begin
for arr in (
select 'create or replace synonym ' || b.OBJECT_NAME || ' for ' || B.OWNER || '.' ||
B.OBJECT_NAME row_i from dba_objects B where OWNER = 'APPS' AND object_type = 'TABLE'
) loop
begin
execute immediate (arr.row_i);
EXCEPTION
WHEN OTHERS THEN
dbms_output.put_line(arr.row_i);
end;
end loop;
end;
for arr in (
select 'create or replace synonym ' || b.OBJECT_NAME || ' for ' || B.OWNER || '.' ||
B.OBJECT_NAME row_i from dba_objects B where OWNER = 'APPS' AND object_type = 'TABLE'
) loop
begin
execute immediate (arr.row_i);
EXCEPTION
WHEN OTHERS THEN
dbms_output.put_line(arr.row_i);
end;
end loop;
end;