44: procedure range_code
45: (p_payroll_action_id in pay_payroll_actions.payroll_action_id%type,
46: p_sql out NOCOPY varchar2) is
47: begin
48: hr_utility.set_location('Start of range_code',1);
49:
50: /*Bug2920725 Corrected base tables to support security model*/
51:
52: p_sql := ' select distinct p.person_id' ||
55: ' where pa.payroll_action_id = :payroll_action_id' ||
56: ' and p.business_group_id = pa.business_group_id' ||
57: ' order by p.person_id';
58:
59: hr_utility.set_location('End of range_code',2);
60: end range_code;
61:
62: -------------------------------------------------------------------------
63: -- This procedure further restricts the assignment_id's
200: /* End Bug 6470581 */
201:
202: BEGIN
203:
204: g_debug := hr_utility.debug_enabled;
205:
206: IF g_debug
207: THEN
208: hr_utility.set_location('Start of assignment_action_code',3);
204: g_debug := hr_utility.debug_enabled;
205:
206: IF g_debug
207: THEN
208: hr_utility.set_location('Start of assignment_action_code',3);
209: hr_utility.set_location('The payroll_action_id passed '|| p_payroll_action_id,4);
210: hr_utility.set_location('The p_start_person_id '|| p_start_person_id,5);
211: hr_utility.set_location('The p_end_person_id '|| p_end_person_id,6);
212: hr_utility.set_location('The p_chunk number '|| p_chunk ,7);
205:
206: IF g_debug
207: THEN
208: hr_utility.set_location('Start of assignment_action_code',3);
209: hr_utility.set_location('The payroll_action_id passed '|| p_payroll_action_id,4);
210: hr_utility.set_location('The p_start_person_id '|| p_start_person_id,5);
211: hr_utility.set_location('The p_end_person_id '|| p_end_person_id,6);
212: hr_utility.set_location('The p_chunk number '|| p_chunk ,7);
213: END IF;
206: IF g_debug
207: THEN
208: hr_utility.set_location('Start of assignment_action_code',3);
209: hr_utility.set_location('The payroll_action_id passed '|| p_payroll_action_id,4);
210: hr_utility.set_location('The p_start_person_id '|| p_start_person_id,5);
211: hr_utility.set_location('The p_end_person_id '|| p_end_person_id,6);
212: hr_utility.set_location('The p_chunk number '|| p_chunk ,7);
213: END IF;
214:
207: THEN
208: hr_utility.set_location('Start of assignment_action_code',3);
209: hr_utility.set_location('The payroll_action_id passed '|| p_payroll_action_id,4);
210: hr_utility.set_location('The p_start_person_id '|| p_start_person_id,5);
211: hr_utility.set_location('The p_end_person_id '|| p_end_person_id,6);
212: hr_utility.set_location('The p_chunk number '|| p_chunk ,7);
213: END IF;
214:
215: /* Bug 6470581 - Fetch the Payment Summary Type details.
208: hr_utility.set_location('Start of assignment_action_code',3);
209: hr_utility.set_location('The payroll_action_id passed '|| p_payroll_action_id,4);
210: hr_utility.set_location('The p_start_person_id '|| p_start_person_id,5);
211: hr_utility.set_location('The p_end_person_id '|| p_end_person_id,6);
212: hr_utility.set_location('The p_chunk number '|| p_chunk ,7);
213: END IF;
214:
215: /* Bug 6470581 - Fetch the Payment Summary Type details.
216: If Type is 'O' (Original), lock only Archive action
227: for process_rec in process_assignments (p_payroll_action_id,
228: p_start_person_id,
229: p_end_person_id)
230: loop
231: hr_utility.set_location('LOOP STARTED '|| process_rec.assignment_id ,14);
232: open next_action_id;
233: fetch next_action_id into v_next_action_id;
234: close next_action_id;
235: hr_utility.set_location('before calling insact '|| v_next_action_id ,14);
231: hr_utility.set_location('LOOP STARTED '|| process_rec.assignment_id ,14);
232: open next_action_id;
233: fetch next_action_id into v_next_action_id;
234: close next_action_id;
235: hr_utility.set_location('before calling insact '|| v_next_action_id ,14);
236: hr_nonrun_asact.insact(v_next_action_id,
237: process_rec.assignment_id,
238: p_payroll_action_id,
239: p_chunk,
237: process_rec.assignment_id,
238: p_payroll_action_id,
239: p_chunk,
240: null);
241: hr_utility.set_location('inserted assigment action assignment '|| process_rec.assignment_id ,15);
242: hr_utility.set_location('Before calling hr_nonrun_asact.insint archive ' || process_rec.archive_action_id,16);
243: hr_utility.set_location('v_next_action_id' || v_next_action_id,16);
244: hr_nonrun_asact.insint(v_next_action_id,process_rec.assignment_action_id);
245: hr_utility.set_location('After calling hr_nonrun_asact.insint',14);
238: p_payroll_action_id,
239: p_chunk,
240: null);
241: hr_utility.set_location('inserted assigment action assignment '|| process_rec.assignment_id ,15);
242: hr_utility.set_location('Before calling hr_nonrun_asact.insint archive ' || process_rec.archive_action_id,16);
243: hr_utility.set_location('v_next_action_id' || v_next_action_id,16);
244: hr_nonrun_asact.insint(v_next_action_id,process_rec.assignment_action_id);
245: hr_utility.set_location('After calling hr_nonrun_asact.insint',14);
246: end loop;
239: p_chunk,
240: null);
241: hr_utility.set_location('inserted assigment action assignment '|| process_rec.assignment_id ,15);
242: hr_utility.set_location('Before calling hr_nonrun_asact.insint archive ' || process_rec.archive_action_id,16);
243: hr_utility.set_location('v_next_action_id' || v_next_action_id,16);
244: hr_nonrun_asact.insint(v_next_action_id,process_rec.assignment_action_id);
245: hr_utility.set_location('After calling hr_nonrun_asact.insint',14);
246: end loop;
247: hr_utility.set_location('End of assignment_action_code',5);
241: hr_utility.set_location('inserted assigment action assignment '|| process_rec.assignment_id ,15);
242: hr_utility.set_location('Before calling hr_nonrun_asact.insint archive ' || process_rec.archive_action_id,16);
243: hr_utility.set_location('v_next_action_id' || v_next_action_id,16);
244: hr_nonrun_asact.insint(v_next_action_id,process_rec.assignment_action_id);
245: hr_utility.set_location('After calling hr_nonrun_asact.insint',14);
246: end loop;
247: hr_utility.set_location('End of assignment_action_code',5);
248:
249: ELSIF l_get_paysum_details.payment_summary_type = 'A'
243: hr_utility.set_location('v_next_action_id' || v_next_action_id,16);
244: hr_nonrun_asact.insint(v_next_action_id,process_rec.assignment_action_id);
245: hr_utility.set_location('After calling hr_nonrun_asact.insint',14);
246: end loop;
247: hr_utility.set_location('End of assignment_action_code',5);
248:
249: ELSIF l_get_paysum_details.payment_summary_type = 'A'
250: THEN
251:
250: THEN
251:
252: IF g_debug
253: THEN
254: hr_utility.set_location('Inside Amended Payment Summary Section ',30);
255: END IF;
256:
257: FOR csr_rec IN c_amend_process_assignments(p_payroll_action_id
258: ,p_start_person_id
274: hr_nonrun_asact.insint(v_next_action_id,csr_rec.datafile_action_id);
275:
276: IF g_debug
277: THEN
278: hr_utility.set_location('Assignment_ID '||csr_rec.assignment_id,35);
279: hr_utility.set_location('New Ass Action ID '||v_next_action_id,40);
280: hr_utility.set_location('Locked Archive Action ID '||csr_rec.assignment_action_id,45);
281: hr_utility.set_location('Locked Data file Action ID '||csr_rec.datafile_action_id,50);
282: END IF;
275:
276: IF g_debug
277: THEN
278: hr_utility.set_location('Assignment_ID '||csr_rec.assignment_id,35);
279: hr_utility.set_location('New Ass Action ID '||v_next_action_id,40);
280: hr_utility.set_location('Locked Archive Action ID '||csr_rec.assignment_action_id,45);
281: hr_utility.set_location('Locked Data file Action ID '||csr_rec.datafile_action_id,50);
282: END IF;
283: END LOOP;
276: IF g_debug
277: THEN
278: hr_utility.set_location('Assignment_ID '||csr_rec.assignment_id,35);
279: hr_utility.set_location('New Ass Action ID '||v_next_action_id,40);
280: hr_utility.set_location('Locked Archive Action ID '||csr_rec.assignment_action_id,45);
281: hr_utility.set_location('Locked Data file Action ID '||csr_rec.datafile_action_id,50);
282: END IF;
283: END LOOP;
284: END IF;
277: THEN
278: hr_utility.set_location('Assignment_ID '||csr_rec.assignment_id,35);
279: hr_utility.set_location('New Ass Action ID '||v_next_action_id,40);
280: hr_utility.set_location('Locked Archive Action ID '||csr_rec.assignment_action_id,45);
281: hr_utility.set_location('Locked Data file Action ID '||csr_rec.datafile_action_id,50);
282: END IF;
283: END LOOP;
284: END IF;
285:
284: END IF;
285:
286: exception
287: when others then
288: hr_utility.set_location('error raised in assignment_action_code procedure ',5);
289: raise;
290: end assignment_action_code;
291:
292:
389:
390: Begin
391: LOOP
392: l_count := l_count + 1;
393: hr_utility.set_location('Before payroll action' , 25);
394: hr_utility.set_location('mag_internal ' || pay_mag_tape.internal_prm_names(l_count) , 105);
395: hr_utility.set_location('mag_internal ' || pay_mag_tape.internal_prm_values(l_count) , 115);
396: l_passed_sort_order:=pay_mag_tape.internal_prm_names(l_count);
397: IF pay_mag_tape.internal_prm_names(l_count) = 'TRANSFER_PAYROLL_ACTION_ID'
390: Begin
391: LOOP
392: l_count := l_count + 1;
393: hr_utility.set_location('Before payroll action' , 25);
394: hr_utility.set_location('mag_internal ' || pay_mag_tape.internal_prm_names(l_count) , 105);
395: hr_utility.set_location('mag_internal ' || pay_mag_tape.internal_prm_values(l_count) , 115);
396: l_passed_sort_order:=pay_mag_tape.internal_prm_names(l_count);
397: IF pay_mag_tape.internal_prm_names(l_count) = 'TRANSFER_PAYROLL_ACTION_ID'
398: THEN
391: LOOP
392: l_count := l_count + 1;
393: hr_utility.set_location('Before payroll action' , 25);
394: hr_utility.set_location('mag_internal ' || pay_mag_tape.internal_prm_names(l_count) , 105);
395: hr_utility.set_location('mag_internal ' || pay_mag_tape.internal_prm_values(l_count) , 115);
396: l_passed_sort_order:=pay_mag_tape.internal_prm_names(l_count);
397: IF pay_mag_tape.internal_prm_names(l_count) = 'TRANSFER_PAYROLL_ACTION_ID'
398: THEN
399: l_payroll_action_id := to_number(pay_mag_tape.internal_prm_values(l_count));
396: l_passed_sort_order:=pay_mag_tape.internal_prm_names(l_count);
397: IF pay_mag_tape.internal_prm_names(l_count) = 'TRANSFER_PAYROLL_ACTION_ID'
398: THEN
399: l_payroll_action_id := to_number(pay_mag_tape.internal_prm_values(l_count));
400: hr_utility.set_location('payroll_action ',0);
401: ELSIF l_passed_sort_order= 'SORT_ORDER1'
402: THEN
403: l_sort_order1 := pay_mag_tape.internal_prm_values(l_count);
404: hr_utility.set_location('in sort order1 ',1);
400: hr_utility.set_location('payroll_action ',0);
401: ELSIF l_passed_sort_order= 'SORT_ORDER1'
402: THEN
403: l_sort_order1 := pay_mag_tape.internal_prm_values(l_count);
404: hr_utility.set_location('in sort order1 ',1);
405: ELSIF l_passed_sort_order= 'SORT_ORDER2'
406: THEN
407: l_sort_order2 := pay_mag_tape.internal_prm_values(l_count);
408: hr_utility.set_location('in sort_order 2 ',2);
404: hr_utility.set_location('in sort order1 ',1);
405: ELSIF l_passed_sort_order= 'SORT_ORDER2'
406: THEN
407: l_sort_order2 := pay_mag_tape.internal_prm_values(l_count);
408: hr_utility.set_location('in sort_order 2 ',2);
409: ELSIF l_passed_sort_order= 'SORT_ORDER3'
410: THEN
411: hr_utility.set_location('in sort_order3 ',3);
412: l_sort_order3 := pay_mag_tape.internal_prm_values(l_count);
407: l_sort_order2 := pay_mag_tape.internal_prm_values(l_count);
408: hr_utility.set_location('in sort_order 2 ',2);
409: ELSIF l_passed_sort_order= 'SORT_ORDER3'
410: THEN
411: hr_utility.set_location('in sort_order3 ',3);
412: l_sort_order3 := pay_mag_tape.internal_prm_values(l_count);
413: ELSIF l_passed_sort_order= 'SORT_ORDER4'
414: THEN
415: l_sort_order4 := pay_mag_tape.internal_prm_values(l_count);
412: l_sort_order3 := pay_mag_tape.internal_prm_values(l_count);
413: ELSIF l_passed_sort_order= 'SORT_ORDER4'
414: THEN
415: l_sort_order4 := pay_mag_tape.internal_prm_values(l_count);
416: hr_utility.set_location('in sort_orderr4 ',4);
417: /* Bug 3132172 Duplex Printing Support*/
418: ELSIF pay_mag_tape.internal_prm_names(l_count) = 'DUPLEX_PRINT_FLAG'
419: THEN
420: l_duplex_print_flag := pay_mag_tape.internal_prm_values(l_count);
417: /* Bug 3132172 Duplex Printing Support*/
418: ELSIF pay_mag_tape.internal_prm_names(l_count) = 'DUPLEX_PRINT_FLAG'
419: THEN
420: l_duplex_print_flag := pay_mag_tape.internal_prm_values(l_count);
421: hr_utility.set_location('in duplex_print_flag',5);
422: /* Bug 4859876 - Template Code for PDF Output */
423: ELSIF pay_mag_tape.internal_prm_names(l_count) = 'TMPL'
424: THEN
425: l_template_name := pay_mag_tape.internal_prm_values(l_count);
422: /* Bug 4859876 - Template Code for PDF Output */
423: ELSIF pay_mag_tape.internal_prm_names(l_count) = 'TMPL'
424: THEN
425: l_template_name := pay_mag_tape.internal_prm_values(l_count);
426: hr_utility.set_location('in Template Names'||l_template_name,6);
427: END IF;
428:
429: END LOOP;
430: EXCEPTION
437: End;
438:
439:
440: l_sort_order1:=get_sort_order_value(l_sort_order1);
441: hr_utility.set_location('getting sort_order1'||l_sort_order1, 121);
442: l_sort_order2:=get_sort_order_value(l_sort_order2);
443: hr_utility.set_location('getting sort_order2'||l_sort_order2, 122);
444: l_sort_order3:=get_sort_order_value(l_sort_order3);
445: hr_utility.set_location('getting sort_order3'||l_sort_order3, 123);
439:
440: l_sort_order1:=get_sort_order_value(l_sort_order1);
441: hr_utility.set_location('getting sort_order1'||l_sort_order1, 121);
442: l_sort_order2:=get_sort_order_value(l_sort_order2);
443: hr_utility.set_location('getting sort_order2'||l_sort_order2, 122);
444: l_sort_order3:=get_sort_order_value(l_sort_order3);
445: hr_utility.set_location('getting sort_order3'||l_sort_order3, 123);
446: l_sort_order4:=get_sort_order_value(l_sort_order4);
447: hr_utility.set_location('getting sort_order4'||l_sort_order4, 124);
441: hr_utility.set_location('getting sort_order1'||l_sort_order1, 121);
442: l_sort_order2:=get_sort_order_value(l_sort_order2);
443: hr_utility.set_location('getting sort_order2'||l_sort_order2, 122);
444: l_sort_order3:=get_sort_order_value(l_sort_order3);
445: hr_utility.set_location('getting sort_order3'||l_sort_order3, 123);
446: l_sort_order4:=get_sort_order_value(l_sort_order4);
447: hr_utility.set_location('getting sort_order4'||l_sort_order4, 124);
448:
449:
443: hr_utility.set_location('getting sort_order2'||l_sort_order2, 122);
444: l_sort_order3:=get_sort_order_value(l_sort_order3);
445: hr_utility.set_location('getting sort_order3'||l_sort_order3, 123);
446: l_sort_order4:=get_sort_order_value(l_sort_order4);
447: hr_utility.set_location('getting sort_order4'||l_sort_order4, 124);
448:
449:
450:
451: hr_utility.set_location('getting current chunk_number ', 125);
447: hr_utility.set_location('getting sort_order4'||l_sort_order4, 124);
448:
449:
450:
451: hr_utility.set_location('getting current chunk_number ', 125);
452:
453: OPEN csr_get_current_chunk_number(l_payroll_action_id);
454: fetch csr_get_current_chunk_number into l_current_chunk_number;
455: CLOSE csr_get_current_chunk_number;
464:
465: if l_current_chunk_number <> 0 and l_assignment_exist > 0
466: then
467:
468: hr_utility.set_location('Afer payroll action ' || l_payroll_action_id , 125);
469: --hr_utility.set_location('sort ' || l_sort_order,166);
470: hr_utility.set_location('Before calling report',24);
471:
472: OPEN csr_get_print_options(l_payroll_action_id);
465: if l_current_chunk_number <> 0 and l_assignment_exist > 0
466: then
467:
468: hr_utility.set_location('Afer payroll action ' || l_payroll_action_id , 125);
469: --hr_utility.set_location('sort ' || l_sort_order,166);
470: hr_utility.set_location('Before calling report',24);
471:
472: OPEN csr_get_print_options(l_payroll_action_id);
473: FETCH csr_get_print_options INTO rec_print_options;
466: then
467:
468: hr_utility.set_location('Afer payroll action ' || l_payroll_action_id , 125);
469: --hr_utility.set_location('sort ' || l_sort_order,166);
470: hr_utility.set_location('Before calling report',24);
471:
472: OPEN csr_get_print_options(l_payroll_action_id);
473: FETCH csr_get_print_options INTO rec_print_options;
474: CLOSE csr_get_print_options;
482: copies => rec_print_options.number_of_copies, /* Bug: 3768288 */
483: save_output => hr_general.char_to_bool(rec_print_options.save_output),
484: print_together => l_print_together);
485: -- Submit report
486: hr_utility.set_location('payroll_action id '|| l_payroll_action_id,25);
487:
488: /* Bug 4891196 - Determine Report to be submitted,
489: i. If Template is Null, then Postscript output
490: ii. If Template is NOT Null, then XML/PDF output.
528: NULL, NULL, NULL, NULL, NULL, NULL,
529: NULL, NULL, NULL, NULL, NULL
530: );
531:
532: hr_utility.set_location('After calling report',24);
533:
534:
535: end if;
536:
533:
534:
535: end if;
536:
537: hr_utility.set_location('Before calling formula',22);
538:
539: OPEN csr_get_formula_id('AU_PS_REPORT');
540: FETCH csr_get_formula_id INTO l_formula_id;
541: CLOSE csr_get_formula_id;
555: pay_mag_tape.internal_prm_names(7) := 'SORT_ORDER3';
556: pay_mag_tape.internal_prm_values(7) :=l_sort_order3;
557: pay_mag_tape.internal_prm_names(8) := 'SORT_ORDER4';
558: pay_mag_tape.internal_prm_values(8) :=l_sort_order4;
559: -- hr_utility.trace_off;
560: end spawn_archive_reports;
561:
562: ---
563: -- Bug 4726357 Added to check whether Self Service Option is enabled for the employee