[Home] [Help]
150: p_retro_comp_id,
151: p_retro_asg_id
152: ) = 'Y'
153: and exists (select ''
154: from pay_assignment_actions paa
155: where paa.assignment_action_id = p_ee_creator_id
156: and paa.action_sequence < p_action_sequence
157: );
158: --
603: /* Get the earliest start date on the payroll actions */
604: select min(ppa.start_date)
605: into l_start_date
606: from pay_payroll_actions ppa,
607: pay_assignment_actions paa_ret,
608: pay_assignment_actions paa_mret
609: where ppa.effective_date between p_start_date
610: and p_effective_date
611: and ppa.action_type = 'L'
604: select min(ppa.start_date)
605: into l_start_date
606: from pay_payroll_actions ppa,
607: pay_assignment_actions paa_ret,
608: pay_assignment_actions paa_mret
609: where ppa.effective_date between p_start_date
610: and p_effective_date
611: and ppa.action_type = 'L'
612: and paa_ret.payroll_action_id = ppa.payroll_action_id
624: select min(pra.reprocess_date)
625: into l_reprocess_start_date
626: from pay_retro_assignments pra,
627: pay_payroll_actions ppa,
628: pay_assignment_actions paa_ret,
629: pay_assignment_actions paa_mret
630: where ppa.effective_date between p_start_date
631: and p_effective_date
632: and ppa.action_type = 'L'
625: into l_reprocess_start_date
626: from pay_retro_assignments pra,
627: pay_payroll_actions ppa,
628: pay_assignment_actions paa_ret,
629: pay_assignment_actions paa_mret
630: where ppa.effective_date between p_start_date
631: and p_effective_date
632: and ppa.action_type = 'L'
633: and paa_ret.payroll_action_id = ppa.payroll_action_id
672: --
673: cursor c_asg (p_assact number)
674: is
675: select paa.assignment_id
676: from pay_assignment_actions paa,
677: pay_assignment_actions paa2
678: where paa2.assignment_action_id = p_assact
679: and paa2.object_id = paa.object_id
680: and paa2.object_type = paa.object_type
673: cursor c_asg (p_assact number)
674: is
675: select paa.assignment_id
676: from pay_assignment_actions paa,
677: pay_assignment_actions paa2
678: where paa2.assignment_action_id = p_assact
679: and paa2.object_id = paa.object_id
680: and paa2.object_type = paa.object_type
681: and paa2.payroll_action_id = paa.payroll_action_id
1115: is
1116: select paa.assignment_action_id,
1117: paa.object_id process_group_id,
1118: ppa.effective_date
1119: from pay_assignment_actions paa,
1120: pay_payroll_actions ppa
1121: where paa.payroll_action_id = p_pactid
1122: and ppa.payroll_action_id = p_pactid
1123: and paa.source_action_id is null
1142: for actrec in get_actions(p_pactid, p_chunk_number) loop
1143: --
1144: for asgrec in get_asg(actrec.process_group_id, actrec.effective_date) loop
1145: --
1146: insert into pay_assignment_actions (
1147: assignment_action_id,
1148: assignment_id,
1149: payroll_action_id,
1150: action_status,
1155: source_action_id,
1156: object_id,
1157: object_type
1158: )
1159: select pay_assignment_actions_s.nextval,
1160: asgrec.source_id,
1161: p_pactid,
1162: 'U',
1163: p_chunk_number,
1160: asgrec.source_id,
1161: p_pactid,
1162: 'U',
1163: p_chunk_number,
1164: pay_assignment_actions_s.nextval,
1165: 1,
1166: asgrec.tax_unit_id,
1167: actrec.assignment_action_id,
1168: actrec.process_group_id,
1176: --
1177: end loop;
1178: --
1179: -- Now update the master Sequence
1180: update pay_assignment_actions
1181: set action_sequence = pay_assignment_actions_s.nextval
1182: where assignment_action_id = actrec.assignment_action_id;
1183: --
1184: end loop;
1177: end loop;
1178: --
1179: -- Now update the master Sequence
1180: update pay_assignment_actions
1181: set action_sequence = pay_assignment_actions_s.nextval
1182: where assignment_action_id = actrec.assignment_action_id;
1183: --
1184: end loop;
1185: --
1194: begin
1195: --
1196: select paa2.assignment_id
1197: into l_assignment
1198: from pay_assignment_actions paa2,
1199: per_all_assignments_f paf,
1200: pay_payroll_actions ppa
1201: where p_obj_grp_id = paa2.object_id
1202: and p_obj_type = paa2.object_type
1545: pay_element_types_f pet1,
1546: pay_input_values_f piv1,
1547: pay_run_results prr,
1548: pay_entry_process_details pepd,
1549: pay_assignment_actions paa,
1550: pay_payroll_actions ppa,
1551: pay_retro_components prc,
1552: pay_retro_defn_components prdc2,
1553: pay_retro_defn_components prdc
1621: l_date_earned,
1622: l_time_period_id,
1623: legcode
1624: from pay_payroll_actions ppa,
1625: pay_assignment_actions paa,
1626: per_business_groups pbg
1627: where ppa.payroll_action_id = paa.payroll_action_id
1628: and pbg.business_group_id = ppa.business_group_id
1629: and paa.assignment_action_id = p_asg_act_id;
1867: if the earliest overlapping_start_date is less than the recorded_date, then do full recalculations
1868: from the earliest overlapping_start_date.
1869: Otherwise, Balance Adjustments will be used till the reprocess_date and recalculations can be done from the reprocess_date.
1870: v_recorded_date is the date from which full recalculations are done. This is stored in serial_number column of
1871: pay_assignment_actions and can be queried after the retropay run to verify the recalculation_date used by the process.
1872: */
1873: if (l_rec_date = hr_api.g_sot OR
1874: p_adj_start_date < l_rec_date) THEN
1875: --
1905: v_recorded_date := l_min_retro_asg_date;
1906: --
1907: end if;
1908: --
1909: update pay_assignment_actions
1910: set serial_number = substr(fnd_date.date_to_canonical(v_recorded_date),1,11)
1911: where assignment_action_id = p_assact_id;
1912: --
1913: hr_utility.set_location('process_recorded_date', 40);
1925: hr_utility.set_location('reset_recorded_request', 10);
1926: --
1927: select to_date(substr(serial_number, 1,11), 'YYYY/MM/DD'), assignment_id
1928: into l_prev_rec_date, l_assign_id
1929: from pay_assignment_actions
1930: where assignment_action_id = p_assact_id;
1931: --
1932: hr_utility.set_location('reset_recorded_request', 20);
1933: --