1: package body pay_au_payment_summary_magtape as
2: /* $Header: pyaupsm.pkb 120.4.12010000.2 2008/08/06 06:50:42 ubhat ship $*/
3: -------------------------------------------------------------------------+
4:
5: -- g_debug boolean := hr_utility.debug_enabled; --Bug3132178
6: g_debug boolean := TRUE; --Bug3132178
7:
8:
9: procedure range_code
9: procedure range_code
10: (p_payroll_action_id in pay_payroll_actions.payroll_action_id%type,
11: p_sql out NOCOPY varchar2) is
12: begin
13: -- hr_utility.trace_on(null, 'magtape');
14: hr_utility.set_location('Start of range_code',1);
15: /*Bug2920725 Corrected base tables to support security model*/
16:
17: p_sql := ' select distinct p.person_id' ||
10: (p_payroll_action_id in pay_payroll_actions.payroll_action_id%type,
11: p_sql out NOCOPY varchar2) is
12: begin
13: -- hr_utility.trace_on(null, 'magtape');
14: hr_utility.set_location('Start of range_code',1);
15: /*Bug2920725 Corrected base tables to support security model*/
16:
17: p_sql := ' select distinct p.person_id' ||
18: ' from per_people_f p,' ||
21: ' and p.business_group_id = pa.business_group_id' ||
22: ' order by p.person_id';
23:
24: IF g_debug THEN
25: hr_utility.set_location('End of range_code',2);
26: END IF;
27: end range_code;
28:
29: -----------------------------------------------------------------------+
217:
218: BEGIN
219:
220: IF g_debug THEN
221: hr_utility.set_location('Start of assignment_action_code',3);
222: END IF;
223: --------start of Bug3132178-----------------------------------------------------
224: OPEN get_parameters;
225: FETCH get_parameters INTO l_testing_flag,l_archive_payroll_action,l_payment_summary_type;
241: p_payroll_action_id,
242: p_chunk,
243: NULL);
244: IF g_debug THEN
245: hr_utility.set_location('After calling hr_nonrun_asact.insint',14);
246: END IF;
247: END LOOP;
248: ELSE /* bug 6630375 */
249: FOR process_rec IN process_assignments_val_amend (l_archive_payroll_action,
259: p_payroll_action_id,
260: p_chunk,
261: NULL);
262: IF g_debug THEN
263: hr_utility.set_location('After calling hr_nonrun_asact.insint',14);
264: END IF;
265: END LOOP;
266: END IF;
267: ------End of Bug3132178-----------------------------------------------------
280: p_payroll_action_id,
281: p_chunk,
282: NULL);
283: IF g_debug THEN
284: hr_utility.set_location('Before calling hr_nonrun_asact.insint',14);
285: hr_utility.set_location('locking action' || v_next_action_id, 15);
286: hr_utility.set_location('locked action' || process_rec.ps_report_id, 16);
287: END IF;
288: hr_nonrun_asact.insint(v_next_action_id, -- locking action id
281: p_chunk,
282: NULL);
283: IF g_debug THEN
284: hr_utility.set_location('Before calling hr_nonrun_asact.insint',14);
285: hr_utility.set_location('locking action' || v_next_action_id, 15);
286: hr_utility.set_location('locked action' || process_rec.ps_report_id, 16);
287: END IF;
288: hr_nonrun_asact.insint(v_next_action_id, -- locking action id
289: process_rec.ps_report_id); -- locked action id
282: NULL);
283: IF g_debug THEN
284: hr_utility.set_location('Before calling hr_nonrun_asact.insint',14);
285: hr_utility.set_location('locking action' || v_next_action_id, 15);
286: hr_utility.set_location('locked action' || process_rec.ps_report_id, 16);
287: END IF;
288: hr_nonrun_asact.insint(v_next_action_id, -- locking action id
289: process_rec.ps_report_id); -- locked action id
290:
288: hr_nonrun_asact.insint(v_next_action_id, -- locking action id
289: process_rec.ps_report_id); -- locked action id
290:
291: IF g_debug THEN
292: hr_utility.set_location('After calling hr_nonrun_asact.insint',14);
293: END IF;
294: END LOOP;
295: ELSE /* bug 6630375 */
296: FOR process_rec IN process_assignments_amend (p_payroll_action_id,
306: p_payroll_action_id,
307: p_chunk,
308: NULL);
309: IF g_debug THEN
310: hr_utility.set_location('Before calling hr_nonrun_asact.insint',14);
311: hr_utility.set_location('locking action' || v_next_action_id, 15);
312: hr_utility.set_location('locked action' || process_rec.ps_report_id, 16);
313: END IF;
314: hr_nonrun_asact.insint(v_next_action_id, -- locking action id
307: p_chunk,
308: NULL);
309: IF g_debug THEN
310: hr_utility.set_location('Before calling hr_nonrun_asact.insint',14);
311: hr_utility.set_location('locking action' || v_next_action_id, 15);
312: hr_utility.set_location('locked action' || process_rec.ps_report_id, 16);
313: END IF;
314: hr_nonrun_asact.insint(v_next_action_id, -- locking action id
315: process_rec.ps_report_id); -- locked action id
308: NULL);
309: IF g_debug THEN
310: hr_utility.set_location('Before calling hr_nonrun_asact.insint',14);
311: hr_utility.set_location('locking action' || v_next_action_id, 15);
312: hr_utility.set_location('locked action' || process_rec.ps_report_id, 16);
313: END IF;
314: hr_nonrun_asact.insint(v_next_action_id, -- locking action id
315: process_rec.ps_report_id); -- locked action id
316:
314: hr_nonrun_asact.insint(v_next_action_id, -- locking action id
315: process_rec.ps_report_id); -- locked action id
316:
317: IF g_debug THEN
318: hr_utility.set_location('After calling hr_nonrun_asact.insint',14);
319: END IF;
320: END LOOP;
321: END IF;
322: END IF;
320: END LOOP;
321: END IF;
322: END IF;
323: IF g_debug THEN
324: hr_utility.set_location('End of assignment_action_code',5);
325: END IF;
326: END assignment_action_code;
327:
328:
337: procedure initialization_code
338: (p_payroll_action_id in pay_payroll_actions.payroll_action_id%type) is
339: begin
340: IF g_debug THEN
341: hr_utility.set_location('Start of initialization_code',6);
342: END IF;
343: null;
344: IF g_debug THEN
345: hr_utility.set_location('End of initialization_code',7);
341: hr_utility.set_location('Start of initialization_code',6);
342: END IF;
343: null;
344: IF g_debug THEN
345: hr_utility.set_location('End of initialization_code',7);
346: END IF;
347: end initialization_code;
348:
349:
357: is
358:
359: begin
360: IF g_debug THEN
361: hr_utility.set_location('Start of archive_code',8);
362: END IF;
363: null;
364: IF g_debug THEN
365: hr_utility.set_location('End of archive_code',9);
361: hr_utility.set_location('Start of archive_code',8);
362: END IF;
363: null;
364: IF g_debug THEN
365: hr_utility.set_location('End of archive_code',9);
366: END IF;
367: end archive_code;
368: ---------------------------------------------------------------------------+
369: