【Oracle】异常信息的加工处理

引言

    很多时候,我们调用oracle存储过程都会发生各种各样的异常信息,例如ORA-12899值过大,ORA-01400不能插入空值等.虽然说这类异常是前端没控制到位的缘故,但是现实很难100%完全控制住,所以一旦发生了这类异常,并返回的前端显示时就会造成很差的用户体验了.或许,我们可以将这类异常加工一下,包装得好看些,让用户看得懂发生了什么事情,能够自行处理.下面是我的一点尝试.

    我们通常会在oracle存储过程的异常处理得到异常信息,如:

Exception

    When Others Then

     rollback;

     dbms_output.put_line(sqlerrm);

     Raise_Application_Error(-20000,sqlerrm); 

     然而,我们将会得到下面的异常信息,如

ORA-12899: 列 "NIS"."T_CZL_ACCOUNT"."VC_ACCOUNT" 的值太大 (实际值: 35, 最大值: 20)

     虽然说我们99%的程序员都看得懂这个是什么意思,但是也有99%的用户看不出个所以然.我们的目标是意外发生了,用户依然看得懂.接下来,我需要创建一个函数,专门处理这类的异常,返回大部分用户看得懂的信息.函数代码如下:

create or replace function f_czl_geterror(message in varchar2)

return varchar2 is

   Result varchar2(1000);

  

   num1 number:=0;

   num2 number:=0;

   num3 number:=0;

   num4 number:=0;

   num5 number:=0;

   num6 number:=0;

   num7 number:=0;

   num8 number:=0;

   num9 number:=0;

   num10 number:=0;

   str1 varchar2(1000);             

   str2 varchar2(1000);  

   str3 varchar2(1000);

   str4 varchar2(1000);

   str5 varchar2(1000);                                

   str6 varchar2(1000);             

   str7 varchar2(1000);  

   str8 varchar2(1000);

   str9 varchar2(1000);

   str10 varchar2(1000);

begin

   

    if instr(message, 'ORA-12899')>0 then

     num1:=instr(message,'ORA-12899'); --得到 ORA-12899的所在位置

     str1:=substr(message,num1);    --得到ORA-12899后面的所有字符 

     num2:=instr(str1,'"',1,3);    --得到ORA-12899后面第三个"的位置

     num3:=instr(str1,'"',1,4);    --得到ORA-12899后面第四个"的位置

     str2:=substr(str1,num2+1,num3-num2-1);  --得到表名

     num4:=instr(str1,'"',1,5);    --得到ORA-12899后面第五个"的位置

     num5:=instr(str1,'"',1,6);    --得到ORA-12899后面第六个"的位置

     str3:=substr(str1,num4+1,num5-num4-1);  --得到字段名

     

     num6:=instr(str1,':',1,2);    --得到ORA-12899后面第二个:的位置

     num7:=instr(str1,',',1,1);    --得到ORA-12899后面第1个,的位置

     str5:=substr(str1,num6+1,num7-num6-1);  --得到输入的长度

     

     num8:=instr(str1,':',1,3);    --得到ORA-12899后面第二个:的位置

     num9:=instr(str1,')',1,1);    --得到ORA-12899后面第1个,的位置

     str6:=substr(str1,num8+1,num9-num8-1);  --得到最大的长度

       

     --得到对应的字段注释

     select t.comments into str4 from SYS.USER_COL_COMMENTS t where t.column_name=str3 and t.table_name=str2;

     

     Result:=str4||'长度超出限制,最大字符数为'||str6||',您输入的字符数为'||str5||'.';

    elsif  instr(message, 'ORA-01400')>0  then

       

     num1:=instr(message,'ORA-01400'); --得到 ORA-01400的所在位置

     str1:=substr(message,num1);    --得到ORA-01400后面的所有字符 

     num2:=instr(str1,'"',1,3);    --得到ORA-01400后面第三个"的位置

     num3:=instr(str1,'"',1,4);    --得到ORA-01400后面第四个"的位置

     str2:=substr(str1,num2+1,num3-num2-1);  --得到表名

     num4:=instr(str1,'"',1,5);    --得到ORA-01400后面第五个"的位置

     num5:=instr(str1,'"',1,6);    --得到ORA-01400后面第六个"的位置

     str3:=substr(str1,num4+1,num5-num4-1);  --得到字段名

     

      --得到对应的字段注释

     select t.comments into str4 from SYS.USER_COL_COMMENTS t where t.column_name=str3 and t.table_name=str2;

     

      Result:=str4||'不能为空,请输入内容.';

   elsif  instr(message, 'ORA-01438')>0  then

       

  

      Result:=str4||'数字长度超出限制,请检查!';

    else

      

        Result:=message;

    end if;

    

      return(Result);

end f_czl_geterror;

 

    然后我们在存储过程的异常处理中用上这个函数,如:

Exception

    When Others Then

     rollback;

     dbms_output.put_line(f_czl_geterror(sqlerrm));

     Raise_Application_Error(-20000,f_czl_geterror(sqlerrm));   

    再测试看看,我们得到了:

账号长度超出限制,最大字符数为 20,您输入的字符数为 35.

    起码有的用户看得懂了是吧,咱们的目标算是达成了.

小结

  上文介绍了如何将oracle的系统异常信息转换成用户看得懂的信息.其实这只是一种补救的措施罢了,某种程度上是'欺骗'了用户,程序是正常运行的,但是不能否认的是我们的程序依然不完善.但是,有的补救好过没有是吧.最后,如果您有更好的建议,请不吝指教.