错误处理代码

DECLARE
       v_ErrorCode     NUMBER ;
       v_ErrorMsg      VARCHAR2 ( 200 );
       v_CurrentUser   VARCHAR2 ( 8 );
       v_Information   VARCHAR2 ( 100 );
       
       salary_code     VARCHAR2 ( 1 );
       INVALID_SALARY_CODE        EXCEPTION;
BEGIN
     salary_code : =   ' x ' ;
      IF  salary_code  NOT   IN  ( ' A ' , ' B ' , ' C ' )  THEN
     RAISE INVALID_SALARY_CODE;
      END   IF ;
EXCEPTION
          WHEN  OTHERS  THEN
         v_ErrorCode : =  SQLCODE;
         v_ErrorMsg : =  SQLERRM;
         v_CurrentUser : =   USER ;
         v_Information : =   ' Error encountered on '   ||  to_char(sysdate)  ||   ' by database user '   ||  v_CurrentUser;
          INSERT   INTO  log_table(code,message,info)
          VALUES (v_ErrorCode,v_ErrorMsg,v_Information);
          COMMIT ；
END ;