RDBMS PLSQL Program 32 Program generate package body with single procedure in it

 CREATE OR REPLACE PACKAGE BODY emp_sal AS  

   PROCEDURE find_sal(veno emp.eno%TYPE) IS 

vesalary emp.esalary%TYPE; 

BEGIN 

      SELECT esalary INTO vesalary 

      FROM emp 

      WHERE eno = veno; 

      dbms_output.put_line('Salary: '|| vesalary); 

   END; 

END emp_sal; 

/