declare
cursor emp17_cursor is
select email, domain, empno
from emp17;
emp17_record emp17_cursor%rowtype;
v_domain varchar2(5);
begin
open emp17_cursor;
loop
fetch emp17_cursor into emp17_record;
exit when emp17_cursor%notfound;
if rtrim(substr(emp17_record.email, instr(emp17_record.email, '@')+1), '.com') = 'naver' then
v_domain := 'naver';
else
v_domain := 'gmail';
end if;
update emp17
set domain = v_domain
where email = emp17_record.email;
end loop;
close emp17_cursor;
end;
/
결과 확인