The following lines contain the word 'select', 'insert', 'update' or 'delete':
select *
from pay_batch_lines bal
where bal.batch_id = l_batch_id
order by bal.batch_line_id
for update;
select *
from pay_batch_lines bal
where bal.assignment_id = l_asg_id
and bal.batch_id = l_batch_id
and bal.batch_line_status not in ('T','E') /* Bug 13814081 */
order by bal.batch_sequence,bal.batch_line_id
for update;
select *
from pay_batch_control_totals bac
where bac.batch_id = l_batch_id
and bac.control_status <> 'T'
for update;
select *
from pay_batch_headers bah
where bah.batch_id = l_batch_id
for update;
select *
from pay_batch_headers bah
where bah.batch_id = l_batch_id;
select 'x'
from hr_lookups hlk
where hlk.lookup_type = 'BATCH_STATUS'
and sysdate between nvl(hlk.start_date_active,sysdate)
and nvl(hlk.end_date_active,
hr_general.end_of_time)
and hlk.enabled_flag = 'Y'
and hlk.lookup_code = upper(l_user_status);
procedure insert_element_entry
(
p_link_id in number,
l_line_record in out nocopy csr_all_lines%ROWTYPE,
p_asg_act_id in number,
p_creator_type in varchar2,
p_absence_attendance_id in number,
p_entry_values_count in number,
p_passed_inp_tbl in hr_entry.number_table,
p_passed_val_tbl in hr_entry.varchar2_table
);
procedure update_element_entry
(
p_update_mode in varchar2,
p_element_entry_id in number,
p_creator_type in varchar2,
p_creator_id in number,
p_allow_rollback in boolean,
p_asg_act_id in number,
l_line_record in csr_all_lines%ROWTYPE,
p_entry_values_count in number,
p_passed_inp_tbl in hr_entry.number_table,
p_passed_val_tbl in hr_entry.varchar2_table
);
select HL.meaning
from hr_lookups HL
where HL.lookup_type = p_lookup_type
and HL.lookup_code = p_lookup_code;
select null
into l_dummy
from fnd_sessions
where session_id = userenv('sessionid');
hr_utility.fnd_insert(sysdate);
select legislation_code
into l_legislation_code
from per_business_groups_perf
where business_group_id = p_business_group_id;
insert into pay_message_lines
(LINE_SEQUENCE,
PAYROLL_ID,
MESSAGE_LEVEL,
SOURCE_ID,
SOURCE_TYPE,
LINE_TEXT)
values (
pay_message_lines_s.nextval,
null,
'F',
g_line_record.batch_line_id,
'L',
l_error_text);
update pay_batch_lines
set batch_line_status = 'E'
where current of csr_all_lines;
select asg.assignment_id
into l_assignment_id
from per_assignments_f asg
where asg.assignment_number =
g_line_record.assignment_number
and g_line_record.effective_date between asg.effective_start_date
and asg.effective_end_date
and asg.business_group_id + 0 = p_business_group_id;
update pay_batch_lines
set assignment_id = l_assignment_id
where current of csr_all_lines;
insert into pay_message_lines
(LINE_SEQUENCE,
PAYROLL_ID,
MESSAGE_LEVEL,
SOURCE_ID,
SOURCE_TYPE,
LINE_TEXT)
values (
pay_message_lines_s.nextval,
null,
'F',
g_line_record.batch_line_id,
'L',
l_error_text);
update pay_batch_lines
set batch_line_status = 'E'
where current of csr_all_lines;
select asg.assignment_id
into l_assignment_id
from per_assignments_f asg
where upper(asg.assignment_number) =
upper(g_line_record.assignment_number)
and g_line_record.effective_date between
asg.effective_start_date
and asg.effective_end_date
and asg.business_group_id = p_business_group_id;
update pay_batch_lines
set assignment_id = l_assignment_id
where current of csr_all_lines;
insert into pay_message_lines
(LINE_SEQUENCE,
PAYROLL_ID,
MESSAGE_LEVEL,
SOURCE_ID,
SOURCE_TYPE,
LINE_TEXT)
values (
pay_message_lines_s.nextval,
null,
'F',
g_line_record.batch_line_id,
'L',
l_error_text);
update pay_batch_lines
set batch_line_status = 'E'
where current of csr_all_lines;
insert into pay_message_lines
(LINE_SEQUENCE,
PAYROLL_ID,
MESSAGE_LEVEL,
SOURCE_ID,
SOURCE_TYPE,
LINE_TEXT)
values (
pay_message_lines_s.nextval,
null,
'F',
g_line_record.batch_line_id,
'L',
l_error_text);
update pay_batch_lines
set batch_line_status = 'E'
where current of csr_all_lines;
insert into pay_message_lines
(LINE_SEQUENCE,
PAYROLL_ID,
MESSAGE_LEVEL,
SOURCE_ID,
SOURCE_TYPE,
LINE_TEXT)
values (
pay_message_lines_s.nextval,
null,
'F',
g_line_record.batch_line_id,
'L',
l_error_text);
update pay_batch_lines
set batch_line_status = 'E'
where current of csr_all_lines;
select 'x'
into l_assignment_exists
from per_assignments_f asg
where asg.assignment_number =
g_line_record.assignment_number
and asg.assignment_id = g_line_record.assignment_id
and g_line_record.effective_date between asg.effective_start_date
and asg.effective_end_date
and asg.business_group_id + 0 = p_business_group_id;
select 'x'
into l_assignment_exists
from per_assignments_f asg
where upper(asg.assignment_number) =
upper(g_line_record.assignment_number)
and asg.assignment_id = g_line_record.assignment_id
and g_line_record.effective_date between asg.effective_start_date
and asg.effective_end_date
and asg.business_group_id +0 = p_business_group_id;
insert into pay_message_lines
(LINE_SEQUENCE,
PAYROLL_ID,
MESSAGE_LEVEL,
SOURCE_ID,
SOURCE_TYPE,
LINE_TEXT)
values (
pay_message_lines_s.nextval,
null,
'F',
g_line_record.batch_line_id,
'L',
l_error_text);
update pay_batch_lines
set batch_line_status = 'E'
where current of csr_all_lines;
select 'x'
into l_assignment_exists
from per_assignments_f asg
where asg.assignment_id = g_line_record.assignment_id
and g_line_record.effective_date between asg.effective_start_date
and asg.effective_end_date
and asg.business_group_id +0 = p_business_group_id;
insert into pay_message_lines
(LINE_SEQUENCE,
PAYROLL_ID,
MESSAGE_LEVEL,
SOURCE_ID,
SOURCE_TYPE,
LINE_TEXT)
values (
pay_message_lines_s.nextval,
null,
'F',
g_line_record.batch_line_id,
'L',
l_error_text);
update pay_batch_lines
set batch_line_status = 'E'
where current of csr_all_lines;
select 'Y'
from pay_batch_lines pbl
where pbl.batch_line_status = 'E'
and pbl.batch_id = p_batch_id;
select 'Y'
from pay_batch_control_totals pct
where pct.control_status = 'E'
and pct.batch_id = p_batch_id;
select 'Y'
from pay_batch_headers pbh
where pbh.batch_status = 'E'
and pbh.batch_id = p_batch_id;
select pbh.batch_status,
pbh.purge_after_transfer
from pay_batch_headers pbh
where pbh.batch_id = p_batch_id;
update pay_batch_headers
set batch_status = l_status
where batch_id = p_batch_id;
update pay_batch_control_totals
set control_status = l_status
where current of csr_all_controls;
update pay_batch_headers
set batch_status = l_status
where batch_id = p_batch_id;
insert into pay_message_lines
(LINE_SEQUENCE,
PAYROLL_ID,
MESSAGE_LEVEL,
SOURCE_ID,
SOURCE_TYPE,
LINE_TEXT)
values (
pay_message_lines_s.nextval,
null,
g_status_tbl(l_error_count),
g_line_id_tbl(l_error_count),
'L',
g_message_tbl(l_error_count));
update pay_batch_lines bal
set bal.batch_line_status =
decode(l_batch_line_status,
'T',decode(g_status_tbl(l_error_count),'F','E','T'),
decode(g_status_tbl(l_error_count),'F','E','V'))
where current of csr_asg_lines;
update pay_batch_lines bal
set bal.batch_line_status = l_batch_line_status
where current of csr_asg_lines;
g_line_id_tbl.delete;
g_status_tbl.delete;
g_message_tbl.delete;
insert into pay_message_lines
(LINE_SEQUENCE,
PAYROLL_ID,
MESSAGE_LEVEL,
SOURCE_ID,
SOURCE_TYPE,
LINE_TEXT)
values (
pay_message_lines_s.nextval,
null,
g_head_err_stat,
p_batch_id,
'H',
g_head_err_msg);
update pay_batch_headers
set batch_status = 'E'
where batch_id = p_batch_id;
insert into pay_message_lines
(LINE_SEQUENCE,
PAYROLL_ID,
MESSAGE_LEVEL,
SOURCE_ID,
SOURCE_TYPE,
LINE_TEXT)
values (
pay_message_lines_s.nextval,
null,
g_ctl_stat_tbl(l_error_count),
g_ctl_id_tbl(l_error_count),
'C',
g_ctl_mess_tbl(l_error_count));
update pay_batch_control_totals ctl
set ctl.control_status =
decode(g_ctl_stat_tbl(l_error_count),'F','E','V')
where current of csr_all_controls;
update pay_batch_control_totals ctl
set ctl.control_status = 'V'
where current of csr_all_controls;
update pay_batch_control_totals
set control_status = decode(p_batch_operation,'TRANSFER','T','VALIDATE','V','P')
where batch_id = p_batch_id
and control_status = 'V'
and exists
( select null
from pay_batch_headers pbh
where pbh.batch_id = p_batch_id
and pbh.batch_status = 'P');
update pay_batch_headers
set batch_status = decode(p_batch_operation,'TRANSFER','T','VALIDATE','V','P')
where batch_id = p_batch_id
and batch_status = 'P';
g_ctl_id_tbl.delete;
g_ctl_stat_tbl.delete;
g_ctl_mess_tbl.delete;
select pbh.object_version_number
from pay_batch_headers pbh
where pbh.batch_id = p_batch_id;
PAY_BATCH_ELEMENT_ENTRY_API.delete_batch_header
(p_batch_id => p_batch_id
,p_object_version_number => l_ovn
);
delete from pay_batch_control_totals
where batch_id = p_batch_id;
delete from pay_batch_lines
where batch_id = p_batch_id;
delete from pay_batch_headers
where batch_id = p_batch_id;
select legislation_code
into l_legislation_code
from per_business_groups_perf
where business_group_id = p_business_group_id;
select 'x'
into l_transfer_recs
from sys.dual
where exists
(select null
from pay_batch_headers bah
, pay_batch_lines bal
, pay_batch_control_totals bac
where bah.batch_id = bal.batch_id(+)
and bah.batch_id = bac.batch_id(+)
and bah.batch_id = p_batch_id
and ((bah.batch_status not in ('T','P')
and (bal.batch_line_status = 'T'
or bac.control_status = 'T'))));
select batch_status into l_process_recs
from pay_batch_headers
where batch_id = p_batch_id
for update;
update pay_batch_headers bah
set bah.batch_status = 'P'
where bah.batch_id = p_batch_id;
update pay_batch_control_totals bac
set bac.control_status = 'U'
where bac.batch_id = p_batch_id
and bac.control_status <> 'T';
update pay_batch_lines bal
set bal.batch_line_status = 'U'
where bal.batch_id = p_batch_id
and bal.batch_line_status <> 'T';
g_ctl_id_tbl.delete;
g_ctl_stat_tbl.delete;
g_ctl_mess_tbl.delete;
select 'x'
into l_exists
from sys.dual
where exists
(select null
from hr_lookups hlk
where upper( hlk.lookup_type) = 'CONTROL_TYPE'
and sysdate between nvl(hlk.start_date_active,sysdate)
and nvl(hlk.end_date_active,
hr_general.end_of_time)
and hlk.enabled_flag = 'Y');
select 'x'
into l_exists
from hr_lookups hlk
where hlk.lookup_type = 'CONTROL_TYPE'
and sysdate between nvl(hlk.start_date_active,
sysdate)
and nvl(hlk.end_date_active,
hr_general.end_of_time)
and hlk.enabled_flag = 'Y'
and upper(g_control_record.control_type) in (hlk.lookup_code);
select hlk.meaning into l_std_message -- we already checked to see if this
from hr_lookups hlk -- control type exists so we can select meaning
where hlk.lookup_type = 'CONTROL_TYPE'
and hlk.lookup_code = g_control_record.control_type;
l_update_mode varchar2(30) := null;
select 'Y'
from pay_batch_headers pbh
where pbh.batch_status = 'E'
and pbh.batch_id = p_batch_id;
select 'Y'
from pay_batch_lines pbl
where pbl.batch_id = l_batch_id
and pbl.assignment_id = l_asg_id
and pbl.batch_line_status in ('T','E');
select 'Y'
from pay_batch_control_totals pct
where pct.control_status = 'E'
and pct.batch_id = p_batch_id;
select fnd_number.canonical_to_number(parameter_value)
from pay_action_parameters
where parameter_name = 'BEE_LOCK_MAX_WAIT_SEC';
select fnd_number.canonical_to_number(parameter_value)
from pay_action_parameters
where parameter_name = 'BEE_LOCK_INTERVAL_WAIT_SEC';
select inv.input_value_id,
inv.uom,
inv.lookup_type,
inv.value_set_id,
etp.input_currency_code
from pay_input_values_f inv,
pay_element_types_f etp
where inv.element_type_id = l_element_type_id
and etp.element_type_id = l_element_type_id
-- and ((inv.business_group_id +0 = l_business_group_id) OR
-- ((inv.business_group_id IS NULL) AND
-- (l_business_group_id IS NULL)))
and l_effective_date between inv.effective_start_date
and inv.effective_end_date
and l_effective_date between etp.effective_start_date
and etp.effective_end_date
order by inv.display_sequence
, inv.name;
select ee.element_entry_id
, ee.creator_type
, ee.creator_id
, ee.effective_end_date
, ee.effective_start_date
from pay_element_entries_f ee
, pay_element_types_f et
, pay_element_links_f el
, per_all_assignments_f asg
where el.element_link_id = ee.element_link_id
and et.element_type_id = el.element_type_id
and ee.assignment_id = asg.assignment_id
and l_effective_date between ee.effective_start_date
and ee.effective_end_date
and l_effective_date between el.effective_start_date
and el.effective_end_date
and l_effective_date between et.effective_start_date
and et.effective_end_date
and l_effective_date between asg.effective_start_date
and asg.effective_end_date
and el.element_link_id = l_link_id
and et.element_type_id = l_element_type_id
and asg.assignment_id = l_assignment_id
and ee.entry_type = 'E'
-- For bug 13496730
and ((ee.date_earned is null and l_date_earned is null)
or ee.date_earned = l_date_earned);
select null
from pay_element_entries_f ee
, pay_element_types_f et
, pay_element_links_f el
, per_all_assignments_f asg
where el.element_link_id = ee.element_link_id
and et.element_type_id = el.element_type_id
and ee.assignment_id = asg.assignment_id
and ee.effective_start_date > l_effective_date
and el.element_link_id =l_link_id
and et.element_type_id =l_element_type_id
and asg.assignment_id = l_assignment_id
and ee.entry_type = 'E';
select paat.absence_attendance_type_id
, paat.hours_or_days
from per_absence_attendance_types paat
where paat.input_value_id = l_passed_inp_val
and paat.business_group_id +0 = l_business_group_id
and date_effective <= l_passed_start_date
and (nvl(date_end,hr_general.end_of_time) >= l_passed_end_date
or l_passed_end_date is null);
g_line_id_tbl.delete;
g_status_tbl.delete;
g_message_tbl.delete;
select fnd_number.canonical_to_number(bsg.cost_allocation_structure)
, bsg.legislation_code
into l_cost_allocation_structure
, l_legislation_code
from per_business_groups_perf bsg
where bsg.business_group_id = p_business_group_id
and bsg.enabled_flag = 'Y';
select null
into l_dummy
from dual
where exists(select null
from pay_element_types_f ET,
ben_benefit_classifications BCL
where ET.element_type_id = g_line_record.element_type_id
and ET.benefit_classification_id = BCL.benefit_classification_id
and BCL.contributions_used = 'Y');
UPDATE pay_batch_lines
SET effective_date = g_line_record.effective_date
WHERE CURRENT OF csr_asg_lines;
select elt.element_type_id -- ,business_group_id -- CWA
into l_element_type_id -- ,l_business_group_id -- CWA
from pay_element_types_f elt
where upper(elt.element_name) = upper(g_line_record.element_name)
and g_line_record.effective_date between elt.effective_start_date
and elt.effective_end_date
and (elt.business_group_id = p_business_group_id
or (elt.business_group_id is null
and elt.legislation_code = l_legislation_code)
or (elt.business_group_id is null
and elt.legislation_code is null));
update pay_batch_lines
set element_type_id = g_line_record.element_type_id
where current of csr_asg_lines;
select 'x' -- ,business_group_id -- CWA
into l_element_exists -- ,l_business_group_id -- CWA
from pay_element_types_f elt
where upper(elt.element_name) = upper(g_line_record.element_name)
and elt.element_type_id = g_line_record.element_type_id
and g_line_record.effective_date between elt.effective_start_date
and elt.effective_end_date
and (elt.business_group_id +0 = p_business_group_id
or (elt.business_group_id is null
and elt.legislation_code = l_legislation_code)
or (elt.business_group_id is null
and elt.legislation_code is null));
select 'x' -- ,business_group_id -- CWA
into l_element_exists -- ,l_business_group_id -- CWA
from pay_element_types_f elt
where elt.element_type_id = g_line_record.element_type_id
and g_line_record.effective_date between elt.effective_start_date
and elt.effective_end_date
and (elt.business_group_id +0 = p_business_group_id
or (elt.business_group_id is null
and elt.legislation_code = l_legislation_code)
or (elt.business_group_id is null
and elt.legislation_code is null));
select el.costable_type
into l_costable_type
from pay_element_links_f el
where el.element_link_id = l_link_id
and el.business_group_id + 0 = p_business_group_id
and g_line_record.effective_date between el.effective_start_date
and el.effective_end_date;
select *
into g_line_record2
from pay_batch_lines bal
where bal.batch_id = p_batch_id
and bal.batch_line_id = g_line_record.batch_line_id;
select et.multiple_entries_allowed_flag
, et.processing_type
into l_multiple_entries_allowed
, l_processing_type
from pay_element_types_f et
where et.element_type_id =g_line_record.element_type_id
and g_line_record.effective_date between
et.effective_start_date and et.effective_end_date;
per_absence_attendances_pkg3.insert_abs_for_bee(
p_absence_att_type_id => l_abs_type_tbl(l),
p_batch_id => p_batch_id,
p_asg_act_id => p_asg_act_id,
p_entry_values_count => c_entry_values,
p_hours_or_days => l_abs_hod_tbl(l),
p_format => l_inpv_uom_tbl(l),
p_value => l_passed_val_tbl(l), -- A
p_date_start => l_start_date,
p_date_end => l_end_date,
p_absence_attendance_id => l_absence_attendance_id,
p_line_record => g_line_record,
p_passed_inp_tbl => l_passed_inp_tbl,
p_passed_val_tbl => l_passed_val_tbl, -- B
p_warning_table => l_warning_table,
p_error_table => l_error_table);
payplnk.insert_element_entry(l_link_id,
g_line_record1,
p_asg_act_id,
l_creator_type,
l_absence_attendance_id,
c_entry_values,
l_passed_inp_tbl,
l_passed_val_tbl);
payplnk.insert_element_entry (l_link_id,
g_line_record1,
p_asg_Act_id,
l_creator_type,
l_absence_attendance_id,
c_entry_values,
l_passed_inp_tbl,
l_passed_val_tbl);
update_element_entry('CORRECTION',
l_element_entry_id,
e_creator_type,
e_creator_id,
FALSE,
p_asg_act_id,
g_line_record,
c_entry_values,
l_passed_inp_tbl,
l_passed_val_tbl);
l_update_mode := 'CORRECTION';
l_update_mode := 'UPDATE';
update_element_entry(l_update_mode,
l_element_entry_id,
e_creator_type,
e_creator_id,
l_allow_rollback,
p_asg_act_id,
g_line_record,
c_entry_values,
l_passed_inp_tbl,
l_passed_val_tbl);
l_update_mode := 'CORRECTION';
l_update_mode := 'UPDATE_CHANGE_INSERT';
l_update_mode := 'UPDATE_OVERRIDE';
update_element_entry(l_update_mode,
l_element_entry_id,
e_creator_type,
e_creator_id,
l_allow_rollback,
p_asg_act_id,
g_line_record,
c_entry_values,
l_passed_inp_tbl,
l_passed_val_tbl);
select batch_control_id
from pay_batch_control_totals
where batch_id = p_batch_id
and (control_status <> 'T' or p_mode='Y');
select batch_line_id
from pay_batch_lines
where batch_id = p_batch_id
and (batch_line_status <> 'T' or p_mode='Y');
delete from pay_message_lines
where source_type = 'C'
and source_id = pclrec.batch_control_id;
delete from pay_message_lines
where source_type = 'L'
and source_id = pblrec.batch_line_id;
delete from pay_message_lines
where source_type = 'H'
and source_id = p_batch_id
and (not exists
(select null
from pay_batch_lines pbl
where pbl.batch_id = p_batch_id
and pbl.batch_line_status = 'T')
or p_mode='Y');
procedure insert_element_entry
(
p_link_id in number,
l_line_record in out nocopy csr_all_lines%ROWTYPE,
p_asg_act_id in number,
p_creator_type in varchar2,
p_absence_attendance_id in number,
p_entry_values_count in number,
p_passed_inp_tbl in hr_entry.number_table,
p_passed_val_tbl in hr_entry.varchar2_table
) is
--
l_effective_end_date date := null;
select 'Y'
from pay_element_types_f pet,
pay_element_classifications pec
where pet.element_type_id = l_line_record.element_type_id
and pet.CLASSIFICATION_ID = pec.CLASSIFICATION_ID
and pet.PROCESSING_TYPE = 'R'
and pec.legislation_code is not null
and pec.CLASSIFICATION_name like 'EXTERNAL_REPORTING%'
and pec.legislation_code = 'GB';
hr_utility.set_location('payplnk.insert_element_entry',5);
select hl.lookup_code
into l_reason
from hr_lookups hl
where hl.lookup_type = 'ELE_ENTRY_REASON'
and hl.meaning = l_line_record.reason;
hr_utility.set_location('GHR Installed....insert_element_entry .. Pre...',5);
select to_number(((to_char(sysdate, 'J') - 1 ) * 86400) +
to_char(sysdate, 'SSSSS'))
into l_stime
from sys.dual;
hr_entry_api.insert_element_entry(
p_effective_start_date => l_effective_start_date,
p_effective_end_date => l_effective_end_date,
p_element_entry_id => l_element_entry_id,
p_assignment_id => l_line_record.assignment_id,
p_element_link_id => p_link_id,
p_creator_type => p_creator_type,
p_creator_id => l_creator_id,
p_entry_type => 'E',
p_cost_allocation_keyflex_id =>
l_line_record.cost_allocation_keyflex_id,
p_reason => l_reason,
--
p_subpriority => l_line_record.subpriority,
p_date_earned => l_line_record.date_earned,
p_personal_payment_method_id => l_line_record.personal_payment_method_id,
--
p_attribute_category => l_line_record.attribute_category,
p_attribute1 => l_line_record.attribute1,
p_attribute2 => l_line_record.attribute2,
p_attribute3 => l_line_record.attribute3,
p_attribute4 => l_line_record.attribute4,
p_attribute5 => l_line_record.attribute5,
p_attribute6 => l_line_record.attribute6,
p_attribute7 => l_line_record.attribute7,
p_attribute8 => l_line_record.attribute8,
p_attribute9 => l_line_record.attribute9,
p_attribute10 =>l_line_record.attribute10,
p_attribute11 =>l_line_record.attribute11,
p_attribute12 =>l_line_record.attribute12,
p_attribute13 =>l_line_record.attribute13,
p_attribute14 =>l_line_record.attribute14,
p_attribute15 =>l_line_record.attribute15,
p_attribute16 =>l_line_record.attribute16,
p_attribute17 =>l_line_record.attribute17,
p_attribute18 =>l_line_record.attribute18,
p_attribute19 =>l_line_record.attribute19,
p_attribute20 =>l_line_record.attribute20,
p_entry_information_category => l_line_record.entry_information_category,
p_entry_information1 => l_line_record.entry_information1,
p_entry_information2 => l_line_record.entry_information2,
p_entry_information3 => l_line_record.entry_information3,
p_entry_information4 => l_line_record.entry_information4,
p_entry_information5 => l_line_record.entry_information5,
p_entry_information6 => l_line_record.entry_information6,
p_entry_information7 => l_line_record.entry_information7,
p_entry_information8 => l_line_record.entry_information8,
p_entry_information9 => l_line_record.entry_information9,
p_entry_information10 => l_line_record.entry_information10,
p_entry_information11 => l_line_record.entry_information11,
p_entry_information12 => l_line_record.entry_information12,
p_entry_information13 => l_line_record.entry_information13,
p_entry_information14 => l_line_record.entry_information14,
p_entry_information15 => l_line_record.entry_information15,
p_entry_information16 => l_line_record.entry_information16,
p_entry_information17 => l_line_record.entry_information17,
p_entry_information18 => l_line_record.entry_information18,
p_entry_information19 => l_line_record.entry_information19,
p_entry_information20 => l_line_record.entry_information20,
p_entry_information21 => l_line_record.entry_information21,
p_entry_information22 => l_line_record.entry_information22,
p_entry_information23 => l_line_record.entry_information23,
p_entry_information24 => l_line_record.entry_information24,
p_entry_information25 => l_line_record.entry_information25,
p_entry_information26 => l_line_record.entry_information26,
p_entry_information27 => l_line_record.entry_information27,
p_entry_information28 => l_line_record.entry_information28,
p_entry_information29 => l_line_record.entry_information29,
p_entry_information30 => l_line_record.entry_information30,
/** sbilling **/
--p_num_entry_values => p_entry_values_count,
p_num_entry_values => j,
p_input_value_id_tbl => c_passed_inp_tbl,
p_entry_value_tbl => c_passed_val_tbl);
select to_number(((to_char(sysdate, 'J') - 1 ) * 86400) +
to_char(sysdate, 'SSSSS'))
into l_etime
from sys.dual;
update pay_element_entries_f
set source_id = p_asg_act_id
where element_entry_id = l_element_entry_id;
hr_entry_api.delete_element_entry(p_dt_delete_mode => 'DELETE',
p_session_date => l_effective_end_date,
p_element_entry_id =>l_element_entry_id);
hr_utility.set_location('GHR Installed....insert_element_entry .. Post ',6);
ghr_history_api.post_update_process;
hr_utility.set_location('payplnk.insert_element_entry',10);
end insert_element_entry;
procedure update_element_entry
(
p_update_mode in varchar2,
p_element_entry_id in number,
p_creator_type in varchar2,
p_creator_id in number,
p_allow_rollback in boolean,
p_asg_act_id in number,
l_line_record in csr_all_lines%ROWTYPE,
p_entry_values_count in number,
p_passed_inp_tbl in hr_entry.number_table,
p_passed_val_tbl in hr_entry.varchar2_table
) is
--
l_reason hr_lookups.lookup_code%TYPE := null;
hr_utility.set_location('payplnk.update_element_entry',5);
select hl.lookup_code
into l_reason
from hr_lookups hl
where hl.lookup_type = 'ELE_ENTRY_REASON'
and hl.meaning = l_line_record.reason;
hr_utility.set_location('GHR Installed....update_element_entry .. Pre ',5);
select to_number(((to_char(sysdate, 'J') - 1 ) * 86400) +
to_char(sysdate, 'SSSSS'))
into l_stime
from sys.dual;
hr_entry_api.update_element_entry(
p_dt_update_mode => p_update_mode,
p_session_date => l_line_record.effective_date,
p_element_entry_id => p_element_entry_id,
p_cost_allocation_keyflex_id =>
l_line_record.cost_allocation_keyflex_id,
p_reason => l_reason,
--
p_subpriority => l_line_record.subpriority,
p_date_earned => l_line_record.date_earned,
p_personal_payment_method_id => l_line_record.personal_payment_method_id,
--
p_creator_id => null,
p_attribute_category => l_line_record.attribute_category,
p_attribute1 => l_line_record.attribute1,
p_attribute2 => l_line_record.attribute2,
p_attribute3 => l_line_record.attribute3,
p_attribute4 => l_line_record.attribute4,
p_attribute5 => l_line_record.attribute5,
p_attribute6 => l_line_record.attribute6,
p_attribute7 => l_line_record.attribute7,
p_attribute8 => l_line_record.attribute8,
p_attribute9 => l_line_record.attribute9,
p_attribute10 => l_line_record.attribute10,
p_attribute11 => l_line_record.attribute11,
p_attribute12 => l_line_record.attribute12,
p_attribute13 => l_line_record.attribute13,
p_attribute14 => l_line_record.attribute14,
p_attribute15 => l_line_record.attribute15,
p_attribute16 => l_line_record.attribute16,
p_attribute17 => l_line_record.attribute17,
p_attribute18 => l_line_record.attribute18,
p_attribute19 => l_line_record.attribute19,
p_attribute20 => l_line_record.attribute20,
p_entry_information_category => l_line_record.entry_information_category,
p_entry_information1 => l_line_record.entry_information1,
p_entry_information2 => l_line_record.entry_information2,
p_entry_information3 => l_line_record.entry_information3,
p_entry_information4 => l_line_record.entry_information4,
p_entry_information5 => l_line_record.entry_information5,
p_entry_information6 => l_line_record.entry_information6,
p_entry_information7 => l_line_record.entry_information7,
p_entry_information8 => l_line_record.entry_information8,
p_entry_information9 => l_line_record.entry_information9,
p_entry_information10 => l_line_record.entry_information10,
p_entry_information11 => l_line_record.entry_information11,
p_entry_information12 => l_line_record.entry_information12,
p_entry_information13 => l_line_record.entry_information13,
p_entry_information14 => l_line_record.entry_information14,
p_entry_information15 => l_line_record.entry_information15,
p_entry_information16 => l_line_record.entry_information16,
p_entry_information17 => l_line_record.entry_information17,
p_entry_information18 => l_line_record.entry_information18,
p_entry_information19 => l_line_record.entry_information19,
p_entry_information20 => l_line_record.entry_information20,
p_entry_information21 => l_line_record.entry_information21,
p_entry_information22 => l_line_record.entry_information22,
p_entry_information23 => l_line_record.entry_information23,
p_entry_information24 => l_line_record.entry_information24,
p_entry_information25 => l_line_record.entry_information25,
p_entry_information26 => l_line_record.entry_information26,
p_entry_information27 => l_line_record.entry_information27,
p_entry_information28 => l_line_record.entry_information28,
p_entry_information29 => l_line_record.entry_information29,
p_entry_information30 => l_line_record.entry_information30,
p_num_entry_values => p_entry_values_count,
p_input_value_id_tbl => p_passed_inp_tbl,
p_entry_value_tbl => p_passed_val_tbl);
select to_number(((to_char(sysdate, 'J') - 1 ) * 86400) +
to_char(sysdate, 'SSSSS'))
into l_etime
from sys.dual;
hr_utility.set_location('GHR Installed....update_element_entry .. Post ',5);
ghr_history_api.post_update_process;
hr_utility.set_location('payplnk.update_element_entry',10);
update per_absence_attendances
set batch_id = null
where absence_attendance_id = p_creator_id;
hr_utility.set_location('payplnk.update_element_entry',15);
update pay_element_entries_f
set creator_id = p_creator_id,
creator_type = p_creator_type,
source_id = p_asg_act_id
where element_entry_id = p_element_entry_id
and l_line_record.effective_date between effective_start_date
and effective_end_date
and creator_type in ('H','F');
update pay_element_entries_f
set creator_id = null,
source_id = null
where element_entry_id = p_element_entry_id
and l_line_record.effective_date between effective_start_date
and effective_end_date
and creator_type ='H';
hr_utility.set_location('payplnk.update_element_entry',20);
end update_element_entry;