第十一章：遊標

什麼是遊標？

遊標是SQL的一個內存工作區，由系統或用戶以變量的形式定義。遊標的作用就是用於臨時存儲從數據庫中提取的數據塊。

顯示遊標的處理：

--查詢所有員工的員工號、姓名和職位的信息。
DECLARE
  --定義遊標
  CURSOR emp_cursor IS SELECT empno,ename,job FROM emp;
  v_empno emp.empno%TYPE;
  v_ename emp.ename%TYPE;
  v_job   emp.job%TYPE;
BEGIN
  --打開遊標，執行查詢
  OPEN emp_cursor;
  --提取數據  
  LOOP
       FETCH emp_cursor INTO v_empno,v_ename,v_job;
       DBMS_OUTPUT.PUT_LINE('員工號：'||v_empno||'，姓名：'||v_ename||',職位：'||v_job);
       --什麼時候能夠退出循環？
       --%FOUND,%NOTFOUND
       EXIT WHEN emp_cursor%NOTFOUND;       
  END LOOP;
  --關閉遊標
  CLOSE emp_cursor;
END;

顯示遊標的四個屬性：

• %FOUND：該屬性用於檢測遊標結果集是否存在數據，如果存在數據，返回TRUE。
• %NOTFOUND：該屬性用於檢測遊標結果集是否不存在數據，如果不存在數據，返回TRUE。
• %ISOPEN：該屬性用於檢測遊標是否已經打開，如果已經打開返回TRUE。
• %ROWCOUNT：該屬性用於返回已提取的實際行數。

--查詢所有員工的員工號、姓名和職位的信息。
DECLARE
  --定義遊標
  CURSOR emp_cursor IS SELECT empno,ename,job FROM emp;
  v_empno emp.empno%TYPE;
  v_ename emp.ename%TYPE;
  v_job   emp.job%TYPE;
BEGIN
  --打開遊標，執行查詢
  OPEN emp_cursor;
  --提取數據  
  LOOP
       FETCH emp_cursor INTO v_empno,v_ename,v_job;
       DBMS_OUTPUT.PUT_LINE('員工號：'||v_empno||'，姓名：'||v_ename||',職位：'||v_job);
       --什麼時候能夠退出循環？
       --%FOUND,%NOTFOUND
       --EXIT WHEN emp_cursor%NOTFOUND;
       --EXIT WHEN NOT emp_cursor%FOUND;
       EXIT WHEN emp_cursor%ROWCOUNT=5;
  END LOOP;
  --關閉遊標
  CLOSE emp_cursor;
END;
 
--查詢所有員工的員工號、姓名和職位的信息。
DECLARE
  --定義遊標
  CURSOR emp_cursor IS SELECT empno,ename,job FROM emp;
  v_empno emp.empno%TYPE;
  v_ename emp.ename%TYPE;
  v_job   emp.job%TYPE;
BEGIN
  --打開遊標，執行查詢
  --OPEN emp_cursor;
  --檢測遊標是否打開
  IF emp_cursor%ISOPEN THEN
    DBMS_OUTPUT.PUT_LINE('遊標已經打開');
  ELSE
    DBMS_OUTPUT.PUT_LINE('遊標沒有打開');
  END IF;

END;


--按職工的職稱漲工資，總裁漲1000元，經理漲500元，其他員工漲300元。
DECLARE
  --定義遊標
  CURSOR empnew_cursor IS SELECT empno,job FROM empnew;
  v_empno empnew.empno%TYPE;
  v_job   empnew.job%TYPE;
BEGIN
  --打開遊標
  OPEN empnew_cursor;
  --提取數據
  LOOP
    FETCH empnew_cursor INTO v_empno,v_job;
    IF v_job='PRESIDENT' THEN
      UPDATE empnew SET sal = sal + 1000 WHERE empno = v_empno;
    ELSIF v_job='MANAGER' THEN
      UPDATE empnew SET sal = sal + 500 WHERE empno = v_empno;
    ELSE
      UPDATE empnew SET sal = sal + 300 WHERE empno = v_empno;
    END IF;
    EXIT WHEN empnew_cursor%NOTFOUND;
  END LOOP;
  COMMIT;
  --關閉遊標
  CLOSE empnew_cursor;
END;

SELECT * FROM empnew;

遊標的FOR循環

當使用遊標for循環時，Oracle會隱含地打開遊標，提取數據並關閉遊標。

