Oracle异常处理

太过爱你忘了你带给我的痛 2024-02-17 17:52 56阅读 0赞

\--异常处理  
/\*BEGIN  
sequence\_of\_statements;  
EXCEPTION  
WHEN <exception\_name> THEN  
sequence\_of\_statements;  
WHEN OTHERS THEN  
sequence\_of\_statements;  
END;  
\*/  
  
  
**常用的函数和过程：**  
SQLCODE: 返回错误代码，没有错误时返回0  
SQLERRM:返回错误消息.  
PRAGMA EXCEPTION\_INIT(）：把用户自定义异常与相应的错误代码关联，使用用户自定义异常来捕获、处理错误  
RAISE\_APPLICATION\_ERROR:可用于定义用户错误消息和在使用该过程的位置上暂 停程序的执行。  
  
  
**异常的分类：**  
**--1)系统预定义异常**  
\--根据部门编号查询员工信息  
select \* from emp where deptno=100;  
  
declare  
v\_ename emp.ename%type;  
v\_deptno emp.deptno%type:=&no; --输入部门编号  
begin  
select ename into v\_ename from emp where deptno=v\_deptno;  
DBMS\_OUTPUT.PUT\_LINE(v\_ename);  
\--处理异常  
exception  
/\* when NO\_DATA\_FOUND then  
DBMS\_OUTPUT.PUT\_LINE('没有找到!'); \*/  
when TOO\_MANY\_ROWS then  
DBMS\_OUTPUT.PUT\_LINE('返回多条数据!');  
WHEN OTHERS THEN  
DBMS\_OUTPUT.PUT\_LINE('错误号：'||sqlcode||'-->消息:'||sqlerrm);  
  
end;  
  
  
select \* from emp;  
select \* from dept;  
  
  
**--2)未预定义的异常 \*\***  
\--实现修改编号为7788 的雇员所属的部门编号为99  
declare  
v\_empno emp.empno%type:=&no; --编号为7788  
\--声明异常  
ex exception; --异常情况> EXCEPTION;  
\--与标准的Oracle 错误联系起来，使用EXCEPTION\_INIT 语句：  
pragma EXCEPTION\_init(ex,-2291); -- PRAGMA EXCEPTION\_INIT(<异常情况>, <错误代码>);  
begin  
update emp set deptno=99 where empno=v\_empno;  
  
\--处理异常  
exception  
when ex then  
DBMS\_OUTPUT.PUT\_LINE('----->违反完整约束条件');  
WHEN OTHERS THEN  
DBMS\_OUTPUT.PUT\_LINE('错误号：'||sqlcode||'-->消息:'||sqlerrm);  
end;  
  
  
**--3)自定义异常**  
DECLARE  
name varchar(10);  
ex EXCEPTION; --(1)定义异常ex  
BEGIN  
SELECT DNAME INTO name FROM DEPT WHERE DEPTNO='10';  
DBMS\_OUTPUT.PUT\_LINE(name);  
IF NAME<>'HR' THEN  
RAISE ex; --(2)触发异常  
END IF;  
\--(3)处理异常  
EXCEPTION  
WHEN ex THEN  
DBMS\_OUTPUT.PUT\_LINE('10号部门不是HR'); --处理异常  
END;  
  
  
\--查询编号为7788 的雇员的福利补助（comm 列）  
  
  
select \* from emp where empno=7788;  
  
  
declare  
v\_comm emp.comm%type;  
  
\--1)声明异常  
ex exception;  
begin  
select comm into v\_comm from emp where empno=7369;  
  
\--判断  
if v\_comm is null then  
raise ex; --2)抛出异常  
end if;  
  
dbms\_output.put\_line(v\_comm);  
  
\--3)处理异常  
exception  
when ex then  
dbms\_output.put\_line('7788 的雇员无福利补助!');  
  
end;