oracle存储过程实现导出表结构(二)
if part_name%notfound then
--去掉最后逗号
v_str :=substr(v_str,1,length(v_str)-1);
UTL_FILE.PUT_LINE(file_name,v_str);
exit;
end if;
UTL_FILE.PUT_LINE(file_name,v_str);
v_str :='partition '||partition_name||' values less than ('||high_value||'),';
end loop;
end if;
end if;
UTL_FILE.PUT_LINE(file_name,');');
UTL_FILE.PUT_LINE(file_name,'-------------------------------------------------------------');
end loop;
UTL_FILE.fclose_all;
end;