【发布时间】：2019-01-25 09:31:37
【问题描述】：
我确实遇到以下函数的问题，不断收到错误
PLS-00302：必须声明组件“EXISTS”
在测试我的功能时。如果我删除 if 语句，他会给出一个错误，FIRST 也必须声明。
如果有人可以帮助我，这将意味着全世界！
CREATE OR REPLACE PACKAGE hr_package IS
TYPE seniority_type_rec IS RECORD (f_name employees.first_name%TYPE, l_name
employees.last_name%TYPE, seniority NUMBER);
TYPE seniority_table_type IS TABLE OF seniority_type_rec INDEX BY
PLS_INTEGER;
FUNCTION calc_seniorities (p_seniority PLS_INTEGER) RETURN
seniority_table_type ;
END hr_package;
/
/* DEEL 2: PACKAGE BODY */
CREATE OR REPLACE PACKAGE BODY hr_package IS
/* needs to return a list of employees with seniority over the parameter
p_seniority using bulk sql, return type seniority_table_type with first
name, last name and seniority*/
FUNCTION calc_seniorities (p_seniority PLS_INTEGER)
RETURN seniority_table_type IS
emp_table seniority_table_type;
BEGIN
SELECT first_name, last_name, p_seniority BULK COLLECT INTO emp_table FROM
job_history h join employees e on h.employee_id = e.employee_id WHERE
FLOOR((MONTHS_BETWEEN(start_date,end_date))/12) >= p_seniority;
return emp_table;
END;
END hr_package;
/
/* DEEL 3: TESTCODE */
DECLARE
query_result hr_package.seniority_table_type;
BEGIN query_result := hr_package.calc_seniorities(5);
FOR i IN 1..query_result.COUNT LOOP
if query_result(i).exists then
DBMS_OUTPUT.PUT_LINE(query_result(i).first_name);
end if;
END LOOP;
END;
/
【问题讨论】：