declaer cursor s1 is selcet * from emp;
v_res emp%rowtype;
begin
open s1;
fetch s1 into v_res;
loop
exit when s1%notfound;
if
v_res.job='PRESIDENT' then
update emp set sal=sal*0.05+sal where v_res.ename=emp.ename;
else if
v_res.job='ANALYST' then
update emp set sal=sal*0.04+sal where v_res.ename=emp.ename;
else if
v_res.job='MANAGER' then
update emp set sal=sal*0.03+sal where v_res.ename=emp.ename;
else if
v_res.job='SALESMAN' then
update emp set sal=sal*0.02 where v_res.ename=emp.ename;
else
update emp set sal=sal*0.01 where v_res.ename=emp.ename;
end if;
end is;
end if;
end if;
fetch s1 into v_res;
end loop;
close s1;
end;
v_res emp%rowtype;
begin
open s1;
fetch s1 into v_res;
loop
exit when s1%notfound;
if
v_res.job='PRESIDENT' then
update emp set sal=sal*0.05+sal where v_res.ename=emp.ename;
else if
v_res.job='ANALYST' then
update emp set sal=sal*0.04+sal where v_res.ename=emp.ename;
else if
v_res.job='MANAGER' then
update emp set sal=sal*0.03+sal where v_res.ename=emp.ename;
else if
v_res.job='SALESMAN' then
update emp set sal=sal*0.02 where v_res.ename=emp.ename;
else
update emp set sal=sal*0.01 where v_res.ename=emp.ename;
end if;
end is;
end if;
end if;
fetch s1 into v_res;
end loop;
close s1;
end;