select 'CREATE or REPLACE SYNONYM ' || :target_schema || '.' || object_name || ' for ' || :src_schema || '.' || object_name || ';' from (
select table_name as object_name from all_all_tables where owner = :src_schema
union
select sequence_name as object_name from all_sequences where sequence_owner = :src_schema
);

Generate SYNONYMS SQL

PL/SQL