/*使用游標查詢10部門的員工姓名和工資，並列印*/

set serveroutput ondeclare  --申明一個游標代表員工的姓名和工資  --cursor c1 is select ename,sal from emp;  --定義一個帶引數的游標  cursor c2(dno number) is select ename,sal from emp where deptno= dno;  --定義兩個變數儲存員工姓名和薪水  pename emp.ename% TYPE;  psal   emp.sal% TYPE;begin  --開啟游標  open c2(10);  --迴圈從c1中取值  loop  --注意順序  fetch c2 into pename, psal;  --退出條件  exit when c2%notfound;    dbms_output.put_line(pename ||'的工資是:' || psal );  end loop;    --關閉游標  close c2;end;/

/*使用游標查詢員工姓名和工資，並列印*/

set serveroutput ondeclare  --申明一個游標代表員工的姓名和工資  cursor c1 is select ename,sal from emp;  --定義兩個變數儲存員工姓名和薪水  pename emp.ename% TYPE;  psal   emp.sal% TYPE;begin  --開啟游標  open c1;  --迴圈從c1中取值  loop  --注意順序  fetch c1 into pename, psal;  --退出條件  exit when c1%notfound;    dbms_output.put_line(pename ||'的工資是:' || psal );  end loop;    --關閉游標  close c1;end;/