oracle 数据库对象自动备份

夹谷冰岚

　　本文介绍一种数据库对象备份的方法。其原因是因为我在开发时有两个数据库用户，他们的数据表结构相同，所开发的存储过程也相同，但是数据却是不同地方的数据。因为懒惰所以在修改过程包时只想修改一次就ok，所以想了一个半自动的办法，让数据库自动备份数据库对象，然后编写bat文件进行同步更新。
　　首先要明确主次，我把a数据库用户作为修改对象，b数据库用户只是同步更新。ok
　　步骤：
　　一、用dba身份登录数据库，给a数据库用户指定一个存储路径‘d:\test’，并授予读写的权限。

create or replace directory D_OUTPUT as 'D:\test';   
grant read,write on directory D_OUTPUT to a;   
GRANT EXECUTE ON utl_file TO a;

　　
　　二、用a登录数据库，编写自动备份包的过程。
　　

create or replace procedure save_PACKAGEtoSQL_thomas is
procedname varchar2(32);
i          PLS_INTEGER := 0;
L_output   utl_file.file_type;
file_dic   varchar2(200) := 'D_OUTPUT'; --目录
file_name  varchar2(32) := 'pro.sql'; --生成的文件
cursor proc is --得到每个业务模块中用到的存储过程名称
select x.referenced_name
from user_dependencies x
where x.referenced_type = 'PACKAGE'
group by x.referenced_name;
begin
--打开文件
L_output := utl_file.fopen(file_dic, file_name, 'a');
--循环得到每一个存储过程名称
open proc;
loop
fetch proc
into procedname;
exit when proc%notfound;
i := i + 1;
dbms_output.put_line('procedname' || i || '=' || procedname);
--得到每一个存储过程的source
for j in (select decode(t.line,
1,
'Create or replace ' || t.text,
t.text) text
from user_source t
where t.name = procedname
and t.type = 'PACKAGE'
order by line) LOOP
--写每一个存储过程包到文件
UTL_FILE.put_line(L_output, j.text, false);
END LOOP;
--在每一个存储过程后增加'/'
UTL_FILE.put_line(L_output, '/', false);
for j in (select decode(t.line,
1,
'Create or replace ' || t.text,
t.text) text
from user_source t
where t.name = procedname
and t.type = 'PACKAGE BODY'
order by line) LOOP
--写每一个存储过程包体到文件
UTL_FILE.put_line(L_output, j.text, false);
END LOOP;
--在每一个存储过程后增加'/'
UTL_FILE.put_line(L_output, '/', false);
end loop;
close proc;
UTL_FILE.fclose(L_output);
end save_PACKAGEtoSQL_thomas;
　　三、编写job，定时每天晚上12点执行。
　　

VARIABLE job_busilog_addpartition NUMBER;
BEGIN
DBMS_JOB.SUBMIT(:job_busilog_addpartition,save_PACKAGEtoSQL_thomas;',trunc(sysdate)+23/24,'SYSDATE+1');
COMMIT;
END;
　　四、编写bat文件，内容：start sqlplus     b/pwd@db   @ d:\test\pro.sql  。
　　
　　完成。
　　======================================================================
　　后续问题：1、上面是本地数据库思路，远程数据库需要数据库连接就可以了。
　　2、本来准备自动完成更新的，但是不知道怎样备份成dmp文件，也或者是在过程里怎样实现导入sql文件导入。
　　3、其实上面只是对包进行备份，也可以对所有用户对象进行备份。