PLSQL中隐式打开cursor的小例子

开始

DECLARE
  CURSOR emp_cursor IS
    SELECT empno,ename,deptno FROM emp;

BEGIN
  FOR emp_record IN emp_cursor LOOP

    IF emp_record.deptno=30 THEN
    dbms_output.put_line(emp_record.empno ||'...'||emp_record.ename);
    END IF;
  END LOOP;

END;

在这里，对cursor的打开、fetch、关闭等都是隐藏的。

运行结果：

anonymous block completed
7499...ALLEN
7521...WARD
7654...MARTIN
7698...BLAKE
7844...TURNER
7900...JAMES

它还有一个变化的写法：

BEGIN
  FOR emp_record IN (SELECT empno,ename,deptno FROM emp) LOOP

    IF emp_record.deptno=30 THEN
    dbms_output.put_line(emp_record.empno ||'...'||emp_record.ename);
    END IF;
  END LOOP;

END;

结束