Question: write the called part for code,and one more PROCEDURE to count how many employees work in department? CREATE OR REPLACE PACKAGE CSC325_PACKAGE AS -- Total
write the called part for code,and one more PROCEDURE to count how many employees work in department?
CREATE OR REPLACE PACKAGE CSC325_PACKAGE
AS
-- Total function
FUNCTION total (dep_name VARCHAR2, job_title VARCHAR2, count_name VARCHAR2)
RETURN INTEGER;
PROCEDURE Manager_info (manager_id INT)
End;
CREATE OR REPLACE PACKAGE BODY CSC325_PACKAGE
AS
FUNCTION total(dep_name IN VARCHAR2, job_name IN VARCHAR2, country_name IN VARCHAR2) RETURN INTEGER AS
total_salaries INTEGER := 0;
BEGIN
SELECT SUM(salary)
INTO total_salaries
FROM employees
WHERE dname = dep_name OR job = job_title OR country = count_name;
RETURN total_salaries;
EXCEPTION
WHEN OTHERS THEN
DBMS_OUTPUT.PUT_LINE('ERROR: An error occurred while getting total salaries');
RAISE;
END;
PROCEDURE manager_info (manager_id INT) AS
manager_name VARCHAR2(50);
managed_dept_name VARCHAR2(50);
managed_employee_count INT;
BEGIN
SELECT mgr_name, dept_name, COUNT(*)
INTO manager_name, managed_dept_name, managed_employee_count
FROM employees
WHERE manager_id = manager_id
GROUP BY manager_name, dept_name;
DBMS_OUTPUT.PUT_LINE('Manager Name: ' || manager_name);
DBMS_OUTPUT.PUT_LINE('Managed Department: ' || managed_dept_name);
DBMS_OUTPUT.PUT_LINE('Managed Employee Count: ' || managed_employee_count);
END Manager_info;
EXCEPTION invalid
Step by Step Solution
There are 3 Steps involved in it
Get step-by-step solutions from verified subject matter experts
