The following lines contain the word 'select', 'insert', 'update' or 'delete':
select pbg.security_group_id
from per_business_groups pbg
, ben_ext_crit_prfl xcr
where xcr.ext_crit_prfl_id = p_ext_crit_prfl_id
and pbg.business_group_id = xcr.business_group_id;
(p_insert IN boolean
,p_business_group_id IN number
,p_legislation_code IN varchar2
,p_legislation_subgroup IN varchar2 DEFAULT NULL) IS
--
BEGIN
--
-- Call the supporting procedure to check startup mode
--
IF (p_insert) THEN
--
-- Call procedure to check startup_action for inserts.
--
hr_startup_data_api_support.chk_startup_action
(p_generic_allowed => TRUE
,p_startup_allowed => TRUE
,p_user_allowed => TRUE
,p_business_group_id => p_business_group_id
,p_legislation_code => p_legislation_code
,p_legislation_subgroup => p_legislation_subgroup
);
cursor c1 is select null
from ben_ext_crit_prfl a
Where a.ext_crit_prfl_id <> nvl(p_ext_crit_prfl_id,hr_api.g_number)
and a.name = p_name
and ((business_group_id is null and legislation_code is null)
or (legislation_code is not null
and business_group_id is null
and legislation_code = p_legislation_code)
or (business_group_id is not null
and business_group_id = p_business_group_id)
);
select 'x'
from ben_ext_crit_val ecv ,
ben_ext_crit_typ ect
where ect.ext_Crit_prfl_id = p_ext_crit_prfl_id
and ecv.ext_crit_typ_id = ect.ext_crit_typ_id
and ecv.ext_crit_bg_id is not null
and ecv.ext_crit_bg_id <> ecv.business_group_id
;
Procedure insert_validate(p_rec in ben_xcr_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'insert_validate';
End insert_validate;
Procedure update_validate(p_rec in ben_xcr_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'update_validate';
End update_validate;
Procedure delete_validate(p_rec in ben_xcr_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'delete_validate';
End delete_validate;
select a.legislation_code
from per_business_groups a,
ben_ext_crit_prfl b
where b.ext_crit_prfl_id = p_ext_crit_prfl_id
and a.business_group_id(+) = b.business_group_id;