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_balance_feeds_f pbf
where pbf.balance_feed_id = p_balance_feed_id
and pbg.business_group_id = pbf.business_group_id;
select pbg.legislation_code
from per_business_groups_perf pbg
, pay_balance_feeds_f pbf
where pbf.balance_feed_id = p_balance_feed_id
and pbg.business_group_id (+) = pbf.business_group_id;
Procedure chk_non_updateable_args
(p_effective_date in date
,p_rec in pay_pbf_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_balance_feed_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
-- EDIT_HERE: The following call should be edited if certain types of rows
-- are not permitted.
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
);
select '1'
from hr_organization_units
where business_group_id = p_business_group_id;
select '1'
from fnd_territories
where territory_code = p_legislation_code;
select '1'
from pay_input_values_f
where input_value_id = p_input_value_id
and nvl(legislation_code, nvl(l_legislation_code, hr_api.g_varchar2))
= nvl(l_legislation_code, hr_api.g_varchar2)
and nvl(business_group_id, nvl(p_business_group_id, hr_api.g_number))
= nvl(p_business_group_id, hr_api.g_number);
select null
from pay_balance_feeds_f pbf
where pbf.input_value_id = p_input_value_id;
select '1'
from pay_balance_types
where balance_type_id = p_balance_type_id
and nvl(legislation_code, nvl(l_legislation_code, hr_api.g_varchar2))
= nvl(l_legislation_code, hr_api.g_varchar2)
and nvl(business_group_id, nvl(p_business_group_id, hr_api.g_number))
= nvl(p_business_group_id, hr_api.g_number);
select bcl.classification_id
from pay_balance_classifications bcl
where bcl.balance_type_id = p_balance_type_id;
SELECT 1
FROM pay_balance_feeds_f blf,
pay_input_values_f inv,
pay_element_types_f elt,
pay_element_classifications ec
WHERE blf.balance_type_id = p_balance_type_id
AND blf.input_value_id = inv.input_value_id
AND inv.element_type_id = elt.element_type_id
AND nvl(elt.legislation_code
,nvl(l_legislation_code, '~nvl~'))
= nvl(l_legislation_code, '~nvl~')
AND nvl(elt.business_group_id
,nvl(p_business_group_id, -1))
= nvl(p_business_group_id, -1)
AND elt.classification_id = ec.classification_id
AND ec.balance_initialization_flag ='Y';
SELECT pbt.balance_uom
FROM pay_balance_types pbt
WHERE pbt.balance_type_id = p_balance_type_id;
SELECT piv.uom
FROM pay_input_values_f piv
WHERE piv.input_value_id = p_input_value_id
AND p_effective_date between piv.effective_start_date
AND piv.effective_end_date;
SELECT balance_uom
FROM pay_balance_types
WHERE balance_type_id = p_balance_type_id;
SELECT 1
FROM pay_balance_types pbt,
pay_input_values_f piv,
pay_element_types_f pet
WHERE pbt.balance_type_id = p_balance_type_id
AND piv.input_value_id = p_input_value_id
AND pet.element_type_id = piv.element_type_id
AND pbt.currency_code = pet.output_currency_code;
SELECT 1
FROM pay_balance_feeds_f
WHERE input_value_id = p_input_value_id
AND balance_type_id =p_balance_type_id
AND p_effective_date between effective_start_date and effective_end_date;
SELECT 1
FROM pay_input_values_f
WHERE input_value_id = p_input_value_id
AND p_effective_date between effective_start_date and effective_end_date;
fnd_message.set_token('ACTION', 'UPDATE');
fnd_message.set_token('ACTION', 'DELETE');
Procedure insert_validate
(p_rec in pay_pbf_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
,p_initial_feed in boolean
,p_exist_run_result_warning out nocopy boolean
) is
--
l_proc varchar2(72) := g_package||'insert_validate';
'INSERT',
null, null, null, null, null,
p_rec.input_value_id,
p_validation_start_date,
l_validation_end_date) then
fnd_message.set_name('PAY','HR_7876_BAL_FEED_RESULTS_EXIST');
End insert_validate;
Procedure update_validate
(p_rec in pay_pbf_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
,p_exist_run_result_warning out nocopy boolean
) is
--
l_proc varchar2(72) := g_package||'update_validate';
chk_non_updateable_args(p_effective_date => p_effective_date
,p_rec => p_rec
);
,'UPDATE_DELETE'
,null, null, null
,p_rec.balance_feed_id
,null, null
,p_validation_start_date
,p_validation_end_date
) then
fnd_message.set_name('PAY','HR_7876_BAL_FEED_RESULTS_EXIST');
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
);
End update_validate;
Procedure delete_validate
(p_rec in pay_pbf_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
,p_exist_run_result_warning out nocopy boolean
) is
--
l_proc varchar2(72) := g_package||'delete_validate';
(p_datetrack_mode = 'DELETE_NEXT_CHANGE' and
p_validation_end_date = hr_api.g_eot)) then
l_validation_end_date := hr_balance_feeds.bal_feed_end_date
(p_rec.balance_feed_id,
p_rec.balance_type_id,
p_rec.input_value_id,
p_effective_date,
p_validation_start_date);
'UPDATE_DELETE',
null, null, null,
p_rec.balance_feed_id,
null, null,
p_validation_start_date,
l_validation_end_date) then
fnd_message.set_name('PAY','HR_7876_BAL_FEED_RESULTS_EXIST');
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_balance_feed_id => p_rec.balance_feed_id
);
End delete_validate;
SELECT 1
FROM pay_input_values_f inv,
pay_element_types_f elt,
pay_element_classifications ec
WHERE inv.input_value_id = p_input_value_id
AND inv.element_type_id = elt.element_type_id
AND elt.classification_id = ec.classification_id
AND ec.balance_initialization_flag = 'Y';