Q)WRITE A PACKAGE TO DISPLAY THE EMPLOYEE DETAILS WHEN EMPLOYEE NUMBER PASSED AS IN PARAMETER AND FIND OUT HIS ANNUAL SALARY?

Create or Replace Package MyPack1
IS
Procedure P1(P_empno  IN emp.empno%type,a  OUT sys_refcursor)
Function Annual_Salary( P-empno IN emp.empno%type)
Return Number;
End;

Create or Replace Package Body MyPack1
IS
Procedure P1(P_empno  IN emp.empno%type,a  OUT sys_refcursor)
IS
Begin
Open a for Select * from emp where empno=P_empno;
End p1;

Function(P_empno IN emp.empno%type)
Return Number
IS
C Number
Begin
Select sal*12 into C from emp where empno=P_empno;
Return C;
End;

EXECUTION :
SQL>var x refcursor
SQL>var y number
sql>exec :x:=MyPack1.P1(7788,:x)
PL/SQL Procedure successfully  completed
SQL>Print x
      X
---------------
some output will come here
SQL>exec :x:=MyPack1.p2(7788)
PL/SQL Procedure successfully  completed
SQL>Print y
      Y
--------------------
some output will come here