Oracle顯示遊標的使用及遊標for迴圈

下面給大家介紹在什麼情況下用隱式遊標，什麼情況下用顯示遊標：

1.查詢返回單行記錄時→隱式遊標；
2.查詢返回多行記錄並逐行進行處理時→顯式遊標

--顯示遊標屬性

declare
CURSOR cur_emp IS SELECT * FROM emp;
row_emp cur_emp%ROWTYPE;
BEGIN
OPEN cur_emp;
FETCH cur_emp INTO row_emp;
WHILE cur_emp%FOUND
LOOP
dbms_output.put_line(row_emp.empno||'----'||row_emp.ename);
FETCH cur_emp INTO row_emp;
END LOOP;
close cur_emp;
END;

--使用顯式遊標修改資料(給所有的部門經理加薪1000)

DECLARE
CURSOR emp_cur IS
SELECT empno,ename,sal FROM emp WHERE job='MANAGER' FOR UPDATE;
emp_row emp_cur%ROWTYPE;
BEGIN
OPEN emp_cur;
LOOP
FETCH emp_cur INTO emp_row;
IF emp_cur%NOTFOUND THEN
EXIT;
ELSE
UPDATE emp SET sal=sal+1000 WHERE CURRENT OF emp_cur;
END IF;
END LOOP;
COMMIT;
CLOSE emp_cur;
END;

·注意：

1、如果遊標開啟之前或關閉之後，使用遊標屬性，Oracle會丟擲一個INVALID_CURSOR錯誤（ORA-01001）；
2、如果在第一次fetch後結果集是空的，%found=false，%NotFound=true，%ROWCOUNT=0；
3、如果使用了BULK COLLECT，那麼%ROWCOUNT的值可能不是0或1，實際上他返回的是提取到相關集合的行數。

--遊標for迴圈（給所有的部門經理減薪1000）

DECLARE
CURSOR emp_cur IS
SELECT empno,ename,sal FROM emp WHERE job='MANAGER' FOR UPDATE;
BEGIN
FOR emp_row IN emp_cur
LOOP
UPDATE emp SET sal=sal-1000 WHERE CURRENT OF emp_cur;
END LOOP;
COMMIT;
END;
--我們可以看到遊標FOR迴圈確實很好的簡化了遊標的開發，我們不在需要open、fetch和close語句，不在需要用%FOUND屬性檢測是否到最後一條記錄，這一切Oracle隱式的幫我們完成了。

--給經理加薪5000，其他加薪1000
DECLARE
CURSOR emp_cur IS
SELECT * FROM emp FOR UPDATE;
BEGIN
 FOR emp_row IN emp_cur
 LOOP
 IF emp_row.job='MANAGER' THEN
 UPDATE emp SET sal=sal+5000 WHERE CURRENT OF emp_cur;
 ELSE
 UPDATE emp SET sal=sal+1000 WHERE CURRENT OF emp_cur;
 END IF;
 END LOOP;
 END;

---

oracle遊標cursor簡單使用

總共介紹兩種遊標一種高效使用遊標cursor 、sys_refcursor 、bulk collect

1、cursor遊標使用

/*簡單cursor遊標 
 *students表裡面有name欄位，你可以換做其他表測試 
 */ 
--定義 
declare 
 --定義遊標並且賦值(is 不能和cursor分開使用) 
 cursor stus_cur is select * from students; 
 --定義rowtype 
 cur_stu students%rowtype; 
 /*開始執行*/ 
 begin 
 --開啟遊標 
 open stus_cur; 
  --loop迴圈 
  loop 
  --迴圈條件 
  exit when stus_cur%notfound; 
  --遊標值賦值到rowtype 
  fetch stus_cur into cur_stu; 
  --輸出 
  dbms_output.put_line(cur_stu.name); 
  --結束迴圈 
  end loop; 
 --關閉遊標 
 close stus_cur; 
 /*結束執行*/ 
 end; 

執行結果

