游标的循环示例

游标的检索循环

DECLARE
   v_empno  emp.empno%TYPE;
   v_sal      emp.sal%TYPE;
   CURSOR c_cursor IS SELECT empno, sal FROM emp; 
BEGIN
   OPEN c_cursor;
   LOOP
      FETCH c_cursor INTO v_empno, v_sal;
      EXIT WHEN c_cursor %NOTFOUND; 
      IF v_sal<=1200 THEN
            UPDATE emp SET sal=sal+50 WHERE empno=v_empno;
            DBMS_OUTPUT.PUT_LINE('编码为'||v_empno||'工资已更新!');
			 END IF;
			 DBMS_OUTPUT.PUT_LINE('记录数:'|| c_cursor %ROWCOUNT);
   END LOOP;
   CLOSE c_cursor;
END; 
------------------------------------------------------------
游标的for循环

DECLARE
   	CURSOR c_sal IS SELECT empno, ename, sal FROM emp ;
BEGIN
--隐含打开游标
   FOR x IN c_sal LOOP
   --隐含执行一个FETCH语句
   DBMS_OUTPUT.PUT_LINE( to_char(x.empno)||'---'||x.ename||'---'||to_char(x.sal)) ;
   --隐含监测c_sal%NOTFOUND
   END LOOP;
--隐含关闭游标
END;