您现在正在浏览：站长之家 >> 数据库 >> 详细内容

在ORACLE里用数据库存储过程定期分割表

时间:2007-12-23 来源:不详作者:迈克DB

Oracle数据库里存放着各种各样的数据,其中有一些数据表会随着时间的推移,越来越大。如交友聊天的日志、
短信收发的日志、生产系统的日志、动态网站发布系统的日志等等。这样的信息又和时间紧密相关，有没有办法
让这些日志表能到时间自动分割成历史年月(如log200308,log200309)的表呢? 请看看我用存储过程定期分割表的
方法吧。

一、问题的引出

1.初学数据库时只知道用delete来删除表里的数据。但在Oracle数据库里，大量delete记录后，并不能释放表
所占用的物理空间，这里面有一个高水位的概念，所以我们不能用delete来分割表。

2.用重命名(rename)表的方法

(1).先建一个和原来日志表(假如是log)数据结构一模一样的新表(如log_new)，建约束、索引及指定字段的默
认值;
(2).重命名表log到log_YYYYMM;
要注重的问题是OLTP系统可能会因为DML操作阻碍重命名执行成功，出现ORA-00054资源正忙的错误提示,
需要试多次才能成功。
(3).重命名表log_new到log。
这样应用程序不用修改(受影响的时间仅几秒钟)，日志表就被截断分割了。

上述步骤可以在Oracle里可以用存储过程来实现它们。

二、用存储过程来分割表

织梦内容管理系统

可以看到在重命名表的方法中，步骤(2)是个要害。
下面这个rename_table过程会在有锁阻碍的情况下用递归的方式重试100次。重命名原始表到目标表的存储过程rename_table:

create or replace procedure rename_table
(source_name in varchar2,
target_name in varchar2,
times in out number)
is
query_str varchar2(4000);
source_name1 varchar2(64);
target_name1 varchar2(64);
cursor c1 is select segment_name from user_segments where segment_name=upper(source_name);
dummy c1%rowtype;
cursor c2 is select segment_name from user_segments where segment_name=upper(target_name);
dummy2 c2%rowtype;
begin
source_name1:=source_name;
target_name1:=target_name;

open c1;
fetch c1 into dummy;
-- if c1%found then
-- dbms_output.put_line(source_name1||'exist!');
-- end if;

open c2;
fetch c2 into dummy2;
-- if c2%notfound then
-- dbms_output.put_line(target_name1||'not exist!');

织梦内容管理系统

-- end if; if c2%notfound and c1%found then
query_str :='alter table '||source_name1||' rename to '||target_name1;
execute immediate query_str;
dbms_output.put_line('rename success!');
end if;
close c1;
close c2;
exception
WHEN OTHERS THEN
times:=times 1;
if times<100 then
-- dbms_output.put_line('times:'||times);
rename_table(source_name1,target_name1,times);
else
dbms_output.put_line(SQLERRM);
dbms_output.put_line('error over 100 times,exit');
end if;
end;
/ 截断分割log表的存储过程log_history:

create or replace procedure log_history
is
query_str varchar2(32767);
year_month varchar2(8);
times number;
begin
select to_char(sysdate-15,'YYYYMM') into year_month from dual;
times:=0;
query_str :='create table log_new pctfree 10 pctused 80
as select * from log where 1=2';