oracle_看韓老師視頻學遊標

/**遊標**/
--給某部門所有工資低於2k的員工們加500快
create or replace procedure pro5(v_in_deptno number) is
--定義遊標類型
type cl_emp_cursor is ref cursor;
--定義遊標變量
v_emp_cursor cl_emp_cursor;
--第一兩接受數據類型
v_ename emp.ename%type;
v_sal emp.sal%type;
begin
--開始執行
open v_emp_cursor for select ename,sal from emp;
--循環取出數據
loop
--把遊標裏的值賦給變量
fetch v_emp_cursor into v_ename,v_sal;
--判斷遊標結束
exit when v_emp_cursor%notfound;
--輸出
--dbms_output.put_line(v_ename);
--判斷v_sal<2k,則update
if
v_sal<2000 then
update emp set sal=v_sal+500 where ename=v_ename;
end if;
end loop;
end;
/
set serveroutput on;
select * from emp order by deptno;
exec pro5(10);