The following lines contain the word 'select', 'insert', 'update' or 'delete':
Procedure chk_non_updateable_args(p_rec in per_par_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'chk_non_updateable_args';
end chk_non_updateable_args;
procedure chk_update_allowed
(p_rec in per_par_shd.g_rec_type
)
is
--
l_proc varchar2(72) := g_package || 'chk_update_allowed';
end chk_update_allowed;
select 'Y'
from all_tables
where table_name = upper(p_participation_in_table)
and owner = l_per_owner;
select 'Y'
from all_tab_columns
where table_name = upper(p_participation_in_table)
and column_name = upper(p_participation_in_column)
and owner = l_per_owner;
l_dynamic_sql := 'select par.business_group_id ' ||
'from {p_participation_in_table} par ' ||
'where par.{participation_in_column} = :p_participation_in_id ' ;
l_dynamic_sql := 'select par.business_group_id ' ||
'from ' ||p_participation_in_table ||' par ' ||
'where par.'|| p_participation_in_column || '= :p_participation_in_id ' ;
select business_group_id
from per_all_people_f
where person_id = p_person_id;
select business_group_id
from per_all_people_f
where person_id = p_person_id;
select 'Y'
from per_all_people_f
where person_id = p_person_id
and p_effective_date between
effective_start_date and nvl(effective_end_date,hr_api.g_eot);
select 'Y'
from per_all_people_f
where person_id = p_person_id
and p_effective_date between
effective_start_date and nvl(effective_end_date,hr_api.g_eot);
select 'Y'
from per_participants par
where ( (p_participant_id is null)
or(p_participant_id <> par.participant_id)
)
and par.participation_in_table = p_participation_in_table
and par.participation_in_column = p_participation_in_column
and par.participation_in_id = p_participation_in_id
and par.person_id = p_person_id;
Procedure insert_validate(p_rec in per_par_shd.g_rec_type
,p_effective_date in date) is
--
l_proc varchar2(72) := g_package||'insert_validate';
End insert_validate;
Procedure update_validate(p_rec in per_par_shd.g_rec_type
,p_effective_date in date) is
--
l_proc varchar2(72) := g_package||'update_validate';
chk_non_updateable_args(p_rec => p_rec);
per_par_bus.chk_update_allowed
(p_rec => p_rec
);
End update_validate;
Procedure delete_validate(p_rec in per_par_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'delete_validate';
End delete_validate;
select legislation_code
from per_business_groups pbg,
per_participants par
where par.participant_id = p_participant_id
and pbg.business_group_id = par.business_group_id;