表空间状况：XML:NAMESPACE PREFIX = O /

TABLESPACE_NAME

TOTAL_SPACE

USED_SPACE

PCT_FREE

1

SZ_DATA

75774.984375m

63662.796875M

 84.02%

因为晚上的WEB业务非常稀少，马上怀疑是数据交换出了问题，不是真的预订数据多就是数据交换程序出错。因为我们的交换程序有个特性，把所有的交换内容包括交换出错的详细信息都用CLOB字段保存在表里了。

于是用如下语句进一步查大字段对象：

--大字段 
SELECT A.TABLE_NAME, 
       A.COLUMN_NAME, 
       B.SEGMENT_NAME, 
       B.SEGMENT_TYPE, 
       B.TABLESPACE_NAME, 
       B.BYTES / 1024 / 1024
  FROM USER_LOBS A, USER_SEGMENTS B 
WHERE A.SEGMENT_NAME = B.SEGMENT_NAME 
ORDER BY B.BYTES DESC; 

查询结果：

TABLE_NAME

COLUMN_NAME

SEGMENT_NAME

SEGMENT_TYPE

TABLESPACE_NAME

B.BYTES/1024/1024

java命名空间javax.print类docflavor的类成员方法:客户端格式化打印数据定义及介绍 iis7站长之家_LOG

ERROR_TRACE

SYS_LOB0000077498C00012$$

LOBSEGMENT

SZ_DATA

50310

SEND_CONTROL

CONTENT

SYS_LOB0000077595C00003$$

LOBSEGMENT

SZ_DATA

2240

ACCESSORY_UPLOAD

FILEDATA

SYS_LOB0000077486C00010$$

LOBSEGMENT

SZ_DATA

488

EXCHANGE_LOG_HISTORY

ERROR_TRACE

SYS_LOB0000133755C00012$$

LOBSEGMENT

SZ_DATA

72

SEND_CONTROL

ERR_TRACE

SYS_LOB0000077595C00008$$

LOBSEGMENT

SZ_DATA

9

FILES

CONTENT

SYS_LOB0000077501C00004$$

LOBSEGMENT

SZ_DATA

2

SEND_CONTROL_HISTORY_2009

CONTENT

SYS_LOB0000133605C00003$$

LOBSEGMENT

SZ_DATA

0.0625

SEND_CONTROL_HISTORY

ERR_TRACE

SYS_LOB0000103089C00008$$

LOBSEGMENT

SZ_DATA

0.0625

MEMOS

CONTENT

SYS_LOB0000077530C00006$$

LOBSEGMENT

SZ_DATA

0.0625

SEND_CONTROL_HISTORY

CONTENT

SYS_LOB0000103089C00003$$

LOBSEGMENT

SZ_DATA

0.0625

NOTICES

CONTENT

SYS_LOB0000077538C00007$$

LOBSEGMENT

SZ_DATA

0.0625

SEND_CONTROL_HISTORY_2009

ERR_TRACE

SYS_LOB0000133605C00008$$

LOBSEGMENT

SZ_DATA

0.0625

很显然上述EXCHANGE_LOG占据了50310M的空间，而该表空间总共消耗了63662.796875M,显然问题就出在这个大对象下。

因为该部分数据不能测地删除，故采用如下JOB对重复数据进行提纯处理：

我们通过建exchange_log_history表提取sz_exchange_log中的数据，删除大量的冗余数据

create or replace procedure p_job_exchange_log_pure Authid Current_User Is 
  num   number; 
  days  number; 
  v_sql varchar2(3000); 
begin 
 
select trunc(Sysdate- min(create_date)) into days from exchange_log; 
 
  num := 0; 
  while num < days 
 
  LOOP 
    begin 
      --建立断点，若异常则回滚到point1之前 
      savepoint point1; 
      v_sql := 'insert into exchange_log_history('; 
      v_sql := v_sql || 
               ' Select * from exchange_log a Where (msg_type,msg_code) in (select msg_type,msg_code from exchange_log Where trunc(create_date)=trunc(sysdate-'|| num ||') group by msg_type,msg_code having count(*) >= 1)'; 
      v_sql := v_sql || 
               ' And rowid in (select min(rowid) from exchange_log Where trunc(create_date)=trunc(sysdate-'|| num || ') group by msg_type,msg_code having count(*)>=1))'; 
      execute immediate v_sql; 
      commit; 
      num := num + 1; 
    Exception 
      when others then 
        rollback to savepoint point1; /*//*异常处理，保存点下面的操作都不会被执行*/ 
        return; 
    end; 
 
  end LOOP; 
  End p_job_exchange_log_pure; 

您可能感兴趣的文章: