Oracle學習手冊：Oracle游標使用大全二

　　記錄變量
　　
　　定義一個記錄變量使用TYPE命令和%ROWTYPE關於%ROWsTYPE的更多信息請參閱相關資料記錄變量用於從游標中提取數據行當游標選擇很多列的時候那麼使用記錄比為每列聲明一個變量要方便得多當在表上使用%ROWTYPE並將從游標中取出的值放入記錄中時如果要選擇表中所有列那麼在SELECT子句中使用*比將所有列名列出來要安全得多
　　
　　例:
　　
　　SET SERVERIUTPUT ON
　　
　　DECLARE
　　
　　R_emp EMP%ROWTYPE;
　　
　　CURSOR c_emp IS SELECT * FROM emp;
　　
　　BEGIN
　　
　　OPEN c_emp;
　　
　　LOOP
　　
　　FETCH c_emp INTO r_emp;
　　
　　EXIT WHEN c_emp%NOTFOUND;
　　
　　DBMS_OUTPUTPUT_LINE(Salary of Employee||r_empename||is|| r_empsalary);
　　
　　END LOOP;
　　
　　CLOSE c_emp;
　　
　　END;
　　
　　%ROWTYPE也可以用游標名來定義這樣的話就必須要首先聲明游標:
　　
　　SET SERVERIUTPUT ON
　　
　　DECLARE
　　
　　CURSOR c_emp IS SELECT enamesalary FROM emp;
　　
　　R_emp c_emp%ROWTYPE;
　　
　　BEGIN
　　
　　OPEN c_emp;
　　
　　LOOP
　　
　　FETCH c_emp INTO r_emp;
　　
　　EXIT WHEN c_emp%NOTFOUND;
　　
　　DBMS_OUTPUTPUT_LINE(Salary of Employee||r_empename||is|| r_empsalary);
　　
　　END LOOP;
　　
　　CLOSE c_emp;
　　
　　END;
　　
　　帶參數的游標
　　
　　與存儲過程和函數相似可以將參數傳遞給游標並在查詢中使用這對於處理在某種條件下打開游標的情況非常有用它的語法如下:
　　
　　CURSOR cursor_name[(parameter[parameter])] IS select_statement;
　　
　　定義參數的語法如下:
　　
　　Parameter_name [IN] data_type[{:=|DEFAULT} value]
　　
　　與存儲過程不同的是游標只能接受傳遞的值而不能返回值參數只定義數據類型沒有大小
　　
　　另外可以給參數設定一個缺省值當沒有參數值傳遞給游標時就使用缺省值游標中定義的參數只是一個占位符在別處引用該參數不一定可靠
　　
　　在打開游標時給參數賦值語法如下:
　　
　　OPEN cursor_name[value[value]];
　　
　　參數值可以是文字或變量
　　
　　例:
　　
　　DECALRE
　　
　　CURSOR c_dept IS SELECT * FROM dept ORDER BY deptno;
　　
　　CURSOR c_emp (p_dept VARACHAR) IS
　　
　　SELECT enamesalary
　　
　　FROM emp
　　
　　WHERE deptno=p_dept
　　
　　ORDER BY ename
　　
　　r_dept DEPT%ROWTYPE;
　　
　　v_ename EMPENAME%TYPE;
　　
　　v_salary EMPSALARY%TYPE;
　　
　　v_tot_salary EMPSALARY%TYPE;
　　
　　BEGIN
　　
　　OPEN c_dept;
　　
　　LOOP
　　
　　FETCH c_dept INTO r_dept;
　　
　　EXIT WHEN c_dept%NOTFOUND;
　　
　　DBMS_OUTPUTPUT_LINE(Department:|| r_deptdeptno||||r_deptdname);
　　
　　v_tot_salary:=;
　　
　　OPEN c_emp(r_deptdeptno);
　　
　　LOOP
　　
　　FETCH c_emp INTO v_enamev_salary;
　　
　　EXIT WHEN c_emp%NOTFOUND;
　　
　　DBMS_OUTPUTPUT_LINE(Name:|| v_ename|| salary:||v_salary);
　　
　　v_tot_salary:=v_tot_salary+v_salary;
　　
　　END LOOP;
　　
　　CLOSE c_emp;
　　
　　DBMS_OUTPUTPUT_LINE(Toltal Salary for dept:|| v_tot_salary);
　　
　　END LOOP;
　　
　　CLOSE c_dept;
　　
　　END;
　　
　　游標FOR循環
　　
　　在大多數時候我們在設計程序的時候都遵循下面的步驟:
　　
　　打開游標
　　
　　開始循環
　　
　　從游標中取值
　　
　　檢查那一行被返回
　　
　　處理
　　
　　關閉循環
　　
　　關閉游標
　　
　　可以簡單的把這一類代碼稱為游標用於循環但還有一種循環與這種類型不相同這就是FOR循環用於FOR循環的游標按照正常的聲明方式聲明它的優點在於不需要顯式的打開關閉取數據測試數據的存在定義存放數據的變量等等游標FOR循環的語法如下:
　　
　　FOR record_name IN
　　
　　(corsor_name[(parameter[parameter])]
　　
　　| (query_difinition)
　　
　　LOOP
　　
　　statements
　　
　　END LOOP;
　　
　　下面我們用for循環重寫上面的例子:
　　
　　DECALRE
　　
　　CURSOR c_dept IS SELECT deptnodname FROM dept ORDER BY deptno;
　　
　　CURSOR c_emp (p_dept VARACHAR) IS
　　
　　SELECT enamesalary
　　
　　FROM emp
　　
　　WHERE deptno=p_dept
　　
　　ORDER BY ename
　　
　　v_tot_salary EMPSALARY%TYPE;
　　
　　BEGIN
　　
　　FOR r_dept IN c_dept LOOP
　　
　　DBMS_OUTPUTPUT_LINE(Department:|| r_deptdeptno||||r_deptdname);
　　
　　v_tot_salary:=;
　　
　　FOR r_emp IN c_emp(r_deptdeptno) LOOP
　　
　　DBMS_OUTPUTPUT_LINE(Name: || v_ename || salary: || v_salary);
　　
　　v_tot_salary:=v_tot_salary+v_salary;
　　
　　END LOOP;
　　
　　DBMS_OUTPUTPUT_LINE(Toltal Salary for dept:|| v_tot_salary);
　　
　　END LOOP;
　　
　　END;
　　
　　在游標FOR循環中使用查詢
　　
　　在游標FOR循環中可以定義查詢由於沒有顯式聲明所以游標沒有名字記錄名通過游標查詢來定義
　　
　　DECALRE
　　
　　v_tot_salary EMPSALARY%TYPE;
　　
　　BEGIN
　　
　　FOR r_dept IN (SELECT deptnodname FROM dept ORDER BY deptno) LOOP
　　
　　DBMS_OUTPUTPUT_LINE(Department:|| r_deptdeptno||||r_deptdname);
　　
　　v_tot_salary:=;
　　
　　FOR r_emp IN (SELECT enamesalary
　　
　　FROM emp
　　
　　WHERE deptno=p_dept
　　
　　ORDER BY ename) LOOP
　　
　　DBMS_OUTPUTPUT_LINE(Name:|| v_ename|| salary:||v_salary);
　　
　　v_tot_salary:=v_tot_salary+v_salary;
　　
　　END LOOP;
　　
　　DBMS_OUTPUTPUT_LINE(Toltal Salary for dept:|| v_tot_salary);
　　
　　END LOOP;
　　
　　END;
　　
　　游標中的子查詢
　　
　　語法如下:
　　
　　CURSOR C IS SELECT * FROM emp
　　
　　WHERE deptno NOT IN (SELECT deptno
　　
　　FROM dept
　　
　　WHERE dname!=ACCOUNTING);
　　
　　可以看出與SQL中的子查詢沒有什麼區別
　　
　　游標中的更新和刪除
　　
　　在PL/SQL中依然可以使用UPDATE和DELETE語句更新或刪除數據行顯式游標只有在需要獲得多行數據的情況下使用PL/SQL提供了僅僅使用游標就可以執行刪除或更新記錄的方法
　　
　　UPDATE或DELETE語句中的WHERE CURRENT OF子串專門處理要執行UPDATE或DELETE操作的表中取出的最近的數據要使用這個方法在聲明游標時必須使用FOR UPDATE子串當對話使用FOR UPDATE子串打開一個游標時所有返回集中的數據行都將處於行級(ROWLEVEL)獨占式鎖定其他對象只能查詢這些數據行不能進行UPDATEDELETE或SELECTFOR UPDATE操作
　　
　　語法:
　　
　　FOR UPDATE [OF [schema]lumn[[schema]lumn]
　　
　　[nowait]
　　
　　在多表查詢中使用OF子句來鎖定特定的表如果忽略了OF子句那麼所有表中選擇的數據行都將被鎖定如果這些數據行已經被其他會話鎖定那麼正常情況下ORACLE將等待直到數據行解鎖
　　
　　在UPDATE和DELETE中使用WHERE CURRENT OF子串的語法如下:
　　
　　WHERE{CURRENT OF cursor_name|search_condition}
　　
　　例:
　　
　　DELCARE
　　
　　CURSOR c IS SELECT empnosalary
　　
　　FROM emp
　　
　　WHERE comm IS NULL
　　
　　FOR UPDATE OF comm;
　　
　　v_comm NUMBER();
　　
　　BEGIN
　　
　　FOR r IN c LOOP
　　
　　IF rsalary< THEN
　　
　　v_comm:=rsalary*;
　　
　　ELSEIF rsalary< THEN
　　
　　v_comm:=rsalary*;
　　
　　ELSEIF rsalary< THEN
　　
　　v_comm:=rsalary*;
　　
　　ELSE
　　
　　v_comm:=rsalary*;
　　
　　END IF;
　　
　　UPDATE emp;
　　
　　SET comm=v_comm
　　
　　WHERE CURRENT OF cl;
　　
　　END LOOP;
　　
　　END
From:http://tw.wingwit.com/Article/program/Oracle/201311/18863.html