The following lines contain the word 'select', 'insert', 'update' or 'delete':
select pbg.security_group_id,
pbg.legislation_code
from per_business_groups_perf pbg
, pay_formula_result_rules_f frr
where frr.formula_result_rule_id = p_formula_result_rule_id
and pbg.business_group_id (+) = frr.business_group_id;
select pbg.legislation_code
from per_business_groups_perf pbg
, pay_formula_result_rules_f frr
where frr.formula_result_rule_id = p_formula_result_rule_id
and pbg.business_group_id (+) = frr.business_group_id;
Procedure chk_non_updateable_args
(p_effective_date in date
,p_rec in pay_frr_shd.g_rec_type
) IS
--
l_proc varchar2(72) := g_package || 'chk_non_updateable_args';
End chk_non_updateable_args;
Procedure dt_update_validate
(p_datetrack_mode in varchar2
,p_validation_start_date in date
,p_validation_end_date in date
) Is
--
l_proc varchar2(72) := g_package||'dt_update_validate';
End dt_update_validate;
Procedure dt_delete_validate
(p_formula_result_rule_id in number
,p_datetrack_mode in varchar2
,p_validation_start_date in date
,p_validation_end_date in date
) Is
--
l_proc varchar2(72) := g_package||'dt_delete_validate';
If (p_datetrack_mode = hr_api.g_delete or
p_datetrack_mode = hr_api.g_zap) then
--
--
-- Ensure the arguments are not null
--
hr_api.mandatory_arg_error
(p_api_name => l_proc
,p_argument => 'validation_start_date'
,p_argument_value => p_validation_start_date
);
End dt_delete_validate;
select null
from fnd_territories
where territory_code = p_legislation_code;
select null
from pay_element_types_f pet
where pet.element_type_id = p_element_type_id
and p_effective_date between pet.effective_start_date
and pet.effective_end_date
and ((p_business_group_id is not null and
((pet.business_group_id = p_business_group_id)
or
(pet.legislation_code =
hr_api.return_legislation_code(p_business_group_id))
))
--
or
(p_legislation_code is not null
and pet.legislation_code = p_legislation_code
));
select null
from pay_status_processing_rules_f spr
where spr.status_processing_rule_id = p_status_processing_rule_id
and p_effective_date between spr.effective_start_date
and spr.effective_end_date
and ((p_business_group_id is not null and
((spr.business_group_id = p_business_group_id)
or
(spr.legislation_code =
hr_api.return_legislation_code(p_business_group_id))
))
--
or
(p_legislation_code is not null and
(spr.legislation_code = p_legislation_code)
));
select null
from ff_fdi_usages_f fdu
,pay_status_processing_rules_f spr
where spr.status_processing_rule_id = p_status_processing_rule_id
and fdu.formula_id = spr.formula_id
and fdu.usage in ('O', 'B')
and fdu.item_name = p_result_name
and p_effective_date between spr.effective_start_date
and spr.effective_end_date
and p_effective_date between fdu.effective_start_date
and fdu.effective_end_date;
select pet.processing_type
,pet.third_party_pay_only_flag
,pet.processing_priority
,pet.multiple_entries_allowed_flag
from pay_element_types_f pet
where pet.element_type_id = p_element_type_id
and p_effective_date between pet.effective_start_date
and pet.effective_end_date;
select spr.element_type_id
from pay_status_processing_rules_f spr
where spr.status_processing_rule_id = p_status_processing_rule_id
and p_effective_date between spr.effective_start_date
and spr.effective_end_date;
Elsif p_result_rule_type in ('U','S') then -- update recurring or stop entry
--
-- the element must be recurring
--
If l_element_dets.processing_type <> 'R' then
--
fnd_message.set_name('PAY','PAY_34161_FRR_RECURRING');
select uom
from pay_input_values_f piv
where piv.input_value_id = p_input_value_id
and piv.element_type_id = p_element_type_id
and p_effective_date between piv.effective_start_date
and piv.effective_end_date;
select fdu.data_type
from ff_fdi_usages_f fdu
,pay_status_processing_rules_f spr
where spr.status_processing_rule_id = p_status_processing_rule_id
and fdu.formula_id = spr.formula_id
and fdu.usage in ('O', 'B')
and fdu.item_name = p_result_name
and p_effective_date between spr.effective_start_date
and spr.effective_end_date
and p_effective_date between fdu.effective_start_date
and fdu.effective_end_date;
select '1'
from pay_formula_result_rules_f
where status_processing_rule_id = p_status_processing_rule_id
and result_rule_type = 'M'
and result_name = p_result_name
and p_effective_date between effective_start_date
and effective_end_date
and formula_result_rule_id <> nvl(p_formula_result_rule_id,-1);
select '1'
from pay_formula_result_rules_f
where status_processing_rule_id = p_status_processing_rule_id
and result_rule_type in ('S','U')
and result_name = p_result_name
and element_type_id = p_element_type_id
and p_effective_date between effective_start_date
and effective_end_date
and formula_result_rule_id <> nvl(p_formula_result_rule_id,-1);
select '1'
from pay_formula_result_rules_f
where status_processing_rule_id = p_status_processing_rule_id
and result_rule_type = p_result_rule_type
and result_name = p_result_name
and input_value_id = p_input_value_id
and p_effective_date between effective_start_date
and effective_end_date
and formula_result_rule_id <> nvl(p_formula_result_rule_id,-1);
select spr.formula_id,spr.element_type_id
from pay_status_processing_rules_f spr
where spr.status_processing_rule_id = p_status_processing_rule_id
and p_effective_date between spr.effective_start_date
and spr.effective_end_date;
or (p_datetrack_mode = hr_api.g_delete_next_change) then
p_validation_end_date := least (l_max_end_date_of_element
,l_max_spr_end_date
,l_max_end_date_of_target
,l_future_rule_end_date);
(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
hr_startup_data_api_support.chk_startup_action
(p_generic_allowed => FALSE
,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
);
Procedure insert_validate
(p_rec in pay_frr_shd.g_rec_type
,p_effective_date in date
,p_datetrack_mode in varchar2
,p_validation_start_date in date
,p_validation_end_date in date
) is
--
l_proc varchar2(72) := g_package||'insert_validate';
End insert_validate;
Procedure update_validate
(p_rec in pay_frr_shd.g_rec_type
,p_effective_date in date
,p_datetrack_mode in varchar2
,p_validation_start_date in date
,p_validation_end_date in date
) is
--
l_proc varchar2(72) := g_package||'update_validate';
dt_update_validate
(p_datetrack_mode => p_datetrack_mode
,p_validation_start_date => p_validation_start_date
,p_validation_end_date => p_validation_end_date
);
chk_non_updateable_args
(p_effective_date => p_effective_date
,p_rec => p_rec
);
End update_validate;
Procedure delete_validate
(p_rec in pay_frr_shd.g_rec_type
,p_effective_date in date
,p_datetrack_mode in varchar2
,p_validation_start_date in date
,p_validation_end_date in date
) is
--
l_proc varchar2(72) := g_package||'delete_validate';
dt_delete_validate
(p_datetrack_mode => p_datetrack_mode
,p_validation_start_date => p_validation_start_date
,p_validation_end_date => p_validation_end_date
,p_formula_result_rule_id => p_rec.formula_result_rule_id
);
End delete_validate;