自动为分区表增加分区存储过程

自动为分区表增加分区存储过程：

?

begin  sys.dbms_job.submit(job => :job,                      what => 'guan_add_partition;',                      next_date => to_date('02-04-2012', 'dd-mm-yyyy'),                      interval => 'trunc(sysdate)+1');  commit;end;/

?