The following lines contain the word 'select', 'insert', 'update' or 'delete':
FUNCTION object_selection_rule(
p_oipl_id IN NUMBER
,p_pl_id IN NUMBER
,p_pgm_id IN NUMBER
,p_pl_typ_id IN NUMBER
,p_opt_id IN NUMBER
,p_business_group_id IN NUMBER
,p_comp_selection_rule_id IN NUMBER
,p_effective_date IN DATE)
RETURN BOOLEAN IS
--
l_package VARCHAR2(80) := g_package || '.object_selection_rule';
IF p_comp_selection_rule_id IS NOT NULL THEN
--
-- Call formula initialise routine
--
hr_utility.set_location('call formula ' || l_package, 20);
benutils.formula(p_formula_id=> p_comp_selection_rule_id
,p_effective_date => p_effective_date
,p_business_group_id => p_business_group_id
,p_assignment_id => NULL
,p_organization_id => NULL
,p_pl_id => p_pl_id
,p_pl_typ_id => p_pl_typ_id
,p_pgm_id => p_pgm_id
,p_opt_id => p_opt_id
,p_jurisdiction_code => NULL);
fnd_message.set_token('RL', 'comp_selection_rule_id');
END object_selection_rule;
,p_comp_selection_rule_id in number
,p_effective_date in date
)
IS
--
l_pl_id_va benutils.g_number_table := benutils.g_number_table();
SELECT /*+ bebmbcl1.populate_comp_object_list */
bcocr.pl_id,
bcocr.pgm_id,
bcocr.oipl_id,
bcocr.plip_id,
bcocr.ptip_id,
bcocr.oiplip_id,
bcocr.pl_nip,
bcocr.trk_inelig_per_flag,
bcocr.par_pgm_id,
bcocr.par_ptip_id,
bcocr.par_plip_id,
bcocr.par_pl_id,
bcocr.par_opt_id,
bcocr.flag_bit_val,
bcocr.oiplip_flag_bit_val
FROM ben_comp_obj_cache_row bcocr
WHERE bcocr.comp_obj_cache_id = c_comp_obj_cache_id
ORDER BY bcocr.comp_obj_cache_row_id;
l_pgmrule_pass := object_selection_rule
(p_pgm_id => l_par_pgm_id_va(elenum)
,p_pl_typ_id => NULL
,p_pl_id => NULL
,p_oipl_id => NULL
,p_opt_id => NULL
,p_business_group_id => p_business_group_id
,p_comp_selection_rule_id => p_comp_selection_rule_id
,p_effective_date => p_effective_date
);
ben_manage_life_events.g_cache_person_prtn.delete;