declare
 n_count number:=0;
begin

 for c  in  (select  rowid rid from  occobj_company@link_audaque) loop
     n_count := n_count+1;
     insert into occobj_company select * from occobj_company@link_audaque  a where a.rowid = c.rid; 
 
 if(mod(n_count,2000) = 0)then
  commit;
   end if;
 
 end loop;
commit;
 

end;