SQL> declare 
  --定義遊標並且賦值(is 不能和cursor分開使用) 
  cursor stus_cur is select * from students; 
  --定義rowtype 
  cur_stu students%rowtype; 
  /*開始執行*/ 
  begin 
  --開啟遊標 
  open stus_cur; 
   --loop迴圈 
   loop 
   --迴圈條件 
   exit when stus_cur%notfound; 
   --遊標值賦值到rowtype 
   fetch stus_cur into cur_stu; 
   --輸出 
   dbms_output.put_line(cur_stu.name); 
   --結束迴圈 
   end loop; 
  --關閉遊標 
  close stus_cur; 
  /*結束執行*/ 
 end; 
 / 

楊過 
郭靖 
付政委 
劉自飛 
江風 
任我行 
任盈盈 
令狐沖 
韋一笑 
張無忌 
朵兒 
謝遜 
小龍女 
歐陽鋒 
歐陽鋒 

2、sys_refcursor遊標使用

/* 
 *遊標名：sys_refcursor 
 *特別注意賦值方式：for 
 *與上重複內容不在敘述 
 */ 
declare 
 stu_cur sys_refcursor; 
 stuone students%rowtype; 

 begin 
  --這句賦值方式for 
  open stu_cur for select * from students; 
  --fetch賦值給rowtype 
  fetch stu_cur into stuone; 

  loop 
  dbms_output.put_line(stuone.name||' '||stuone.hobby); 
  fetch stu_cur into stuone; 
  exit when stu_cur%notfound; 
  end loop; 
 end; 

執行結果

SQL> /* 
  *遊標名：sys_refcursor 
  *特別注意賦值方式：for 
  *與上重複內容不在敘述 
  */ 
 declare 
  stu_cur sys_refcursor; 
  stuone students%rowtype; 
  begin 
  --這句賦值方式for 
  open stu_cur for select * from students; 
  --fetch賦值給rowtype 
  fetch stu_cur into stuone; 
  loop 
   dbms_output.put_line(stuone.name||' '||stuone.hobby); 
   fetch stu_cur into stuone; 
   exit when stu_cur%notfound; 
  end loop; 
  end; 
 / 
楊過 保護小龍女 
郭靖 修煉降龍十八掌 
付政委 看小人書 
劉自飛 程式設計寫程式碼 
江風 程式設計寫程式碼 
任我行 修煉神功 
任盈盈 遊山玩水 
令狐沖 行俠仗義 
韋一笑 吸拾人雪 
張無忌 修行 
朵兒 洗浴 
謝遜 畢生研究屠龍刀 
小龍女 修煉玉女心經 
歐陽鋒 看小人書 

補充一種迴圈條件

declare 
 stu_cur sys_refcursor; 
 stuone students%rowtype; 
 begin 
  open stu_cur for select * from students; 
  fetch stu_cur into stuone; 
  --特別注意迴圈條件的改變 
  --這個條件是發現了在迴圈 
  --與上一個notfound不同的 
  while stu_cur%found loop 
  dbms_output.put_line(stuone.name||' '||stuone.hobby); 
  fetch stu_cur into stuone; 
  end loop; 
 end; 

--普通的fetch into

/*普通方式*/ 
declare 
cursor myemp_cur is select * from myemp; 
v_myemp myemp%rowtype; 
begin 
 open myemp_cur; 
 fetch myemp_cur into v_myemp; 
 while myemp_cur%found loop 
 dbms_output.put_line(v_myemp.ename); 
 fetch myemp_cur into v_myemp; 
 end loop; 
end; 

--高效的bulk collect

/*高效bulk collect for*/ 
declare 
cursor myemp_cur 
is select * from myemp; 
type myemp_tab is table of myemp%rowtype; 
myemp_rd myemp_tab; 
begin 
 open myemp_cur; 
 loop 
 fetch myemp_cur bulk collect into myemp_rd limit 20; 
 for i in 1..myemp_rd.count loop 
  dbms_output.put_line('姓名：'||myemp_rd(i).ename); 
 end loop; 
 exit when myemp_cur%notfound; 
 end loop; 
end;