The following lines contain the word 'select', 'insert', 'update' or 'delete':
select pbg.security_group_id
from per_business_groups pbg
, pay_user_column_instances_f uci
where uci.user_column_instance_id = p_user_column_instance_id
and pbg.business_group_id = uci.business_group_id;
select pbg.legislation_code
from per_business_groups pbg
, pay_user_column_instances_f uci
where uci.user_column_instance_id = p_user_column_instance_id
and pbg.business_group_id (+) = uci.business_group_id;
Procedure chk_non_updateable_args
(p_effective_date in date
,p_rec in pay_uci_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_user_row_id in number default hr_api.g_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_update_validate';
End dt_update_validate;
Procedure dt_delete_validate
(p_user_column_instance_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;
(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
if p_business_group_id is not null and p_legislation_code is not null then
fnd_message.set_name('PAY', 'PAY_33179_BGLEG_INVALID');
select null
from fnd_territories
where territory_code = p_legislation_code ;
select pur.legislation_code , pur.business_group_id , min(effective_start_date) , max(effective_end_date)
from pay_user_rows_f pur
where pur.user_row_id = p_user_row_id group by pur.business_group_id , pur.legislation_code ;
select puc.legislation_code , puc.business_group_id
from pay_user_columns puc
where puc.user_column_id = p_user_column_id ;
select null
from pay_user_column_instances_f uci
where uci.user_row_id = p_user_row_id
and uci.user_column_id = p_user_column_id
and ( p_business_group_id is null
or ( p_business_group_id is not null and p_business_group_id = uci.business_group_id )
or ( p_business_group_id is not null and
uci.legislation_code is null and uci.business_group_id is null )
or ( p_business_group_id is not null and
uci.legislation_code = hr_api.return_legislation_code(p_business_group_id )))
and ( p_legislation_code is null
or ( p_legislation_code is not null and p_legislation_code = uci.legislation_code )
or ( p_legislation_code is not null and
uci.legislation_code is null and uci.business_group_id is null)
or ( p_legislation_code is not null and
p_legislation_code = hr_api.return_legislation_code(uci.business_group_id )))
and (uci.effective_start_date <= p_validation_end_date and
uci.effective_end_date >= p_validation_start_date );
select puc.formula_id
from pay_user_columns puc
where puc.user_column_id = p_user_column_id;
select min(ff.effective_start_date) , max(ff.effective_end_date)
from ff_formulas_f ff
where ff.formula_id = l_formula_id ;
select ff.effective_start_date , ff.effective_end_date
from ff_formulas_f ff
where ff.formula_id = l_formula_id
and ff.effective_start_date <= p_validation_end_date
and ff.effective_end_date >= p_validation_start_date ;
Procedure insert_validate
(p_rec in pay_uci_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_uci_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_user_row_id => p_rec.user_row_id
,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_uci_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_user_column_instance_id => p_rec.user_column_instance_id
);
End delete_validate;