Oracle利用存储过程将表实现自动添加分区

一、为什么要给Oracle数据表建立分区？

随着Oracle表中数据量的不断增大，我们去查询数据的速度也会随之变慢。为了解决这个问题，通常我们会通过各种手段来优化查询数据的速度。建立分区表就是其中一个直接有效的手段，但是每次在插入数据到目标表的时候都需要手动查询目标表中是否有相应分区，为了解决这个问题，我们用存储过程来实现自动分区。

二、存储过程实现

代码如下：

create or replace procedure auto_add_partition(table_before in varchar2 , table_after in varchar2 , col_par in varchar2)
as
v_sql VARCHAR2(4000);
begin
  -- 判断是否需要增加分区
  v_sql := UPPER ('DECLARE
    CURSOR Cursor_partition is select distinct '||col_par||' from '||table_before||' a where not exists (select 1 from USER_TAB_PARTITIONS where  TABLE_NAME=upper('''||table_after||''') and PARTITION_NAME = ''P_''||a.'||col_par||');
    new_p varchar2(255);
  begin
    open Cursor_partition;
    FETCH Cursor_partition into new_p;
    WHILE Cursor_partition%FOUND
    LOOP
      EXECUTE IMMEDIATE (''alter table '||table_after||' add partition p_''||new_p||'' values (''''''||new_p||'''''')'''||');'||'
      FETCH Cursor_partition into new_p;
    END LOOP;
    CLOSE Cursor_partition;
  end;');
  EXECUTE IMMEDIATE(v_sql);
  --dbms_output.put_line(v_sql);
end;