Error encountered during execution of procedure....

Question

Hi,
Im new to Oracle..just started with working with Oracle 10g in my company.Im trying to execute a procedure in SQL Developer 1.5.1 but getting this error as shown below.It would be great if anyone could help me out in it.
Error starting at line 3 in command:
EXECUTE EMP_PROC;
Error report:
ORA-06550: line 1, column 7:
PLS-00905: object SYSTEM.EMP_PROC is invalid
ORA-06550: line 1, column 7:
PL/SQL: Statement ignored
06550. 00000 - "line %s, column %s:\n%s"
*Cause:    Usually a PL/SQL compilation error.
*Action:
EMP_PROC is the Procedure im trying to execute.
**I have 2 tables namely Emp_INFO(emp_name,emp_id,dept_id,salary) and DEPT_INFO(dept_name,dept_id)...Im trying to display names of employess based on the range of salaries(low,mid,high)..
The code for this procedure is given below which also contains 3 functions...
/*Procedure EMP_PROC*/
CREATE OR REPLACE PROCEDURE EMP_PROC (sal_low IN NUMBER,
sal_mid IN NUMBER,
sal_high IN NUMBER) AS
/*Declaring variables to be used inside the Procedure*/
sal_low NUMBER(10,2) := 80000;
sal_mid NUMBER(10,2) := 300000;
sal_high NUMBER(10,2) := 500000;
s_low VARCHAR2(25);
s_mid VARCHAR2(25);
s_high VARCHAR2(25);
sal_range VARCHAR2(20);
/*Declaring User Defined Exception*/
usr_excp EXCEPTION;
/*Cursor for retrieving Low Salary Employees */
CURSOR cursor_lowSal IS
SELECT Emp_Name ,Emp_ID ,Dept_ID ,Dept_Name
FROM EMP_INFO,DEPT_INFO
WHERE Salary <= 80000;
/*Cursor for retrieving Mid Salary Employees */
CURSOR cursor_midSal IS
SELECT Emp_Name ,Emp_ID ,Dept_ID ,Dept_Name
FROM EMP_INFO,DEPT_INFO
WHERE Salary > 80000 OR Salary < 500000;
/*Cursor for retrieving High Salary Employees */
CURSOR cursor_highSal IS
SELECT Emp_Name ,Emp_ID ,Dept_ID ,Dept_Name
FROM EMP_INFO,DEPT_INFO
WHERE Salary > 500000;
/*Declaring variables that will hold values*/
e_name EMP_INFO.Emp_Name%TYPE;
e_id EMP_INFO.Emp_ID%TYPE;
d_name DEPT_INFO.Dept_Name%TYPE;
d_id EMP_INFO.Dept_ID%TYPE;
BEGIN
/*Enter the Salary range*/
sal_range := &sal_range;
/*Checking for Salary Range*/
IF sal_range == sal_low THEN
OPEN cursor_lowSal;
FETCH cursor_lowSal INTO e_name ,e_id ,d_name ,d_id;
/*Calling Function Low_Sal*/
s_low := funcLow_sal();
/*Displaying Output*/
dbms_output.put_line(s_low||'::'||e_name||','||e_id||','||d_name||','||d_id);
ELSIF sal_range == mid_sal THEN
OPEN cursor_midSal;
FETCH cursor_lowSal INTO e_name ,e_id ,d_name ,d_id;
/*Calling Function Mid_Sal*/
s_mid := funcMid_sal();
/*Displaying Output*/
dbms_output.put_line(s_mid||'::'||e_name||','||e_id||','||d_name||','||d_id);
ELSIF sal_range == sal_high THEN
OPEN cursor_highSal;
FETCH cursor_lowSal INTO e_name ,e_id ,d_name ,d_id;
/*Calling Function High_Sal*/
s_high := funcHigh_sal();
/*Displaying Output*/
dbms_output.put_line(s_high||'::'||e_name||','||e_id||','||d_name||','||d_id);
ELSE
/*Calling user defined Exception*/
RAISE usr_excp;
END IF;
/*Handling Exceptions*/
EXCEPTION
WHEN usr_excp THEN
dbms_output.put_line('Not in range,please try again!!');
WHEN OTHERS THEN
dbms_output.put_line('Exception');
/*Closing the cursor_lowSal*/
CLOSE cursor_lowSal;
/*Closing the cursor_midSal*/
CLOSE cursor_midSal;
/*Closing the cursor_highSal*/
CLOSE cursor_highSal;
END;
/*Function funcLow_sal*/
CREATE OR REPLACE FUNCTION funcLow_sal RETURN VARCHAR2 AS
BEGIN
return 'Employees with salary less than 80000'
END;
/*Function funcMid_sal*/
CREATE OR REPLACE FUNCTION funcMid_sal RETURN VARCHAR2 AS
BEGIN
return 'Employees with salary within 80000 and 500000'
END;
/*Function funcHigh_sal*/
CREATE OR REPLACE FUNCTION funcHigh_sal RETURN VARCHAR2 AS
BEGIN
return 'Employees with salary more than 500000'
END;
/*Executing the Procedure*/
SET SERVEROUTPUT ON
EXECUTE EMP_PROC;
Cheers...(')
Edited by: user10553245 on Nov 7, 2008 3:49 AM

Answer 1

The current version of code is given below.The 2 compliation errors i mentioned above are coming in the very First line of the procedure..the whole is highlited in red..
::Error(1): PL/SQL: Compilation unit analysis terminated
::Error(2,1): PLS-00410: duplicate fields in RECORD,TABLE or argument list are not permitted
create or replace PROCEDURE EMP_PROC (sal_low IN NUMBER , sal_mid  IN NUMBER , sal_high IN NUMBER) AS
/*Declaring variables to be used inside the Procedure*/
sal_low NUMBER(10,2) := 80000;
sal_mid NUMBER(10,2) := 300000;
sal_high NUMBER(10,2) := 500000;
s_low VARCHAR2(25);
s_mid VARCHAR2(25);
s_high VARCHAR2(25);
sal_range VARCHAR2(20);
/*Declaring User Defined Exception*/
usr_excp EXCEPTION;
/*Cursor for retrieving Low Salary Employees */
CURSOR cursor_lowSal IS
SELECT Emp_Name ,Emp_ID ,Dept_ID ,Dept_Name
FROM EMP_INFO,DEPT_INFO
WHERE Salary <= 80000;
/*Cursor for retrieving Mid Salary Employees */
CURSOR cursor_midSal IS
SELECT Emp_Name ,Emp_ID ,Dept_ID ,Dept_Name
FROM EMP_INFO,DEPT_INFO
WHERE Salary > 80000 OR Salary < 500000;
/*Cursor for retrieving High Salary Employees */
CURSOR cursor_highSal IS
SELECT Emp_Name ,Emp_ID ,Dept_ID ,Dept_Name
FROM EMP_INFO,DEPT_INFO
WHERE Salary > 500000;
/*Declaring variables that will hold values*/
e_name EMP_INFO.Emp_Name%TYPE;
e_id EMP_INFO.Emp_ID%TYPE;
d_name DEPT_INFO.Dept_Name%TYPE;
d_id EMP_INFO.Dept_ID%TYPE;
BEGIN
/*Enter the Salary range*/
sal_range := '&sal_range';
/*Checking for Salary Range*/
IF sal_range = sal_low THEN
OPEN cursor_lowSal;
FETCH cursor_lowSal INTO e_name ,e_id ,d_name ,d_id;
/*Calling Function Low_Sal*/
s_low := funcLow_sal();
/*Displaying Output*/
dbms_output.put_line(s_low||'::'||e_name||','||e_id||','||d_name||','||d_id);
ELSIF sal_range = mid_sal THEN
OPEN cursor_midSal;
FETCH cursor_lowSal INTO e_name ,e_id ,d_name ,d_id;
/*Calling Function Mid_Sal*/
s_mid := funcMid_sal();
dbms_output.put_line(s_mid||'::'||e_name||','||e_id||','||d_name||','||d_id);
ELSIF sal_range = sal_high THEN
OPEN cursor_highSal;
FETCH cursor_lowSal INTO e_name ,e_id ,d_name ,d_id;
/*Calling Function High_Sal*/
s_high := funcHigh_sal();
dbms_output.put_line(s_high||'::'||e_name||','||e_id||','||d_name||','||d_id);
ELSE
/*Calling user defined Exception*/
RAISE usr_excp;
END IF;
EXCEPTION
WHEN usr_excp THEN
dbms_output.put_line('Not in range,please try again!!');
/*Closing the cursor_lowSal*/
CLOSE cursor_lowSal;
/*Closing the cursor_midSal*/
CLOSE cursor_midSal;
/*Closing the cursor_highSal*/
CLOSE cursor_highSal;
END EMP_PROC;
The 3 functions are just being used to display messages...
/*Function funcLow_sal*/
CREATE OR REPLACE FUNCTION funcLow_sal RETURN VARCHAR2 AS
BEGIN
return 'Employees with salary less than 80000'
END;
/*Function funcMid_sal*/
CREATE OR REPLACE FUNCTION funcMid_sal RETURN VARCHAR2 AS
BEGIN
return 'Employees with salary within 80000 and 500000'
END;
/*Function funcHigh_sal*/
CREATE OR REPLACE FUNCTION funcHigh_sal RETURN VARCHAR2 AS
BEGIN
return 'Employees with salary more than 500000'
END;
/