The following lines contain the word 'select', 'insert', 'update' or 'delete':
Procedure chk_non_updateable_args
(p_rec in per_sha_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'chk_non_updateable_args';
end chk_non_updateable_args;
hr_utility.set_message(800,'PER_50029_SHA_HOL_UPDATE');
hr_utility.set_message(800,'PER_50040_SHA_HOL_UPDATE_EXPD');
SELECT per.person_id
FROM per_people_f per
WHERE per.person_id = p_person_id
AND p_date_not_taken BETWEEN per.effective_start_date
AND per.effective_end_date;
SELECT sth.standard_holiday_id
FROM per_standard_holidays sth
WHERE sth.standard_holiday_id = p_standard_holiday_id;
hr_utility.set_message(800,'PER_50028_SHA_HOL_UPDATE_ID');
SELECT NVL(sth.standard_holiday_id,99)
FROM per_standard_holidays sth,
per_people_f per,
per_business_groups bus
WHERE per.person_id = p_person_id
AND p_actual_date_taken BETWEEN per.effective_start_date
AND per.effective_end_date
AND bus.business_group_id = per.business_group_id
AND sth.legislation_code = bus.legislation_code
AND p_actual_date_taken BETWEEN sth.holiday_date
AND NVL(sth.holiday_date_end, sth.holiday_date);
Procedure insert_validate(p_rec in per_sha_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'insert_validate';
End insert_validate;
Procedure update_validate(p_rec in per_sha_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'update_validate';
chk_non_updateable_args (p_rec => p_rec);
End update_validate;
Procedure delete_validate(p_rec in per_sha_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'delete_validate';
End delete_validate;
select pbg.legislation_code
from per_business_groups pbg
, per_people_f per
, per_std_holiday_absences sha
where sha.std_holiday_absences_id = p_std_holiday_absences_id
and per.person_id = sha.person_id
and pbg.business_group_id = per.business_group_id
order by per.effective_start_date;