【IT168 技术】生产系统抛ORA-01652错误，找到跑错的程序，发现是下面一段代码(这里只是演示代码，不是原代码)抛出的：
package_body ppp
aaa clob;
...
procedure change_content()
begin
。。。
aaa := replace(aaa, 'b', ';;');
。。。
end;
procedure call_f()
begin
aaa := empty_clob();
aaa := 'aaaaaaaaaaaaaaaaaaaabaaaaaaaaaaaaaaaaaaaaabaaaaaaaaaaaaaaaaaaaaaabaaaaaaaaabaaaaaaaaaaaaaaaaaaaaaaabaaaaaaaaaaaaabaaaaaaaaaaaaa';
for i in 1..10000 loop
change_content();
end loop;
end;
aaa clob;
...
procedure change_content()
begin
。。。
aaa := replace(aaa, 'b', ';;');
。。。
end;
procedure call_f()
begin
aaa := empty_clob();
aaa := 'aaaaaaaaaaaaaaaaaaaabaaaaaaaaaaaaaaaaaaaaabaaaaaaaaaaaaaaaaaaaaaabaaaaaaaaabaaaaaaaaaaaaaaaaaaaaaaabaaaaaaaaaaaaabaaaaaaaaaaaaa';
for i in 1..10000 loop
change_content();
end loop;
end;
