[Home] [Help]
25: phattarg 08-JUL-2009 Bug 8614449. Created a new payroll action whenever a new
26: assignment action is created in overlap_adjustments.
27: ckesanap 04-MAR-2009 Bug 8407213. Insert overlap date(get_ee_overlap_date) and
28: recalculation_date(process_recorded_date) in serial_number
29: column of pay_assignment_actions.
30: Insert the previous recorded_date in label_identifier column
31: and accessed in reset_recorded_request for rollback of retropay.
32: ckesanap 17-SEP-2008 Bug 7335351. Modified process_recorded_date.
33: ckesanap 25-AUG-2008 Bug 7335351. Added a cursor get_proc_retro_rrv to
166: p_retro_comp_id,
167: p_retro_asg_id
168: ) = 'Y'
169: and exists (select ''
170: from pay_assignment_actions paa
171: where paa.assignment_action_id = p_ee_creator_id
172: and paa.action_sequence < p_action_sequence
173: );
174: --
624: /* Get the earliest start date on the payroll actions */
625: select min(ppa.start_date)
626: into l_start_date
627: from 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: select min(ppa.start_date)
626: into l_start_date
627: from 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
646: select min(pra.reprocess_date)
647: into l_reprocess_start_date
648: from pay_retro_assignments pra,
649: pay_payroll_actions ppa,
650: pay_assignment_actions paa_ret,
651: pay_assignment_actions paa_mret
652: where ppa.effective_date between p_start_date
653: and p_effective_date
654: and ppa.action_type = 'L'
647: into l_reprocess_start_date
648: from pay_retro_assignments pra,
649: pay_payroll_actions ppa,
650: pay_assignment_actions paa_ret,
651: pay_assignment_actions paa_mret
652: where ppa.effective_date between p_start_date
653: and p_effective_date
654: and ppa.action_type = 'L'
655: and paa_ret.payroll_action_id = ppa.payroll_action_id
694: --
695: cursor c_asg (p_assact number)
696: is
697: select paa.assignment_id
698: from pay_assignment_actions paa,
699: pay_assignment_actions paa2
700: where paa2.assignment_action_id = p_assact
701: and paa2.object_id = paa.object_id
702: and paa2.object_type = paa.object_type
695: cursor c_asg (p_assact number)
696: is
697: select paa.assignment_id
698: from pay_assignment_actions paa,
699: pay_assignment_actions paa2
700: where paa2.assignment_action_id = p_assact
701: and paa2.object_id = paa.object_id
702: and paa2.object_type = paa.object_type
703: and paa2.payroll_action_id = paa.payroll_action_id
703: and paa2.payroll_action_id = paa.payroll_action_id
704: and paa.assignment_id is not null;
705: --
706: l_adj_start_date date;
707: l_serial_number pay_assignment_actions.serial_number%type;
708: --
709: begin
710: --
711: p_adj_start_date := p_start_date;
718: p_adj_start_date := least(p_adj_start_date, l_adj_start_date);
719: --
720: end loop;
721:
722: -- bug 8407213. Log earliest_overlap_date in serial_number column of pay_assignment_actions table.
723:
724: l_serial_number := 'ovl='||substr(fnd_date.date_to_canonical(p_adj_start_date),1,11);
725:
726: update pay_assignment_actions
722: -- bug 8407213. Log earliest_overlap_date in serial_number column of pay_assignment_actions table.
723:
724: l_serial_number := 'ovl='||substr(fnd_date.date_to_canonical(p_adj_start_date),1,11);
725:
726: update pay_assignment_actions
727: set serial_number = l_serial_number
728: where assignment_action_id = p_assact;
729: --
730: end get_ee_overlap_date;
1146: is
1147: select paa.assignment_action_id,
1148: paa.object_id process_group_id,
1149: ppa.effective_date
1150: from pay_assignment_actions paa,
1151: pay_payroll_actions ppa
1152: where paa.payroll_action_id = p_pactid
1153: and ppa.payroll_action_id = p_pactid
1154: and paa.source_action_id is null
1173: for actrec in get_actions(p_pactid, p_chunk_number) loop
1174: --
1175: for asgrec in get_asg(actrec.process_group_id, actrec.effective_date) loop
1176: --
1177: insert into pay_assignment_actions (
1178: assignment_action_id,
1179: assignment_id,
1180: payroll_action_id,
1181: action_status,
1186: source_action_id,
1187: object_id,
1188: object_type
1189: )
1190: select pay_assignment_actions_s.nextval,
1191: asgrec.source_id,
1192: p_pactid,
1193: 'U',
1194: p_chunk_number,
1191: asgrec.source_id,
1192: p_pactid,
1193: 'U',
1194: p_chunk_number,
1195: pay_assignment_actions_s.nextval,
1196: 1,
1197: asgrec.tax_unit_id,
1198: actrec.assignment_action_id,
1199: actrec.process_group_id,
1207: --
1208: end loop;
1209: --
1210: -- Now update the master Sequence
1211: update pay_assignment_actions
1212: set action_sequence = pay_assignment_actions_s.nextval
1213: where assignment_action_id = actrec.assignment_action_id;
1214: --
1215: end loop;
1208: end loop;
1209: --
1210: -- Now update the master Sequence
1211: update pay_assignment_actions
1212: set action_sequence = pay_assignment_actions_s.nextval
1213: where assignment_action_id = actrec.assignment_action_id;
1214: --
1215: end loop;
1216: --
1225: begin
1226: --
1227: select paa2.assignment_id
1228: into l_assignment
1229: from pay_assignment_actions paa2,
1230: per_all_assignments_f paf,
1231: pay_payroll_actions ppa
1232: where p_obj_grp_id = paa2.object_id
1233: and p_obj_type = paa2.object_type
1578: pay_element_types_f pet1,
1579: pay_input_values_f piv1,
1580: pay_run_results prr,
1581: pay_entry_process_details pepd,
1582: pay_assignment_actions paa,
1583: pay_payroll_actions ppa,
1584: pay_retro_components prc,
1585: pay_retro_defn_components prdc2,
1586: pay_retro_defn_components prdc
1654: l_date_earned,
1655: l_time_period_id,
1656: legcode
1657: from pay_payroll_actions ppa,
1658: pay_assignment_actions paa,
1659: per_business_groups pbg
1660: where ppa.payroll_action_id = paa.payroll_action_id
1661: and pbg.business_group_id = ppa.business_group_id
1662: and paa.assignment_action_id = p_asg_act_id;
2007: if the earliest overlapping_start_date is less than the recorded_date, then do full recalculations
2008: from the earliest overlapping_start_date.
2009: Otherwise, Balance Adjustments will be used till the reprocess_date and recalculations can be done from the reprocess_date.
2010: v_recorded_date is the date from which full recalculations are done. This is stored in serial_number column of
2011: pay_assignment_actions and can be queried after the retropay run to verify the recalculation_date used by the process.
2012: */
2013: if (l_rec_date = hr_api.g_sot OR
2014: p_adj_start_date < l_rec_date) THEN
2015: --
2023: p_recorded_date_o => l_date,
2024: p_attribute1 => p_assignment_id);
2025:
2026: -- bug 8407213. If the recorded_date is being updated to a new value, log the previous recorded_date in lable_identifier column
2027: -- of pay_assignment_actions.This value is then used for setting the recorded_date to the correct value during rollback of
2028: -- the retropay process.
2029:
2030: -- bug 8790029 removed if condition
2031:
2028: -- the retropay process.
2029:
2030: -- bug 8790029 removed if condition
2031:
2032: update pay_assignment_actions
2033: set label_identifier = fnd_date.date_to_canonical(l_date)
2034: where assignment_action_id = p_assact_id;
2035: --
2036: else
2055: v_recorded_date := l_min_retro_asg_date;
2056: --
2057: end if;
2058: --
2059: -- bug 8407213. Append the recalculation_date to the serial_number column of pay_assignment_actions. The difference in the
2060: -- overlap_date and recalculation_date will give an indication of the number of periods for which balance adjustmnets were
2061: -- done in place of complete retro reprocessing.
2062: --
2063: update pay_assignment_actions
2059: -- bug 8407213. Append the recalculation_date to the serial_number column of pay_assignment_actions. The difference in the
2060: -- overlap_date and recalculation_date will give an indication of the number of periods for which balance adjustmnets were
2061: -- done in place of complete retro reprocessing.
2062: --
2063: update pay_assignment_actions
2064: set serial_number = serial_number || 'rcl=' || substr(fnd_date.date_to_canonical(v_recorded_date),1,11)
2065: where assignment_action_id = p_assact_id;
2066: --
2067: hr_utility.set_location('process_recorded_date', 40);
2081: hr_utility.set_location('reset_recorded_request', 10);
2082: --
2083: hr_utility.trace('p_assact_id : '|| p_assact_id);
2084:
2085: -- bug 8407213. Fetch the previous recorded_date from label_identifier column of pay_assignment_actions during rollback.
2086:
2087: select to_date(substr(label_identifier, 1,11), 'YYYY/MM/DD'), assignment_id
2088: into l_prev_rec_date, l_assign_id
2089: from pay_assignment_actions
2085: -- bug 8407213. Fetch the previous recorded_date from label_identifier column of pay_assignment_actions during rollback.
2086:
2087: select to_date(substr(label_identifier, 1,11), 'YYYY/MM/DD'), assignment_id
2088: into l_prev_rec_date, l_assign_id
2089: from pay_assignment_actions
2090: where assignment_action_id = p_assact_id;
2091:
2092: --
2093: hr_utility.set_location('reset_recorded_request', 20);
2098:
2099: /* Added to_char for l_assign_id in the following
2100: two queries for fixing Bug:6893208 */
2101: /* Bug 8790029
2102: Case : Label_identifier in pay_assignment_actions was populated in process_recorded_date only when we are changing the recorded_date
2103: and recorded_date is not equal to start of time (hr_api.g_sot) .
2104: If the Overlap date comes after recorded_date label_identifier was not populated .
2105:
2106: After enabling retro_overlap ,Whenever retropay is rolled back , row from pay_recorded_requests for Retro_Overlap
2103: and recorded_date is not equal to start of time (hr_api.g_sot) .
2104: If the Overlap date comes after recorded_date label_identifier was not populated .
2105:
2106: After enabling retro_overlap ,Whenever retropay is rolled back , row from pay_recorded_requests for Retro_Overlap
2107: was getting deleted .This was because label_identifier in pay_assignment_actions was populated as null for Retro assignment action.
2108:
2109: This issue causes retro to run payrolls from overlap start date as there is no record in pay_recorded_requests for RETRO_OVERLAP.
2110:
2111: Fix : Modified pay_recorded_requests and removed the check "if (l_date <> hr_api.g_sot)" before updating label_identifier