foundattribute.sql

Oracle 9i中文版基础培训教程

set  serveroutput  on
declare
  tempsal scott.emp.sal%type;
  cursor mycursor is
     select * from scott.emp
     where sal>tempsal;
  cursorrecord mycursor%rowtype;
begin
   tempsal:=800;
   open mycursor;
      fetch mycursor into cursorrecord;
      if mycursor%found then
         dbms_output.put_line(to_char(cursorrecord.deptno));
      else
         dbms_output.put_line('没有数据！');
      end if;  
end;