SAP HANA異常處理

dicksonjyl560101發表於2015-03-20

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;


 

來自 “ ITPUB部落格 ” ,連結:http://blog.itpub.net/29829936/viewspace-1467923/,如需轉載,請註明出處,否則將追究法律責任。