CREATE OR REPLACE PROCEDURE as1(annual_sal dept.salary%TYPE, bonus dept.salary%TYPE);

 BEGIN annual_sal := salary *12;

 CASE WHEN annual_sal>=20000 THEN bonus := salary+2000;

 WHEN annual_sal >=10000
AND <=19999 THEN bonus :=salary+1000;

 WHEN annual_sal <= 9999 THEN bonus :=salary+500;

 ELSE EXCEPTION WHEN CASE_NOT_FOUND THEN DBMS_OUTPUT.PUT_LINE('No increment');

 END CASE;

 END;

declare
annual_sal number;
bonus number;
v_sal number;
begin
select salary into v_sal from dept;
annual_sal := v_sal *12;

  case when
    annual_sal>=20000 then bonus := v_sal+2000;
       when annual_sal >=10000 and <=19999  then  bonus :=v_sal+1000;
        when annual_sal <= 9999 then bonus :=v_sal+500;
        else
        dbms_output.put_line('no incmrent');
         end case;
   else
end;

declare
v_sal number;
annual_sal number;
bonus number;
begin
SELECT SALARY INTO v_sal from dept ;
annual_sal :=v_sal*12;
  case when
    annual_sal>=20000 then bonus := v_sal+2000;
       when annual_sal >=10000 and <=19999  then  bonus :=v_sal+1000;
        when annual_sal <= 9999 then bonus :=v_sal+500;
        else
        dbms_output.put_line('no incmrent');
         end case;
   else
end;

bonus := case when annual_sal >= 20000 then v_sal + 2000
              when ...
              else ...
         end;

create or replace procedure p1(emp_id in varchar2)is
v_sal number;
annual_sal number;
bonus number;
begin
SELECT SALARY INTO v_sal from dept where empid=emp_id;
annual_sal :=v_sal*12;
  case when
    annual_sal>=20000 then bonus := v_sal+2000;
       when annual_sal >=10000 and annual_sal<=19999  then  bonus :=v_sal+1000;
        when annual_sal <= 9999 then bonus :=v_sal+500;
        dbms_output.put_line(bonus);
        else
        dbms_output.put_line('no incmrent');
         end case;
   
end;
/

create or replace procedure p1(emp_id in varchar2)is
v_sal number;
annual_sal number;
bonus number;
begin
SELECT SALARY INTO v_sal from dept where empid=emp_id;
annual_sal :=v_sal*12;
update dept   
set
  case when
    annual_sal>=20000 then bonus := v_sal+2000;
       when annual_sal >=10000 and annual_sal<=19999  then  bonus :=v_sal+1000;
        when annual_sal <= 9999 then bonus :=v_sal+500;
        dbms_output.put_line(bonus);
        else
        dbms_output.put_line('no incmrent');
         end case;
   
end;
/

SCOTT@orcl> select empno, ename, sal, sal*12 annual_sal from emp order by sal desc
  2  /

     EMPNO ENAME             SAL ANNUAL_SAL
---------- ---------- ---------- ----------
      7839 KING             5000      60000
      7902 FORD             3000      36000
      7788 SCOTT            3000      36000
      7566 JONES            2975      35700
      7698 BLAKE            2850      34200
      7782 CLARK            2450      29400
      7499 ALLEN            1600      19200
      7844 TURNER           1500      18000
      7934 MILLER           1300      15600
      7521 WARD             1250      15000
      7654 MARTIN           1250      15000
      7876 ADAMS            1100      13200
      7900 JAMES             950      11400
      7369 SMITH             800       9600

14 rows selected.

SCOTT@orcl> update emp
  2  set    sal =
  3  	    case when ... then ...
  4  		 when ... then ...
  5  		 when ... then ...
  6  		 else ...
  7  	    end
  8  /

14 rows updated.

SCOTT@orcl> select empno, ename, sal from emp order by sal desc
  2  /

     EMPNO ENAME             SAL
---------- ---------- ----------
      7839 KING             7000
      7902 FORD             5000
      7788 SCOTT            5000
      7566 JONES            4975
      7698 BLAKE            4850
      7782 CLARK            4450
      7499 ALLEN            2600
      7844 TURNER           2500
      7934 MILLER           2300
      7521 WARD             2250
      7654 MARTIN           2250
      7876 ADAMS            2100
      7900 JAMES            1950
      7369 SMITH            1300

14 rows selected.