CREATE OR REPLACE PACKAGE salary
AS
 PROCEDURE new_emp (namein VARCHAR2, statein CHAR,
                    deptin NUMBER);
END salary;
/

CREATE OR REPLACE PACKAGE BODY salary
AS
FUNCTION avg_emp1
RETURN NUMBER
AS
 avg_sal   NUMBER DEFAULT 0;
 min_sal   NUMBER DEFAULT 0;
 sum_sal   NUMBER DEFAULT 0;
 num_sal   NUMBER DEFAULT 0;
BEGIN
 SELECT SUM(e.salary) INTO sum_sal FROM Emp2 e;
 SELECT MIN(e.salary) INTO min_sal FROM Emp2 e;
 SELECT COUNT(e.salary) INTO num_sal FROM Emp2 e;
 avg_sal := (sum_sal - min_sal) / (num_sal - 1);
 RETURN (avg_sal);
END avg_emp1;

PROCEDURE new_emp
 (namein VARCHAR2, statein CHAR, deptin NUMBER);
AS
 new_salary   NUMBER DEFAULT 0;
BEGIN
 new_salary := avg_emp1 - (avg_emp1 * 0.15);
 INSERT INTO Emp2 VALUES(namein, statein, new_salary, deptin);
END new_emp;

END salary;
/

 sqlplus

SQL*Plus: Release 10.2.0.2.0 - Production on Sat Nov 17 16:02:40 2007

Copyright (c) 1982, 2005, Oracle.  All Rights Reserved.

Enter user-name: dbadmin
Enter password: 

Connected to:
Oracle Database 10g Enterprise Edition Release 10.2.0.2.0 - 64bit Production
With the Partitioning, OLAP and Data Mining options

SQL> set term on echo on
SQL> CREATE OR REPLACE PACKAGE BODY salary
  2  AS
  3  FUNCTION avg_emp1
  4  RETURN NUMBER
  5  AS
  6   avg_sal   NUMBER DEFAULT 0;
  7   min_sal   NUMBER DEFAULT 0;
  8   sum_sal   NUMBER DEFAULT 0;
  9   num_sal   NUMBER DEFAULT 0;
 10  BEGIN
 11   SELECT SUM(e.salary) INTO sum_sal FROM Emp2 e;
 12   SELECT MIN(e.salary) INTO min_sal FROM Emp2 e;
 13   SELECT COUNT(e.salary) INTO num_sal FROM Emp2 e;
 14   avg_sal := (sum_sal - min_sal) / (num_sal - 1);
 15   RETURN (avg_sal);
 16  END avg_emp1;
 17  
 18  PROCEDURE new_emp
 19   (namein VARCHAR2, statein CHAR, deptin NUMBER);
 20  AS
 21   new_salary   NUMBER DEFAULT 0;
 22  BEGIN
 23   new_salary := avg_emp1 - (avg_emp1 * 0.15);
 24   INSERT INTO Emp2 VALUES(namein, statein, new_salary, deptin);
 25  END new_emp;
 26  
 27  END salary;
 28  /

Warning: Package Body created with compilation errors.

SQL> show error
Errors for PACKAGE BODY SALARY:

LINE/COL ERROR
-------- -----------------------------------------------------------------
20/1     PLS-00103: Encountered the symbol "AS" when expecting one of the
         following:
         begin end function package pragma procedure form

27/1     PLS-00103: Encountered the symbol "END"
SQL> exit
Disconnected from Oracle Database 10g Enterprise Edition Release 10.2.0.2.0 - 64bit Production
With the Partitioning, OLAP and Data Mining options