--分区存在 list分区truncate分区资料
if vi_result >0 then
vv_task_pos :='清空分区';
vv_sql := 'alter table '||iv_table_owner||'.'||iv_table_name||' truncate partition '||iv_partition_name;
execute immediate vv_sql;
end if;
---分区不存在 list分区
if vi_result = 0 then
vv_task_pos := '新增分区';
vv_sql :='alter table '||iv_table_owner||'.'||iv_table_name||' add partition '||iv_partition_name||
' values('||ii_partition_value||') tablespace '||iv_tablespace_name;
execute immediate vv_sql;
end if;
oi_return := 0;
return(oi_return);
exception
when others then
vi_err_code := sqlcode;
oi_return := vi_err_code;
return(oi_return);
end ;
if vi_result >0 then
vv_task_pos :='清空分区';
vv_sql := 'alter table '||iv_table_owner||'.'||iv_table_name||' truncate partition '||iv_partition_name;
execute immediate vv_sql;
end if;
---分区不存在 list分区
if vi_result = 0 then
vv_task_pos := '新增分区';
vv_sql :='alter table '||iv_table_owner||'.'||iv_table_name||' add partition '||iv_partition_name||
' values('||ii_partition_value||') tablespace '||iv_tablespace_name;
execute immediate vv_sql;
end if;
oi_return := 0;
return(oi_return);
exception
when others then
vi_err_code := sqlcode;
oi_return := vi_err_code;
return(oi_return);
end ;
来自 “ ITPUB博客 ” ，链接：https://blog.itpub.net/12961536/viewspace-1061391/ ，如需转载，请注明出处，否则将追究法律责任。
请登录后发表评论
登录
全部评论
