set echo on

create or replace procedure raise_salary (DNUM in number, PERCENT in number) as
cursor EMP_CUR is
  select EMPNO, SAL from EMP
  where DEPTNO = DNUM
  for update of SAL;
ENUM number(4);
ESAL number;
begin
  open EMP_CUR;
  loop
        fetch EMP_CUR into ENUM, ESAL;
        exit when EMP_CUR%NOTFOUND;
        update EMP set sal = (ESAL * (1+(PERCENT / 100)))
        where current of EMP_CUR;
  end loop;
  close EMP_CUR;
  commit;
end raise_salary;
/