CREATE OR REPLACE PACKAGE admin_data
AS
TYPE gencurtyp IS REF CURSOR;
PROCEDURE open_cv(generic_cv IN OUT GENCURTYP,choice INT);
END admin_data;
/
CREATE OR REPLACE PACKAGE BODY admin_data
AS
PROCEDURE Open_cv
(generic_cv IN OUT GENCURTYP,
choice INT)
IS
BEGIN
IF choice = 1 THEN
OPEN generic_cv FOR
SELECT *
FROM employees;
ELSIF choice = 2 THEN
OPEN generic_cv FOR
SELECT *
FROM departments;
ELSIF choice = 3 THEN
OPEN generic_cv FOR
SELECT *
FROM jobs;
END IF;
END;
END admin_data;
/
Cursor Variable with Different Return Types
0 comments:
Post a Comment