--查詢並打印員工的姓名和薪水
--set serveroutput on
/*
1、光標的屬性
%found:如果取到了記錄就是true否則是false;
%notfound:
*/
declare
--定義一個光標
cursor cemp is select ename,sal from emp;
--為光標定義對應的變量
pename emp.ename%type;
psal emp.sal%type;
begin
--打開光標
open cemp;
loop
--取一條記錄 into後面的順序和定義光標後面的ename,sal順序一致
fetch cemp into pename,psal;
--思考:1、循環什麼時候退出?2、fetch不一定能取到記錄
--exit when 沒有取記錄
exit when cemp%notfound;
--打印取到的記錄
dbms_output.put_line(pename||'的薪水是'||psal);
end loop;
--關閉光標
close cemp;
end;
/