【文章內(nèi)容簡介】 ? error_number 是從 –20,000 到 –20,999 之間的參數(shù)， ? error_message 是相應的提示信息 ( 2048 字節(jié) )， ? keep_errors 為可選，如果 keep_errors =TRUE ,則新錯誤將被添加到已經(jīng)引發(fā)的錯誤列表中。如果keep_errors=FALSE(缺省 ),則新錯誤將替換當前的錯誤列表。 用戶定義的異常處理 游標 ? 在 PL/SQL 中處理查詢語句和數(shù)據(jù)操縱語句時，Oracle 必須分配一片叫上下文 ( context area )的區(qū)域來處理所必需的信息，其中包括： ? 要處理的行的數(shù)目； ? 一個指針，指向語句被分析以后的表示形式； ? 查詢的活動集 (active set)。 ? 游標是一個指向上下文的句柄 ( handle)或指針。通過游標， PL/SQL 可以控制上下文區(qū)和處理語句時上下文區(qū)會發(fā)生的事情。 ? 在 PL/SQL程序中定義的游標稱作顯式游標。顯式游標包括 : ? 定義游標 ? 打開游標 ? 提取數(shù)據(jù)（也稱為推進游標） ? 關閉游標 顯式游標 ? 定義游標 cursor 游標名 [（參數(shù)名 1 數(shù)據(jù)類型 [,參數(shù) 2 數(shù)據(jù)類型 …] ） ] is 查詢語句 。 ? 其中：游標名是一個沒有定義的 PL/SQL 變量，用戶不能給游標名賦值。 ? 參數(shù)名是一個在 SELECT語句的 WHERE條件中要用到的參數(shù)。 ? SELECT語句是一個不含 INTO子句的 SELECT語句，允許帶 WHERE、 ORDER BY、 GROUP BY等子句。 ? 打開游標 ? 打開游標是在 SELECT語句的所有輸入?yún)?shù)都接受值之后，執(zhí)行游標所對應的 SELECT語句，將其查詢結果放入工作區(qū)，指針指向工作區(qū)的首部。假如在打開游標時查詢沒有返回行， PL/SQL 沒有觸發(fā)錯誤，可以在取數(shù)據(jù)（ FETCH）之后檢測游標的狀態(tài)。 open 游標名稱 [（實際參數(shù)值 1[實際參數(shù)值 2…] ） ]。 ? 提取數(shù)據(jù) ? 在打開游標之后， SELECT語句的結果被臨時存放到游標結果集中，為了處理結果的數(shù)據(jù)，需要使用 FETCH語句提取游標數(shù)據(jù)。 ? 格式一： fetch 游標名稱 into 變量列表 。 ? 格式二： fetch 游標名稱 bulk collect into 集合變量表 [LIMT rows]。 ? 關閉游標 close 游標名稱 。 ? 【例 316】 顯示信息專業(yè)的所有學生學號及姓名。（使用FETCH….INTO 語句） SQL set serveroutput on SQL declare 2 cursor stu_cursor is 3 select stu_no, stu_name from student where stu_dept like 39。信息 39。 4 v_sname varchar2(10)。 5 v_sno char(8)。 6 begin 7 if not stu_cursor%ISOPEN then 8 open stu_cursor。 9 end if。 10 loop 11 fetch stu_cursor into v_sno, v_sname。 12 exit when stu_cursor%NOTFOUND 。 13 (v_sno||39。,39。||v_sname )。 14 end loop。 15 close stu_cursor。 16 end。 17 / ? 所有的 SQL 語句在上下文區(qū)內(nèi)部都是可執(zhí)行的，因此都有一個游標指向上下文區(qū)，此游標就是所謂的SQL游標 (SQL cursor)，即隱式游標。與顯式游標不同， SQL 游標不被程序打開和關閉。 ? 當一個 DML語句執(zhí)行時， PL/SQL內(nèi)部打開一個游標，語句的結果被保存在 4個游標屬性中。 ? SQL%FOUND ? SQL%NOTFOUND ? SQL%ROWCOUNT ? SQL%ISOPEN ? 游標是一塊包含有查詢信息的內(nèi)存空間。在執(zhí)行 DML語句，游標被打開；當語句完成時，游標被關閉。 隱式游標 ? 【例 320】 更新學生表，如果找到學號為’ 20238104’的學生更新學生的年齡，否則往學生表中插入該學生的記錄。 SQL BEGIN 2 UPDATE student 3 SET stu_age=19 4 WHERE stu_no=39。2023810439。 5 如果更新沒有匹配則插入一新行 6 IF SQL%NOTFOUND THEN 7 INSERT into Student VALUES(39。2023810439。,39。李濱 39。,19,39。男 39。,39。信息 39。)。 8 END IF。 9 mit。 10 END。 11 / ? 游標 FOR循環(huán)是在 PL/SQL 塊中使用游標最簡單的方式，簡化了對游標的處理。當使用游標 FOR循環(huán)時， Oracle 會隱含地打開游標、提取游標數(shù)據(jù)并關閉游標。語法如下： FOR record_name IN cursor_name LOOP Ststement1。 Ststement2。 END LOOP。 ? 其中： record_name是 Oracle 隱含定義的記錄變量名。 ? 當使用游標開發(fā) PL/SQL 應用程序時，為了簡化程序代碼，建議大家使用游標 FOR循環(huán)。 游標 FOR循環(huán) 【例 321】給課程名為‘數(shù)據(jù)庫原理’的所有學生的成績加 5分。 SQL declare 2 cursor sc1_cursor 3 is 4 select * 5 from sc for update。 6 begin 7 (39。課程號 學號 成績 39。)。 8 for sc_rec in sc1_cursor loop 9 if =39。a0139。 then 10 (||39。 39。||||39。 39。||)。 11 update sc 12 set grade=grade+2 13 WHERE CURRENT OF sc1_cursor。 14 end if。 15 end loop。 16 end。 17 / ? ORACLE編寫的程序一般分為兩類： ? 存儲過程：是可以完成一定功能的程序叫存儲過程； ? 函數(shù)：是在使用時給出一個或多個值，處理完后返回一個或多個結果的程序叫函數(shù)； ? 這兩類程序都存放在 Oracle數(shù)據(jù)庫字典中。 ? 與其它的數(shù)據(jù)庫系統(tǒng)一樣， Oracle的存儲過程是用 PL/SQL語言編寫的能完成一定處理功能的存儲在數(shù)據(jù)庫字典中的程序。 ? 創(chuàng)建過程語法 : CREATE [OR REPLACE] PROCEDURE 過程名 [ (參數(shù)名 [ { IN | IN OUT }] 數(shù)據(jù)類型 ….)] { IS | AS } PL/SQL塊 存儲過程 ? 建立無參數(shù)的存儲過程 ? 【例 22】以下過程用于輸出當前系統(tǒng)日期和時間。 SQL CREATE OR REPLACE PROCEDURE data_time 2 IS 3 BEGIN 4 (systimestamp)。 5 END。 6 / 過程已創(chuàng)建。 ? 建立了存儲過程 data_time之后，就可以調(diào)用該過程。在 SQL*Plus環(huán)境中調(diào)用過程有兩種方法 ： ? 方法一：使用 execute命令調(diào)用過程 SQL set serveroutput on。 SQL exec data_time。 197月 05 下午 +08:00 PL/SQL 過程已成功完成。 ? 方法二：使用 call命令調(diào)用過程 SQL call data_time()。 207月 05 上午 +08:00 調(diào)用完成。 ? 建立帶有 IN參數(shù)的存儲過程 ? 建立存儲過程時，可以通過使用輸入?yún)?shù)，將應用程序的數(shù)據(jù)傳遞到過程中， ? 如果不指定參數(shù)模式，則默認是輸入?yún)?shù)， ? 可以使用 IN關鍵字顯示地定義輸入?yún)?shù)。 ? 下面以建立為選課表 SC插入數(shù)據(jù)的存儲過程 add_sc為例，說明建立帶有輸入?yún)?shù)的過程的方法。 ? 【例 323】 建立為選課表 SC插入數(shù)據(jù)的存儲過程 add_scv。 SQL CREATE OR REPLACE PROCEDURE add_scv 2 (v_sno %TYPE, v_o %TYPE, v_grade %TYPE) 3 IS 4 e_integrity EXCEPTION。 5 pragma exception_init(e_integrity,2291)。 6 BEGIN 7 insert into sc(stu_no,cou_no,grade) 8 values(v_sno,v_o,v_grade)。 9 EXCEPTION 10 WHEN dup_val_on_ind