PROGRAM TO INCREASE THE SALARY OF EMPLOYEES IN ORACLE?
SQL> DECLARE
2
CURSOR SAL_DATA IS
3
SELECT EMPNO, JOB FROM EMP;
4
ECODE EMP.EMPNO%TYPE;
5
POST EMP.JOB%TYPE;
6
BEGIN
7
OPEN SAL_DATA;
8
LOOP
9
FETCH SAL_DATA INTO ECODE, POST;
10
EXIT WHEN SAL_DATA%NOTFOUND;
11
IF POST='MANAGER' THEN
12
UPDATE EMP SET SAL=SAL*1.10 WHERE
EMPNO=ECODE;
13
ELSIF POST='CLERK' THEN
14
UPDATE EMP SET SAL =SAL*1.08 WHERE
EMPNO=ECODE;
15
ELSIF POST='ANALYST' THEN
16
UPDATE EMP SET SAL=SAL*1.09 WHERE
EMPNO=ECODE;
17
ELSIF POST='PRESIDENT' THEN
18
UPDATE EMP SET SAL=SAL*1.50 WHERE
EMPNO=ECODE;
19
END IF;
20
END LOOP;
21
CLOSE SAL_DATA;
22
END;
23
/
PL/SQL
procedure successfully completed.
SQL> START INCREASESAL.SQL;
PL/SQL
procedure successfully completed.
SQL>
SELECT SAL FROM EMP;
SAL
---------
1269.5
2042.05
1595.36
5270.4
1595.36
5048.96
4340.34
3564.3
11250
1914.42
1745.55
1507.54
3564.3
2062.94
14
rows selected.
Comments
Post a Comment