Monday, February 23, 2009

(4) Program To find salary of an employee from using employee nos.

SQL> Declare
2 ex1 exception;
3 en number;
4 ena varchar2(30);
5 esal number(7,2);
6 Begin
7 en:=&en;
8 select ename,sal into ena,esal from emp where empno=en;
9 if esal<1500>'||esal);
13 Exception
14 when ex1 then
15 update emp
16 set sal=sal+(sal*0.10)where empno=en;
17 dbms_output.put_line('Salary is updated');
18 End;
19 /

Output :
Enter value for en: 7900
old 7: en:=&en;
new 7: en:=7900;

PL/SQL procedure successfully completed.