參數遊標：參數遊標是指帶有參數的遊標。通過使用參數遊標，使用不同參數值可以生成不同的遊標結果集。

--需求：查詢員工的員工號、姓名、職位
--顯示遊標的常規方式
DECLARE
  CURSOR emp_cursor IS SELECT empno,ename,job FROM emp;
  v_empno emp.empno%TYPE;
  v_name  emp.ename%TYPE;
  v_job   emp.job%TYPE;
BEGIN
  OPEN emp_cursor;
  LOOP
    FETCH emp_cursor INTO v_empno,v_name,v_job;
    EXIT WHEN emp_cursor%NOTFOUND;
    DBMS_OUTPUT.PUT_LINE('員工號：'||v_empno ||'姓名：'||v_name||'職位：'||v_job);
  END LOOP;
  CLOSE emp_cursor;
END;

--遊標FOR循環
DECLARE
  CURSOR emp_cursor IS SELECT empno,ename,job FROM emp;
BEGIN
  FOR emp_record IN emp_cursor LOOP
    DBMS_OUTPUT.PUT_LINE('員工號：'||emp_record.empno||',姓名：'||emp_record.ename||',職位：'||emp_record.job);
  END LOOP;
END;
 
--遊標FOR循環中引用子查詢
BEGIN
  FOR emp_record IN (SELECT empno,ename,job FROM emp) LOOP
    DBMS_OUTPUT.PUT_LINE('員工號：'||emp_record.empno||',姓名：'||emp_record.ename||',職位：'||emp_record.job);
  END LOOP;
END;

--參數遊標
DECLARE
  CURSOR emp_cursor(dno NUMBER) IS SELECT empno,ename,job FROM emp WHERE deptno = dno;
BEGIN
  FOR emp_record IN emp_cursor(&no) LOOP
    DBMS_OUTPUT.PUT_LINE('員工號：'||emp_record.empno||',姓名：'||emp_record.ename||',職位：'||emp_record.job);
  END LOOP;
END;

隱式遊標的處理

• 顯示遊標是由用戶自定義的顯示創建的遊標，主要是用於對查詢語句的處理。
• 隱式遊標是由系統隱含創建的遊標，主要用於對非查詢語句，如修改、刪除等操作，則由Oracle系統自動地位這些操作設置遊標並創建其工作區。對於隱式遊標的操作，如定義、打開、取值及關閉操作，都由Oracle系統自動完成，無需用戶進行處理。
• 隱式遊標的名字爲SQL，這是由Oracle系統定義的。

DML操作和單行SELECT語句會使用隱式遊標，它們是：

• 插入操作：insert
• 更新操作：update
• 刪除操作：delete
• 單行查詢操作：select...into

當系統使用一個隱式遊標時，可以通過隱式遊標的屬性來了解操作的狀態和結果，進而控制程序的流程。注意：通過SQL遊標名總是隻能訪問前一個DML操作或單行select操作的遊標屬性。

隱式遊標的屬性：

• SQL%FOUND
• SQL%NOTFOUND
• SQL%ISOPEN
• SQL%ROWCOUNT

--根據用戶輸入的員工號，更新指定員工的工資，比如工資漲100
--隱式遊標
BEGIN
  UPDATE empnew SET sal = sal + 100 WHERE empno = &no;
  IF SQL%FOUND THEN
    DBMS_OUTPUT.put_line('成功修改員工的工資');
    COMMIT;
  ELSE
    DBMS_OUTPUT.put_line('修改員工工資失敗!');
    ROLLBACK;
  END IF;
END;

SELECT * FROM empnew;

使用遊標修改或刪除數據 

爲了對正在處理（查詢）的行不被另外的用戶改動，Oracle提供一個FOR UPDATE子句來對所選擇的行進行鎖定。

如果創建的遊標需要執行更新或刪除的操作，必須帶有FOR UPDATE子句。FOR UPDATE子句會將遊標提取出來的數據進行行級鎖定，這樣在本會話更新期間，其他用戶的會話就不能對當前遊標中的數據行進行更新操作。

--按職工的職稱漲工資，總裁漲1000元，經理漲500元，其他員工漲300元。
--1：用顯示遊標的常規方式實現業務需求
DECLARE
  --定義遊標
  CURSOR empnew_cursor IS SELECT empno,job FROM empnew;
  v_empno empnew.empno%TYPE;
  v_job   empnew.job%TYPE;
