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_report_format_mappings_f rfm
where rfm.report_format_mapping_id = p_report_format_mapping_id
and pbg.business_group_id (+) = rfm.business_group_id;
select null
from pay_report_format_mappings_f
where report_format_mapping_id = p_report_format_mapping_id;
select null
from pay_report_format_mappings_f
where report_type = p_report_type
and report_qualifier = p_report_qualifier
and report_category = p_report_category;
select null
from fnd_territories
where territory_code = p_legislation_code ;
Procedure chk_delete
( p_report_format_mapping_id in number
,p_object_version_number in number
,p_datetrack_mode in varchar2
,p_validation_start_date in date
,p_validation_end_date in date
) IS
--
cursor csr_dt_rfi_exists is
select null
from pay_report_format_items_f rfi
,pay_report_format_mappings_f rfm
where rfm.report_format_mapping_id = p_report_format_mapping_id
and rfm.object_version_number = p_object_version_number
and rfm.report_type = rfi.report_type
and rfm.report_qualifier = rfi.report_qualifier
and rfm.report_category = rfi.report_category
and rfi.effective_end_date >= p_validation_start_date ;
select null
from pay_report_format_items_f rfi
,pay_report_format_mappings_f rfm
where rfm.report_format_mapping_id = p_report_format_mapping_id
and rfm.object_version_number = p_object_version_number
and rfm.report_type = rfi.report_type
and rfm.report_qualifier = rfi.report_qualifier
and rfm.report_category = rfi.report_category;
select null
from pay_report_format_parameters rfp
where rfp.report_format_mapping_id = p_report_format_mapping_id;
select null
from pay_report_format_mappings_tl rftl
where rftl.report_format_mapping_id = p_report_format_mapping_id;
l_proc varchar2(72) := g_package || 'chk_delete';
if p_datetrack_mode = hr_api.g_delete then
open csr_dt_rfi_exists;
End chk_delete;
Procedure chk_non_updateable_args
(p_effective_date in date
,p_rec in pay_rfm_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_report_format_mapping_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_business_group_id is not null and p_legislation_code is not null then
fnd_message.set_name('PAY', 'PAY_33179_BGLEG_INVALID');
IF (p_insert) THEN
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
);
Procedure insert_validate
(p_rec in pay_rfm_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_rfm_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_rfm_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_report_format_mapping_id => p_rec.report_format_mapping_id
);
chk_delete
( p_report_format_mapping_id => p_rec.report_format_mapping_id
,p_object_version_number => p_rec.object_version_number
,p_datetrack_mode => p_datetrack_mode
,p_validation_start_date => p_validation_start_date
,p_validation_end_date => p_validation_end_date
);
End delete_validate;