The following lines contain the word 'select', 'insert', 'update' or 'delete':
select global_value
Into l_adoption_spouse_min_leave
from ff_globals_f
where global_name ='FR_ADOPTION_SPOUSE_MIN_LEAVE'
and legislation_code = 'FR'
and business_group_id is null;
procedure PERSON_ABSENCE_UPDATE(
p_absence_attendance_id IN Number
,p_abs_information_category IN varchar2
,p_date_start IN Date
,p_date_end IN Date
,p_abs_information1 IN Varchar2
,p_abs_information4 IN Varchar2
,p_abs_information5 IN Varchar2
,p_abs_information6 IN Varchar2
,p_abs_information7 IN Varchar2
,p_abs_information8 IN Varchar2
,p_abs_information9 IN Varchar2
,p_abs_information10 IN Varchar2
,p_abs_information11 IN Varchar2
,p_abs_information12 IN Varchar2
) IS
l_person_id number;
l_proc varchar2(200) := g_package||'person_absence_update';
select person_id
from per_absence_attendances
where absence_attendance_id =p_absence_attendance_id;
select global_value
Into l_adoption_spouse_min_leave
from ff_globals_f
where global_name ='FR_ADOPTION_SPOUSE_MIN_LEAVE'
and legislation_code = 'FR'
and business_group_id is null;
end PERSON_ABSENCE_UPDATE;
SELECT max(object_version_number) INTO l_ovn
FROM pay_element_entries_f
WHERE element_entry_id = l_element_entry_id;
SELECT to_number(substr(to_char(p_date_start,'J'),4,4)) INTO l_sub
FROM dual;
PAY_ELEMENT_ENTRY_API.update_element_entry
(p_validate => FALSE
,p_datetrack_update_mode => 'CORRECTION'
,p_effective_date => l_effective_start_date
,p_business_group_id => p_business_group_id
,p_element_entry_id => l_element_entry_id
,p_object_version_number => l_ovn
,p_subpriority => l_sub
,p_effective_start_date => l_o_start_dt
,p_effective_end_date => l_o_end_dt
,p_update_warning => l_o_warning);
procedure PERSON_ENTRY_UPDATE(
p_absence_attendance_id IN Number
,p_abs_information_category IN Varchar2
,p_date_start IN Date
) IS
l_proc VARCHAR2(200) := g_package ||'person_entry_update';
hr_utility.set_location('Entering hook Person_entry_Update',10);
hr_utility.set_location(' IN Update User hook ',20);
hr_utility.set_location(' IN Update, setting subpriority for entry_id='||l_element_entry_id,30);
SELECT max(object_version_number) INTO l_ovn
FROM pay_element_entries_f
WHERE element_entry_id = l_element_entry_id;
select business_group_id INTO l_bus_grp_id
from per_absence_attendances
where absence_attendance_id = p_absence_attendance_id;
SELECT to_number(substr(to_char(p_date_start,'J'),4,4)) INTO l_sub
FROM dual;
hr_utility.set_location(' IN Update, sub='||l_sub||' ovn='||l_ovn,30);
PAY_ELEMENT_ENTRY_API.update_element_entry
(p_validate => FALSE
,p_datetrack_update_mode => 'CORRECTION'
,p_effective_date => l_effective_start_date
,p_business_group_id => l_bus_grp_id
,p_element_entry_id => l_element_entry_id
,p_object_version_number => l_ovn
,p_subpriority => l_sub
,p_effective_start_date => l_o_start_dt
,p_effective_end_date => l_o_end_dt
,p_update_warning => l_o_warning);
hr_utility.set_location('Leaving hook Person_entry_Update',90);
END PERSON_ENTRY_UPDATE;
Select pap.accrual_plan_id, pabt.absence_category
from pay_accrual_plans pap,
per_absence_attendance_types pabt
where pabt.absence_attendance_type_id = p_absence_attendance_type_id
and pap.pto_input_value_id= pabt.input_value_id;
select nvl(sum(pevm.screen_entry_value),0)
from pay_element_entry_values_f pevm
,pay_element_entries_f pee
,per_all_assignments_f pasg
where pevm.input_value_id = c_type_m_iv_id
and pee.element_entry_id = pevm.element_entry_id
and pevm.effective_start_date between c_start_date and c_end_date
and pee.effective_start_date between c_start_date and c_end_date
and pee.assignment_id = pasg.assignment_id
and pasg.person_id = p_person_id;
Select max(ppos.date_start)
From per_periods_of_service ppos
Where ppos.person_id = c_person_id
And ppos.date_start <= p_date_start;
Select sum(date_end-date_start+1)
from per_absence_attendances
where person_id = p_person_id
and date_end < p_date_start
and date_start >= p_from_date
and absence_attendance_type_id = p_absence_attendance_type_id;
PROCEDURE CHECK_ADD_ABS_ENT_UPDATE(p_absence_days in number,
p_absence_attendance_id in number,
p_date_start in date)
IS
--
-- Cursor to find the accrual plan id
-- and absence type
Cursor csr_get_accrual_plan is
Select pap.accrual_plan_id,
pabt.absence_category,
pabs.person_id,
pabt.absence_attendance_type_id
from pay_accrual_plans pap,
per_absence_attendance_types pabt,
per_absence_attendances pabs
where pabs.absence_attendance_id = p_absence_attendance_id
and pabt.absence_attendance_type_id = pabs.absence_attendance_type_id
and pap.pto_input_value_id= pabt.input_value_id;
select nvl(sum(pevm.screen_entry_value),0)
from pay_element_entry_values_f pevm
,pay_element_entries_f pee
,per_all_assignments_f pasg
where pevm.input_value_id = c_type_m_iv_id
and pee.element_entry_id = pevm.element_entry_id
and pevm.effective_start_date between c_start_date and c_end_date
and pee.effective_start_date between c_start_date and c_end_date
and pee.assignment_id = pasg.assignment_id
and pasg.person_id = c_person_id;
Select max(ppos.date_start)
From per_periods_of_service ppos
Where ppos.person_id = c_person_id
And ppos.date_start <= p_date_start;
Select sum(date_end-date_start+1)
from per_absence_attendances
where person_id = p_person_id
and date_end < p_date_start
and date_start >= p_from_date
and absence_attendance_type_id = p_absence_attendance_type_id;
l_proc varchar2(200) := g_package ||'check_add_abs_ent_update';
hr_utility.set_location('Entering entilement update user hook', 22);
hr_utility.set_location('Leaving entilement update user hook', 22);
END CHECK_ADD_ABS_ENT_UPDATE;
Select end_date_active
from hr_lookups
where lookup_type = 'FR_TRAINING_LEAVE_CATEGORY'
and lookup_code = 'TRAINING_CREDIT';