set serveroutput on; declare --类型定义 cursor cc is select empno,ename,job,sal from emp; --定义一个游标变量 ccrec cc%rowtype; begin --for循环 for ccrec in cc loop dbms_output.put_line(ccrec.empno||'-'||ccrec.ename||'-'||ccrec.job||'-'||ccrec.sal); end loop; end; anonymous block completed 7369-SMITH-CLERK-800 7499-ALLEN-SALESMAN-1600 7521-WARD-SALESMAN-1250 7566-JONES-MANAGER-2975 7654-MARTIN-SALESMAN-1250 7698-BLAKE-MANAGER-2850 7782-CLARK-MANAGER-2450 7788-SCOTT-ANALYST-3000 7839-KING-PRESIDENT-5000 7844-TURNER-SALESMAN-1500 7876-ADAMS-CLERK-1100 7900-JAMES-CLERK-950 7902-FORD-ANALYST-3000 7934-MILLER-CLERK-1300