循环将一张表的数据添加到另一张表，重复数据不添加

1、循环将一张表的数据添加到另一张表，重复数据不添加（a表必须存在）

create or replace procedure sp_import
as
i_count int;
begin
for r in (select * from A) loop
--判断会员卡
select count(*) into i_count from B where b1= r.a1;

if i_count = 0 then
insert into B(b1,b2,b3) select a1,a2,a3 from A where  a1=r.a1;
end if;
end loop;
exception
when others then
--异常处理，自己写想要写什么吧
end;
--基本思路就是这样了，自己再调调试试

或者

Insert into a(a1,a2,a3) select b1,b2,b3 from b where b1 not in (select a1 from a)

2、复制表数据和结构，但是表字段的默认值设置会丢（a表必须不存在）

create table a as select * from b

3、复制表结构。

create table 表1 as select * from  表2 where 1<>1 ;

当然，关于where字句，也可以是：1=2,1=3等等

4、存储过程异常捕捉

create or replace procedure sp_import
as
i_count int;
strID varchar2(10); --新的ID
i_userid int;       --UserID
strComp varchar2(10); --公司ID
strsql varchar2(4000);
begin
for r in (select * from A) loop
--判断会员卡
select count(*) into i_count from B where cardID = r.拥有会员卡号;

if i_count = 0 then
strID := to_char(to_number(r.编号) + 10000);
select userid into i_userid from table where name = r.人员; --这个表你没提供，自己对着改
select company into strComp from tableCompany where name = r.公司; --这个表你也没提供，自己对着改
strsql := 'insert into B(ID,userid,address,company,cardID) ' ||
' values (''' || strID || ''',' || i_userid || ',''' || r.地址 ||
''',' || strComp || ',' || r.拥有会员卡号 || ')';
execute immediate strsql;
end if;
end loop;
commit;
exception
when others then
--异常处理，自己写想要写什么吧
end;
--基本思路就是这样了，自己再调调试试

plsql 右击存储过程 -> 测试->弹出测试窗口->按f9调试