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
where pbg.business_group_id = hr_general.get_business_group_id;
select pbg.legislation_code
from per_business_groups_perf pbg
where pbg.business_group_id = hr_general.get_business_group_id;
Procedure chk_non_updateable_args
(p_effective_date in date
,p_rec in pqh_gin_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_global_index_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 hr_lookups
where lookup_type = 'PQH_FR_TYPE_OF_INDICES'
and lookup_code = p_type_of_record;
Select null
from pqh_fr_global_indices_f
where type_of_record = 'INM';
Select null
from fnd_currencies_vl
where currency_code = p_currency_code
and currency_flag = 'Y'
and enabled_flag = 'Y';
Select null
from pqh_fr_global_indices_f
where p_effective_date between effective_start_date and effective_end_date
and type_of_record = 'INM';
Select Gross_index
from pqh_fr_global_indices_f
where global_index_id = p_global_index_id
and p_effective_date between effective_start_date and effective_end_date;
Select pqh_corps_utility.chk_steps_exist_for_index(l_gross_index) into l_exists from dual;
procedure chk_unique_insert(p_gross_index number)
IS
Cursor csr_unique is
Select null
from pqh_fr_global_indices_f
where gross_index =p_gross_index;
End chk_unique_insert;
procedure chk_unique_update(p_gross_index number, p_increased_index number,p_global_index_id number)
IS
Cursor csr_unique is
Select null
from pqh_fr_global_indices_f
where gross_index =p_gross_index
and increased_index = p_increased_index
and global_index_id <> p_global_index_id;
End chk_unique_update;
Procedure insert_validate
(p_rec in pqh_gin_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';
chk_unique_insert(p_rec.gross_index);
End insert_validate;
Procedure update_validate
(p_rec in pqh_gin_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';
chk_unique_update(p_rec.gross_index,p_rec.increased_index,p_rec.global_index_id);
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 pqh_gin_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_global_index_id => p_rec.global_index_id
);
End delete_validate;