/*
|| カーソルFORループ文
||
|| FOR <ループ索引名> IN <カーソル名> LOOP
|| <処理文>;
|| END LOOP;
*/
SQL> DECLARE
2 CURSOL emp_cur IS SELECT empno, ename FROM emp
3 WHERE deptno = 10;
4 BEGIN
5 FOR emp_rec IN emp_cur LOOP
6 DBMS_OUTPUT.PUT_LINE(emp_rec.empno||’ ‘||emp_rec.ename);
7 END LOOP;
8 END;
9 /
以上です (^^♪