RDBMS Do As Directed

 

[1]

Create or Replace Procedure calsalary(PEmp_no in varchar) As

VBasic number(10,2);

VDa number(10,2);

VHra number(10,2);

VTax number(10,2);

VGross number(10,2);

VNet number(10,2);

Begin

Select Basic, DA, HRA, Tax INTO VBasic, VDa, VHra, VTax From Salary Where Emp_no = PEmp_no;

  

VBasic := VBasic + VBasic * 0.11;

VGross := VBasic + VDa + VHra ;

VNet := VGross - VTax;

Update Salary Set Gross = VGross, NET = VNet Where Emp_no = PEmp_no;

End;

[2]

CREATE OR REPLACE FUNCTION findname(PEmpno varchar) AS

VEmp_name varchar(60);

BEGIN

SELECT Emp_name INTO VEmp_name FROM Employee WHERE Empno = PEmpno;

RETURN VEmp_name;

END;

 

[3]

CREATE OR REPLACE TRIGGER TrgRemove

AFTER DELETE

ON Salary

BEGIN

DELETE FROM Employee WHERE (SYSDATE-Date_of_Birth) > 45;

End;