關鍵字
?概念
?類型
?異常處理

一  概念
游標是SQL的一個內(nèi)存工作區(qū)，由系統(tǒng)或用戶以變量的形式定義。游標的作用就是用于臨時存儲從數(shù)據(jù)庫中提取的數(shù)據(jù)塊。在某些情況下，需要把數(shù)據(jù)從存放在磁盤的表中調(diào)到計算機內(nèi)存中進行處理，最后將處理結(jié)果顯示出來或最終寫回數(shù)據(jù)庫。這樣數(shù)據(jù)處理的速度才會提高，否則頻繁的磁盤數(shù)據(jù)交換會降低效率。
二  類型
  Cursor類型包含三種: 隱式Cursor，顯式Cursor和Ref Cursor（動態(tài)Cursor）。
1． 隱式Cursor:
1).對于Select …INTO…語句，一次只能從數(shù)據(jù)庫中獲取到一條數(shù)據(jù)，對于這種類型的DML Sql語句，就是隱式Cursor。例如：Select /Update / Insert/Delete操作。
2)作用：可以通過隱式Cusor的屬性來了解操作的狀態(tài)和結(jié)果，從而達到流程的控制。Cursor的屬性包含：
SQL%ROWCOUNT 整型 代表DML語句成功執(zhí)行的數(shù)據(jù)行數(shù)
SQL%FOUND  布爾型  值為TRUE代表插入、刪除、更新或單行查詢操作成功
SQL%NOTFOUND 布爾型 與SQL%FOUND屬性返回值相反
SQL%ISOPEN 布爾型 DML執(zhí)行過程中為真，結(jié)束后為假
3) 隱式Cursor是系統(tǒng)自動打開和關閉Cursor.
下面是一個Sample：

Set Serveroutput on;
begin
update t_contract_master set liability_state = 1 where policy_code = '123456789';
if SQL%Found then
dbms_output.put_line('the Policy is updated successfully.');
commit;
else
dbms_output.put_line('the policy is updated failed.');
end if;
end;
/

在PL/SQL中run:

SQL>
the policy is updated failed.
PL/SQL procedure successfully completed

2． 顯式Cursor：
（1） 對于從數(shù)據(jù)庫中提取多行數(shù)據(jù)，就需要使用顯式Cursor。顯式Cursor的屬性包含：
游標的屬性   返回值類型   意    義 
%ROWCOUNT   整型  獲得FETCH語句返回的數(shù)據(jù)行數(shù) 
%FOUND  布爾型 最近的FETCH語句返回一行數(shù)據(jù)則為真，否則為假 
%NOTFOUND   布爾型 與%FOUND屬性返回值相反 
%ISOPEN 布爾型 游標已經(jīng)打開時值為真，否則為假 

（2） 對于顯式游標的運用分為四個步驟：
? 定義游標---Cursor  [Cursor Name]  IS;
? 打開游標---Open  [Cursor Name];
? 操作數(shù)據(jù)---Fetch  [Cursor name]
? 關閉游標---Close [Cursor Name],這個Step絕對不可以遺漏。
（3）以下是三種常見顯式Cursor用法。
1）

Set serveroutput on;
declare
---define Cursor
Cursor cur_policy is
select cm.policy_code, cm.applicant_id, cm.period_prem,cm.bank_code,cm.bank_account
from t_contract_master cm
where cm.liability_state = 2
and cm.policy_type = 1
and cm.policy_cate in ('2','3','4')
and rownum < 5
order by cm.policy_code desc;
curPolicyInfo cur_policy%rowtype;---定義游標變量
Begin
open cur_policy; ---open cursor
Loop
--deal with extraction data from DB
Fetch cur_policy into curPolicyInfo;
Exit when cur_policy%notfound;
Dbms_Output.put_line(curPolicyInfo.policy_code);
end loop;
Exception
when others then
close cur_policy;
Dbms_Output.put_line(Sqlerrm);
if cur_policy%isopen then
--close cursor
close cur_policy;
end if;
end;
/

2）

Set serveroutput on;
declare
Cursor cur_policy is
select cm.policy_code, cm.applicant_id, cm.period_prem,cm.bank_code,cm.bank_account
from t_contract_master cm
where cm.liability_state = 2
and cm.policy_type = 1
and cm.policy_cate in ('2','3','4')
and rownum < 5
order by cm.policy_code desc;
v_policyCode t_contract_master.policy_code%type;
v_applicantId t_contract_master.applicant_id%type;
v_periodPrem t_contract_master.period_prem%type;
v_bankCode t_contract_master.bank_code%type;
v_bankAccount t_contract_master.bank_account%type;
Begin
open cur_policy;
Loop
Fetch cur_policy into v_policyCode,
v_applicantId,
v_periodPrem,
v_bankCode,
v_bankAccount;
Exit when cur_policy%notfound;
Dbms_Output.put_line(v_policyCode);
end loop;
Exception
when others then
close cur_policy;
Dbms_Output.put_line(Sqlerrm);
if cur_policy%isopen then
close cur_policy;
end if;
end;
/

3）

Set serveroutput on;
declare
Cursor cur_policy is
select cm.policy_code, cm.applicant_id, cm.period_prem,cm.bank_code,cm.bank_account
from t_contract_master cm
where cm.liability_state = 2
and cm.policy_type = 1
and cm.policy_cate in ('2','3','4')
and rownum < 5
order by cm.policy_code desc;
Begin
For rec_Policy in cur_policy loop
Dbms_Output.put_line(rec_policy.policy_code);
end loop;
Exception
when others then
Dbms_Output.put_line(Sqlerrm);
end;
/

run pl/sql,執(zhí)行結(jié)果如下：

SQL>
8780203932
8780203227
8780203218
8771289268
PL/SQL procedure successfully completed

3． Ref Cursor（動態(tài)游標）：
1） 與隱式Cursor,顯式Cursor的區(qū)別：Ref Cursor是可以通過在運行期間傳遞參數(shù)來獲取數(shù)據(jù)結(jié)果集。而另外兩種Cursor，是靜態(tài)的，在編譯期間就決定數(shù)據(jù)結(jié)果集。
2） Ref cursor的使用:
? Type [Cursor type name] is ref cursor
? Define 動態(tài)的Sql語句
? Open cursor
? 操作數(shù)據(jù)---Fetch  [Cursor name]
? Close Cursor
下面是一個Sample：

Set serveroutput on;
Declare
---define cursor type name
type cur_type is ref cursor;
cur_policy cur_type;
sqlStr varchar2(500);
rec_policy t_contract_master%rowtype;
begin
---define 動態(tài)Sql
sqlStr := 'select cm.policy_code, cm.applicant_id, cm.period_prem,cm.bank_code,cm.bank_account from t_contract_master cm
where cm.liability_state = 2
and cm.policy_type = 1
and cm.policy_cate in (2,3,4)
and rownum < 5
order by cm.policy_code desc ';
---Open Cursor
open cur_policy for sqlStr;
loop
fetch cur_policy into rec_policy.policy_code, rec_policy.applicant_id, rec_policy.period_prem,rec_policy.bank_code,rec_policy.bank_account;
exit when cur_policy%notfound;
Dbms_Output.put_line('Policy_code:'||rec_policy.policy_code);
end loop;
close cur_policy;
end;
/

4.常見Exception