SAP HANA异常处理

drop TABLE MYTAB;
drop TABLE MYTAB2;
drop PROCEDURE MYPROC;
drop PROCEDURE MYPROC2;

CREATE TABLE MYTAB (I INTEGER PRIMARY KEY);
CREATE TABLE MYTAB2 (I INTEGER, log varchar(100));

CREATE PROCEDURE MYPROC AS
BEGIN
  DECLARE EXIT HANDLER FOR sql_error_code 301
  select 201 a, '唯一索引冲突' b from dummy;
  DECLARE EXIT HANDLER FOR SQLEXCEPTION
  SELECT ::SQL_ERROR_CODE a, substr(::SQL_ERROR_MESSAGE, 1, 30) b  FROM DUMMY;
 
  INSERT INTO MYTAB VALUES (1);
  INSERT INTO MYTAB VALUES (1/0);
END;
 
CALL MYPROC;

CREATE PROCEDURE MYPROC2 AS
BEGIN
  DECLARE EXIT HANDLER FOR sql_error_code 301
  begin
 execute immediate 'rollback';
 insert into mytab2 values (301, 'error 301');
 execute immediate 'commit';
 
 --下面sql可以省略， 为方便查看异常添加该步骤
 select 301 a, '唯一索引冲突' b from dummy;
  end;
 
  DECLARE EXIT HANDLER FOR SQLEXCEPTION
  begin
 execute immediate 'rollback';
 insert into mytab2 values (::SQL_ERROR_CODE, substr(::SQL_ERROR_MESSAGE, 1, 30));
 execute immediate 'commit';
 
 --下面sql可以省略， 为方便查看异常添加该步骤
 SELECT ::SQL_ERROR_CODE a, substr(::SQL_ERROR_MESSAGE, 1, 30) b  FROM DUMMY;
  end;
 
  insert into mytab2 values (1, 'ok');
  execute immediate 'commit';
 
 
  INSERT INTO MYTAB VALUES (1);
  insert into mytab2 values (2, '1 inserted');
  execute immediate 'commit';
 
  INSERT INTO MYTAB VALUES (1/0);
  insert into mytab2 values (2, 'devide 0');
  execute immediate 'commit';
END;

CALL MYPROC2;

select * from mytab2;