declare
--加行共享锁
cursor emp_cursor is
SELECT employee_id, last_name FROM employees for update of salary nowait;
--定义基于游标的记录变量
emp_record emp_cursor%rowtype;
begin
--打开游标
open emp_cursor;
loop
fetch emp_cursor
into emp_record;
exit when emp_cursor%notfound;
if emp_record.employee_id = 100 then
dbms_output.put_line(emp_record.last_name);
update employees c
set c.last_name = 'abc'
where current of emp_cursor;
dbms_output.put_line(emp_record.last_name);
end if;
end loop;
close emp_cursor;
commit;
dbms_output.put_line(emp_record.last_name);
end;