dblink跨服务器转移数据存储过程

dblink跨服务器转移数据存储过程

create or replace procedure 存储过程名 as
  begin
    for x（变量） in (select id, DESCRIPTION, PARENT_ID, DEPT_ID from 表1 where  READ_PLM=0 or READ_PLM is null) loop
      insert into 表2@dblink
        (CGROUPID, CGROUPNAME, CPARENTGROUPID, groupcode)--（表2字段）
      values
        (x.id, x.DESCRIPTION, x.PARENT_ID, x.DEPT_ID);
    end loop;
    commit;
  end;

 create or replace procedure huitian0202 as
  begin
    for x in (select HR_TUE01.ID as a,
	       			de.ID as b,
       				sysdate as c 
			  from  HR_TUE01 HR_TUE01
			  left join (select s.* 
				        from ( 
				        	select a.ID,a.SEQ_NO,row_number() over (partition by a.SEQ_NO order by a.ID desc) as rn 
				       		 from HR_TUo2 a) s--去重取ID最大的一条
       		 			where s.rn=1) de 
   			 on HR_TUE01.dept_code=de.SEQ_NO
			where HR_TUE01.id not in(select CPERSONID from SYS_020@dblink)) loop
      insert into SYS_020@dblink
        (CPERSONID,CGROUPID,CACCESSDATE)
      values
        (x.a, x.b, x.c);
    end loop;
    commit;
  end;