The following lines contain the word 'select', 'insert', 'update' or 'delete':
Procedure check_non_updateable_args(p_rec in per_ppc_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'check_non_updateable_args';
end check_non_updateable_args;
select null
from per_pay_proposals pyp,
per_assignments_f2 asg
where pyp.pay_proposal_id = p_pay_proposal_id
and pyp.assignment_id = asg.assignment_id
and pyp.change_date between asg.effective_start_date
and asg.effective_end_date;
select pro.approved, pro.multiple_components,pro.business_group_id
from per_pay_proposals pro
where pro.pay_proposal_id = p_pay_proposal_id;
els */ -- allow component update.
if l_multiple_components = 'N' and p_validation_strength <>'WEAK' then
hr_utility.set_location(l_proc, 6);
select null
from per_pay_proposal_components ppc
where ppc.pay_proposal_id = p_pay_proposal_id
and ppc.component_reason = p_component_reason;
select change_date, approved
from per_pay_proposals
where pay_proposal_id = p_pay_proposal_id;
select pro2.assignment_id, pro2.business_group_id,
pro2.change_date, pro2.change_date-1 prev_date
from per_pay_proposals pro2
where pro2.pay_proposal_id = p_pay_proposal_id;
select pay_proposal_id, change_date, proposed_salary_n
,nvl(ppb.pay_annualization_factor,
PER_SALADMIN_UTILITY.get_pay_annualization_factor
(ppp.assignment_id, change_date, ppb.pay_annualization_factor,
ppb.pay_basis)) annualization_factor,
pet.input_currency_code as currency_code, ppb.pay_basis
frequency
from per_pay_proposals ppp
,per_all_assignments_f paa
,per_pay_bases ppb
,pay_input_values_f piv
,pay_element_types_f pet
where
ppp.assignment_id = p_assignment_id
and p_query_date
between change_date and nvl(date_to, hr_general.end_of_time)
and paa.assignment_id = ppp.assignment_id
and ppp.change_date
between paa.effective_start_date and paa.effective_end_date
and paa.pay_basis_id = ppb.pay_basis_id
and ppb.input_value_id = piv.input_value_id
and ppp.change_date
between piv.effective_start_date and piv.effective_end_date
and piv.element_type_id = pet.element_type_id
and ppp.change_date
between pet.effective_start_date and pet.effective_end_date;
select p1.proposed_salary_n
from per_pay_proposals p1,
(select pro2.assignment_id, pro2.change_date-1 prev_date
from per_pay_proposals pro2
where pro2.pay_proposal_id = p_pay_proposal_id ) p2
where p1.date_to = prev_date
and p1.assignment_id = p2.assignment_id;
procedure chk_delete_component
(p_component_id
in per_pay_proposal_components.component_id%TYPE
) is
--
l_exists varchar2(1);
l_proc varchar2(72):= g_package || 'chk_delete_component';
select null
from per_pay_proposals pro
where pro.pay_proposal_id = l_pay_proposal_id
and pro.approved = 'Y';
select pay_proposal_id
from per_pay_proposal_components comp
where comp.component_id = p_component_id;
end chk_delete_component;
Procedure insert_validate(p_rec in out nocopy per_ppc_shd.g_rec_type
,p_validation_strength in varchar2 default 'STRONG') is
--
l_proc varchar2(72) := g_package||'insert_validate';
End insert_validate;
Procedure update_validate(p_rec in out nocopy per_ppc_shd.g_rec_type
,p_validation_strength in varchar2 default 'STRONG') is
--
l_proc varchar2(72) := g_package||'update_validate';
per_ppc_bus.check_non_updateable_args
(p_rec =>p_rec);
End update_validate;
Procedure delete_validate(p_rec in per_ppc_shd.g_rec_type,
p_validation_strength in varchar2 default 'STRONG') is
--
l_proc varchar2(72) := g_package||'delete_validate';
chk_delete_component
(p_component_id => p_rec.component_id
);
End delete_validate;
select pbg.legislation_code
from per_business_groups pbg
, per_pay_proposal_components ppc
where ppc.component_id = component_id
and pbg.business_group_id = ppc.business_group_id;