--查詢並打印員工的姓名和薪水 --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; /