[Home] [Help]
249: l_proc VARCHAR2(50) := g_package || 'get_parameters';
250:
251: BEGIN
252:
253: hr_utility.set_location('Entering ' || l_proc,10);
254:
255: hr_utility.set_location('Step ' || l_proc,20);
256: hr_utility.set_location('p_token_name = ' || p_token_name,20);
257:
251: BEGIN
252:
253: hr_utility.set_location('Entering ' || l_proc,10);
254:
255: hr_utility.set_location('Step ' || l_proc,20);
256: hr_utility.set_location('p_token_name = ' || p_token_name,20);
257:
258: OPEN csr_parameter_info(p_payroll_action_id,
259: p_token_name);
252:
253: hr_utility.set_location('Entering ' || l_proc,10);
254:
255: hr_utility.set_location('Step ' || l_proc,20);
256: hr_utility.set_location('p_token_name = ' || p_token_name,20);
257:
258: OPEN csr_parameter_info(p_payroll_action_id,
259: p_token_name);
260:
274: p_token_value := l_token_value;
275:
276: END IF;
277:
278: hr_utility.set_location('l_token_value = ' || l_token_value,20);
279: hr_utility.set_location('Leaving ' || l_proc,30);
280:
281: END get_parameters;
282:
275:
276: END IF;
277:
278: hr_utility.set_location('l_token_value = ' || l_token_value,20);
279: hr_utility.set_location('Leaving ' || l_proc,30);
280:
281: END get_parameters;
282:
283: --------------------------------
316:
317: BEGIN
318:
319:
320: hr_utility.set_location('Entering ' || l_proc,10);
321: hr_utility.set_location('Step ' || l_proc,20);
322:
323: FOR l_index IN 1 ..g_max_statutory_balance_index
324: LOOP
317: BEGIN
318:
319:
320: hr_utility.set_location('Entering ' || l_proc,10);
321: hr_utility.set_location('Step ' || l_proc,20);
322:
323: FOR l_index IN 1 ..g_max_statutory_balance_index
324: LOOP
325:
322:
323: FOR l_index IN 1 ..g_max_statutory_balance_index
324: LOOP
325:
326: hr_utility.set_location('p_pactid = '||p_pactid,20);
327: hr_utility.set_location('p_payroll_pact = '||p_payroll_pact,20);
328: hr_utility.set_location('p_effective_date = '||p_effective_date,20);
329: hr_utility.set_location('defined_balance_id = '||g_statutory_balance_table(l_index).defined_balance_id,20);
330: hr_utility.set_location('balance_name = '||g_statutory_balance_table(l_index).balance_name,20);
323: FOR l_index IN 1 ..g_max_statutory_balance_index
324: LOOP
325:
326: hr_utility.set_location('p_pactid = '||p_pactid,20);
327: hr_utility.set_location('p_payroll_pact = '||p_payroll_pact,20);
328: hr_utility.set_location('p_effective_date = '||p_effective_date,20);
329: hr_utility.set_location('defined_balance_id = '||g_statutory_balance_table(l_index).defined_balance_id,20);
330: hr_utility.set_location('balance_name = '||g_statutory_balance_table(l_index).balance_name,20);
331:
324: LOOP
325:
326: hr_utility.set_location('p_pactid = '||p_pactid,20);
327: hr_utility.set_location('p_payroll_pact = '||p_payroll_pact,20);
328: hr_utility.set_location('p_effective_date = '||p_effective_date,20);
329: hr_utility.set_location('defined_balance_id = '||g_statutory_balance_table(l_index).defined_balance_id,20);
330: hr_utility.set_location('balance_name = '||g_statutory_balance_table(l_index).balance_name,20);
331:
332: pay_action_information_api.create_action_information (
325:
326: hr_utility.set_location('p_pactid = '||p_pactid,20);
327: hr_utility.set_location('p_payroll_pact = '||p_payroll_pact,20);
328: hr_utility.set_location('p_effective_date = '||p_effective_date,20);
329: hr_utility.set_location('defined_balance_id = '||g_statutory_balance_table(l_index).defined_balance_id,20);
330: hr_utility.set_location('balance_name = '||g_statutory_balance_table(l_index).balance_name,20);
331:
332: pay_action_information_api.create_action_information (
333: p_action_information_id => l_action_info_id
326: hr_utility.set_location('p_pactid = '||p_pactid,20);
327: hr_utility.set_location('p_payroll_pact = '||p_payroll_pact,20);
328: hr_utility.set_location('p_effective_date = '||p_effective_date,20);
329: hr_utility.set_location('defined_balance_id = '||g_statutory_balance_table(l_index).defined_balance_id,20);
330: hr_utility.set_location('balance_name = '||g_statutory_balance_table(l_index).balance_name,20);
331:
332: pay_action_information_api.create_action_information (
333: p_action_information_id => l_action_info_id
334: , p_action_context_id => p_pactid
344: , p_action_information4 => g_statutory_balance_table(l_index).balance_name);
345:
346: END LOOP;
347:
348: hr_utility.set_location('Leaving ' || l_proc,30);
349:
350: END setup_balance_definitions;
351: ------------------------
352: /* This Procedure populates PL/SQL Table with balance names and defined_balance_id which are used to
389: l_pactid NUMBER;
390: l_payroll_pact NUMBER;
391: l_proc VARCHAR2(100) := g_package || 'setup_standard_balance_table';
392: BEGIN
393: hr_utility.set_location('Entering ' || l_proc,10);
394: hr_utility.set_location('Step ' || l_proc,20);
395: l_statutory_balance(1).balance_name := 'IE Taxable Pay';
396: l_statutory_balance(2).balance_name := 'IE Net Tax';
397: l_statutory_balance(3).balance_name := 'IE PRSI Employer';
390: l_payroll_pact NUMBER;
391: l_proc VARCHAR2(100) := g_package || 'setup_standard_balance_table';
392: BEGIN
393: hr_utility.set_location('Entering ' || l_proc,10);
394: hr_utility.set_location('Step ' || l_proc,20);
395: l_statutory_balance(1).balance_name := 'IE Taxable Pay';
396: l_statutory_balance(2).balance_name := 'IE Net Tax';
397: l_statutory_balance(3).balance_name := 'IE PRSI Employer';
398: l_statutory_balance(4).balance_name := 'IE PRSI Employee';
411: l_statutory_balance(10).balance_name := 'IE PRSI M Employer Lump Sum';
412: l_statutory_balance(11).balance_name := 'IE PRSI K Term Insurable Weeks';
413: l_statutory_balance(12).balance_name := 'IE PRSI M Term Insurable Weeks';
414: l_statutory_balance(13).balance_name := 'IE Term Health Levy';
415: hr_utility.set_location('Step = ' || l_proc,30);
416: FOR l_index IN 1 .. l_max_stat_balance
417: LOOP
418: hr_utility.set_location('l_index = ' || l_index,30);
419: hr_utility.set_location('balance_name = ' || l_statutory_balance(l_index).balance_name,30);
414: l_statutory_balance(13).balance_name := 'IE Term Health Levy';
415: hr_utility.set_location('Step = ' || l_proc,30);
416: FOR l_index IN 1 .. l_max_stat_balance
417: LOOP
418: hr_utility.set_location('l_index = ' || l_index,30);
419: hr_utility.set_location('balance_name = ' || l_statutory_balance(l_index).balance_name,30);
420: hr_utility.set_location('l_dimension = ' || l_dimension,30);
421: IF (l_index < 15) THEN -- Stores RUN balance_defined information -- Bug 5015438
422: IF l_statutory_balance(l_index).balance_name in ('IE PRSI Insurable Weeks','IE PRSI K Term Insurable Weeks','IE PRSI M Term Insurable Weeks','IE PRSI_ClassA Insurable Weeks') THEN
415: hr_utility.set_location('Step = ' || l_proc,30);
416: FOR l_index IN 1 .. l_max_stat_balance
417: LOOP
418: hr_utility.set_location('l_index = ' || l_index,30);
419: hr_utility.set_location('balance_name = ' || l_statutory_balance(l_index).balance_name,30);
420: hr_utility.set_location('l_dimension = ' || l_dimension,30);
421: IF (l_index < 15) THEN -- Stores RUN balance_defined information -- Bug 5015438
422: IF l_statutory_balance(l_index).balance_name in ('IE PRSI Insurable Weeks','IE PRSI K Term Insurable Weeks','IE PRSI M Term Insurable Weeks','IE PRSI_ClassA Insurable Weeks') THEN
423:
416: FOR l_index IN 1 .. l_max_stat_balance
417: LOOP
418: hr_utility.set_location('l_index = ' || l_index,30);
419: hr_utility.set_location('balance_name = ' || l_statutory_balance(l_index).balance_name,30);
420: hr_utility.set_location('l_dimension = ' || l_dimension,30);
421: IF (l_index < 15) THEN -- Stores RUN balance_defined information -- Bug 5015438
422: IF l_statutory_balance(l_index).balance_name in ('IE PRSI Insurable Weeks','IE PRSI K Term Insurable Weeks','IE PRSI M Term Insurable Weeks','IE PRSI_ClassA Insurable Weeks') THEN
423:
424: IF l_index <> 14 THEN --Bug 5015438
477: l_archive_index := l_archive_index + 1;
478: END LOOP;
479: ---
480: l_archive_index := l_archive_index - 1;
481: -- hr_utility.set_location('retrieving PER_PAYE_REF_PRSI_YTD bal_id for Insurable weeks',40); -- Bug 5015438
482: -- OPEN csr_balance_dimension('IE PRSI Insurable Weeks',l_dimension_1);
483: -- FETCH csr_balance_dimension INTO l_statutory_bal_id(l_archive_index).defined_balance_id;
484: -- CLOSE csr_balance_dimension;
485: -- g_statutory_balance_table(l_archive_index).defined_balance_id := l_statutory_bal_id(l_archive_index).defined_balance_id;
484: -- CLOSE csr_balance_dimension;
485: -- g_statutory_balance_table(l_archive_index).defined_balance_id := l_statutory_bal_id(l_archive_index).defined_balance_id;
486: -- g_statutory_balance_table(l_archive_index).balance_name := 'IE PRSI_ClassA Insurable Weeks';
487: -- g_statutory_balance_table(l_archive_index).database_item_suffix := l_dimension_1;
488: -- hr_utility.set_location('Step = ' || l_proc,40);
489: -- hr_utility.set_location('l_max_stat_balance = ' || l_max_stat_balance,40);
490: g_max_statutory_balance_index := l_archive_index;
491: -- hr_utility.set_location('Step ' || l_proc,50);
492: -- hr_utility.set_location('l_archive_index = ' || l_archive_index,50);
485: -- g_statutory_balance_table(l_archive_index).defined_balance_id := l_statutory_bal_id(l_archive_index).defined_balance_id;
486: -- g_statutory_balance_table(l_archive_index).balance_name := 'IE PRSI_ClassA Insurable Weeks';
487: -- g_statutory_balance_table(l_archive_index).database_item_suffix := l_dimension_1;
488: -- hr_utility.set_location('Step = ' || l_proc,40);
489: -- hr_utility.set_location('l_max_stat_balance = ' || l_max_stat_balance,40);
490: g_max_statutory_balance_index := l_archive_index;
491: -- hr_utility.set_location('Step ' || l_proc,50);
492: -- hr_utility.set_location('l_archive_index = ' || l_archive_index,50);
493: -- hr_utility.set_location('Leaving ' || l_proc,60);
487: -- g_statutory_balance_table(l_archive_index).database_item_suffix := l_dimension_1;
488: -- hr_utility.set_location('Step = ' || l_proc,40);
489: -- hr_utility.set_location('l_max_stat_balance = ' || l_max_stat_balance,40);
490: g_max_statutory_balance_index := l_archive_index;
491: -- hr_utility.set_location('Step ' || l_proc,50);
492: -- hr_utility.set_location('l_archive_index = ' || l_archive_index,50);
493: -- hr_utility.set_location('Leaving ' || l_proc,60);
494: END setup_standard_balance_table;
495: ---------------------------------------
488: -- hr_utility.set_location('Step = ' || l_proc,40);
489: -- hr_utility.set_location('l_max_stat_balance = ' || l_max_stat_balance,40);
490: g_max_statutory_balance_index := l_archive_index;
491: -- hr_utility.set_location('Step ' || l_proc,50);
492: -- hr_utility.set_location('l_archive_index = ' || l_archive_index,50);
493: -- hr_utility.set_location('Leaving ' || l_proc,60);
494: END setup_standard_balance_table;
495: ---------------------------------------
496:
489: -- hr_utility.set_location('l_max_stat_balance = ' || l_max_stat_balance,40);
490: g_max_statutory_balance_index := l_archive_index;
491: -- hr_utility.set_location('Step ' || l_proc,50);
492: -- hr_utility.set_location('l_archive_index = ' || l_archive_index,50);
493: -- hr_utility.set_location('Leaving ' || l_proc,60);
494: END setup_standard_balance_table;
495: ---------------------------------------
496:
497: PROCEDURE archinit (p_payroll_action_id IN NUMBER)
524: l_start_date VARCHAR2(30);
525: l_dummy VARCHAR2(2);
526: l_error varchar2(1) ;
527: BEGIN
528: --hr_utility.trace_on(null,'IEP45');
529: hr_utility.set_location('Entering ' || l_proc,10);
530:
531: g_archive_pact := p_payroll_action_id;
532:
525: l_dummy VARCHAR2(2);
526: l_error varchar2(1) ;
527: BEGIN
528: --hr_utility.trace_on(null,'IEP45');
529: hr_utility.set_location('Entering ' || l_proc,10);
530:
531: g_archive_pact := p_payroll_action_id;
532:
533: OPEN csr_archive_effective_date(p_payroll_action_id);
554: p_payroll_action_id => p_payroll_action_id
555: , p_token_name => 'BG_ID'
556: , p_token_value => l_bg_id);
557:
558: hr_utility.set_location('Step ' || l_proc,20);
559: hr_utility.set_location('g_paye_ref = ' || g_paye_ref,20);
560: hr_utility.set_location('l_end_date = ' || l_end_date,20);
561:
562: l_canonical_start_date := TO_DATE(l_start_date,'yyyy/mm/dd');
555: , p_token_name => 'BG_ID'
556: , p_token_value => l_bg_id);
557:
558: hr_utility.set_location('Step ' || l_proc,20);
559: hr_utility.set_location('g_paye_ref = ' || g_paye_ref,20);
560: hr_utility.set_location('l_end_date = ' || l_end_date,20);
561:
562: l_canonical_start_date := TO_DATE(l_start_date,'yyyy/mm/dd');
563: l_canonical_end_date := TO_DATE(l_end_date,'yyyy/mm/dd');
556: , p_token_value => l_bg_id);
557:
558: hr_utility.set_location('Step ' || l_proc,20);
559: hr_utility.set_location('g_paye_ref = ' || g_paye_ref,20);
560: hr_utility.set_location('l_end_date = ' || l_end_date,20);
561:
562: l_canonical_start_date := TO_DATE(l_start_date,'yyyy/mm/dd');
563: l_canonical_end_date := TO_DATE(l_end_date,'yyyy/mm/dd');
564:
565: -- Initialized g_archive_end_date to support Retry Option
566: g_archive_end_date := TO_DATE(l_end_date,'yyyy/mm/dd');
567: g_archive_start_date := l_canonical_start_date;
568:
569: hr_utility.set_location('l_canonical_start_date = ' || l_canonical_start_date,20);
570:
571:
572: -- retrieve ids for tax elements
573: hr_utility.set_location('stage 1',22);
569: hr_utility.set_location('l_canonical_start_date = ' || l_canonical_start_date,20);
570:
571:
572: -- retrieve ids for tax elements
573: hr_utility.set_location('stage 1',22);
574:
575: OPEN csr_input_value_id('IE PAYE details','Tax Basis');
576: FETCH csr_input_value_id INTO g_paye_details_element_id,
577: g_tax_basis_id;
627: FETCH csr_input_value_id INTO g_paye_details_element_id,
628: g_period_week_std_cutoff;
629: CLOSE csr_input_value_id;
630:
631: hr_utility.set_location('stage 2',23);
632: pay_ie_p45_archive.setup_standard_balance_table;
633:
634: hr_utility.set_location('stage 3',24);
635:
630:
631: hr_utility.set_location('stage 2',23);
632: pay_ie_p45_archive.setup_standard_balance_table;
633:
634: hr_utility.set_location('stage 3',24);
635:
636: -- hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
637: -- hr_utility.set_location('l_consolidation_set = ' || l_consolidation_set,20);
638: -- hr_utility.set_location('l_canonical_start_date = ' || l_canonical_start_date,20);
632: pay_ie_p45_archive.setup_standard_balance_table;
633:
634: hr_utility.set_location('stage 3',24);
635:
636: -- hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
637: -- hr_utility.set_location('l_consolidation_set = ' || l_consolidation_set,20);
638: -- hr_utility.set_location('l_canonical_start_date = ' || l_canonical_start_date,20);
639: -- hr_utility.set_location('l_canonical_end_date = ' || l_canonical_end_date,20);
640: hr_utility.set_location('Leaving ' || l_proc,20);
633:
634: hr_utility.set_location('stage 3',24);
635:
636: -- hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
637: -- hr_utility.set_location('l_consolidation_set = ' || l_consolidation_set,20);
638: -- hr_utility.set_location('l_canonical_start_date = ' || l_canonical_start_date,20);
639: -- hr_utility.set_location('l_canonical_end_date = ' || l_canonical_end_date,20);
640: hr_utility.set_location('Leaving ' || l_proc,20);
641: END archinit;
634: hr_utility.set_location('stage 3',24);
635:
636: -- hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
637: -- hr_utility.set_location('l_consolidation_set = ' || l_consolidation_set,20);
638: -- hr_utility.set_location('l_canonical_start_date = ' || l_canonical_start_date,20);
639: -- hr_utility.set_location('l_canonical_end_date = ' || l_canonical_end_date,20);
640: hr_utility.set_location('Leaving ' || l_proc,20);
641: END archinit;
642: --------------------------------------------------------------------
635:
636: -- hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
637: -- hr_utility.set_location('l_consolidation_set = ' || l_consolidation_set,20);
638: -- hr_utility.set_location('l_canonical_start_date = ' || l_canonical_start_date,20);
639: -- hr_utility.set_location('l_canonical_end_date = ' || l_canonical_end_date,20);
640: hr_utility.set_location('Leaving ' || l_proc,20);
641: END archinit;
642: --------------------------------------------------------------------
643:
636: -- hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
637: -- hr_utility.set_location('l_consolidation_set = ' || l_consolidation_set,20);
638: -- hr_utility.set_location('l_canonical_start_date = ' || l_canonical_start_date,20);
639: -- hr_utility.set_location('l_canonical_end_date = ' || l_canonical_end_date,20);
640: hr_utility.set_location('Leaving ' || l_proc,20);
641: END archinit;
642: --------------------------------------------------------------------
643:
644: PROCEDURE archive_employee_details (
892: l_proc VARCHAR2(60) := g_package || 'archive_employee_details';
893: l_prsi_count NUMBER(1) := 0; --bug 4724788
894: --
895: BEGIN
896: hr_utility.set_location('Entering ' || l_proc,10);
897: -- call generic procedure to retrieve and archive all data for
898: -- EMPLOYEE DETAILS, ADDRESS DETAILS and EMPLOYEE NET PAY DISTRIBUTION
899: hr_utility.set_location('Calling pay_emp_action_arch',20);
900:
895: BEGIN
896: hr_utility.set_location('Entering ' || l_proc,10);
897: -- call generic procedure to retrieve and archive all data for
898: -- EMPLOYEE DETAILS, ADDRESS DETAILS and EMPLOYEE NET PAY DISTRIBUTION
899: hr_utility.set_location('Calling pay_emp_action_arch',20);
900:
901: pay_emp_action_arch.get_personal_information (
902: p_payroll_action_id => g_archive_pact -- archive payroll_action_id
903: , p_assactid => p_assactid -- archive assignment_action_id
911: , p_tax_unit_id => g_paye_ref -- only required for US
912: , p_time_period_id => p_time_period_id -- payroll time_period_id
913: , p_ppp_source_action_id => NULL);
914:
915: hr_utility.set_location('Returned from pay_emp_action_arch',30);
916:
917: -- get the business group id
918: pay_ie_p45_archive.get_parameters (
919: p_payroll_action_id => g_archive_pact
919: p_payroll_action_id => g_archive_pact
920: , p_token_name => 'BG_ID'
921: , p_token_value => l_bg_id);
922:
923: hr_utility.set_location('p_run_assignment_action_id ='||p_payroll_child_actid,40);
924:
925: -- get tax basis
926: hr_utility.set_location('g_tax_basis_id ='||g_tax_basis_id,40);
927: -- Bug 5386432, since for terminated which does not have any element attached with FPD
922:
923: hr_utility.set_location('p_run_assignment_action_id ='||p_payroll_child_actid,40);
924:
925: -- get tax basis
926: hr_utility.set_location('g_tax_basis_id ='||g_tax_basis_id,40);
927: -- Bug 5386432, since for terminated which does not have any element attached with FPD
928: -- will have no child assignment actions. Call this only if child actions exists.
929: IF p_payroll_child_actid IS NOT NULL THEN
930: l_tax_basis := pay_ie_archive_detail_pkg.get_tax_details (
931: p_run_assignment_action_id => p_payroll_child_actid
932: ,p_input_value_id => g_tax_basis_id
933: ,p_date_earned => to_char(p_date_earned, 'yyyy/mm/dd'));
934: END IF;
935: hr_utility.set_location('l_tax_basis = ' || l_tax_basis,40);
936:
937: -- get prsi classes
938: hr_utility.set_location('g_prsi_cat_id ='||g_prsi_cat_id,40);
939: -- check for supplementary run
934: END IF;
935: hr_utility.set_location('l_tax_basis = ' || l_tax_basis,40);
936:
937: -- get prsi classes
938: hr_utility.set_location('g_prsi_cat_id ='||g_prsi_cat_id,40);
939: -- check for supplementary run
940: /*
941: OPEN cur_supp_run;
942: FETCH cur_supp_run INTO l_arch_run_count;
940: /*
941: OPEN cur_supp_run;
942: FETCH cur_supp_run INTO l_arch_run_count;
943: CLOSE cur_supp_run;
944: hr_utility.set_location('l_arch_run_count ='||l_arch_run_count,40);
945: -- if it is a supplementary run, archive only for the current run
946: IF l_arch_run_count>1
947: */
948: /*
981:
982: if l_current_sequence is null then
983: l_current_sequence := 0;
984: end if;
985: hr_utility.set_location('l_current_sequence..'||l_current_sequence,101);
986: hr_utility.set_location('l_prev_sequence..'||l_prev_sequence,101);
987:
988:
989: FOR assg_act_rec IN cur_payroll_assg_action
982: if l_current_sequence is null then
983: l_current_sequence := 0;
984: end if;
985: hr_utility.set_location('l_current_sequence..'||l_current_sequence,101);
986: hr_utility.set_location('l_prev_sequence..'||l_prev_sequence,101);
987:
988:
989: FOR assg_act_rec IN cur_payroll_assg_action
990: LOOP
991: l_prsi_cur_cat := pay_ie_archive_detail_pkg.get_tax_details (
992: p_run_assignment_action_id => assg_act_rec.pay_assg_act_id
993: ,p_input_value_id => g_prsi_cat_id
994: ,p_date_earned => to_char(p_date_earned, 'yyyy/mm/dd'));
995: hr_utility.set_location('l_prsi_cur_cat = ' || l_prsi_cur_cat,40);
996:
997: IF l_prsi_cur_cat IS NOT NULL AND l_prsi_cur_cat <>'A' AND (nvl(instr(l_prsi_cat,l_prsi_cur_cat),0) = 0)
998: THEN
999:
998: THEN
999:
1000: IF l_prsi_cat <> ' ' THEN
1001: -- Bug 3669639 Added a space after the comma so that the display is now uniform with spaces
1002: hr_utility.set_location('In if l_prsi_cur_cat = ' || l_prsi_cur_cat,41);
1003: open Cur_Act_Contexts(l_defined_balance_id,'IE_'||l_prsi_cur_cat);
1004: fetch Cur_Act_Contexts into l_class_weeks;
1005: CLOSE Cur_Act_Contexts;
1006: hr_utility.set_location('in if l_class_weeks ..'||l_class_weeks,101);
1002: hr_utility.set_location('In if l_prsi_cur_cat = ' || l_prsi_cur_cat,41);
1003: open Cur_Act_Contexts(l_defined_balance_id,'IE_'||l_prsi_cur_cat);
1004: fetch Cur_Act_Contexts into l_class_weeks;
1005: CLOSE Cur_Act_Contexts;
1006: hr_utility.set_location('in if l_class_weeks ..'||l_class_weeks,101);
1007: if nvl(l_class_weeks,0) > 0 then
1008: l_prsi_cat := l_prsi_cat||', '|| l_prsi_cur_cat;
1009: l_prsi_count := l_prsi_count + 1; --Bug 4724788
1010: end if;
1007: if nvl(l_class_weeks,0) > 0 then
1008: l_prsi_cat := l_prsi_cat||', '|| l_prsi_cur_cat;
1009: l_prsi_count := l_prsi_count + 1; --Bug 4724788
1010: end if;
1011: hr_utility.set_location('l_prsi_count = ' || l_prsi_count,420);
1012: --Bug 4724788
1013: if l_prsi_count = 2 then
1014: exit;
1015: end if;
1014: exit;
1015: end if;
1016: ELSE
1017: v_class := 'IE_'||l_prsi_cur_cat;
1018: hr_utility.set_location('before in else l_class_weeks ..'||l_class_weeks,101);
1019: hr_utility.set_location('before in else l_prsi_cur_cat ..'||l_prsi_cur_cat,101);
1020: hr_utility.set_location('v_class ..'||v_class,101);
1021: open Cur_Act_Contexts(l_defined_balance_id,v_class);
1022: fetch Cur_Act_Contexts into l_class_weeks;
1015: end if;
1016: ELSE
1017: v_class := 'IE_'||l_prsi_cur_cat;
1018: hr_utility.set_location('before in else l_class_weeks ..'||l_class_weeks,101);
1019: hr_utility.set_location('before in else l_prsi_cur_cat ..'||l_prsi_cur_cat,101);
1020: hr_utility.set_location('v_class ..'||v_class,101);
1021: open Cur_Act_Contexts(l_defined_balance_id,v_class);
1022: fetch Cur_Act_Contexts into l_class_weeks;
1023: CLOSE Cur_Act_Contexts;
1016: ELSE
1017: v_class := 'IE_'||l_prsi_cur_cat;
1018: hr_utility.set_location('before in else l_class_weeks ..'||l_class_weeks,101);
1019: hr_utility.set_location('before in else l_prsi_cur_cat ..'||l_prsi_cur_cat,101);
1020: hr_utility.set_location('v_class ..'||v_class,101);
1021: open Cur_Act_Contexts(l_defined_balance_id,v_class);
1022: fetch Cur_Act_Contexts into l_class_weeks;
1023: CLOSE Cur_Act_Contexts;
1024: hr_utility.set_location('in else l_class_weeks ..'||l_class_weeks,101);
1020: hr_utility.set_location('v_class ..'||v_class,101);
1021: open Cur_Act_Contexts(l_defined_balance_id,v_class);
1022: fetch Cur_Act_Contexts into l_class_weeks;
1023: CLOSE Cur_Act_Contexts;
1024: hr_utility.set_location('in else l_class_weeks ..'||l_class_weeks,101);
1025:
1026: if nvl(l_class_weeks,0) > 0 then
1027:
1028: l_prsi_cat :=l_prsi_cur_cat;
1025:
1026: if nvl(l_class_weeks,0) > 0 then
1027:
1028: l_prsi_cat :=l_prsi_cur_cat;
1029: hr_utility.set_location('In if else v_class = ' || v_class,42);
1030: end if;
1031: --exit;
1032: END IF;
1033: END IF;
1034:
1035: END LOOP;
1036: -- end bug 5591812
1037: -- END IF;
1038: hr_utility.set_location('g_prsi_subcat_id ='||g_prsi_subcat_id,40);
1039: -- Bug 5386432, since for terminated which does not have any element attached with FPD
1040: -- will have no child assignment actions. Call this only if child actions exists.
1041: IF p_payroll_child_actid IS NOT NULL THEN
1042: l_prsi_subcat := pay_ie_archive_detail_pkg.get_tax_details (
1047: p_run_assignment_action_id => p_payroll_child_actid
1048: ,p_input_value_id => g_ins_weeks_id
1049: ,p_date_earned => to_char(p_date_earned, 'yyyy/mm/dd'));
1050: END IF;
1051: hr_utility.set_location('l_prsi_subcat = ' || l_prsi_subcat,40);
1052: hr_utility.set_location('g_ins_weeks_id ='||g_ins_weeks_id,40);
1053: hr_utility.set_location('l_ins_weeks = ' || l_ins_weeks,40);
1054:
1055: -- get tax credit and std rate cut off
1048: ,p_input_value_id => g_ins_weeks_id
1049: ,p_date_earned => to_char(p_date_earned, 'yyyy/mm/dd'));
1050: END IF;
1051: hr_utility.set_location('l_prsi_subcat = ' || l_prsi_subcat,40);
1052: hr_utility.set_location('g_ins_weeks_id ='||g_ins_weeks_id,40);
1053: hr_utility.set_location('l_ins_weeks = ' || l_ins_weeks,40);
1054:
1055: -- get tax credit and std rate cut off
1056: OPEN cur_period_type;
1049: ,p_date_earned => to_char(p_date_earned, 'yyyy/mm/dd'));
1050: END IF;
1051: hr_utility.set_location('l_prsi_subcat = ' || l_prsi_subcat,40);
1052: hr_utility.set_location('g_ins_weeks_id ='||g_ins_weeks_id,40);
1053: hr_utility.set_location('l_ins_weeks = ' || l_ins_weeks,40);
1054:
1055: -- get tax credit and std rate cut off
1056: OPEN cur_period_type;
1057: FETCH cur_period_type INTO l_period_type;
1150: l_tax_credit :=l_monthly_tax_credit* l_number_per_year/12;
1151: l_std_rate_cut_off := l_monthly_std_rate_cutoff* l_number_per_year/12;
1152: END IF;
1153: -- end 5510536.
1154: hr_utility.set_location('l_tax_credit = ' || l_tax_credit,40);
1155: hr_utility.set_location('l_std_rate_cut_off = ' || l_std_rate_cut_off,40);
1156: IF l_tax_basis = 'C'
1157: THEN
1158: l_tax_basis_det := 'Cumulative';
1151: l_std_rate_cut_off := l_monthly_std_rate_cutoff* l_number_per_year/12;
1152: END IF;
1153: -- end 5510536.
1154: hr_utility.set_location('l_tax_credit = ' || l_tax_credit,40);
1155: hr_utility.set_location('l_std_rate_cut_off = ' || l_std_rate_cut_off,40);
1156: IF l_tax_basis = 'C'
1157: THEN
1158: l_tax_basis_det := 'Cumulative';
1159: ELSIF l_tax_basis = 'N'
1163: l_tax_basis_det := l_tax_basis;
1164: END IF;
1165:
1166: --get the date of birth and separate name
1167: hr_utility.set_location('V_assignment_id = ' || p_assignment_id,40);
1168: hr_utility.set_location('V_date_earned = ' || p_date_earned,40);
1169:
1170: OPEN cur_sep_name_dob(l_bg_id);
1171: FETCH cur_sep_name_dob INTO l_date_of_birth,l_first_name,l_last_name;
1164: END IF;
1165:
1166: --get the date of birth and separate name
1167: hr_utility.set_location('V_assignment_id = ' || p_assignment_id,40);
1168: hr_utility.set_location('V_date_earned = ' || p_date_earned,40);
1169:
1170: OPEN cur_sep_name_dob(l_bg_id);
1171: FETCH cur_sep_name_dob INTO l_date_of_birth,l_first_name,l_last_name;
1172: CLOSE cur_sep_name_dob;
1217: FETCH comm_date_last_p45 INTO l_commencement_date;
1218: CLOSE comm_date_last_p45;
1219: end if;*/
1220: -- end bug 5383808
1221: hr_utility.set_location('Archiving IE EMPLOYEE DETAILS',50);
1222: pay_action_information_api.create_action_information (
1223: p_action_information_id => l_action_info_id
1224: , p_action_context_id => p_assactid
1225: , p_action_context_type => 'AAP'
1458: --6615117
1459: l_source_null_flag NUMBER:= 0;
1460:
1461: BEGIN
1462: -- hr_utility.trace_on(null,'P45');
1463: hr_utility.set_location('Entering ' || l_proc,10);
1464: hr_utility.set_location('Step ' || l_proc,20);
1465: hr_utility.set_location('p_source_id = ' || p_source_id,20);
1466: hr_utility.set_location('p_balance = ' || p_balance,20);
1459: l_source_null_flag NUMBER:= 0;
1460:
1461: BEGIN
1462: -- hr_utility.trace_on(null,'P45');
1463: hr_utility.set_location('Entering ' || l_proc,10);
1464: hr_utility.set_location('Step ' || l_proc,20);
1465: hr_utility.set_location('p_source_id = ' || p_source_id,20);
1466: hr_utility.set_location('p_balance = ' || p_balance,20);
1467: hr_utility.set_location('p_dimension = ' || p_dimension,20);
1460:
1461: BEGIN
1462: -- hr_utility.trace_on(null,'P45');
1463: hr_utility.set_location('Entering ' || l_proc,10);
1464: hr_utility.set_location('Step ' || l_proc,20);
1465: hr_utility.set_location('p_source_id = ' || p_source_id,20);
1466: hr_utility.set_location('p_balance = ' || p_balance,20);
1467: hr_utility.set_location('p_dimension = ' || p_dimension,20);
1468: hr_utility.set_location('p_defined_bal_id = ' || p_defined_bal_id,20);
1461: BEGIN
1462: -- hr_utility.trace_on(null,'P45');
1463: hr_utility.set_location('Entering ' || l_proc,10);
1464: hr_utility.set_location('Step ' || l_proc,20);
1465: hr_utility.set_location('p_source_id = ' || p_source_id,20);
1466: hr_utility.set_location('p_balance = ' || p_balance,20);
1467: hr_utility.set_location('p_dimension = ' || p_dimension,20);
1468: hr_utility.set_location('p_defined_bal_id = ' || p_defined_bal_id,20);
1469:
1462: -- hr_utility.trace_on(null,'P45');
1463: hr_utility.set_location('Entering ' || l_proc,10);
1464: hr_utility.set_location('Step ' || l_proc,20);
1465: hr_utility.set_location('p_source_id = ' || p_source_id,20);
1466: hr_utility.set_location('p_balance = ' || p_balance,20);
1467: hr_utility.set_location('p_dimension = ' || p_dimension,20);
1468: hr_utility.set_location('p_defined_bal_id = ' || p_defined_bal_id,20);
1469:
1470: IF p_balance = 'IE PRSI_ClassA Insurable Weeks'
1463: hr_utility.set_location('Entering ' || l_proc,10);
1464: hr_utility.set_location('Step ' || l_proc,20);
1465: hr_utility.set_location('p_source_id = ' || p_source_id,20);
1466: hr_utility.set_location('p_balance = ' || p_balance,20);
1467: hr_utility.set_location('p_dimension = ' || p_dimension,20);
1468: hr_utility.set_location('p_defined_bal_id = ' || p_defined_bal_id,20);
1469:
1470: IF p_balance = 'IE PRSI_ClassA Insurable Weeks'
1471: THEN
1464: hr_utility.set_location('Step ' || l_proc,20);
1465: hr_utility.set_location('p_source_id = ' || p_source_id,20);
1466: hr_utility.set_location('p_balance = ' || p_balance,20);
1467: hr_utility.set_location('p_dimension = ' || p_dimension,20);
1468: hr_utility.set_location('p_defined_bal_id = ' || p_defined_bal_id,20);
1469:
1470: IF p_balance = 'IE PRSI_ClassA Insurable Weeks'
1471: THEN
1472: --bug 5383808
1494: open csr_defined_bal_id('IE PRSI Insurable Weeks');
1495: FETCH csr_defined_bal_id into l_defined_id;
1496: CLOSE csr_defined_bal_id;
1497:
1498: hr_utility.set_location ('l_prev_sequence..'||l_prev_sequence,200);
1499: hr_utility.set_location ('l_current_sequence..'||l_current_sequence,200);
1500: hr_utility.set_location ('l_defined_id..'||l_defined_id,200);
1501: --Commented code for bug fix 3079945
1502: /*OPEN csr_iea_weeks(l_balance_type_id);
1495: FETCH csr_defined_bal_id into l_defined_id;
1496: CLOSE csr_defined_bal_id;
1497:
1498: hr_utility.set_location ('l_prev_sequence..'||l_prev_sequence,200);
1499: hr_utility.set_location ('l_current_sequence..'||l_current_sequence,200);
1500: hr_utility.set_location ('l_defined_id..'||l_defined_id,200);
1501: --Commented code for bug fix 3079945
1502: /*OPEN csr_iea_weeks(l_balance_type_id);
1503: FETCH csr_iea_weeks into l_balance_value;
1496: CLOSE csr_defined_bal_id;
1497:
1498: hr_utility.set_location ('l_prev_sequence..'||l_prev_sequence,200);
1499: hr_utility.set_location ('l_current_sequence..'||l_current_sequence,200);
1500: hr_utility.set_location ('l_defined_id..'||l_defined_id,200);
1501: --Commented code for bug fix 3079945
1502: /*OPEN csr_iea_weeks(l_balance_type_id);
1503: FETCH csr_iea_weeks into l_balance_value;
1504: CLOSE csr_iea_weeks; */
1533: null);
1534: l_balance_value := l_balance_value - l_p45_last_bal_value;
1535: END IF;*/
1536: l_balance_value := nvl(l_balance_value,0);
1537: hr_utility.set_location('IE PRSI_ClassA Insurable Weeks..'||l_balance_value,1000);
1538: IF p_supp_flag = 'Y' AND p_last_p45_action IS NOT NULL THEN
1539: open get_prev_ins_bal;
1540: FETCH get_prev_ins_bal into l_pre_ins_bal;
1541: CLOSE get_prev_ins_bal;
1540: FETCH get_prev_ins_bal into l_pre_ins_bal;
1541: CLOSE get_prev_ins_bal;
1542: l_balance_value := l_balance_value + l_pre_ins_bal;
1543: END IF;
1544: hr_utility.set_location('After IE PRSI_ClassA Insurable Weeks..'||l_pre_ins_bal,1000.1);
1545: ELSE
1546: /* l_balance_value := PAY_BALANCE_PKG.GET_VALUE(p_defined_bal_id,
1547: p_source_id );
1548: */
1560: Else
1561: l_source_null_flag := 1;
1562: end if;
1563:
1564: hr_utility.set_location('sg Supp Flag ='||p_supp_flag,36);
1565: hr_utility.set_location('sg Last P45 Action ='||p_last_p45_action,37);
1566: --bug 5383808
1567: IF (p_balance like 'IE Taxable Pay') AND (nvl(p_supp_flag,'N') = 'N') AND (p_last_p45_action IS NOT NULL) THEN
1568: l_p45_last_bal_value := PAY_BALANCE_PKG.GET_VALUE(p_defined_bal_id,
1561: l_source_null_flag := 1;
1562: end if;
1563:
1564: hr_utility.set_location('sg Supp Flag ='||p_supp_flag,36);
1565: hr_utility.set_location('sg Last P45 Action ='||p_last_p45_action,37);
1566: --bug 5383808
1567: IF (p_balance like 'IE Taxable Pay') AND (nvl(p_supp_flag,'N') = 'N') AND (p_last_p45_action IS NOT NULL) THEN
1568: l_p45_last_bal_value := PAY_BALANCE_PKG.GET_VALUE(p_defined_bal_id,
1569: p_prev_src_id,
1573: null,
1574: null,
1575: null);
1576:
1577: hr_utility.set_location('before IE Taxable Pay '||l_balance_value,204);
1578: hr_utility.set_location('before IE Taxable Pay '||l_p45_last_bal_value,205);
1579: hr_utility.set_location('p_last_p45_action '||p_last_p45_action,206);
1580: hr_utility.set_location('p_defined_bal_id '||p_defined_bal_id,207);
1581: --l_balance_value := l_balance_value - l_p45_last_bal_value;
1574: null,
1575: null);
1576:
1577: hr_utility.set_location('before IE Taxable Pay '||l_balance_value,204);
1578: hr_utility.set_location('before IE Taxable Pay '||l_p45_last_bal_value,205);
1579: hr_utility.set_location('p_last_p45_action '||p_last_p45_action,206);
1580: hr_utility.set_location('p_defined_bal_id '||p_defined_bal_id,207);
1581: --l_balance_value := l_balance_value - l_p45_last_bal_value;
1582: --6615117
1575: null);
1576:
1577: hr_utility.set_location('before IE Taxable Pay '||l_balance_value,204);
1578: hr_utility.set_location('before IE Taxable Pay '||l_p45_last_bal_value,205);
1579: hr_utility.set_location('p_last_p45_action '||p_last_p45_action,206);
1580: hr_utility.set_location('p_defined_bal_id '||p_defined_bal_id,207);
1581: --l_balance_value := l_balance_value - l_p45_last_bal_value;
1582: --6615117
1583: IF l_source_null_flag = 1 THEN
1576:
1577: hr_utility.set_location('before IE Taxable Pay '||l_balance_value,204);
1578: hr_utility.set_location('before IE Taxable Pay '||l_p45_last_bal_value,205);
1579: hr_utility.set_location('p_last_p45_action '||p_last_p45_action,206);
1580: hr_utility.set_location('p_defined_bal_id '||p_defined_bal_id,207);
1581: --l_balance_value := l_balance_value - l_p45_last_bal_value;
1582: --6615117
1583: IF l_source_null_flag = 1 THEN
1584: l_balance_value:= l_balance_value;
1783:
1784: -- end changes made for PRSI
1785:
1786: --end bug 5383808
1787: hr_utility.set_location('l_balance_value = ' || l_balance_value,20);
1788:
1789: IF p_record_count = 0
1790: THEN
1791: l_record_count := NULL;
1794: END IF;
1795:
1796: IF l_balance_value <> 0
1797: THEN
1798: hr_utility.set_location('Archiving EMEA BALANCES',20);
1799: pay_action_information_api.create_action_information (
1800: p_action_information_id => l_action_info_id
1801: , p_action_context_id => p_action_context_id
1802: , p_action_context_type => 'AAP'
1812: , p_action_information4 => l_balance_value
1813: , p_action_information5 => l_record_count);
1814: END IF;
1815:
1816: hr_utility.set_location('Leaving ' || l_proc,30);
1817: EXCEPTION
1818: WHEN NO_DATA_FOUND
1819: THEN
1820: NULL;
1871: l_balance_type_id NUMBER;
1872: l_balance_value1 NUMBER:=0;
1873: l_prev_source_id number;
1874: BEGIN
1875: hr_utility.set_location('Entering ' || l_proc,10);
1876: hr_utility.set_location('Step ' || l_proc,20);
1877: hr_utility.set_location('p_source_id = ' || p_source_id,20);
1878: hr_utility.set_location('p_balance = ' || p_balance,20);
1879: hr_utility.set_location('p_dimension = ' || p_dimension,20);
1872: l_balance_value1 NUMBER:=0;
1873: l_prev_source_id number;
1874: BEGIN
1875: hr_utility.set_location('Entering ' || l_proc,10);
1876: hr_utility.set_location('Step ' || l_proc,20);
1877: hr_utility.set_location('p_source_id = ' || p_source_id,20);
1878: hr_utility.set_location('p_balance = ' || p_balance,20);
1879: hr_utility.set_location('p_dimension = ' || p_dimension,20);
1880: hr_utility.set_location('p_defined_bal_id = ' || p_defined_bal_id,20);
1873: l_prev_source_id number;
1874: BEGIN
1875: hr_utility.set_location('Entering ' || l_proc,10);
1876: hr_utility.set_location('Step ' || l_proc,20);
1877: hr_utility.set_location('p_source_id = ' || p_source_id,20);
1878: hr_utility.set_location('p_balance = ' || p_balance,20);
1879: hr_utility.set_location('p_dimension = ' || p_dimension,20);
1880: hr_utility.set_location('p_defined_bal_id = ' || p_defined_bal_id,20);
1881:
1874: BEGIN
1875: hr_utility.set_location('Entering ' || l_proc,10);
1876: hr_utility.set_location('Step ' || l_proc,20);
1877: hr_utility.set_location('p_source_id = ' || p_source_id,20);
1878: hr_utility.set_location('p_balance = ' || p_balance,20);
1879: hr_utility.set_location('p_dimension = ' || p_dimension,20);
1880: hr_utility.set_location('p_defined_bal_id = ' || p_defined_bal_id,20);
1881:
1882: hr_utility.set_location('p_last_p45_action = ' || p_last_p45_action,20);
1875: hr_utility.set_location('Entering ' || l_proc,10);
1876: hr_utility.set_location('Step ' || l_proc,20);
1877: hr_utility.set_location('p_source_id = ' || p_source_id,20);
1878: hr_utility.set_location('p_balance = ' || p_balance,20);
1879: hr_utility.set_location('p_dimension = ' || p_dimension,20);
1880: hr_utility.set_location('p_defined_bal_id = ' || p_defined_bal_id,20);
1881:
1882: hr_utility.set_location('p_last_p45_action = ' || p_last_p45_action,20);
1883: hr_utility.set_location('p_action_context_id = ' || p_action_context_id,20);
1876: hr_utility.set_location('Step ' || l_proc,20);
1877: hr_utility.set_location('p_source_id = ' || p_source_id,20);
1878: hr_utility.set_location('p_balance = ' || p_balance,20);
1879: hr_utility.set_location('p_dimension = ' || p_dimension,20);
1880: hr_utility.set_location('p_defined_bal_id = ' || p_defined_bal_id,20);
1881:
1882: hr_utility.set_location('p_last_p45_action = ' || p_last_p45_action,20);
1883: hr_utility.set_location('p_action_context_id = ' || p_action_context_id,20);
1884: hr_utility.set_location('p_last_p45_pact = ' || p_last_p45_pact,20);
1878: hr_utility.set_location('p_balance = ' || p_balance,20);
1879: hr_utility.set_location('p_dimension = ' || p_dimension,20);
1880: hr_utility.set_location('p_defined_bal_id = ' || p_defined_bal_id,20);
1881:
1882: hr_utility.set_location('p_last_p45_action = ' || p_last_p45_action,20);
1883: hr_utility.set_location('p_action_context_id = ' || p_action_context_id,20);
1884: hr_utility.set_location('p_last_p45_pact = ' || p_last_p45_pact,20);
1885: hr_utility.set_location('p_ytd_balance = ' || p_ytd_balance,20);
1886: hr_utility.set_location('p_ytd_def_bal_id = ' || p_ytd_def_bal_id,20);
1879: hr_utility.set_location('p_dimension = ' || p_dimension,20);
1880: hr_utility.set_location('p_defined_bal_id = ' || p_defined_bal_id,20);
1881:
1882: hr_utility.set_location('p_last_p45_action = ' || p_last_p45_action,20);
1883: hr_utility.set_location('p_action_context_id = ' || p_action_context_id,20);
1884: hr_utility.set_location('p_last_p45_pact = ' || p_last_p45_pact,20);
1885: hr_utility.set_location('p_ytd_balance = ' || p_ytd_balance,20);
1886: hr_utility.set_location('p_ytd_def_bal_id = ' || p_ytd_def_bal_id,20);
1887:
1880: hr_utility.set_location('p_defined_bal_id = ' || p_defined_bal_id,20);
1881:
1882: hr_utility.set_location('p_last_p45_action = ' || p_last_p45_action,20);
1883: hr_utility.set_location('p_action_context_id = ' || p_action_context_id,20);
1884: hr_utility.set_location('p_last_p45_pact = ' || p_last_p45_pact,20);
1885: hr_utility.set_location('p_ytd_balance = ' || p_ytd_balance,20);
1886: hr_utility.set_location('p_ytd_def_bal_id = ' || p_ytd_def_bal_id,20);
1887:
1888: OPEN csr_get_curr_val(p_action_context_id,p_ytd_def_bal_id);
1881:
1882: hr_utility.set_location('p_last_p45_action = ' || p_last_p45_action,20);
1883: hr_utility.set_location('p_action_context_id = ' || p_action_context_id,20);
1884: hr_utility.set_location('p_last_p45_pact = ' || p_last_p45_pact,20);
1885: hr_utility.set_location('p_ytd_balance = ' || p_ytd_balance,20);
1886: hr_utility.set_location('p_ytd_def_bal_id = ' || p_ytd_def_bal_id,20);
1887:
1888: OPEN csr_get_curr_val(p_action_context_id,p_ytd_def_bal_id);
1889: FETCH csr_get_curr_val INTO l_balance_value;
1882: hr_utility.set_location('p_last_p45_action = ' || p_last_p45_action,20);
1883: hr_utility.set_location('p_action_context_id = ' || p_action_context_id,20);
1884: hr_utility.set_location('p_last_p45_pact = ' || p_last_p45_pact,20);
1885: hr_utility.set_location('p_ytd_balance = ' || p_ytd_balance,20);
1886: hr_utility.set_location('p_ytd_def_bal_id = ' || p_ytd_def_bal_id,20);
1887:
1888: OPEN csr_get_curr_val(p_action_context_id,p_ytd_def_bal_id);
1889: FETCH csr_get_curr_val INTO l_balance_value;
1890: CLOSE csr_get_curr_val;
1887:
1888: OPEN csr_get_curr_val(p_action_context_id,p_ytd_def_bal_id);
1889: FETCH csr_get_curr_val INTO l_balance_value;
1890: CLOSE csr_get_curr_val;
1891: hr_utility.set_location('l_balance_value = ' || l_balance_value,20);
1892:
1893: -- l_balance_value := get_arc_bal_value(p_action_context_id,p_ytd_balance);
1894:
1895: IF p_last_p45_action IS NOT NULL THEN
1910: null);
1911:
1912: END IF;
1913: END IF;
1914: hr_utility.set_location('l_balance_value1 = ' || l_balance_value1,20);
1915:
1916: l_balance_value := l_balance_value - l_balance_value1;
1917:
1918: IF p_record_count = 0
1922: l_record_count := p_record_count + 1;
1923: END IF;
1924: IF l_balance_value <> 0
1925: THEN
1926: hr_utility.set_location('Archiving EMEA BALANCES',20);
1927: pay_action_information_api.create_action_information (
1928: p_action_information_id => l_action_info_id
1929: , p_action_context_id => p_action_context_id
1930: , p_action_context_type => 'AAP'
1939: , p_action_information3 => NULL
1940: , p_action_information4 => l_balance_value
1941: , p_action_information5 => l_record_count);
1942: END IF;
1943: hr_utility.set_location('Leaving ' || l_proc,30);
1944: EXCEPTION
1945: WHEN NO_DATA_FOUND
1946: THEN
1947: NULL;
2037: l_asg_end_date DATE;
2038: l_last_end_date DATE;
2039:
2040: BEGIN
2041: hr_utility.set_location('Entering ' || l_proc,20);
2042: hr_utility.set_location('Step ' || l_proc,20);
2043: hr_utility.set_location('p_action_context_id = ' || p_action_context_id,20);
2044: hr_utility.set_location('p_assignment_id = ' || p_assignment_id,20);
2045: hr_utility.set_location('p_person_id = ' || p_person_id,20);
2038: l_last_end_date DATE;
2039:
2040: BEGIN
2041: hr_utility.set_location('Entering ' || l_proc,20);
2042: hr_utility.set_location('Step ' || l_proc,20);
2043: hr_utility.set_location('p_action_context_id = ' || p_action_context_id,20);
2044: hr_utility.set_location('p_assignment_id = ' || p_assignment_id,20);
2045: hr_utility.set_location('p_person_id = ' || p_person_id,20);
2046: hr_utility.set_location('g_paye_ref = ' || g_paye_ref,20);
2039:
2040: BEGIN
2041: hr_utility.set_location('Entering ' || l_proc,20);
2042: hr_utility.set_location('Step ' || l_proc,20);
2043: hr_utility.set_location('p_action_context_id = ' || p_action_context_id,20);
2044: hr_utility.set_location('p_assignment_id = ' || p_assignment_id,20);
2045: hr_utility.set_location('p_person_id = ' || p_person_id,20);
2046: hr_utility.set_location('g_paye_ref = ' || g_paye_ref,20);
2047: hr_utility.set_location('p_termination_date = ' || p_termination_date,20);
2040: BEGIN
2041: hr_utility.set_location('Entering ' || l_proc,20);
2042: hr_utility.set_location('Step ' || l_proc,20);
2043: hr_utility.set_location('p_action_context_id = ' || p_action_context_id,20);
2044: hr_utility.set_location('p_assignment_id = ' || p_assignment_id,20);
2045: hr_utility.set_location('p_person_id = ' || p_person_id,20);
2046: hr_utility.set_location('g_paye_ref = ' || g_paye_ref,20);
2047: hr_utility.set_location('p_termination_date = ' || p_termination_date,20);
2048:
2041: hr_utility.set_location('Entering ' || l_proc,20);
2042: hr_utility.set_location('Step ' || l_proc,20);
2043: hr_utility.set_location('p_action_context_id = ' || p_action_context_id,20);
2044: hr_utility.set_location('p_assignment_id = ' || p_assignment_id,20);
2045: hr_utility.set_location('p_person_id = ' || p_person_id,20);
2046: hr_utility.set_location('g_paye_ref = ' || g_paye_ref,20);
2047: hr_utility.set_location('p_termination_date = ' || p_termination_date,20);
2048:
2049:
2042: hr_utility.set_location('Step ' || l_proc,20);
2043: hr_utility.set_location('p_action_context_id = ' || p_action_context_id,20);
2044: hr_utility.set_location('p_assignment_id = ' || p_assignment_id,20);
2045: hr_utility.set_location('p_person_id = ' || p_person_id,20);
2046: hr_utility.set_location('g_paye_ref = ' || g_paye_ref,20);
2047: hr_utility.set_location('p_termination_date = ' || p_termination_date,20);
2048:
2049:
2050:
2043: hr_utility.set_location('p_action_context_id = ' || p_action_context_id,20);
2044: hr_utility.set_location('p_assignment_id = ' || p_assignment_id,20);
2045: hr_utility.set_location('p_person_id = ' || p_person_id,20);
2046: hr_utility.set_location('g_paye_ref = ' || g_paye_ref,20);
2047: hr_utility.set_location('p_termination_date = ' || p_termination_date,20);
2048:
2049:
2050:
2051: -- get deceased flag, date of leaving
2056: -- Copied to out variable (5600150)
2057: p_deceased_flag := l_deceased_flg;
2058:
2059: l_asg_end_date := l_termination_date;
2060: hr_utility.set_location('l_termination_date = ' || l_termination_date,21);
2061:
2062: /* If employee is not terminated using end employment check for asg end date */
2063: IF l_termination_date IS NULL THEN
2064: /* Get End Date of Employement with Employer */
2069: OPEN cur_get_asg_end_date;
2070: FETCH cur_get_asg_end_date INTO l_asg_end_date;
2071: CLOSE cur_get_asg_end_date;
2072: END IF;
2073: hr_utility.set_location('l_termination_date = ' || l_termination_date,22);
2074: p_termination_date := l_termination_date;
2075: OPEN cur_supp_run;
2076: FETCH cur_supp_run INTO l_last_end_date;
2077: hr_utility.set_location('l_last_end_date = '|| l_last_end_date,20);
2073: hr_utility.set_location('l_termination_date = ' || l_termination_date,22);
2074: p_termination_date := l_termination_date;
2075: OPEN cur_supp_run;
2076: FETCH cur_supp_run INTO l_last_end_date;
2077: hr_utility.set_location('l_last_end_date = '|| l_last_end_date,20);
2078: IF l_last_end_date IS NOT NULL THEN
2079: --IF l_report_type_count >= 1 THEN
2080: p_supp_pymt_date := p_date_earned;
2081: p_supp_flag:= 'Y';
2295: and tax_basis not in ('IE_EMERGENCY','IE_EMERGENCY_NO_PPS');
2296: */
2297: BEGIN
2298: --
2299: hr_utility.set_location('Entering ' || l_proc,20);
2300: hr_utility.set_location('Step ' || l_proc,20);
2301: hr_utility.set_location('p_action_context_id = ' || p_action_context_id,20);
2302: hr_utility.set_location('p_payroll_id = ' || p_payroll_id,20);
2303: hr_utility.set_location('p_assignment_id = ' || p_assignment_id,20);
2296: */
2297: BEGIN
2298: --
2299: hr_utility.set_location('Entering ' || l_proc,20);
2300: hr_utility.set_location('Step ' || l_proc,20);
2301: hr_utility.set_location('p_action_context_id = ' || p_action_context_id,20);
2302: hr_utility.set_location('p_payroll_id = ' || p_payroll_id,20);
2303: hr_utility.set_location('p_assignment_id = ' || p_assignment_id,20);
2304: hr_utility.set_location('p_person_id = ' || p_person_id,20);
2297: BEGIN
2298: --
2299: hr_utility.set_location('Entering ' || l_proc,20);
2300: hr_utility.set_location('Step ' || l_proc,20);
2301: hr_utility.set_location('p_action_context_id = ' || p_action_context_id,20);
2302: hr_utility.set_location('p_payroll_id = ' || p_payroll_id,20);
2303: hr_utility.set_location('p_assignment_id = ' || p_assignment_id,20);
2304: hr_utility.set_location('p_person_id = ' || p_person_id,20);
2305: hr_utility.set_location('g_paye_ref = ' || g_paye_ref,20);
2298: --
2299: hr_utility.set_location('Entering ' || l_proc,20);
2300: hr_utility.set_location('Step ' || l_proc,20);
2301: hr_utility.set_location('p_action_context_id = ' || p_action_context_id,20);
2302: hr_utility.set_location('p_payroll_id = ' || p_payroll_id,20);
2303: hr_utility.set_location('p_assignment_id = ' || p_assignment_id,20);
2304: hr_utility.set_location('p_person_id = ' || p_person_id,20);
2305: hr_utility.set_location('g_paye_ref = ' || g_paye_ref,20);
2306: hr_utility.set_location('p_date_earned = ' || p_date_earned,20);
2299: hr_utility.set_location('Entering ' || l_proc,20);
2300: hr_utility.set_location('Step ' || l_proc,20);
2301: hr_utility.set_location('p_action_context_id = ' || p_action_context_id,20);
2302: hr_utility.set_location('p_payroll_id = ' || p_payroll_id,20);
2303: hr_utility.set_location('p_assignment_id = ' || p_assignment_id,20);
2304: hr_utility.set_location('p_person_id = ' || p_person_id,20);
2305: hr_utility.set_location('g_paye_ref = ' || g_paye_ref,20);
2306: hr_utility.set_location('p_date_earned = ' || p_date_earned,20);
2307: hr_utility.set_location('p_child_run_ass_act_id = ' || p_child_run_ass_act_id,20);
2300: hr_utility.set_location('Step ' || l_proc,20);
2301: hr_utility.set_location('p_action_context_id = ' || p_action_context_id,20);
2302: hr_utility.set_location('p_payroll_id = ' || p_payroll_id,20);
2303: hr_utility.set_location('p_assignment_id = ' || p_assignment_id,20);
2304: hr_utility.set_location('p_person_id = ' || p_person_id,20);
2305: hr_utility.set_location('g_paye_ref = ' || g_paye_ref,20);
2306: hr_utility.set_location('p_date_earned = ' || p_date_earned,20);
2307: hr_utility.set_location('p_child_run_ass_act_id = ' || p_child_run_ass_act_id,20);
2308: -- get deceased flag, date of leaving
2301: hr_utility.set_location('p_action_context_id = ' || p_action_context_id,20);
2302: hr_utility.set_location('p_payroll_id = ' || p_payroll_id,20);
2303: hr_utility.set_location('p_assignment_id = ' || p_assignment_id,20);
2304: hr_utility.set_location('p_person_id = ' || p_person_id,20);
2305: hr_utility.set_location('g_paye_ref = ' || g_paye_ref,20);
2306: hr_utility.set_location('p_date_earned = ' || p_date_earned,20);
2307: hr_utility.set_location('p_child_run_ass_act_id = ' || p_child_run_ass_act_id,20);
2308: -- get deceased flag, date of leaving
2309: /* OPEN cur_service_leave;
2302: hr_utility.set_location('p_payroll_id = ' || p_payroll_id,20);
2303: hr_utility.set_location('p_assignment_id = ' || p_assignment_id,20);
2304: hr_utility.set_location('p_person_id = ' || p_person_id,20);
2305: hr_utility.set_location('g_paye_ref = ' || g_paye_ref,20);
2306: hr_utility.set_location('p_date_earned = ' || p_date_earned,20);
2307: hr_utility.set_location('p_child_run_ass_act_id = ' || p_child_run_ass_act_id,20);
2308: -- get deceased flag, date of leaving
2309: /* OPEN cur_service_leave;
2310: FETCH cur_service_leave INTO l_deceased_flg,l_termination_date;
2303: hr_utility.set_location('p_assignment_id = ' || p_assignment_id,20);
2304: hr_utility.set_location('p_person_id = ' || p_person_id,20);
2305: hr_utility.set_location('g_paye_ref = ' || g_paye_ref,20);
2306: hr_utility.set_location('p_date_earned = ' || p_date_earned,20);
2307: hr_utility.set_location('p_child_run_ass_act_id = ' || p_child_run_ass_act_id,20);
2308: -- get deceased flag, date of leaving
2309: /* OPEN cur_service_leave;
2310: FETCH cur_service_leave INTO l_deceased_flg,l_termination_date;
2311: CLOSE cur_service_leave;
2327: -- check whether this is a supplementary run
2328: -- and get the payment date of supplementary run
2329: /*OPEN cur_supp_run;
2330: FETCH cur_supp_run INTO l_last_end_date;
2331: hr_utility.set_location('l_last_end_date = '|| l_last_end_date,20);
2332: IF l_last_end_date IS NOT NULL THEN
2333: --IF l_report_type_count >= 1 THEN
2334: l_supp_flg :='Y';
2335: l_supp_pymt_date := p_date_earned;
2344:
2345: l_supp_flg := p_supp_flag;
2346: l_supp_pymt_date := p_supp_pymt_date;
2347: l_termination_date := p_termination_date;
2348: hr_utility.set_location('supplementary flag = '||l_supp_flg,20);
2349: hr_utility.set_location('supplementary date = '||l_supp_pymt_date,20);
2350: --
2351: --
2352: -- get pay_period_number
2345: l_supp_flg := p_supp_flag;
2346: l_supp_pymt_date := p_supp_pymt_date;
2347: l_termination_date := p_termination_date;
2348: hr_utility.set_location('supplementary flag = '||l_supp_flg,20);
2349: hr_utility.set_location('supplementary date = '||l_supp_pymt_date,20);
2350: --
2351: --
2352: -- get pay_period_number
2353: OPEN cur_period_num;
2352: -- get pay_period_number
2353: OPEN cur_period_num;
2354: FETCH cur_period_num INTO l_period_num, l_number_per_fiscal_year, l_periods_per_period, l_start_date, l_end_date;
2355: CLOSE cur_period_num;
2356: hr_utility.set_location('period number = '||l_period_num,20);
2357: hr_utility.set_location('number per fiscal year : '||l_number_per_fiscal_year,20);
2358: hr_utility.set_location('periods per period : '||l_periods_per_period,20);
2359: hr_utility.set_location('start date : '||l_start_date,20);
2360: hr_utility.set_location('end date : '||l_end_date,20);
2353: OPEN cur_period_num;
2354: FETCH cur_period_num INTO l_period_num, l_number_per_fiscal_year, l_periods_per_period, l_start_date, l_end_date;
2355: CLOSE cur_period_num;
2356: hr_utility.set_location('period number = '||l_period_num,20);
2357: hr_utility.set_location('number per fiscal year : '||l_number_per_fiscal_year,20);
2358: hr_utility.set_location('periods per period : '||l_periods_per_period,20);
2359: hr_utility.set_location('start date : '||l_start_date,20);
2360: hr_utility.set_location('end date : '||l_end_date,20);
2361: --
2354: FETCH cur_period_num INTO l_period_num, l_number_per_fiscal_year, l_periods_per_period, l_start_date, l_end_date;
2355: CLOSE cur_period_num;
2356: hr_utility.set_location('period number = '||l_period_num,20);
2357: hr_utility.set_location('number per fiscal year : '||l_number_per_fiscal_year,20);
2358: hr_utility.set_location('periods per period : '||l_periods_per_period,20);
2359: hr_utility.set_location('start date : '||l_start_date,20);
2360: hr_utility.set_location('end date : '||l_end_date,20);
2361: --
2362: If l_periods_per_period = 1 then
2355: CLOSE cur_period_num;
2356: hr_utility.set_location('period number = '||l_period_num,20);
2357: hr_utility.set_location('number per fiscal year : '||l_number_per_fiscal_year,20);
2358: hr_utility.set_location('periods per period : '||l_periods_per_period,20);
2359: hr_utility.set_location('start date : '||l_start_date,20);
2360: hr_utility.set_location('end date : '||l_end_date,20);
2361: --
2362: If l_periods_per_period = 1 then
2363: l_p45_period_num := l_period_num;
2356: hr_utility.set_location('period number = '||l_period_num,20);
2357: hr_utility.set_location('number per fiscal year : '||l_number_per_fiscal_year,20);
2358: hr_utility.set_location('periods per period : '||l_periods_per_period,20);
2359: hr_utility.set_location('start date : '||l_start_date,20);
2360: hr_utility.set_location('end date : '||l_end_date,20);
2361: --
2362: If l_periods_per_period = 1 then
2363: l_p45_period_num := l_period_num;
2364: Elsif l_asg_end_date between l_start_date and l_end_date then
2375: -- Bug 2943335 passed 'IE EMERGENCY PERIOD' as a parameter to cursor which was earlier hardcoded
2376: /* OPEN cur_defined_balance('IE EMERGENCY PERIOD');
2377: FETCH cur_defined_balance INTO l_defined_balance_id;
2378: CLOSE cur_defined_balance;
2379: hr_utility.set_location('defined balance = '||l_defined_balance_id,20);
2380: l_emer_num := pay_balance_pkg.get_value(p_defined_balance_id => l_defined_balance_id
2381: ,p_assignment_action_id => p_child_run_ass_act_id);
2382: IF l_emer_num >0 THEN
2383: l_emer_basis_flg :='Y';
2404: IF l_tax_basis NOT IN('IE_EMERGENCY','IE_EMERGENCY_NO_PPS') THEN
2405: l_emer_basis_flg := 'N';
2406: END IF;
2407:
2408: hr_utility.set_location('emergency basis = '||l_emer_basis_flg,20);
2409: --
2410: -- get non_cumulative_operated for benefits
2411: -- Bug 2943335 Commented out code below
2412: /* OPEN cur_cal_option;
2410: -- get non_cumulative_operated for benefits
2411: -- Bug 2943335 Commented out code below
2412: /* OPEN cur_cal_option;
2413: FETCH cur_cal_option INTO l_calculation_option;
2414: hr_utility.set_location('l_calculation_option'||l_calculation_option,20);
2415: --Bug:2450336
2416: IF l_calculation_option IN ('IE_OPTION3','IE_OPTION4') THEN
2417: l_noncum_ben_operated := 'Y';
2418: ELSIF l_calculation_option IN ('IE_OPTION1','IE_OPTION2') THEN */
2424:
2425: /*OPEN cur_defined_balance('IE Taxable Social Benefit');
2426: FETCH cur_defined_balance INTO l_soc_ben_defined_bal_id;
2427: CLOSE cur_defined_balance;
2428: hr_utility.set_location('defined balance id = '||l_soc_ben_defined_bal_id,25);
2429:
2430: -- bug 5386432, call only if p_child_run_ass_act_id is not null
2431: IF p_child_run_ass_act_id IS NOT NULL THEN
2432: l_soc_ben_amount := pay_balance_pkg.get_value(l_soc_ben_defined_bal_id,
2438: ,null
2439: ,null
2440: );
2441: end if;
2442: hr_utility.set_location('benefit amount = '||l_soc_ben_amount,25);
2443: -- Check this to identify if employee was ever paid social benefit amount
2444: -- Replacing fix for Bug:2450336
2445: IF ( l_soc_ben_amount <> 0) THEN */
2446: -- end of changes for Bug 2943335
2449: -- reported in this termination against non cumulative flag
2450: /*
2451: OPEN cur_non_cum_tax;
2452: FETCH cur_non_cum_tax INTO l_non_cum_tax;
2453: hr_utility.set_location('l_non_cum_tax'||l_non_cum_tax,20);
2454:
2455: IF cur_non_cum_tax%FOUND THEN
2456: l_noncum_ben_operated := 'true';
2457: ELSE
2468: l_noncum_ben_operated := 'false';
2469: END IF;*/
2470:
2471: -- CLOSE cur_cal_option;
2472: hr_utility.set_location('non cum basis operated = '||l_noncum_ben_operated,20);
2473: --
2474: -- archive the details
2475: pay_action_information_api.create_action_information (
2476: p_action_information_id => l_action_info_id
2489: , p_action_information6 => l_noncum_ben_operated
2490: , p_action_information7 => l_supp_pymt_date
2491: , p_action_information8 => p_person_id);
2492: --
2493: hr_utility.set_location('Leaving '||l_proc,20);
2494: END archive_p45_info;
2495: ---------------------------------------------------------------------------------
2496: --Moved the archiving Payroll Action Level Info archivng part from range_cursor 4468864
2497: PROCEDURE archive_deinit(p_payroll_action_id IN NUMBER) IS
2665: l_curr_payroll_id NUMBER;
2666: l_error varchar2(1) ;
2667: l_archived NUMBER;
2668: BEGIN
2669: hr_utility.set_location('Entering ' || l_proc,10);
2670: l_archived := 0;
2671: -- Check whether assignment action is retried 4468864
2672: OPEN csr_check_archived(p_payroll_action_id);
2673: FETCH csr_check_archived INTO l_archived;
2704: pay_ie_p45_archive.get_parameters (
2705: p_payroll_action_id => p_payroll_action_id
2706: , p_token_name => 'BG_ID'
2707: , p_token_value => l_bg_id);
2708: hr_utility.set_location('Step ' || l_proc,20);
2709: l_canonical_start_date := TO_DATE(l_start_date,'yyyy/mm/dd');
2710: l_canonical_end_date := TO_DATE(l_end_date,'yyyy/mm/dd');
2711: --get_paye_reference (l_consolidation_set,g_paye_ref,l_bg_id,l_canonical_start_date,l_canonical_end_date,l_error);
2712: /*if l_error ='Y' then
2751: , p_payroll_id => rec_payroll_info.payroll_id
2752: , p_effective_date => l_canonical_end_date);
2753: END IF;
2754: CLOSE csr_check_archive;
2755: hr_utility.set_location('rec_payroll_info.payroll_action_id = ' || rec_payroll_info.payroll_action_id,30);
2756: hr_utility.set_location('rec_payroll_info.tax_details_ref = ' || rec_payroll_info.tax_details_ref_no,30);
2757: hr_utility.set_location('rec_payroll_info.employers_paye_ref_no = ' || rec_payroll_info.employer_paye_ref_no,30);
2758: hr_utility.set_location('Archiving EMEA PAYROLL INFO',30);
2759: pay_action_information_api.create_action_information (
2752: , p_effective_date => l_canonical_end_date);
2753: END IF;
2754: CLOSE csr_check_archive;
2755: hr_utility.set_location('rec_payroll_info.payroll_action_id = ' || rec_payroll_info.payroll_action_id,30);
2756: hr_utility.set_location('rec_payroll_info.tax_details_ref = ' || rec_payroll_info.tax_details_ref_no,30);
2757: hr_utility.set_location('rec_payroll_info.employers_paye_ref_no = ' || rec_payroll_info.employer_paye_ref_no,30);
2758: hr_utility.set_location('Archiving EMEA PAYROLL INFO',30);
2759: pay_action_information_api.create_action_information (
2760: p_action_information_id => l_action_info_id
2753: END IF;
2754: CLOSE csr_check_archive;
2755: hr_utility.set_location('rec_payroll_info.payroll_action_id = ' || rec_payroll_info.payroll_action_id,30);
2756: hr_utility.set_location('rec_payroll_info.tax_details_ref = ' || rec_payroll_info.tax_details_ref_no,30);
2757: hr_utility.set_location('rec_payroll_info.employers_paye_ref_no = ' || rec_payroll_info.employer_paye_ref_no,30);
2758: hr_utility.set_location('Archiving EMEA PAYROLL INFO',30);
2759: pay_action_information_api.create_action_information (
2760: p_action_information_id => l_action_info_id
2761: , p_action_context_id => p_payroll_action_id
2754: CLOSE csr_check_archive;
2755: hr_utility.set_location('rec_payroll_info.payroll_action_id = ' || rec_payroll_info.payroll_action_id,30);
2756: hr_utility.set_location('rec_payroll_info.tax_details_ref = ' || rec_payroll_info.tax_details_ref_no,30);
2757: hr_utility.set_location('rec_payroll_info.employers_paye_ref_no = ' || rec_payroll_info.employer_paye_ref_no,30);
2758: hr_utility.set_location('Archiving EMEA PAYROLL INFO',30);
2759: pay_action_information_api.create_action_information (
2760: p_action_information_id => l_action_info_id
2761: , p_action_context_id => p_payroll_action_id
2762: , p_action_context_type => 'PA'
2782: pay_ie_p45_archive.setup_standard_balance_table;
2783: FOR rec_payroll_info in csr_all_payroll_info(p_payroll_action_id)
2784: LOOP
2785: */
2786: hr_utility.trace('Entered payroll info');
2787: pay_balance_pkg.set_context('PAYROLL_ACTION_ID'
2788: , rec_payroll_info.payroll_action_id);
2789: pay_ie_p45_archive.setup_balance_definitions(p_payroll_action_id,
2790: rec_payroll_info.payroll_action_id,
2793: --end if;
2794: END IF;
2795: Exception
2796: when others then
2797: hr_utility.set_location('Leaving via exception section ' || l_proc,40);
2798: END archive_deinit;
2799:
2800: ---------------------------------------------------------------------------------
2801:
2835: l_error varchar2(1) ;
2836: l_employer NUMBER;
2837:
2838: BEGIN
2839: hr_utility.set_location('Entering ' || l_proc,10);
2840: /*
2841: pay_ie_p45_archive.get_parameters (
2842: p_payroll_action_id => pactid
2843: , p_token_name => 'PAYROLL'
2874: p_payroll_action_id => pactid
2875: , p_token_name => 'START_DATE'
2876: , p_token_value => l_start_date);
2877:
2878: hr_utility.set_location('Step ' || l_proc,20);
2879: --hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
2880: --hr_utility.set_location('l_start_date = ' || l_start_date,20);
2881: --hr_utility.set_location('l_end_date = ' || l_end_date,20);
2882: --hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
2875: , p_token_name => 'START_DATE'
2876: , p_token_value => l_start_date);
2877:
2878: hr_utility.set_location('Step ' || l_proc,20);
2879: --hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
2880: --hr_utility.set_location('l_start_date = ' || l_start_date,20);
2881: --hr_utility.set_location('l_end_date = ' || l_end_date,20);
2882: --hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
2883: --hr_utility.set_location('l_start_date = ' || l_start_date,20);
2876: , p_token_value => l_start_date);
2877:
2878: hr_utility.set_location('Step ' || l_proc,20);
2879: --hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
2880: --hr_utility.set_location('l_start_date = ' || l_start_date,20);
2881: --hr_utility.set_location('l_end_date = ' || l_end_date,20);
2882: --hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
2883: --hr_utility.set_location('l_start_date = ' || l_start_date,20);
2884: -- l_canonical_start_date := TO_DATE(l_start_date,'yyyy/mm/dd');
2877:
2878: hr_utility.set_location('Step ' || l_proc,20);
2879: --hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
2880: --hr_utility.set_location('l_start_date = ' || l_start_date,20);
2881: --hr_utility.set_location('l_end_date = ' || l_end_date,20);
2882: --hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
2883: --hr_utility.set_location('l_start_date = ' || l_start_date,20);
2884: -- l_canonical_start_date := TO_DATE(l_start_date,'yyyy/mm/dd');
2885: -- l_canonical_end_date := TO_DATE(l_end_date,'yyyy/mm/dd');
2878: hr_utility.set_location('Step ' || l_proc,20);
2879: --hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
2880: --hr_utility.set_location('l_start_date = ' || l_start_date,20);
2881: --hr_utility.set_location('l_end_date = ' || l_end_date,20);
2882: --hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
2883: --hr_utility.set_location('l_start_date = ' || l_start_date,20);
2884: -- l_canonical_start_date := TO_DATE(l_start_date,'yyyy/mm/dd');
2885: -- l_canonical_end_date := TO_DATE(l_end_date,'yyyy/mm/dd');
2886: --archive EMEA PAYROLL INFO for each prepayment run identified
2879: --hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
2880: --hr_utility.set_location('l_start_date = ' || l_start_date,20);
2881: --hr_utility.set_location('l_end_date = ' || l_end_date,20);
2882: --hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
2883: --hr_utility.set_location('l_start_date = ' || l_start_date,20);
2884: -- l_canonical_start_date := TO_DATE(l_start_date,'yyyy/mm/dd');
2885: -- l_canonical_end_date := TO_DATE(l_end_date,'yyyy/mm/dd');
2886: --archive EMEA PAYROLL INFO for each prepayment run identified
2887: --hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
2883: --hr_utility.set_location('l_start_date = ' || l_start_date,20);
2884: -- l_canonical_start_date := TO_DATE(l_start_date,'yyyy/mm/dd');
2885: -- l_canonical_end_date := TO_DATE(l_end_date,'yyyy/mm/dd');
2886: --archive EMEA PAYROLL INFO for each prepayment run identified
2887: --hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
2888: --hr_utility.set_location('l_consolidation_set = ' || l_consolidation_set,20);
2889: -- hr_utility.set_location('l_canonical_start_date = ' || l_canonical_start_date,20);
2890: -- hr_utility.set_location('l_canonical_end_date = ' || l_canonical_end_date,20);
2891: --Call made to procedure get_paye_referene to get the PAYE reference attributed at payroll level,added for bug fix 3567562.
2884: -- l_canonical_start_date := TO_DATE(l_start_date,'yyyy/mm/dd');
2885: -- l_canonical_end_date := TO_DATE(l_end_date,'yyyy/mm/dd');
2886: --archive EMEA PAYROLL INFO for each prepayment run identified
2887: --hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
2888: --hr_utility.set_location('l_consolidation_set = ' || l_consolidation_set,20);
2889: -- hr_utility.set_location('l_canonical_start_date = ' || l_canonical_start_date,20);
2890: -- hr_utility.set_location('l_canonical_end_date = ' || l_canonical_end_date,20);
2891: --Call made to procedure get_paye_referene to get the PAYE reference attributed at payroll level,added for bug fix 3567562.
2892: --get_paye_reference (l_consolidation_set,g_paye_ref,l_bg_id,l_canonical_start_date,l_canonical_end_date,l_error);
2885: -- l_canonical_end_date := TO_DATE(l_end_date,'yyyy/mm/dd');
2886: --archive EMEA PAYROLL INFO for each prepayment run identified
2887: --hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
2888: --hr_utility.set_location('l_consolidation_set = ' || l_consolidation_set,20);
2889: -- hr_utility.set_location('l_canonical_start_date = ' || l_canonical_start_date,20);
2890: -- hr_utility.set_location('l_canonical_end_date = ' || l_canonical_end_date,20);
2891: --Call made to procedure get_paye_referene to get the PAYE reference attributed at payroll level,added for bug fix 3567562.
2892: --get_paye_reference (l_consolidation_set,g_paye_ref,l_bg_id,l_canonical_start_date,l_canonical_end_date,l_error);
2893: --Added for bug fix 3567562
2886: --archive EMEA PAYROLL INFO for each prepayment run identified
2887: --hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
2888: --hr_utility.set_location('l_consolidation_set = ' || l_consolidation_set,20);
2889: -- hr_utility.set_location('l_canonical_start_date = ' || l_canonical_start_date,20);
2890: -- hr_utility.set_location('l_canonical_end_date = ' || l_canonical_end_date,20);
2891: --Call made to procedure get_paye_referene to get the PAYE reference attributed at payroll level,added for bug fix 3567562.
2892: --get_paye_reference (l_consolidation_set,g_paye_ref,l_bg_id,l_canonical_start_date,l_canonical_end_date,l_error);
2893: --Added for bug fix 3567562
2894: /*
2901: pay_payroll_actions ppa
2902: WHERE ppa.payroll_action_id = :payroll_action_id
2903: AND ppa.business_group_id +0= ppf.business_group_id
2904: ORDER BY ppf.person_id';
2905: hr_utility.set_location('Leaving ' || l_proc,40);
2906: --end if;
2907: Exception
2908: when others then
2909: hr_utility.set_location('Leaving via exception section ' || l_proc,40);
2905: hr_utility.set_location('Leaving ' || l_proc,40);
2906: --end if;
2907: Exception
2908: when others then
2909: hr_utility.set_location('Leaving via exception section ' || l_proc,40);
2910: sqlstr:='select 1 from dual where to_char(:payroll_action_id) = dummy';
2911: END range_cursor;
2912:
2913: -------------------------------------------------
3060: l_bg_id NUMBER;
3061: --
3062: l_proc VARCHAR2(50) := g_package||'action_creation';
3063: BEGIN
3064: --hr_utility.trace_on(null,'P45');
3065: hr_utility.set_location('Entering ' || l_proc,10);
3066: pay_ie_p45_archive.get_parameters (
3067: p_payroll_action_id => pactid
3068: , p_token_name => 'EMPLOYER'
3061: --
3062: l_proc VARCHAR2(50) := g_package||'action_creation';
3063: BEGIN
3064: --hr_utility.trace_on(null,'P45');
3065: hr_utility.set_location('Entering ' || l_proc,10);
3066: pay_ie_p45_archive.get_parameters (
3067: p_payroll_action_id => pactid
3068: , p_token_name => 'EMPLOYER'
3069: , p_token_value => g_paye_ref);
3087: p_payroll_action_id => pactid
3088: , p_token_name => 'PAYROLL'
3089: , p_token_value => l_payroll_id);
3090:
3091: hr_utility.set_location('Step ' || l_proc,20);
3092: hr_utility.set_location('g_paye_ref = ' || g_paye_ref,20);
3093: hr_utility.set_location('l_end_date = ' || l_end_date,20);
3094:
3095: l_canonical_start_date := TO_DATE(l_start_date,'yyyy/mm/dd');
3088: , p_token_name => 'PAYROLL'
3089: , p_token_value => l_payroll_id);
3090:
3091: hr_utility.set_location('Step ' || l_proc,20);
3092: hr_utility.set_location('g_paye_ref = ' || g_paye_ref,20);
3093: hr_utility.set_location('l_end_date = ' || l_end_date,20);
3094:
3095: l_canonical_start_date := TO_DATE(l_start_date,'yyyy/mm/dd');
3096: l_canonical_end_date := TO_DATE(l_end_date,'yyyy/mm/dd');
3089: , p_token_value => l_payroll_id);
3090:
3091: hr_utility.set_location('Step ' || l_proc,20);
3092: hr_utility.set_location('g_paye_ref = ' || g_paye_ref,20);
3093: hr_utility.set_location('l_end_date = ' || l_end_date,20);
3094:
3095: l_canonical_start_date := TO_DATE(l_start_date,'yyyy/mm/dd');
3096: l_canonical_end_date := TO_DATE(l_end_date,'yyyy/mm/dd');
3097: g_archive_start_date := l_canonical_start_date;
3101: l_prepay_action_id := 0;
3102: l_person_id := 0;
3103: l_period_of_service_id := 0;
3104:
3105: hr_utility.set_location('l_start_date = ' || l_canonical_start_date,20);
3106:
3107:
3108: --get_paye_reference (l_consolidation_set,g_paye_ref,l_bg_id,l_canonical_start_date,l_canonical_end_date,l_error);
3109: hr_utility.set_location('Before csr_prepaid_assignments',21);
3105: hr_utility.set_location('l_start_date = ' || l_canonical_start_date,20);
3106:
3107:
3108: --get_paye_reference (l_consolidation_set,g_paye_ref,l_bg_id,l_canonical_start_date,l_canonical_end_date,l_error);
3109: hr_utility.set_location('Before csr_prepaid_assignments',21);
3110:
3111: FOR csr_rec IN csr_prepaid_assignments(pactid,
3112: stperson,
3113: endperson,
3116: LOOP
3117:
3118: IF (l_person_id <> csr_rec.person_id) THEN
3119:
3120: hr_utility.set_location('Different Person '|| csr_rec.person_id ,22);
3121:
3122: SELECT pay_assignment_actions_s.NEXTVAL
3123: INTO l_actid
3124: FROM dual;
3123: INTO l_actid
3124: FROM dual;
3125:
3126: -- CREATE THE ARCHIVE ASSIGNMENT ACTION FOR THE MASTER ASSIGNMENT ACTION
3127: hr_utility.set_location('ASSIGNMENT ID : ' || csr_rec.assignment_id,23);
3128: hr_utility.trace('ASSIGNMENT ID : ' || csr_rec.assignment_id);
3129:
3130: hr_nonrun_asact.insact(l_actid,csr_rec.assignment_id,pactid,chunk,g_paye_ref);
3131: -- CREATE THE ARCHIVE TO PAYROLL MASTER ASSIGNMENT ACTION INTERLOCK AND
3124: FROM dual;
3125:
3126: -- CREATE THE ARCHIVE ASSIGNMENT ACTION FOR THE MASTER ASSIGNMENT ACTION
3127: hr_utility.set_location('ASSIGNMENT ID : ' || csr_rec.assignment_id,23);
3128: hr_utility.trace('ASSIGNMENT ID : ' || csr_rec.assignment_id);
3129:
3130: hr_nonrun_asact.insact(l_actid,csr_rec.assignment_id,pactid,chunk,g_paye_ref);
3131: -- CREATE THE ARCHIVE TO PAYROLL MASTER ASSIGNMENT ACTION INTERLOCK AND
3132: -- THE ARCHIVE TO PREPAYMENT ASSIGNMENT ACTION INTERLOCK
3129:
3130: hr_nonrun_asact.insact(l_actid,csr_rec.assignment_id,pactid,chunk,g_paye_ref);
3131: -- CREATE THE ARCHIVE TO PAYROLL MASTER ASSIGNMENT ACTION INTERLOCK AND
3132: -- THE ARCHIVE TO PREPAYMENT ASSIGNMENT ACTION INTERLOCK
3133: -- hr_utility.set_location('creating lock1 ' || l_actid || ' to ' || csr_rec.run_action_id,20);
3134: -- hr_utility.set_location('creating lock2 ' || l_actid || ' to ' || csr_rec.prepaid_action_id,20);
3135: END IF;
3136: hr_utility.set_location('l_prepay_action_id : ' || l_prepay_action_id,100);
3137: hr_utility.set_location('csr_rec.prepaid_action_id : ' || csr_rec.prepaid_action_id,101);
3130: hr_nonrun_asact.insact(l_actid,csr_rec.assignment_id,pactid,chunk,g_paye_ref);
3131: -- CREATE THE ARCHIVE TO PAYROLL MASTER ASSIGNMENT ACTION INTERLOCK AND
3132: -- THE ARCHIVE TO PREPAYMENT ASSIGNMENT ACTION INTERLOCK
3133: -- hr_utility.set_location('creating lock1 ' || l_actid || ' to ' || csr_rec.run_action_id,20);
3134: -- hr_utility.set_location('creating lock2 ' || l_actid || ' to ' || csr_rec.prepaid_action_id,20);
3135: END IF;
3136: hr_utility.set_location('l_prepay_action_id : ' || l_prepay_action_id,100);
3137: hr_utility.set_location('csr_rec.prepaid_action_id : ' || csr_rec.prepaid_action_id,101);
3138: hr_utility.set_location('l_actid : ' || l_actid,102);
3132: -- THE ARCHIVE TO PREPAYMENT ASSIGNMENT ACTION INTERLOCK
3133: -- hr_utility.set_location('creating lock1 ' || l_actid || ' to ' || csr_rec.run_action_id,20);
3134: -- hr_utility.set_location('creating lock2 ' || l_actid || ' to ' || csr_rec.prepaid_action_id,20);
3135: END IF;
3136: hr_utility.set_location('l_prepay_action_id : ' || l_prepay_action_id,100);
3137: hr_utility.set_location('csr_rec.prepaid_action_id : ' || csr_rec.prepaid_action_id,101);
3138: hr_utility.set_location('l_actid : ' || l_actid,102);
3139:
3140: IF l_prepay_action_id <> csr_rec.prepaid_action_id THEN
3133: -- hr_utility.set_location('creating lock1 ' || l_actid || ' to ' || csr_rec.run_action_id,20);
3134: -- hr_utility.set_location('creating lock2 ' || l_actid || ' to ' || csr_rec.prepaid_action_id,20);
3135: END IF;
3136: hr_utility.set_location('l_prepay_action_id : ' || l_prepay_action_id,100);
3137: hr_utility.set_location('csr_rec.prepaid_action_id : ' || csr_rec.prepaid_action_id,101);
3138: hr_utility.set_location('l_actid : ' || l_actid,102);
3139:
3140: IF l_prepay_action_id <> csr_rec.prepaid_action_id THEN
3141: hr_utility.set_location('locked id : ' || csr_rec.prepaid_action_id,23);
3134: -- hr_utility.set_location('creating lock2 ' || l_actid || ' to ' || csr_rec.prepaid_action_id,20);
3135: END IF;
3136: hr_utility.set_location('l_prepay_action_id : ' || l_prepay_action_id,100);
3137: hr_utility.set_location('csr_rec.prepaid_action_id : ' || csr_rec.prepaid_action_id,101);
3138: hr_utility.set_location('l_actid : ' || l_actid,102);
3139:
3140: IF l_prepay_action_id <> csr_rec.prepaid_action_id THEN
3141: hr_utility.set_location('locked id : ' || csr_rec.prepaid_action_id,23);
3142: hr_nonrun_asact.insint(l_actid,csr_rec.prepaid_action_id);
3137: hr_utility.set_location('csr_rec.prepaid_action_id : ' || csr_rec.prepaid_action_id,101);
3138: hr_utility.set_location('l_actid : ' || l_actid,102);
3139:
3140: IF l_prepay_action_id <> csr_rec.prepaid_action_id THEN
3141: hr_utility.set_location('locked id : ' || csr_rec.prepaid_action_id,23);
3142: hr_nonrun_asact.insint(l_actid,csr_rec.prepaid_action_id);
3143: END IF;
3144:
3145: hr_nonrun_asact.insint(l_actid,csr_rec.run_action_id);
3149: l_period_of_service_id := csr_rec.period_of_service_id;
3150:
3151: END LOOP;
3152:
3153: hr_utility.set_location('Leaving ' || l_proc,20);
3154: END action_creation;
3155:
3156: ----------------------------
3157: PROCEDURE archive_code (p_assactid in number,
3310:
3311:
3312:
3313: BEGIN
3314: -- hr_utility.trace_on(null,'P45');
3315: l_lat_act_seq := NULL;
3316: hr_utility.set_location('Entering'|| l_proc,10);
3317: hr_utility.set_location('Step '|| l_proc,20);
3318: hr_utility.set_location('p_assactid = ' || p_assactid,20);
3312:
3313: BEGIN
3314: -- hr_utility.trace_on(null,'P45');
3315: l_lat_act_seq := NULL;
3316: hr_utility.set_location('Entering'|| l_proc,10);
3317: hr_utility.set_location('Step '|| l_proc,20);
3318: hr_utility.set_location('p_assactid = ' || p_assactid,20);
3319:
3320: -- retrieve the chunk number for the current assignment action
3313: BEGIN
3314: -- hr_utility.trace_on(null,'P45');
3315: l_lat_act_seq := NULL;
3316: hr_utility.set_location('Entering'|| l_proc,10);
3317: hr_utility.set_location('Step '|| l_proc,20);
3318: hr_utility.set_location('p_assactid = ' || p_assactid,20);
3319:
3320: -- retrieve the chunk number for the current assignment action
3321: SELECT paa.chunk_number,paa.assignment_id
3314: -- hr_utility.trace_on(null,'P45');
3315: l_lat_act_seq := NULL;
3316: hr_utility.set_location('Entering'|| l_proc,10);
3317: hr_utility.set_location('Step '|| l_proc,20);
3318: hr_utility.set_location('p_assactid = ' || p_assactid,20);
3319:
3320: -- retrieve the chunk number for the current assignment action
3321: SELECT paa.chunk_number,paa.assignment_id
3322: INTO l_chunk_number,l_assignment_id
3327: l_record_count := 0;
3328:
3329: FOR csr_rec IN csr_assignment_actions(p_assactid)
3330: LOOP
3331: hr_utility.set_location('csr_rec.master_assignment_action_id = ' || csr_rec.master_assignment_action_id,20);
3332: hr_utility.set_location('csr_rec.pre_assignment_action_id = ' || csr_rec.pre_assignment_action_id,20);
3333: hr_utility.set_location('csr_rec.assignment_id = ' || csr_rec.assignment_id,20);
3334: hr_utility.set_location('csr_rec.date_earned = ' ||to_char( csr_rec.date_earned,'dd-mon-yyyy'),20);
3335: hr_utility.set_location('csr_rec.pre_effective_date = ' ||to_char( csr_rec.pre_effective_date,'dd-mon-yyyy'),20);
3328:
3329: FOR csr_rec IN csr_assignment_actions(p_assactid)
3330: LOOP
3331: hr_utility.set_location('csr_rec.master_assignment_action_id = ' || csr_rec.master_assignment_action_id,20);
3332: hr_utility.set_location('csr_rec.pre_assignment_action_id = ' || csr_rec.pre_assignment_action_id,20);
3333: hr_utility.set_location('csr_rec.assignment_id = ' || csr_rec.assignment_id,20);
3334: hr_utility.set_location('csr_rec.date_earned = ' ||to_char( csr_rec.date_earned,'dd-mon-yyyy'),20);
3335: hr_utility.set_location('csr_rec.pre_effective_date = ' ||to_char( csr_rec.pre_effective_date,'dd-mon-yyyy'),20);
3336: hr_utility.set_location('csr_rec.time_period_id = ' || csr_rec.time_period_id,20);
3329: FOR csr_rec IN csr_assignment_actions(p_assactid)
3330: LOOP
3331: hr_utility.set_location('csr_rec.master_assignment_action_id = ' || csr_rec.master_assignment_action_id,20);
3332: hr_utility.set_location('csr_rec.pre_assignment_action_id = ' || csr_rec.pre_assignment_action_id,20);
3333: hr_utility.set_location('csr_rec.assignment_id = ' || csr_rec.assignment_id,20);
3334: hr_utility.set_location('csr_rec.date_earned = ' ||to_char( csr_rec.date_earned,'dd-mon-yyyy'),20);
3335: hr_utility.set_location('csr_rec.pre_effective_date = ' ||to_char( csr_rec.pre_effective_date,'dd-mon-yyyy'),20);
3336: hr_utility.set_location('csr_rec.time_period_id = ' || csr_rec.time_period_id,20);
3337:
3330: LOOP
3331: hr_utility.set_location('csr_rec.master_assignment_action_id = ' || csr_rec.master_assignment_action_id,20);
3332: hr_utility.set_location('csr_rec.pre_assignment_action_id = ' || csr_rec.pre_assignment_action_id,20);
3333: hr_utility.set_location('csr_rec.assignment_id = ' || csr_rec.assignment_id,20);
3334: hr_utility.set_location('csr_rec.date_earned = ' ||to_char( csr_rec.date_earned,'dd-mon-yyyy'),20);
3335: hr_utility.set_location('csr_rec.pre_effective_date = ' ||to_char( csr_rec.pre_effective_date,'dd-mon-yyyy'),20);
3336: hr_utility.set_location('csr_rec.time_period_id = ' || csr_rec.time_period_id,20);
3337:
3338: OPEN cur_assgn_payroll(csr_rec.assignment_id,csr_rec.date_earned);
3331: hr_utility.set_location('csr_rec.master_assignment_action_id = ' || csr_rec.master_assignment_action_id,20);
3332: hr_utility.set_location('csr_rec.pre_assignment_action_id = ' || csr_rec.pre_assignment_action_id,20);
3333: hr_utility.set_location('csr_rec.assignment_id = ' || csr_rec.assignment_id,20);
3334: hr_utility.set_location('csr_rec.date_earned = ' ||to_char( csr_rec.date_earned,'dd-mon-yyyy'),20);
3335: hr_utility.set_location('csr_rec.pre_effective_date = ' ||to_char( csr_rec.pre_effective_date,'dd-mon-yyyy'),20);
3336: hr_utility.set_location('csr_rec.time_period_id = ' || csr_rec.time_period_id,20);
3337:
3338: OPEN cur_assgn_payroll(csr_rec.assignment_id,csr_rec.date_earned);
3339: FETCH cur_assgn_payroll INTO l_payroll_id,l_person_id,l_pos_id;
3332: hr_utility.set_location('csr_rec.pre_assignment_action_id = ' || csr_rec.pre_assignment_action_id,20);
3333: hr_utility.set_location('csr_rec.assignment_id = ' || csr_rec.assignment_id,20);
3334: hr_utility.set_location('csr_rec.date_earned = ' ||to_char( csr_rec.date_earned,'dd-mon-yyyy'),20);
3335: hr_utility.set_location('csr_rec.pre_effective_date = ' ||to_char( csr_rec.pre_effective_date,'dd-mon-yyyy'),20);
3336: hr_utility.set_location('csr_rec.time_period_id = ' || csr_rec.time_period_id,20);
3337:
3338: OPEN cur_assgn_payroll(csr_rec.assignment_id,csr_rec.date_earned);
3339: FETCH cur_assgn_payroll INTO l_payroll_id,l_person_id,l_pos_id;
3340: CLOSE cur_assgn_payroll;
3344: OPEN cur_get_latest_p45(g_archive_pact,l_person_id);
3345: FETCH cur_get_latest_p45 INTO l_concat_sequence;
3346:
3347: IF cur_get_latest_p45%NOTFOUND THEN
3348: hr_utility.set_location('Action Sequence notfound = ' || l_lat_act_seq,21);
3349: l_lat_act_seq := 0;
3350: l_prev_src_id := 0;
3351: END IF;
3352:
3352:
3353: l_lat_act_seq := nvl(substr(l_concat_sequence,1,15),0);
3354: l_prev_src_id := nvl(substr(l_concat_sequence,16),0);
3355:
3356: hr_utility.set_location('Action Sequence = ' || l_lat_act_seq,21);
3357: CLOSE cur_get_latest_p45;
3358:
3359: hr_utility.set_location('Action Sequence = ' || l_lat_act_seq,21);
3360:
3355:
3356: hr_utility.set_location('Action Sequence = ' || l_lat_act_seq,21);
3357: CLOSE cur_get_latest_p45;
3358:
3359: hr_utility.set_location('Action Sequence = ' || l_lat_act_seq,21);
3360:
3361: -- Bug Fix 3817846
3362: -- OPEN cur_child_pay_action(csr_rec.assignment_id, csr_rec.date_earned);
3363: -- Bug Fix 4001524
3365: l_child_pay_action := NULL;
3366: OPEN cur_child_pay_action(l_person_id,g_archive_end_date,l_lat_act_seq);
3367: FETCH cur_child_pay_action INTO l_child_pay_action;
3368:
3369: hr_utility.set_location('Child Action ='||l_child_pay_action,24);
3370:
3371: -------------- Moved here for bug 5386432 ----
3372: get_termination_date(p_action_context_id => p_assactid,
3373: p_assignment_id => csr_rec.assignment_id,
3385: -- Fetch the Payroll action of Last P45 5005788
3386: OPEN cur_get_p45_pact(l_last_p45_action);
3387: FETCH cur_get_p45_pact INTO l_last_p45_pact;
3388: CLOSE cur_get_p45_pact;
3389: hr_utility.set_location(' l_termination_date = '||l_termination_date,30);
3390: hr_utility.set_location(' l_supp_pymt_date = '||l_supp_pymt_date,30);
3391: hr_utility.set_location(' l_supp_flag = '||l_supp_flag,30);
3392:
3393: ------------------
3386: OPEN cur_get_p45_pact(l_last_p45_action);
3387: FETCH cur_get_p45_pact INTO l_last_p45_pact;
3388: CLOSE cur_get_p45_pact;
3389: hr_utility.set_location(' l_termination_date = '||l_termination_date,30);
3390: hr_utility.set_location(' l_supp_pymt_date = '||l_supp_pymt_date,30);
3391: hr_utility.set_location(' l_supp_flag = '||l_supp_flag,30);
3392:
3393: ------------------
3394: IF ((l_child_pay_action IS NULL) and l_supp_flag = 'Y' ) THEN
3387: FETCH cur_get_p45_pact INTO l_last_p45_pact;
3388: CLOSE cur_get_p45_pact;
3389: hr_utility.set_location(' l_termination_date = '||l_termination_date,30);
3390: hr_utility.set_location(' l_supp_pymt_date = '||l_supp_pymt_date,30);
3391: hr_utility.set_location(' l_supp_flag = '||l_supp_flag,30);
3392:
3393: ------------------
3394: IF ((l_child_pay_action IS NULL) and l_supp_flag = 'Y' ) THEN
3395: NULL;
3411: , prepayid => NULL
3412: , status => 'C'
3413: , source_act => p_assactid);
3414:
3415: hr_utility.set_location('creating lock4 ' || l_actid || ' to ' || l_child_pay_action,30);
3416: -- bug 5386432, checks l_child_pay_action is not null, since for zero
3417: -- earnigns there will not child actions, so cant lock any
3418: IF l_child_pay_action IS NOT NULL THEN
3419: hr_nonrun_asact.insint(
3444: OPEN cur_get_p45_pact(l_last_p45_action);
3445: FETCH cur_get_p45_pact INTO l_last_p45_pact;
3446: CLOSE cur_get_p45_pact; */
3447:
3448: hr_utility.set_location('sg Person Id ='||l_person_id,32);
3449: hr_utility.set_location('sg Termination Date ='||l_termination_date,33);
3450: hr_utility.set_location('sg Payroll action ='||g_archive_pact,34);
3451: hr_utility.set_location('sg P45 action ='||l_last_p45_action,35);
3452:
3445: FETCH cur_get_p45_pact INTO l_last_p45_pact;
3446: CLOSE cur_get_p45_pact; */
3447:
3448: hr_utility.set_location('sg Person Id ='||l_person_id,32);
3449: hr_utility.set_location('sg Termination Date ='||l_termination_date,33);
3450: hr_utility.set_location('sg Payroll action ='||g_archive_pact,34);
3451: hr_utility.set_location('sg P45 action ='||l_last_p45_action,35);
3452:
3453: IF l_last_p45_action IS NOT NULL THEN
3446: CLOSE cur_get_p45_pact; */
3447:
3448: hr_utility.set_location('sg Person Id ='||l_person_id,32);
3449: hr_utility.set_location('sg Termination Date ='||l_termination_date,33);
3450: hr_utility.set_location('sg Payroll action ='||g_archive_pact,34);
3451: hr_utility.set_location('sg P45 action ='||l_last_p45_action,35);
3452:
3453: IF l_last_p45_action IS NOT NULL THEN
3454: hr_nonrun_asact.insint(
3447:
3448: hr_utility.set_location('sg Person Id ='||l_person_id,32);
3449: hr_utility.set_location('sg Termination Date ='||l_termination_date,33);
3450: hr_utility.set_location('sg Payroll action ='||g_archive_pact,34);
3451: hr_utility.set_location('sg P45 action ='||l_last_p45_action,35);
3452:
3453: IF l_last_p45_action IS NOT NULL THEN
3454: hr_nonrun_asact.insint(
3455: lockingactid => l_actid
3474:
3475: -- Statutory Balances are archived for all Separate Payment assignment actions
3476: -- and the last (i.e. highest action_sequence) Process Separately assignment action
3477: -- (EMEA BALANCES)
3478: hr_utility.set_location('Archive User Balances - Complete',60);
3479: -- archive statutory balances
3480: hr_utility.set_location('Archive Statutory Balances - Starting',70);
3481: hr_utility.set_location('g_max_statutory_balance_index = '|| g_max_statutory_balance_index,70);
3482: FOR l_index IN 1 .. g_max_statutory_balance_index
3476: -- and the last (i.e. highest action_sequence) Process Separately assignment action
3477: -- (EMEA BALANCES)
3478: hr_utility.set_location('Archive User Balances - Complete',60);
3479: -- archive statutory balances
3480: hr_utility.set_location('Archive Statutory Balances - Starting',70);
3481: hr_utility.set_location('g_max_statutory_balance_index = '|| g_max_statutory_balance_index,70);
3482: FOR l_index IN 1 .. g_max_statutory_balance_index
3483: LOOP
3484: hr_utility.set_location('l_index = ' || l_index,70);
3477: -- (EMEA BALANCES)
3478: hr_utility.set_location('Archive User Balances - Complete',60);
3479: -- archive statutory balances
3480: hr_utility.set_location('Archive Statutory Balances - Starting',70);
3481: hr_utility.set_location('g_max_statutory_balance_index = '|| g_max_statutory_balance_index,70);
3482: FOR l_index IN 1 .. g_max_statutory_balance_index
3483: LOOP
3484: hr_utility.set_location('l_index = ' || l_index,70);
3485: hr_utility.set_location('balance_name ='||g_statutory_balance_table(l_index).balance_name,70);
3480: hr_utility.set_location('Archive Statutory Balances - Starting',70);
3481: hr_utility.set_location('g_max_statutory_balance_index = '|| g_max_statutory_balance_index,70);
3482: FOR l_index IN 1 .. g_max_statutory_balance_index
3483: LOOP
3484: hr_utility.set_location('l_index = ' || l_index,70);
3485: hr_utility.set_location('balance_name ='||g_statutory_balance_table(l_index).balance_name,70);
3486: hr_utility.set_location('database_item_suffix ='||g_statutory_balance_table(l_index).database_item_suffix,70);
3487: /*
3488: --Bug:2448728.Passing the prepayment assignment action id to p_source_id as the _PAYMENTS
3481: hr_utility.set_location('g_max_statutory_balance_index = '|| g_max_statutory_balance_index,70);
3482: FOR l_index IN 1 .. g_max_statutory_balance_index
3483: LOOP
3484: hr_utility.set_location('l_index = ' || l_index,70);
3485: hr_utility.set_location('balance_name ='||g_statutory_balance_table(l_index).balance_name,70);
3486: hr_utility.set_location('database_item_suffix ='||g_statutory_balance_table(l_index).database_item_suffix,70);
3487: /*
3488: --Bug:2448728.Passing the prepayment assignment action id to p_source_id as the _PAYMENTS
3489: --balances are fed only during pre Payments.
3482: FOR l_index IN 1 .. g_max_statutory_balance_index
3483: LOOP
3484: hr_utility.set_location('l_index = ' || l_index,70);
3485: hr_utility.set_location('balance_name ='||g_statutory_balance_table(l_index).balance_name,70);
3486: hr_utility.set_location('database_item_suffix ='||g_statutory_balance_table(l_index).database_item_suffix,70);
3487: /*
3488: --Bug:2448728.Passing the prepayment assignment action id to p_source_id as the _PAYMENTS
3489: --balances are fed only during pre Payments.
3490: If g_statutory_balance_table(l_index).balance_name = 'Total Pay' Then
3539:
3540: END IF;
3541: -- End If;
3542: END LOOP;
3543: hr_utility.set_location('Archive Statutory Balances - Complete',70);
3544: l_record_count := l_record_count + 1;
3545: END IF;
3546: END IF;
3547: CLOSE cur_child_pay_action;
3546: END IF;
3547: CLOSE cur_child_pay_action;
3548: l_date_earned := csr_rec.date_earned;
3549: END LOOP;
3550: hr_utility.set_location('Leaving '|| l_proc,80);
3551: END archive_code;
3552:
3553: --------------------------------------------------------------------------------
3554: -- Bug 2643489: Function to return balnce values archived by P45 Archive Process
3586: l_def_bal_id pay_action_information.action_information1%TYPE := NULL;
3587:
3588: BEGIN
3589:
3590: --hr_utility.trace_on(null,'P45XML');
3591: IF p_assignment_action_id IS NOT NULL AND p_balance_name IS NOT NULL THEN
3592: OPEN csr_get_def_bal(p_payroll_action_id,p_balance_name);
3593: FETCH csr_get_def_bal INTO l_def_bal_id;
3594: CLOSE csr_get_def_bal;
3591: IF p_assignment_action_id IS NOT NULL AND p_balance_name IS NOT NULL THEN
3592: OPEN csr_get_def_bal(p_payroll_action_id,p_balance_name);
3593: FETCH csr_get_def_bal INTO l_def_bal_id;
3594: CLOSE csr_get_def_bal;
3595: hr_utility.set_location('p_payroll_action_id '||p_payroll_action_id,400);
3596: hr_utility.set_location('p_balance_name '||p_balance_name,400);
3597: hr_utility.set_location('l_def_bal_id '||l_def_bal_id,400);
3598:
3599: IF l_def_bal_id IS NOT NULL THEN
3592: OPEN csr_get_def_bal(p_payroll_action_id,p_balance_name);
3593: FETCH csr_get_def_bal INTO l_def_bal_id;
3594: CLOSE csr_get_def_bal;
3595: hr_utility.set_location('p_payroll_action_id '||p_payroll_action_id,400);
3596: hr_utility.set_location('p_balance_name '||p_balance_name,400);
3597: hr_utility.set_location('l_def_bal_id '||l_def_bal_id,400);
3598:
3599: IF l_def_bal_id IS NOT NULL THEN
3600: OPEN csr_get_arc_bal_value(p_assignment_action_id,l_def_bal_id);
3593: FETCH csr_get_def_bal INTO l_def_bal_id;
3594: CLOSE csr_get_def_bal;
3595: hr_utility.set_location('p_payroll_action_id '||p_payroll_action_id,400);
3596: hr_utility.set_location('p_balance_name '||p_balance_name,400);
3597: hr_utility.set_location('l_def_bal_id '||l_def_bal_id,400);
3598:
3599: IF l_def_bal_id IS NOT NULL THEN
3600: OPEN csr_get_arc_bal_value(p_assignment_action_id,l_def_bal_id);
3601: FETCH csr_get_arc_bal_value into l_bal_value;