【oracle】cursor 概念，cursor經典例子

1118-01 cursor 概念，經典例子
類型
1.隱式遊標
2.顯式遊標
3.ref cursor
4.sysref cursor

定義
1.隱式遊標
無需定義，select語句即爲隱式遊標

2.顯式遊標
cursor <cursor>[(<param_list>)]is <select_statement>;
說明：
2.1 定義時不帶參數，帶參數
說明:
1）參數 只能指定 數據類型，不能指定長度。
2）參數能夠用 default 設置默認值，設有默認值的遊標在open時 能夠 不帶參數。
3）參數 一般用在 <select_statement> 中。
2.2 < select_statement >中 不帶變量，帶變量

3.ref cursor
3.1弱類型
type <cursor> is ref cursor;
3.2強類型
type <cursor> is ref cursor return tab_student%rowtype; --指定了return
注意:
1）建立procedure返回遊標類型變量（out 參數）時，只能使用 ref cursor。
2）ref cursor沒有參數，能夠使用帶變量的sql實現。
3）ref cursor在open時有2種寫法:
open <ref_cursor> for <select_statement>;
open <ref_cursor> for <vv_sql>;
而顯式遊標的定義 只能用 is <select_statement>
4）由於ref cursor 的具體sql語句在open時指定，因此 ref cursor 不能夠使用 for循環取值。

4.sys_refcursor

屬性（4個）
1.found
2.notfound
3.rowcount
4.isopen
引用方式:
顯式遊標:<cursor>%<遊標屬性>
隱式遊標:SQL%<遊標屬性>

注意:除了屬性isopen外的其餘3個屬性 至少fetch一次，該屬性纔有值，即才能夠使用。

遍歷遊標：取遊標中的值
1. fetch <cursor> into <column_variable_list>;
2. fetch <cursor> into <行類型變量|記錄類型變量>
說明:
<record> --記錄類型 的 顯示定義
<table>%rowtype -- 記錄類型 的 隱式定義
<view>%rowtype -- 記錄類型 的 隱式定義
<cursor>%rowtype -- 記錄類型 的 遊標定義
使用 <記錄類型>.<column>取得行中列的值。
3. for循環中能夠使用 循環計數變量.字段名

遊標的使用流程:
1.定義
2.open
3.fetch
4.close
說明:for循環中，無需手動open,fetch,close。

 

 

例1.顯式遊標的定義（無參，有參，帶變量，不帶變量）

例2.遊標屬性（隱式，顯式）

例3.顯示遊標的使用（遍歷，取值）

例4.ref cursor的定義，使用
說明:
ref cursor定義與打開:定義用關鍵字type（顯式遊標的定義使用關鍵字 cursor）;open時用關鍵字for指定SQL。
ref cursor的遍歷，取值:與 顯式遊標 相同。

經典例子:
1.需求:按部門加薪
員工表，若是是10部門，員工加薪￥100；20部門，員工加薪￥200；30部門，員工加薪￥300。

set serveroutput on;

declare
cursor vc_emp(vp_emp_depart integer) is
select emp_id,emp_name,emp_depart,emp_salary from t_emp where emp_depart = vp_emp_depart;
begin
for i in 1..3 loop
for i_emp in vc_emp(i*10) loop
update t_emp set emp_salary=i_emp.salary*i*100 where emp_id = i_emp.emp_id;
end loop;
end loop;
commit;
exception
when others then
rollback;
dbms_output.put_line(sqlcode||','||substr(sqlerrm,1,200));
end;
/

 

2.需求:
存儲過程返回ref cursor
調用存儲過程，並遍歷其返回的遊標
alter session set plsql_warnings = 'enable:all';
set serveroutput on;

--定義包
create or replace package pkg_cur as
type lax_cursor is ref cursor; --弱類型
type strict_cursor is ref cursor return t_student%rowtype; --強類型
end pkg_cur;
/

show errors;

--定義存儲過程
create or replace procedure prc_cur(
ii_sid in integer,
oc_cur out pkg_cur.lax_cursor
)
is
begin
open oc_cur for
select sid,name,age,gender from t_student where sid <= ii_sid;
exception
when others then
dbms_output.put_line(sqlcode||','||substr(sqlerrm,1,200));
end prc_cur;
/

--調用set serveroutput on;declare vi_sid integer; vc_cur pkg_cur.lax_cursor; vt_table t_student%rowtype;begin v_sid := 2; prc_cur(vi_sid,vc_cur); if (vc_cur%isopen) then dbms_output.put_line('vc_cur is opened.'); loop fetch vc_cur into vt_table; exit when vc_cur%notfound; dbms_output.put_line(vt_table.sid||','||vt_table.name||','||vt_table.age||','||vt_table.gender); end loop; end if;end;/