BEGIN
  --打開遊標
  OPEN empnew_cursor;
  --提取數據
  LOOP
    FETCH empnew_cursor INTO v_empno,v_job;
    IF v_job='PRESIDENT' THEN
      UPDATE empnew SET sal = sal + 1000 WHERE empno = v_empno;
    ELSIF v_job='MANAGER' THEN
      UPDATE empnew SET sal = sal + 500 WHERE empno = v_empno;
    ELSE
      UPDATE empnew SET sal = sal + 300 WHERE empno = v_empno;
    END IF;
    EXIT WHEN empnew_cursor%NOTFOUND;
  END LOOP;
  COMMIT;
  --關閉遊標
  CLOSE empnew_cursor;
END;

--2：用遊標FOR循環的方式實現業務需求
DECLARE
  --定義遊標
  CURSOR empnew_cursor IS SELECT empno,job FROM empnew; 
BEGIN
  FOR empnew_record IN empnew_cursor LOOP    
      DBMS_OUTPUT.put_line(empnew_record.empno||'----'||empnew_record.job);      
      IF empnew_record.job = 'PRESIDENT' THEN
        UPDATE empnew SET sal = sal + 1000 WHERE empno = empnew_record.empno;
      ELSIF empnew_record.job = 'MANAGER' THEN
        UPDATE empnew SET sal = sal + 500 WHERE empno = empnew_record.empno;
      ELSE
        UPDATE empnew SET sal = sal + 300 WHERE empno = empnew_record.empno;
      END IF;
  END LOOP;
  --COMMIT;
END;

select * from empnew for update;


--3：使用遊標添加或刪除數據時，定義遊標時利用FOR UPDATE 子句可以將遊標提取出來的數據進行行級鎖定
DECLARE
  --定義遊標
  CURSOR empnew_cursor IS SELECT empno,job FROM empnew FOR UPDATE; 
BEGIN
  FOR empnew_record IN empnew_cursor LOOP    
      DBMS_OUTPUT.put_line(empnew_record.empno||'----'||empnew_record.job);      
      IF empnew_record.job = 'PRESIDENT' THEN
        UPDATE empnew SET sal = sal + 1000 WHERE CURRENT OF empnew_cursor;
      ELSIF empnew_record.job = 'MANAGER' THEN
        UPDATE empnew SET sal = sal + 500 WHERE CURRENT OF empnew_cursor;
      ELSE
        UPDATE empnew SET sal = sal + 300 WHERE CURRENT OF empnew_cursor;
      END IF;
  END LOOP;
  COMMIT;
END;

SELECT * FROM empnew;

NOWAIT：用於指定不等待鎖，如果發現所操作的數據行已經鎖定，將不會等待，立即返回。

當遊標子查詢涉及到多張表時，如果在特定表上加行共享鎖，那麼需要使用OF子句。

--FOR UPDATE NOWAIT 不等待鎖，如發現所操作的數據行已經鎖定，將不會等待，立即返回
DECLARE
  --定義遊標
  CURSOR empnew_cursor IS SELECT empno,job FROM empnew FOR UPDATE NOWAIT; 
BEGIN
  FOR empnew_record IN empnew_cursor LOOP    
      DBMS_OUTPUT.put_line(empnew_record.empno||'----'||empnew_record.job);      
      IF empnew_record.job = 'PRESIDENT' THEN
        UPDATE empnew SET sal = sal + 1000 WHERE CURRENT OF empnew_cursor;
      ELSIF empnew_record.job = 'MANAGER' THEN
        UPDATE empnew SET sal = sal + 500 WHERE CURRENT OF empnew_cursor;
      ELSE
        UPDATE empnew SET sal = sal + 300 WHERE CURRENT OF empnew_cursor;
      END IF;
  END LOOP;
  COMMIT;
END;

SELECT * FROM empnew;

--使用OF子句在特定表上加行共享鎖 
DECLARE
       CURSOR empnew_cursor IS
              SELECT d.dname dname,e.ename ename 
              FROM empnew e join dept d on e.deptno = d.deptno
              WHERE e.deptno = &deptno
              FOR UPDATE OF e.deptno;
BEGIN
        FOR empnew_record IN empnew_cursor LOOP
            DBMS_OUTPUT.PUT_LINE('部門名稱：'||empnew_record.dname||'員工名：'||empnew_record.ename);
            DELETE FROM empnew WHERE CURRENT OF empnew_cursor;
        END LOOP;
        COMMIT;
END;
              
SELECT * FROM empnew where deptno = 20;