set serveroutput on
declare
date_v date;
date2_v varchar2(50);
num_v INTEGER;
name varchar2(50);
sql_v varchar2(200);
BEGIN
date_v := to_date('2008-12-01','YYYY-MM-DD');
FOR num_v in 1 .. 88
LOOP
date_v := date_v + 1;
date2_v := to_char(date_v,'yyyy-mm-dd');
dbms_output.put_line(date_v||' '||date2_v);
name := 'ppd_hurry_profile_hist_'||TO_CHAR(date_v,'yymmdd');
dbms_output.put_line(name);
sql_v := 'alter table ppd_hurry_profile_hist add partition '||name||' values less than (to_date('''||date2_v||''', ''YYYY-MM-DD'')) tablespace MODWDATA03';;
execute immediate sql_v;
commit;
sql_v := '';
END LOOP;
END;
来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/640706/viewspace-1017890/,如需转载,请注明出处,否则将追究法律责任。
转载于:http://blog.itpub.net/640706/viewspace-1017890/