Saturday, October 10, 2020

RDBMS PLSQL Program 33 Program to call package

 SET Serveroutput ON

DECLARE 

   veno emp.eno%type; 

BEGIN 

veno := '&veno';

emp_sal.find_sal(veno); 

END; 

/

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; 

/

RDBMS PLSQL Program 31 Program generate package specification with single procedure in it

CREATE OR REPLACE PACKAGE emp_sal AS 

   PROCEDURE find_sal(veno emp.eno%type); 

END emp_sal; 

/