Code not getting executed:

Question

The requirement if comm+salary is >=3000 then all the details laong with emp info have to be inserted into emp table and comm+sal between 10000 and 20000 the same have to be inserted into emp table. PLZ CHECKOUT AND SPECIFIY THE RIGHT CODE TO DO IT.
create or replace procedure pps is
ccsal number;
cursor comm is
select salary+nvl(commission_pct,0)from employees;
begin
open comm;
loop
exit when comm%notfound;
fetch comm into ccsal;
if ccsal>=3000 then
ccsal:=ccsal*10/100;
insert into emp(employee_id,last_name,salary,commission_pct,totsal) values(employees.employee_id,employees.last_name,employees.salary,employees.commission_pct,ccsal)
elsif ccsal between 10000 and 2000 then
ccsal:=ccsal*5/100;
insert into empinsert into emp(employee_id,last_name,salary,commission_pct,totsal) values(employees.employee_id,employees.last_name,employees.salary,employees.commission_pct,ccsal)
end if;
end loop;
close comm;
end;
Edited by: 987184 on May 3, 2013 9:25 PM

Answer 1

You try this and let me know if it helped you .. I have made some changes ..
CREATE OR REPLACE PROCEDURE pps
IS
-- ccsal NUMBER;
-- empid employees.employee_id%TYPE;
-- lname employees.last_name%TYPE;
-- sal employees.salary%TYPE;
-- cpt employees.commission_pct%TYPE;
BEGIN
FOR i IN (SELECT employee_id, last_name, salary, commission_pct,
salary + NVL (commission_pct, 0) ccsal
FROM employees)
LOOP
IF i.ccsal >= 3000
THEN
i.ccsal := i.ccsal * 10 / 100;
INSERT INTO emp
(employee_id, last_name, salary,
commission_pct, totsal
VALUES (i.employee_id, i.last_name, i.salary,
i.commission_pct, i.ccsal
ELSIF i.ccsal BETWEEN 10000 AND 20000
THEN
i.ccsal := i.ccsal * 5 / 100;
INSERT INTO emp
(employee_id, last_name, salary,
commission_pct, totsal
VALUES (i.employee_id, i.last_name, i.salary,
i.commission_pct, i.ccsal
END IF;
END LOOP;
END;
Regards..