需求场景：
业务系统环境升级，数据库表结构有变动，需要将原数据库中的所有数据导入到新的数据表结构中。
说到这里，大家脑海中可能一下会冒出很多方案，如：
1、使用exp和imp
2、使用dblink
针对第一种方案是行不通的，因为imp导入，必须保证用户下面是干净的，没有任何与dmp中重复的对象，不然就会导致数据无法正确导入。
针对第二种方案，dblink一般使用场景是在两台及以上服务器之间进行数据迁移，dblink它只为在两个服务器之间建立一个可互相访问的桥梁，最终还是需要进行insert into table select * from table。
以下是我自己实现的方案
思路：创建一个临时用户，刷入最新表结构，此时表中无任何数据，通过查询all_tables视图，查询出老用户的所有表对象，并通过查询dba_tab_columns视图，查询出每一个表的数据列，因为新表相对旧表有新增字段(注：这些新增字段是允许为null的，不然这种方案不一定好例)，再通过insert into table(columns) select columns from table语句将数据批量插入到新表中；同时为防止后续数据插入引起主键冲突，还需修改每个表对应序列的开始值，通过查询dba_sequences视图，将老用户中的所有序列对象名和last_number查询出来，再在新用户中通过删除老序列，创建新序列改变它的start
with值即可。
步骤如下：
创建一个临时用户，刷入最新的表结构，并通过超管赋予如下权限，因为这些权限在做数据迁移时会用到
grant select on all_tables to TEMP_SDU;
grant select on dba_tab_columns to TEMP_SDU;
grant select on dba_sequences to TEMP_SDU;
grant connect,dba,resource to TEMP_SDU;
grant alter any sequence to TEMP_SDU;
grant create any sequence to TEMP_SDU;
grant execute any procedure to TEMP_SDU;
grant select any table to TEMP_SDU;
创建如下三个存储过程：
--获取表中的数据列，并进行批量插入
--table_name 表名
--temp_user 临时用户名
create or replace procedure p_getcolumns(table_name varchar2,temp_user varchar2)
type ref_table_
table_cursor ref_table_
column_name varchar2(200);
str_table_name varchar2(200);
print_column varchar2(10000);
str_sql varchar2(10000);
str_table_name := table_
--Check out all the temporary user table column
open table_cursor for select t.COLUMN_NAME from dba_tab_columns t where t.TABLE_NAME=str_table_name and t.OWNER=temp_
fetch table_cursor into column_
exit when table_cursor%
--dbms_output.put_line(str_table_name||'--'||column_name);
print_column := print_column||column_name||',';
close table_
print_column := substr(print_column,1,length(print_column)-1);
str_sql := 'insert into '||table_name||'('||print_column||') select '||print_column||' from '||temp_user||'.'||table_
--dbms_output.put_line(str_table_name||'--'||str_sql);
execute immediate str_
print_column := '';
str_sql := '';
--修改序列开始值
--temp_user 临时用户名
create or replace procedure p_modify_sequences(temp_user varchar2)
cursor cur_sequence is select sequence_name from dba_sequences where sequence_owner=temp_user and sequence_name not like '%S_BME%';
seq_name varchar2(50);
fetch cur_sequence into seq_
exit when cur_sequence%
select count(*) into num_count from dba_sequences s where s.sequence_owner=temp_user and s.sequence_name=seq_
if num_count&0 then
select s.last_number into sequence_num from dba_sequences s where s.sequence_owner=temp_user and s.sequence_name=seq_
select count(*) into num_count from dba_sequences s where s.sequence_owner='TEMP_SDU' and s.sequence_name=seq_
if num_count&0 then
execute immediate 'drop sequence '||seq_
execute immediate 'create sequence '||seq_name||' minvalue 1 maxvalue
start with '||sequence_num||' increment by 1 nocache cycle';
close cur_
when no_data_found then
sequence_num:=1;
dbms_output.put_line(sqlerrm);
when others then
sequence_num:=1;
dbms_output.put_line(sqlerrm);
end p_modify_
--数据迁移调用的入口存储过程
create or replace procedure p_datamove(temp_user varchar2)
type ref_table_
table_cursor ref_table_
column_name varchar2(200);
--All the tables in the query in temporary user
cursor cur is select t.table_name from all_tables t where t.owner=temp_user and t.table_name not in('ECONF_ADMIN_INFO','ECONF_OPERATOR_PSWD_INFO','ECONF_EMAILSERVER','ECONF_HIREPORTS_INFO','ECONF_CONFIG','ECONF_EMAIL_FORMAT','ECONF_MS_FILE','ECONF_SVC_FEATURE_DATA','ECONF_IVR_VOICE_FILE','ECONF_IVR_VOICE_FILE_MCU','ECONF_SVC_DATA');
str_sql varchar2(200);
table_name varchar2(200);
--savepoint p1;
--Traverse each table name in the cursor
fetch cur into table_
exit when cur%NOTFOUND;
select instr(table_name,'ECONF_') in
if isexist&0
--Get all the columns in the table, and the migration of data in each table
p_getcolumns(table_name,temp_user);
--modify sequences value
p_modify_sequences(temp_user);
when others then
dbms_output.put_line(sqlerrm);
--rollback to savepoint p1;
* 以上用户言论只代表其个人观点，不代表CSDN网站的观点或立场
访问：53731次
排名：千里之外
原创：22篇
(1)(2)(4)(2)(1)(1)(4)(1)(2)(2)(1)(5)跪求QQ仙境激活码一个！_qq仙境吧_百度贴吧
&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&签到排名：今日本吧第个签到，本吧因你更精彩，明天继续来努力！
本吧签到人数：0成为超级会员，使用一键签到本月漏签0次！成为超级会员，赠送8张补签卡连续签到：天&&累计签到：天超级会员单次开通12个月以上，赠送连续签到卡3张
关注：27,344贴子：
跪求QQ仙境激活码一个！收藏
各位大大谁有多的激活码，请给小弟一个 邮箱；jianghua007@感激不尽！！！
1楼 14:35&|
这年头还是买一个实在多的是激活码
2楼 15:02&|
登录百度帐号
内&&容:使用签名档&&
为兴趣而生，贴吧更懂你。&或后使用快捷导航没有帐号？
查看: 443|回复: 10
新人欢迎积分1 阅读权限30积分54精华0UID6441160帖子金钱396 威望0
Lv.3, 积分 54, 距离下一级还需 196 积分
UID6441160帖子威望0 多玩草10 草
QQ仙灵中怎么赚取银子呢，知道的大虾们教教我、、、、、、、
QQ仙灵小杂工
新人欢迎积分2 阅读权限255积分82896精华31UID1654828帖子金钱38912 威望14
QQ仙灵小杂工
UID1654828帖子威望14 多玩草3675 草
走过丶路过 发表于
QQ仙灵中怎么赚取银子呢，知道的大虾们教教我、、、、、、、
这里有详细的攻略
新人欢迎积分1 阅读权限30积分67精华0UID帖子金钱77 威望0
Lv.3, 积分 67, 距离下一级还需 183 积分
UID帖子威望0 多玩草0 草
一个是做师门&&加入虎娃的话给的多&&还一个就是挖宝卖&&打童子也给
新人欢迎积分1 阅读权限30积分81精华0UID帖子金钱91 威望0
Lv.3, 积分 81, 距离下一级还需 169 积分
UID帖子威望0 多玩草0 草
学生活技能卖给做师门的朋友、时刻注意世界频道的收购消息
新人欢迎积分1 阅读权限40积分403精华0UID帖子金钱504 威望0
Lv.4, 积分 403, 距离下一级还需 597 积分
UID帖子威望0 多玩草0 草
充RMB是你无悔的选择
新人欢迎积分1 阅读权限30积分67精华0UID帖子金钱77 威望0
Lv.3, 积分 67, 距离下一级还需 183 积分
UID帖子威望0 多玩草0 草
打童子 做师门 挖宝买东西 就这些
新人欢迎积分1 阅读权限30积分84精华0UID帖子金钱315 威望0
Lv.3, 积分 84, 距离下一级还需 166 积分
UID帖子威望0 多玩草0 草
表示做3药赚了那么点小钱
新人欢迎积分1 阅读权限30积分75精华0UID帖子金钱116 威望0
Lv.3, 积分 75, 距离下一级还需 175 积分
UID帖子威望0 多玩草0 草
这游戏是花银子的，不过去捉宠物来卖，有银子了。30以后师门要烹饪的会给银子
新人欢迎积分1 阅读权限30积分79精华0UID帖子金钱338 威望0
Lv.3, 积分 79, 距离下一级还需 171 积分
UID帖子威望0 多玩草0 草
冲金子换啊& &方便
新人欢迎积分1 阅读权限30积分84精华0UID帖子金钱315 威望0
Lv.3, 积分 84, 距离下一级还需 166 积分
UID帖子威望0 多玩草0 草
大量收二药做三药，我一下子赚了一倍多，不过小规模的，10万收22万卖的
新人欢迎积分1 阅读权限30积分88精华0UID帖子金钱311 威望0
Lv.3, 积分 88, 距离下一级还需 162 积分
UID帖子威望0 多玩草0 草
烹饪比较赚钱
初级人缘勋章
初级人缘勋章
大话2活动勋章
大话2活动勋章
爱情守望者
爱情守望者
歪歪语音达人
歪歪语音达人
Intel智能勋章
Intel智能勋章
QQ西游功勋勋章
QQ西游功勋勋章
鹿鼎记荣誉勋章
鹿鼎记荣誉勋章
圣剑佣兵章
洛奇英雄传佣兵骑士团功勋勋章
QQ仙灵功勋勋章
QQ仙灵功勋勋章
需要金钱：1100
Powered by
手机盒子客户端点击或扫描下载请各位大虾，帮小弟看下这几款车，哪一个的性价比更高些！谢谢_永久吧_百度贴吧
&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&签到排名：今日本吧第个签到，本吧因你更精彩，明天继续来努力！
本吧签到人数：0成为超级会员，使用一键签到本月漏签0次！成为超级会员，赠送8张补签卡连续签到：天&&累计签到：天超级会员单次开通12个月以上，赠送连续签到卡3张
关注：2,692贴子：
请各位大虾，帮小弟看下这几款车，哪一个的性价比更高些！谢谢收藏
真是尴尬，哪有刷帖的。。。最近在网上反复了解了下，就看了这几款车，不知道哪一个的性价比更高些，都是26寸27速的，永久8.8（），凤凰M880()，金胜s917(豪华油碟版)()看到的大虾，麻烦告诉下小弟，简单说下理由，灰常感激哇！！！（就看上了这几款车，不喜勿喷，谢谢）
1楼 22:53&|
没有人可以看下吗？？
2楼 23:31&|
登录百度帐号
内&&容:使用签名档&&
为兴趣而生，贴吧更懂你。&或QQ仙境中交易时是怎么骗人的？_qq仙境吧_百度贴吧
&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&签到排名：今日本吧第个签到，本吧因你更精彩，明天继续来努力！
本吧签到人数：0成为超级会员，使用一键签到本月漏签0次！成为超级会员，赠送8张补签卡连续签到：天&&累计签到：天超级会员单次开通12个月以上，赠送连续签到卡3张
关注：27,344贴子：
QQ仙境中交易时是怎么骗人的？收藏
请各位大虾解释下。为什么我今天在游戏的时候和别人交易，我还多留了一个心眼儿，点交易时我还看了那把刀就在那里。点完交易后刀到包里就闪了那么一下就直接消失了。这到底是怎么回事啊？复制的刀？
跪求详细详细详细介绍下。。。。。。
1楼 13:38&|
不是，是外挂...东西还会回到他包里...我也被骗了...伤心..希望这次更新后没有这种问题.
2楼 23:28&|
回复：2楼非常感谢
4楼 19:58&|
5楼 23:15&|
登录百度帐号
内&&容:使用签名档&&
为兴趣而生，贴吧更懂你。&或}