Oracle dbms_lob.append函数中有bug还是我做错了

我创建了以下函数

function lob_replace( p_lob in out clob,p_what in varchar2,p_with in clob ) return clob
  as
      l_temp_number   number;
      l_temp_number_1 number;
      l_temp_clob clob;
      l_return_clob clob;
      l_temp1_clob clob;
      l_temp2_clob clob;
  begin
                l_temp_number:=dbms_lob.instr(p_lob, p_what);
                --Create a lob locator
                 DBMS_LOB.createtemporary(l_temp_clob,true);
                 DBMS_LOB.createtemporary(l_temp1_clob,true);
                 DBMS_LOB.createtemporary(l_temp2_clob,true);

                ---substract and build the LOBs
                l_temp_number_1:=length(p_lob);
                l_temp_clob:=dbms_lob.substr(p_lob,l_temp_number-1,1);
                l_temp1_clob:=dbms_lob.substr(p_lob,l_temp_number_1-l_temp_number+1 ,l_temp_number +length(p_what) );

                --append three diff lob to one
                dbms_lob.append(l_temp2_clob,l_temp_clob);
                dbms_lob.append(l_temp2_clob,p_with);
                dbms_lob.append(l_temp2_clob,l_temp1_clob);

                l_return_clob :=l_temp2_clob;

                --remove the tmp lob
                DBMS_LOB.freetemporary(l_temp_clob);
                DBMS_LOB.freetemporary(l_temp1_clob);
                DBMS_LOB.freetemporary(l_temp2_clob);

                return l_return_clob;
  end;

如果我按如下方式调用此函数，此将抛出错误

declare
   temp clob;
begin
  temp:='replace this #a#';
  temp:=lob_replace(temp,'#a#','with this');
end;

它将抛出下面的错误

 ORA-06502: PL/SQL: numeric or value error: invalid LOB locator specified: ORA-22275
    ORA-06512: at "SYS.DBMS_LOB", line 639
    ORA-06512: at "LOB_REPLACE", line 24
    ORA-06512: at line 5

但是这个不会抛出错误

declare
   temp clob;
begin
  temp:='replace this #a# ';
  temp:=lob_replace(temp,'#a#','with this');
end;

请注意

temp:='replace this#a#'末尾的额外空格

有人知道这样做的原因吗？
当您构建
l_temp1\u clob
时，如果需要添加任何内容，您只能添加lob的其余部分。更改您的代码：

l_temp1_clob:=dbms_lob.substr(p_lob,l_temp_number_1-l_temp_number+1 ,l_temp_number +length(p_what) );

为此：

if l_temp_number +length(p_what) < l_temp_number_1
then
   l_temp1_clob := dbms_lob.substr(p_lob, l_temp_number_1 - l_temp_number - 1 , l_temp_number +length(p_what) );
end if;

declare
   temp clob;
begin
  temp:='replace this #a#';
  temp:=lob_replace(dd,'#a#','with this');
end;