Oracle SQL 異常處理

①建表myemp。該表內容與emp一致；

②建儲存過程。儲存過程要的引數，和表裡的欄位一一對應。比如，表裡有empno，儲存過程就要有一個引數對應這欄位i_empno，型別肯定和empno一樣，如果你知道型別是number(4)，就直接寫成(i_empno in number(4),...)以此類推.

③功能實現，根據empno判斷，如果myemp表裡已經有這個empno，你就根據你傳入的資訊把empno的資訊更新了,如果沒有，就把你這些傳入的欄位，插入到表裡,

eg:我只用兩個欄位來說明：empno、sal

入參1：123,1000，經過��斷，myemp表裡沒有123這個empno,那麼執行完儲存過程，這個資訊要插入到表裡；

入參2:7369,2000,經判斷，表裡已經有這個編號，但sal為800，那麼執行完儲存過程，7369的sal更新為2000；

create or replace procedure store_info
(v_empnoinmyemp.empno%type,
v_enameinmyemp.ename%type,
v_jobinmyemp.job%type,
v_mgrinmyemp.mgr%type,
v_hiredateinmyemp.hiredate%type,
v_salinmyemp.sal%type,
v_comminmyemp.comm%type,
v_deptnoinmyemp.deptno%type
)
IS
v_id myemp.empno%type:=0;
BEGIN
select count(*) into v_id 
from myemp 
where myemp.empno = v_empno;
if (v_id=0) then 
insert into myemp(empno, ename, job, mgr, hiredate, sal, comm, deptno)
values (v_empno,v_ename,v_job,v_mgr,v_hiredate,v_sal,v_comm,v_deptno); 
else 
update myemp
set myemp.ename=nvl(v_ename,myemp.ename) , myemp.job=nvl(v_job,myemp.job),
myemp.mgr=nvl(v_mgr,myemp.mgr) , myemp.hiredate=nvl(v_hiredate,myemp.hiredate),
myemp.sal=nvl(v_sal,myemp.sal) , myemp.comm=nvl(v_comm,myemp.comm),
myemp.deptno=nvl(v_deptno,myemp.deptno)
where myemp.empno = v_empno ;
end if;
END store_info;

begin 
store_info(7369,null,null,null,null,2000,null,null);
end;

結果

【注意】：

為什麼要把這一題關於儲存過程的題放到這裡？

因為我起初用異常處理部分來寫這一題......，這是不規範的。

本題中用到 count() 函式，count() 是用來計算滿足條件的行數的，count(*) 計算所有的行，包括空值。

用異常處理來寫本題的程式碼：

create table myemp(empno, ename, job, mgr, hiredate, sal, comm, deptno)
as 
select empno, ename, job, mgr, hiredate, sal, comm, deptno
from emp;

create or replace procedure store_info
(v_empnoinmyemp.empno%type,
v_enameinmyemp.ename%type,
v_jobinmyemp.job%type,
v_mgrinmyemp.mgr%type,
v_hiredateinmyemp.hiredate%type,
v_salinmyemp.sal%type,
v_comminmyemp.comm%type,
v_deptnoinmyemp.deptno%type
)
IS
v_id myemp.empno%type;
BEGIN
select myemp.empno into v_id 
from myemp 
where myemp.empno = v_empno;
update myemp
set myemp.ename=v_ename, myemp.job=v_job,myemp.mgr=v_mgr,
myemp.hiredate=v_hiredate, myemp.sal=v_sal,
myemp.comm=v_comm,myemp.deptno=v_deptno
where myemp.empno = v_id;
EXCEPTION
when no_data_found then 
insert into myemp(empno, ename, job, mgr, hiredate, sal, comm, deptno)
values (v_empno,v_ename,v_job,v_mgr,v_hiredate,v_sal,v_comm,v_deptno);
END store_info;

3.

編寫PL/SQL塊，使用SELECT語句將管理者編號為空的員工的姓名及工作編號顯示出來，如果符合條件的員工多於一人，則返回字串“最高管理者人員過多！”字串，如果找到沒有符合條件的記錄，則返回字串“沒有最高管理者，請指定”

程式碼：

declare
o_ename emp.ename%type;
o_empno emp.empno%type;
v_idemp.empno%type;
begin
select emp.empno into v_id
from emp
where emp.mgr is null;
select emp.ename into o_ename from emp where emp.empno = v_id;
select emp.empno into o_empno from emp where emp.empno = v_id;
dbms_output.put_line('員工姓名：'||o_ename||','|| '員工編號：'||o_empno);
exception
when no_data_found then
dbms_output.put_line('沒有最高管理者，請指定');
when too_many_rows then
dbms_output.put_line('最高管理者人員過多');
end;

4.獲得每個部門的平均工資，如果平均工資大於2000，視為使用者定義的異常，提示“該部門的平均工資過高”。

declare
cursor cemp 
is 
select dept.dname,avg(sal) 
from emp,dept
where emp.deptno = dept.deptno
group by emp.deptno ,dept.dname;
v_dnamedept.dname%type ;
v_asal emp.sal%type ;
too_high_salexception;
begin
open cemp;
loop--開啟迴圈
fetch cemp into v_dname,v_asal;
exit when cemp%notfound;
begin--這裡寫了一個 PL/SQL 程式碼塊，裡面可以做異常處理
if v_asal > 2000 then
raise too_high_sal;
end if;
exception--異常處理，會終止此程式碼塊。進入下一次迴圈
when too_high_sal then
dbms_output.put_line(v_dname||'該部門工資過高');
end;
end loop;
close cemp;--注意end loop 與 close cemp 的先後順序。必須是先結束迴圈，再關閉遊標。
end;