存储过程，更新满足条件的数据

将aaa表中日期为'2010-04-02'的数据的fd_empname更新成与为'2010-04-02'的fd_empname的一样

create or replace procedure updatebydate
is
cursor nw
is select * from aaa where fd_date='2010-04-01';
nw_rec nw%rowtype;
begin

open nw;

loop
fetch nw into nw_rec;
update aaa set fd_empname=nw_rec.fd_empname
where fd_date='2010-04-02' ;

EXIT WHEN nw%NOTFOUND;
end loop;
close nw;
end;