The following lines contain the word 'select', 'insert', 'update' or 'delete':
cursor cur_prs is select min(papf.effective_start_date)
from per_all_people_f papf,
per_person_types ppt
where papf.person_type_id = ppt.person_type_id
and system_person_type in ('EMP','EMP_APL')
and papf.person_id = p_per_or_asg_id
and papf.business_group_id = p_business_group_id
and p_contract_category = 'NORMAL';
cursor cur_asg is select nvl(assignment_eff_start_date,term_eff_start_date) effective_start_date from
(select min(paaf.effective_start_date) assignment_eff_start_date
from per_all_assignments_f paaf,
hr_soft_coding_keyflex scl,
per_assignment_status_types past
where paaf.ASSIGNMENT_STATUS_TYPE_ID = past.ASSIGNMENT_STATUS_TYPE_ID
and paaf.SOFT_CODING_KEYFLEX_ID = scl.SOFT_CODING_KEYFLEX_ID
and paaf.assignment_id = p_per_or_asg_id
and paaf.business_group_id = p_business_group_id
and past.per_system_status in ('ACTIVE_ASSIGN','SUSP_ASSIGN') and not exists ( select
paaf.effective_start_date from per_all_assignments_f paaf,
per_assignment_status_types past
where paaf.ASSIGNMENT_STATUS_TYPE_ID = past.ASSIGNMENT_STATUS_TYPE_ID
and past.per_system_status = 'TERM_ASSIGN'
and paaf.assignment_id = p_per_or_asg_id
and paaf.business_group_id = p_business_group_id
and p_effective_date between paaf.effective_start_date and paaf.effective_end_date)),
(select min(paaf.effective_start_date) term_eff_start_date from per_all_assignments_f paaf,
per_assignment_status_types past
where paaf.ASSIGNMENT_STATUS_TYPE_ID = past.ASSIGNMENT_STATUS_TYPE_ID
and past.per_system_status = 'TERM_ASSIGN'
and paaf.assignment_id = p_per_or_asg_id
and paaf.business_group_id = p_business_group_id
and p_effective_date between paaf.effective_start_date and paaf.effective_end_date);
procedure update_pl_paye_details
(p_validate in boolean default false
,p_effective_date in date
,p_datetrack_update_mode in varchar2
,p_paye_details_id in number
,p_object_version_number in out nocopy number
,p_tax_reduction in varchar2 default hr_api.g_varchar2
,p_tax_calc_with_spouse_child in varchar2 default hr_api.g_varchar2
,p_income_reduction in varchar2 default hr_api.g_varchar2
,p_income_reduction_amount in number default hr_api.g_number
,p_rate_of_tax in varchar2 default hr_api.g_varchar2
,p_effective_start_date out nocopy date
,p_effective_end_date out nocopy date
)
is
--
-- Declare cursors and local variables
--
l_effective_date date;
l_proc varchar2(72) := g_package||'update_pl_paye_details';
savepoint update_pl_paye_details;
PAY_PL_PAYE_BK2.update_pl_paye_details_b(p_effective_date => l_effective_date
,p_paye_details_id => p_paye_details_id
,p_datetrack_update_mode => p_datetrack_update_mode
,p_tax_reduction => p_tax_reduction
,p_tax_calc_with_spouse_child => p_tax_calc_with_spouse_child
,p_income_reduction => p_income_reduction
,p_income_reduction_amount => p_income_reduction_amount
,p_rate_of_tax => p_rate_of_tax
,p_object_version_number => l_object_version_number
);
(p_module_name => 'update_pl_paye_details'
,p_hook_type => 'BP'
);
,p_datetrack_mode => p_datetrack_update_mode
,p_paye_details_id => p_paye_details_id
,p_object_version_number => l_object_version_number
,p_tax_reduction => p_tax_reduction
,p_tax_calc_with_spouse_child => p_tax_calc_with_spouse_child
,p_income_reduction => p_income_reduction
,p_income_reduction_amount => p_income_reduction_amount
,p_rate_of_tax => p_rate_of_tax
,p_program_id => l_program_id
,p_program_login_id => l_program_login_id
,p_program_application_id => l_program_application_id
,p_request_id => l_request_id
,p_effective_start_date => l_effective_start_date
,p_effective_end_date => l_effective_end_date
);
pay_pl_paye_bk2.update_pl_paye_details_a
(p_effective_date => l_effective_date
,p_paye_details_id => p_paye_details_id
,p_datetrack_update_mode => p_datetrack_update_mode
,p_tax_reduction => p_tax_reduction
,p_tax_calc_with_spouse_child => p_tax_calc_with_spouse_child
,p_income_reduction => p_income_reduction
,p_income_reduction_amount => p_income_reduction_amount
,p_rate_of_tax => p_rate_of_tax
,p_object_version_number => l_object_version_number
,p_effective_start_date => l_effective_start_date
,p_effective_end_date => l_effective_end_date
);
(p_module_name => 'update_pl_paye_details'
,p_hook_type => 'AP'
);
rollback to update_pl_paye_details;
rollback to update_pl_paye_details;
end update_pl_paye_details;
procedure delete_pl_paye_details
(p_validate in boolean default false
,p_effective_date in date
,p_datetrack_delete_mode in varchar2
,p_paye_details_id in number
,p_object_version_number in out nocopy number
,p_effective_start_date out nocopy date
,p_effective_end_date out nocopy date
)
is
--
-- Declare cursors and local variables
--
l_effective_date date;
l_proc varchar2(72) := g_package||'delete_pl_paye_details';
savepoint delete_pl_paye_details;
PAY_PL_PAYE_BK3.delete_pl_paye_details_b
(p_effective_date => l_effective_date
,p_paye_details_id => p_paye_details_id
,p_datetrack_delete_mode => p_datetrack_delete_mode
,p_object_version_number => p_object_version_number
);
(p_module_name => 'delete_pl_paye_details'
,p_hook_type => 'BP'
);
,p_datetrack_mode => p_datetrack_delete_mode
,p_paye_details_id => p_paye_details_id
,p_object_version_number => l_object_version_number
,p_effective_start_date => l_effective_start_date
,p_effective_end_date => l_effective_end_date
);
pay_pl_paye_bk3.delete_pl_paye_details_a
(p_effective_date => l_effective_date
,p_paye_details_id => p_paye_details_id
,p_datetrack_delete_mode => p_datetrack_delete_mode
,p_object_version_number => l_object_version_number
,p_effective_start_date => l_effective_start_date
,p_effective_end_date => l_effective_end_date
);
(p_module_name => 'delete_pl_paye_details'
,p_hook_type => 'AP'
);
rollback to delete_pl_paye_details;
end delete_pl_paye_details;
select bus.business_group_id
, bus.legislation_code
from per_all_assignments_f paf
, per_business_groups_perf bus
where paf.assignment_id = p_assignment_id
and l_effective_date between paf.effective_start_date
and paf.effective_end_date
and bus.business_group_id = paf.business_group_id;
select bus.business_group_id
, bus.legislation_code
from per_all_assignments_f paf
, per_business_groups_perf bus
where paf.assignment_id = p_assignment_id
and l_effective_date between paf.effective_start_date
and paf.effective_end_date
and bus.business_group_id = paf.business_group_id;
select segment4
from hr_soft_coding_keyflex soft, per_all_assignments_f paaf
where soft.soft_coding_keyflex_id = paaf.soft_coding_keyflex_id
and paaf.assignment_id = p_assignment_id
and p_effective_date between paaf.effective_start_date and paaf.effective_end_date;
select bus.business_group_id
, bus.legislation_code
from per_all_assignments_f paf
, per_business_groups_perf bus
where paf.assignment_id = p_assignment_id
and l_effective_date between paf.effective_start_date
and paf.effective_end_date
and bus.business_group_id = paf.business_group_id;
select bus.business_group_id
, bus.legislation_code
from per_all_people_f papf
, per_business_groups_perf bus
where papf.person_id = p_person_id
and l_effective_date between papf.effective_start_date
and papf.effective_end_date
and bus.business_group_id = papf.business_group_id;