84: l_proc VARCHAR2(50) := g_package || 'get_parameters';
85:
86: BEGIN
87:
88: hr_utility.set_location('Entering ' || l_proc,10);
89:
90: hr_utility.set_location('Step ' || l_proc,20);
91: hr_utility.set_location('p_token_name = ' || p_token_name,20);
92:
86: BEGIN
87:
88: hr_utility.set_location('Entering ' || l_proc,10);
89:
90: hr_utility.set_location('Step ' || l_proc,20);
91: hr_utility.set_location('p_token_name = ' || p_token_name,20);
92:
93: OPEN csr_parameter_info(p_payroll_action_id,
94: p_token_name);
87:
88: hr_utility.set_location('Entering ' || l_proc,10);
89:
90: hr_utility.set_location('Step ' || l_proc,20);
91: hr_utility.set_location('p_token_name = ' || p_token_name,20);
92:
93: OPEN csr_parameter_info(p_payroll_action_id,
94: p_token_name);
95:
109: p_token_value := l_token_value;
110:
111: END IF;
112:
113: hr_utility.set_location('l_token_value = ' || l_token_value,20);
114: hr_utility.set_location('Leaving ' || l_proc,30);
115:
116: END get_parameters;
117:
110:
111: END IF;
112:
113: hr_utility.set_location('l_token_value = ' || l_token_value,20);
114: hr_utility.set_location('Leaving ' || l_proc,30);
115:
116: END get_parameters;
117:
118: PROCEDURE get_eit_definitions(p_pactid IN NUMBER,
178: l_proc VARCHAR2(50) := g_package || 'get_eit_definitions';
179:
180: BEGIN
181:
182: hr_utility.set_location('Entering ' || l_proc,10);
183:
184: hr_utility.set_location('Step ' || l_proc,20);
185: hr_utility.set_location('p_eit_context = ' || p_eit_context,20);
186:
180: BEGIN
181:
182: hr_utility.set_location('Entering ' || l_proc,10);
183:
184: hr_utility.set_location('Step ' || l_proc,20);
185: hr_utility.set_location('p_eit_context = ' || p_eit_context,20);
186:
187: FOR csr_eit_rec IN csr_eit_values(p_business_group_id,
188: p_eit_context)
181:
182: hr_utility.set_location('Entering ' || l_proc,10);
183:
184: hr_utility.set_location('Step ' || l_proc,20);
185: hr_utility.set_location('p_eit_context = ' || p_eit_context,20);
186:
187: FOR csr_eit_rec IN csr_eit_values(p_business_group_id,
188: p_eit_context)
189:
188: p_eit_context)
189:
190: LOOP
191:
192: hr_utility.set_location('Step ' || l_proc,30);
193:
194: hr_utility.set_location('org_information1 = ' || csr_eit_rec.org_information1,30);
195: hr_utility.set_location('org_information2 = ' || csr_eit_rec.org_information2,30);
196: hr_utility.set_location('org_information3 = ' || csr_eit_rec.org_information3,30);
190: LOOP
191:
192: hr_utility.set_location('Step ' || l_proc,30);
193:
194: hr_utility.set_location('org_information1 = ' || csr_eit_rec.org_information1,30);
195: hr_utility.set_location('org_information2 = ' || csr_eit_rec.org_information2,30);
196: hr_utility.set_location('org_information3 = ' || csr_eit_rec.org_information3,30);
197: hr_utility.set_location('org_information4 = ' || csr_eit_rec.org_information4,30);
198: hr_utility.set_location('org_information5 = ' || csr_eit_rec.org_information5,30);
191:
192: hr_utility.set_location('Step ' || l_proc,30);
193:
194: hr_utility.set_location('org_information1 = ' || csr_eit_rec.org_information1,30);
195: hr_utility.set_location('org_information2 = ' || csr_eit_rec.org_information2,30);
196: hr_utility.set_location('org_information3 = ' || csr_eit_rec.org_information3,30);
197: hr_utility.set_location('org_information4 = ' || csr_eit_rec.org_information4,30);
198: hr_utility.set_location('org_information5 = ' || csr_eit_rec.org_information5,30);
199: hr_utility.set_location('org_information6 = ' || csr_eit_rec.org_information6,30);
192: hr_utility.set_location('Step ' || l_proc,30);
193:
194: hr_utility.set_location('org_information1 = ' || csr_eit_rec.org_information1,30);
195: hr_utility.set_location('org_information2 = ' || csr_eit_rec.org_information2,30);
196: hr_utility.set_location('org_information3 = ' || csr_eit_rec.org_information3,30);
197: hr_utility.set_location('org_information4 = ' || csr_eit_rec.org_information4,30);
198: hr_utility.set_location('org_information5 = ' || csr_eit_rec.org_information5,30);
199: hr_utility.set_location('org_information6 = ' || csr_eit_rec.org_information6,30);
200:
193:
194: hr_utility.set_location('org_information1 = ' || csr_eit_rec.org_information1,30);
195: hr_utility.set_location('org_information2 = ' || csr_eit_rec.org_information2,30);
196: hr_utility.set_location('org_information3 = ' || csr_eit_rec.org_information3,30);
197: hr_utility.set_location('org_information4 = ' || csr_eit_rec.org_information4,30);
198: hr_utility.set_location('org_information5 = ' || csr_eit_rec.org_information5,30);
199: hr_utility.set_location('org_information6 = ' || csr_eit_rec.org_information6,30);
200:
201: IF p_eit_context = g_balance_context
194: hr_utility.set_location('org_information1 = ' || csr_eit_rec.org_information1,30);
195: hr_utility.set_location('org_information2 = ' || csr_eit_rec.org_information2,30);
196: hr_utility.set_location('org_information3 = ' || csr_eit_rec.org_information3,30);
197: hr_utility.set_location('org_information4 = ' || csr_eit_rec.org_information4,30);
198: hr_utility.set_location('org_information5 = ' || csr_eit_rec.org_information5,30);
199: hr_utility.set_location('org_information6 = ' || csr_eit_rec.org_information6,30);
200:
201: IF p_eit_context = g_balance_context
202:
195: hr_utility.set_location('org_information2 = ' || csr_eit_rec.org_information2,30);
196: hr_utility.set_location('org_information3 = ' || csr_eit_rec.org_information3,30);
197: hr_utility.set_location('org_information4 = ' || csr_eit_rec.org_information4,30);
198: hr_utility.set_location('org_information5 = ' || csr_eit_rec.org_information5,30);
199: hr_utility.set_location('org_information6 = ' || csr_eit_rec.org_information6,30);
200:
201: IF p_eit_context = g_balance_context
202:
203: THEN
229: -- then it is a total of all categories for that particular balance.
230: -- This type of balance is identified here and given an
231: -- n_type_ind of T.
232:
233: hr_utility.set_location('g_user_balance_table(l_index).balance_name = ' ||
234: g_user_balance_table(l_index).balance_name,50);
235:
236: IF g_user_balance_table(l_index).balance_name = 'NI Employer'
237:
251: g_user_balance_table(l_index).ni_type_ind := ' ';
252:
253: END IF;
254:
255: hr_utility.set_location('Arch EMEA BALANCE DEFINITION',99);
256:
257: IF p_archive = 'Y'
258:
259: THEN
314: IF p_archive = 'Y'
315:
316: THEN
317:
318: hr_utility.set_location('Arch EMEA ELEMENT DEFINITION',99);
319:
320: pay_action_information_api.create_action_information (
321: p_action_information_id => l_action_info_id
322: , p_action_context_id => p_pactid
338: END IF;
339:
340: l_index := l_index + 1;
341:
342: hr_utility.set_location('l_index = ' || l_index,99);
343:
344: END LOOP;
345:
346: g_max_element_index := l_index;
356: g_element_archive_index := l_index - 1;
357:
358: END IF;
359:
360: hr_utility.set_location('g_balance_archive_index = ' || g_balance_archive_index,99);
361:
362: hr_utility.set_location('Leaving ' || l_proc,30);
363:
364: END get_eit_definitions;
358: END IF;
359:
360: hr_utility.set_location('g_balance_archive_index = ' || g_balance_archive_index,99);
361:
362: hr_utility.set_location('Leaving ' || l_proc,30);
363:
364: END get_eit_definitions;
365:
366: PROCEDURE setup_element_definitions (p_pactid IN NUMBER,
432: l_proc VARCHAR2(60) := g_package || 'setup_element_definitions';
433:
434: BEGIN
435:
436: hr_utility.set_location('Entering ' || l_proc,10);
437:
438: hr_utility.set_location('p_payroll_pact = ' || p_payroll_pact,10);
439:
440: FOR csr_element_rec IN csr_element_name(p_business_group_id,
434: BEGIN
435:
436: hr_utility.set_location('Entering ' || l_proc,10);
437:
438: hr_utility.set_location('p_payroll_pact = ' || p_payroll_pact,10);
439:
440: FOR csr_element_rec IN csr_element_name(p_business_group_id,
441: p_effective_date)
442:
441: p_effective_date)
442:
443: LOOP
444:
445: hr_utility.set_location('csr_element_rec.element_type_id = ' || csr_element_rec.element_type_id,20);
446: hr_utility.set_location('csr_element_rec.element_name = ' || csr_element_rec.element_name,20);
447:
448: IF csr_element_rec.classification_name = 'Earnings'
449:
442:
443: LOOP
444:
445: hr_utility.set_location('csr_element_rec.element_type_id = ' || csr_element_rec.element_type_id,20);
446: hr_utility.set_location('csr_element_rec.element_name = ' || csr_element_rec.element_name,20);
447:
448: IF csr_element_rec.classification_name = 'Earnings'
449:
450: THEN
462: l_payment_type := 'D';
463:
464: END IF;
465:
466: hr_utility.set_location('Arch EMEA ELEMENT DEFINITION',99);
467:
468: pay_action_information_api.create_action_information (
469: p_action_information_id => l_action_info_id
470: , p_action_context_id => p_pactid
482: , p_action_information6 => csr_element_rec.uom);
483:
484: END LOOP;
485:
486: hr_utility.set_location('Leaving ' || l_proc,30);
487:
488: END setup_element_definitions;
489:
490: PROCEDURE setup_standard_balance_table
522:
523:
524: BEGIN
525:
526: hr_utility.set_location('Entering ' || l_proc,10);
527:
528: hr_utility.set_location('Step ' || l_proc,20);
529:
530: l_statutory_balance(1).balance_name := 'Gross Pay';
524: BEGIN
525:
526: hr_utility.set_location('Entering ' || l_proc,10);
527:
528: hr_utility.set_location('Step ' || l_proc,20);
529:
530: l_statutory_balance(1).balance_name := 'Gross Pay';
531: l_statutory_balance(2).balance_name := 'Notional Pay';
532: l_statutory_balance(3).balance_name := 'Taxable Pay';
540: l_statutory_balance(11).balance_name := 'NI Ers Rebate';
541: l_statutory_balance(12).balance_name := 'Student Loan';
542: l_statutory_balance(13).balance_name := 'Superannuation Total';
543:
544: hr_utility.set_location('Step = ' || l_proc,30);
545:
546: FOR l_index IN 1 .. l_max_stat_balance
547:
548: LOOP
546: FOR l_index IN 1 .. l_max_stat_balance
547:
548: LOOP
549:
550: hr_utility.set_location('l_index = ' || l_index,30);
551: hr_utility.set_location('balance_name = ' || l_statutory_balance(l_index).balance_name,30);
552: hr_utility.set_location('l_dimension = ' || l_dimension,30);
553:
554: OPEN csr_balance_dimension(l_statutory_balance(l_index).balance_name,
547:
548: LOOP
549:
550: hr_utility.set_location('l_index = ' || l_index,30);
551: hr_utility.set_location('balance_name = ' || l_statutory_balance(l_index).balance_name,30);
552: hr_utility.set_location('l_dimension = ' || l_dimension,30);
553:
554: OPEN csr_balance_dimension(l_statutory_balance(l_index).balance_name,
555: l_dimension);
548: LOOP
549:
550: hr_utility.set_location('l_index = ' || l_index,30);
551: hr_utility.set_location('balance_name = ' || l_statutory_balance(l_index).balance_name,30);
552: hr_utility.set_location('l_dimension = ' || l_dimension,30);
553:
554: OPEN csr_balance_dimension(l_statutory_balance(l_index).balance_name,
555: l_dimension);
556:
566: END IF;
567:
568: CLOSE csr_balance_dimension;
569:
570: hr_utility.set_location('defined_balance_id = ' || l_statutory_bal_id(l_index).defined_balance_id,30);
571:
572: END LOOP;
573:
574: hr_utility.set_location('Step = ' || l_proc,40);
570: hr_utility.set_location('defined_balance_id = ' || l_statutory_bal_id(l_index).defined_balance_id,30);
571:
572: END LOOP;
573:
574: hr_utility.set_location('Step = ' || l_proc,40);
575:
576: hr_utility.set_location('l_max_stat_balance = ' || l_max_stat_balance,40);
577: hr_utility.set_location('g_max_user_balance_index = ' || g_max_user_balance_index,40);
578:
572: END LOOP;
573:
574: hr_utility.set_location('Step = ' || l_proc,40);
575:
576: hr_utility.set_location('l_max_stat_balance = ' || l_max_stat_balance,40);
577: hr_utility.set_location('g_max_user_balance_index = ' || g_max_user_balance_index,40);
578:
579: FOR l_index IN 1 .. l_max_stat_balance
580:
573:
574: hr_utility.set_location('Step = ' || l_proc,40);
575:
576: hr_utility.set_location('l_max_stat_balance = ' || l_max_stat_balance,40);
577: hr_utility.set_location('g_max_user_balance_index = ' || g_max_user_balance_index,40);
578:
579: FOR l_index IN 1 .. l_max_stat_balance
580:
581: LOOP
585: FOR l_eit_index IN 1 .. g_max_user_balance_index
586:
587: LOOP
588:
589: hr_utility.set_location('l_index = ' || l_index,40);
590: hr_utility.set_location('l_eit_index = ' || l_eit_index,40);
591: hr_utility.set_location('defined_balance_id = ' || l_statutory_bal_id(l_index).defined_balance_id,40);
592: hr_utility.set_location('l_found = ' || l_found,40);
593:
586:
587: LOOP
588:
589: hr_utility.set_location('l_index = ' || l_index,40);
590: hr_utility.set_location('l_eit_index = ' || l_eit_index,40);
591: hr_utility.set_location('defined_balance_id = ' || l_statutory_bal_id(l_index).defined_balance_id,40);
592: hr_utility.set_location('l_found = ' || l_found,40);
593:
594: IF l_statutory_bal_id(l_index).defined_balance_id = g_user_balance_table(l_eit_index).defined_balance_id
587: LOOP
588:
589: hr_utility.set_location('l_index = ' || l_index,40);
590: hr_utility.set_location('l_eit_index = ' || l_eit_index,40);
591: hr_utility.set_location('defined_balance_id = ' || l_statutory_bal_id(l_index).defined_balance_id,40);
592: hr_utility.set_location('l_found = ' || l_found,40);
593:
594: IF l_statutory_bal_id(l_index).defined_balance_id = g_user_balance_table(l_eit_index).defined_balance_id
595:
588:
589: hr_utility.set_location('l_index = ' || l_index,40);
590: hr_utility.set_location('l_eit_index = ' || l_eit_index,40);
591: hr_utility.set_location('defined_balance_id = ' || l_statutory_bal_id(l_index).defined_balance_id,40);
592: hr_utility.set_location('l_found = ' || l_found,40);
593:
594: IF l_statutory_bal_id(l_index).defined_balance_id = g_user_balance_table(l_eit_index).defined_balance_id
595:
596: THEN
604: IF l_found = 'N'
605:
606: THEN
607:
608: hr_utility.set_location('l_archive_index = ' || l_archive_index,40);
609:
610: l_archive_index := l_archive_index + 1;
611:
612: g_statutory_balance_table(l_archive_index).defined_balance_id := l_statutory_bal_id(l_index).defined_balance_id;
618: END LOOP;
619:
620: g_max_statutory_balance_index := l_archive_index;
621:
622: hr_utility.set_location('Step ' || l_proc,50);
623: hr_utility.set_location('l_archive_index = ' || l_archive_index,50);
624:
625: hr_utility.set_location('Leaving ' || l_proc,60);
626:
619:
620: g_max_statutory_balance_index := l_archive_index;
621:
622: hr_utility.set_location('Step ' || l_proc,50);
623: hr_utility.set_location('l_archive_index = ' || l_archive_index,50);
624:
625: hr_utility.set_location('Leaving ' || l_proc,60);
626:
627: END setup_standard_balance_table;
621:
622: hr_utility.set_location('Step ' || l_proc,50);
623: hr_utility.set_location('l_archive_index = ' || l_archive_index,50);
624:
625: hr_utility.set_location('Leaving ' || l_proc,60);
626:
627: END setup_standard_balance_table;
628:
629: PROCEDURE archinit (p_payroll_action_id IN NUMBER)
657: l_start_date VARCHAR2(30);
658:
659: BEGIN
660:
661: -- hr_utility.trace_on(NULL,'UKPS0');
662:
663: hr_utility.set_location('Entering ' || l_proc,10);
664:
665: g_archive_pact := p_payroll_action_id;
659: BEGIN
660:
661: -- hr_utility.trace_on(NULL,'UKPS0');
662:
663: hr_utility.set_location('Entering ' || l_proc,10);
664:
665: g_archive_pact := p_payroll_action_id;
666:
667: OPEN csr_archive_effective_date(p_payroll_action_id);
700: p_payroll_action_id => p_payroll_action_id
701: , p_token_name => 'BG_ID'
702: , p_token_value => l_bg_id);
703:
704: hr_utility.set_location('Step ' || l_proc,20);
705: hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
706: hr_utility.set_location('l_start_date = ' || l_start_date,20);
707: hr_utility.set_location('l_end_date = ' || l_end_date,20);
708:
701: , p_token_name => 'BG_ID'
702: , p_token_value => l_bg_id);
703:
704: hr_utility.set_location('Step ' || l_proc,20);
705: hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
706: hr_utility.set_location('l_start_date = ' || l_start_date,20);
707: hr_utility.set_location('l_end_date = ' || l_end_date,20);
708:
709: l_canonical_start_date := TO_DATE(l_start_date,'yyyy/mm/dd');
702: , p_token_value => l_bg_id);
703:
704: hr_utility.set_location('Step ' || l_proc,20);
705: hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
706: hr_utility.set_location('l_start_date = ' || l_start_date,20);
707: hr_utility.set_location('l_end_date = ' || l_end_date,20);
708:
709: l_canonical_start_date := TO_DATE(l_start_date,'yyyy/mm/dd');
710: l_canonical_end_date := TO_DATE(l_end_date,'yyyy/mm/dd');
703:
704: hr_utility.set_location('Step ' || l_proc,20);
705: hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
706: hr_utility.set_location('l_start_date = ' || l_start_date,20);
707: hr_utility.set_location('l_end_date = ' || l_end_date,20);
708:
709: l_canonical_start_date := TO_DATE(l_start_date,'yyyy/mm/dd');
710: l_canonical_end_date := TO_DATE(l_end_date,'yyyy/mm/dd');
711:
754: g_paye_tax_basis_id;
755:
756: CLOSE csr_input_value_id;
757:
758: hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
759: hr_utility.set_location('l_consolidation_set = ' || l_consolidation_set,20);
760: hr_utility.set_location('l_canonical_start_date = ' || l_canonical_start_date,20);
761: hr_utility.set_location('l_canonical_end_date = ' || l_canonical_end_date,20);
762:
755:
756: CLOSE csr_input_value_id;
757:
758: hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
759: hr_utility.set_location('l_consolidation_set = ' || l_consolidation_set,20);
760: hr_utility.set_location('l_canonical_start_date = ' || l_canonical_start_date,20);
761: hr_utility.set_location('l_canonical_end_date = ' || l_canonical_end_date,20);
762:
763: -- retrieve and archive user defintions from EITs
756: CLOSE csr_input_value_id;
757:
758: hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
759: hr_utility.set_location('l_consolidation_set = ' || l_consolidation_set,20);
760: hr_utility.set_location('l_canonical_start_date = ' || l_canonical_start_date,20);
761: hr_utility.set_location('l_canonical_end_date = ' || l_canonical_end_date,20);
762:
763: -- retrieve and archive user defintions from EITs
764:
757:
758: hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
759: hr_utility.set_location('l_consolidation_set = ' || l_consolidation_set,20);
760: hr_utility.set_location('l_canonical_start_date = ' || l_canonical_start_date,20);
761: hr_utility.set_location('l_canonical_end_date = ' || l_canonical_end_date,20);
762:
763: -- retrieve and archive user defintions from EITs
764:
765: g_max_user_balance_index := 0;
763: -- retrieve and archive user defintions from EITs
764:
765: g_max_user_balance_index := 0;
766:
767: hr_utility.set_location('get_eit_definitions - balances',20);
768:
769: pay_gb_payslip_archive.get_eit_definitions (
770: p_pactid => p_payroll_action_id
771: , p_business_group_id => l_bg_id
773: , p_effective_date => l_canonical_start_date
774: , p_eit_context => g_balance_context
775: , p_archive => 'N');
776:
777: hr_utility.set_location('get_eit_definitions - elements',20);
778:
779: pay_gb_payslip_archive.get_eit_definitions (
780: p_pactid => p_payroll_action_id
781: , p_business_group_id => l_bg_id
790: -- setup statutory balances pl/sql table
791:
792: pay_gb_payslip_archive.setup_standard_balance_table;
793:
794: hr_utility.set_location('Leaving ' || l_proc,20);
795:
796: END archinit;
797:
798: PROCEDURE archive_employee_details (
811: l_proc VARCHAR2(50) := g_package || 'archive_employee_details';
812:
813: BEGIN
814:
815: hr_utility.set_location('Entering ' || l_proc,10);
816:
817: -- call generic procedure to retrieve and archive all data for
818: -- EMPLOYEE DETAILS, ADDRESS DETAILS and EMPLOYEE NET PAY DISTRIBUTION
819:
816:
817: -- call generic procedure to retrieve and archive all data for
818: -- EMPLOYEE DETAILS, ADDRESS DETAILS and EMPLOYEE NET PAY DISTRIBUTION
819:
820: hr_utility.set_location('Calling pay_emp_action_arch',20);
821:
822: pay_emp_action_arch.get_personal_information (
823: p_payroll_action_id => g_archive_pact -- archive payroll_action_id
824: , p_assactid => p_assactid -- archive assignment_action_id
830: , p_tax_unit_id => NULL -- only required for US
831: , p_time_period_id => p_time_period_id -- payroll time_period_id
832: , p_ppp_source_action_id => NULL);
833:
834: hr_utility.set_location('Returned from pay_emp_action_arch',30);
835:
836: END archive_employee_details;
837:
838: PROCEDURE archive_gb_employee_details (
871: , p_input_value_id => g_tax_code_id
872: , p_paye_input_value_id => g_paye_tax_code_id
873: , p_date_earned => to_char(p_effective_date,'yyyy/mm/dd'));
874:
875: hr_utility.set_location('l_tax_code = ' || l_tax_code,40);
876:
877: l_tax_basis := pay_gb_payroll_actions_pkg.get_tax_details (
878: p_run_assignment_action_id => p_curr_pymt_ass_act_id
879: , p_input_value_id => g_tax_basis_id
879: , p_input_value_id => g_tax_basis_id
880: , p_paye_input_value_id => g_paye_tax_basis_id
881: , p_date_earned => to_char(p_effective_date,'yyyy/mm/dd'));
882:
883: hr_utility.set_location('l_tax_basis = ' || l_tax_basis,40);
884:
885: IF l_tax_basis = 'C'
886:
887: THEN
899: l_tax_basis_det := l_tax_basis;
900:
901: END IF;
902:
903: hr_utility.set_location('Archiving GB EMPLOYEE DETAILS',50);
904:
905: pay_action_information_api.create_action_information (
906: p_action_information_id => l_action_info_id
907: , p_action_context_id => p_assactid
1100: v_csr_reference csr_get_reference%ROWTYPE;
1101:
1102: BEGIN
1103:
1104: --hr_utility.trace_on(null, 'PARC');
1105:
1106: hr_utility.set_location('Entering ' || l_proc,10);
1107:
1108: OPEN csr_get_agg_info(p_assignment_id);
1102: BEGIN
1103:
1104: --hr_utility.trace_on(null, 'PARC');
1105:
1106: hr_utility.set_location('Entering ' || l_proc,10);
1107:
1108: OPEN csr_get_agg_info(p_assignment_id);
1109: FETCH csr_get_agg_info into l_agg_flag;
1110: CLOSE csr_get_agg_info;
1213: END IF;
1214: -- end of court order context sensitive balances
1215:
1216: ELSE
1217: hr_utility.set_location('Step ' || l_proc,20);
1218: hr_utility.set_location('p_source_id = ' || p_source_id,20);
1219: hr_utility.set_location('p_balance = ' || p_balance,20);
1220: hr_utility.set_location('p_dimension = ' || p_dimension,20);
1221: hr_utility.set_location('p_defined_bal_id = ' || p_defined_bal_id,20);
1214: -- end of court order context sensitive balances
1215:
1216: ELSE
1217: hr_utility.set_location('Step ' || l_proc,20);
1218: hr_utility.set_location('p_source_id = ' || p_source_id,20);
1219: hr_utility.set_location('p_balance = ' || p_balance,20);
1220: hr_utility.set_location('p_dimension = ' || p_dimension,20);
1221: hr_utility.set_location('p_defined_bal_id = ' || p_defined_bal_id,20);
1222: hr_utility.set_location('ni_type = ' || nvl(p_ni_type,'NULL'),20);
1215:
1216: ELSE
1217: hr_utility.set_location('Step ' || l_proc,20);
1218: hr_utility.set_location('p_source_id = ' || p_source_id,20);
1219: hr_utility.set_location('p_balance = ' || p_balance,20);
1220: hr_utility.set_location('p_dimension = ' || p_dimension,20);
1221: hr_utility.set_location('p_defined_bal_id = ' || p_defined_bal_id,20);
1222: hr_utility.set_location('ni_type = ' || nvl(p_ni_type,'NULL'),20);
1223:
1216: ELSE
1217: hr_utility.set_location('Step ' || l_proc,20);
1218: hr_utility.set_location('p_source_id = ' || p_source_id,20);
1219: hr_utility.set_location('p_balance = ' || p_balance,20);
1220: hr_utility.set_location('p_dimension = ' || p_dimension,20);
1221: hr_utility.set_location('p_defined_bal_id = ' || p_defined_bal_id,20);
1222: hr_utility.set_location('ni_type = ' || nvl(p_ni_type,'NULL'),20);
1223:
1224: IF p_ni_type = ' '
1217: hr_utility.set_location('Step ' || l_proc,20);
1218: hr_utility.set_location('p_source_id = ' || p_source_id,20);
1219: hr_utility.set_location('p_balance = ' || p_balance,20);
1220: hr_utility.set_location('p_dimension = ' || p_dimension,20);
1221: hr_utility.set_location('p_defined_bal_id = ' || p_defined_bal_id,20);
1222: hr_utility.set_location('ni_type = ' || nvl(p_ni_type,'NULL'),20);
1223:
1224: IF p_ni_type = ' '
1225:
1218: hr_utility.set_location('p_source_id = ' || p_source_id,20);
1219: hr_utility.set_location('p_balance = ' || p_balance,20);
1220: hr_utility.set_location('p_dimension = ' || p_dimension,20);
1221: hr_utility.set_location('p_defined_bal_id = ' || p_defined_bal_id,20);
1222: hr_utility.set_location('ni_type = ' || nvl(p_ni_type,'NULL'),20);
1223:
1224: IF p_ni_type = ' '
1225:
1226: THEN
1234: THEN
1235:
1236: l_ni_balance := SUBSTR(p_balance,1,3) || SUBSTR(p_balance,6);
1237:
1238: hr_utility.set_location('l_ni_balance = ' || l_ni_balance,20);
1239:
1240: l_balance_value := pay_gb_payroll_actions_pkg.report_all_ni_balance (
1241: p_balance_name => l_ni_balance
1242: , p_assignment_action_id => p_source_id
1249: ,p_balance_dimension => p_dimension);
1250:
1251: END IF;
1252:
1253: hr_utility.set_location('l_balance_value = ' || l_balance_value,20);
1254:
1255: IF p_record_count = 0
1256:
1257: THEN
1268: IF l_balance_value <> 0
1269:
1270: THEN
1271:
1272: hr_utility.set_location('Archiving EMEA BALANCES',20);
1273:
1274: pay_action_information_api.create_action_information (
1275: p_action_information_id => l_action_info_id
1276: , p_action_context_id => p_action_context_id
1289:
1290: END IF;
1291: END IF;
1292:
1293: hr_utility.set_location('Leaving ' || l_proc,30);
1294:
1295: EXCEPTION
1296:
1297: WHEN NO_DATA_FOUND
1333: l_result_value pay_run_result_values.result_value%TYPE;
1334:
1335: BEGIN
1336:
1337: hr_utility.set_location('Entering get_element_info',10);
1338:
1339: l_column_sequence := 0;
1340: l_element_type_id := 0;
1341: l_main_sequence := 0;
1352: l_record_count := p_record_count + 1;
1353:
1354: END IF;
1355:
1356: hr_utility.set_location('g_max_element_index = ' || g_max_element_index,10);
1357:
1358: FOR l_index IN 1 .. g_max_element_index
1359:
1360: LOOP
1358: FOR l_index IN 1 .. g_max_element_index
1359:
1360: LOOP
1361:
1362: hr_utility.set_location('element_type_id = ' || g_element_table(l_index).element_type_id,10);
1363: hr_utility.set_location('input_value_id = ' || g_element_table(l_index).input_value_id,10);
1364: hr_utility.set_location('p_child_assignment_action = ' || p_child_assignment_action,10);
1365:
1366: FOR rec_element_value IN csr_element_values (
1359:
1360: LOOP
1361:
1362: hr_utility.set_location('element_type_id = ' || g_element_table(l_index).element_type_id,10);
1363: hr_utility.set_location('input_value_id = ' || g_element_table(l_index).input_value_id,10);
1364: hr_utility.set_location('p_child_assignment_action = ' || p_child_assignment_action,10);
1365:
1366: FOR rec_element_value IN csr_element_values (
1367: p_child_assignment_action
1360: LOOP
1361:
1362: hr_utility.set_location('element_type_id = ' || g_element_table(l_index).element_type_id,10);
1363: hr_utility.set_location('input_value_id = ' || g_element_table(l_index).input_value_id,10);
1364: hr_utility.set_location('p_child_assignment_action = ' || p_child_assignment_action,10);
1365:
1366: FOR rec_element_value IN csr_element_values (
1367: p_child_assignment_action
1368: , g_element_table(l_index).element_type_id
1369: , g_element_table(l_index).input_value_id)
1370:
1371: LOOP
1372:
1373: hr_utility.set_location('element_type_id = ' || g_element_table(l_index).element_type_id,10);
1374: hr_utility.set_location('input_value_id = ' || g_element_table(l_index).input_value_id,10);
1375: hr_utility.set_location('Archiving EMEA ELEMENT INFO',20);
1376:
1377: hr_utility.set_location('l_element_type_id = ' || l_element_type_id,20);
1370:
1371: LOOP
1372:
1373: hr_utility.set_location('element_type_id = ' || g_element_table(l_index).element_type_id,10);
1374: hr_utility.set_location('input_value_id = ' || g_element_table(l_index).input_value_id,10);
1375: hr_utility.set_location('Archiving EMEA ELEMENT INFO',20);
1376:
1377: hr_utility.set_location('l_element_type_id = ' || l_element_type_id,20);
1378: hr_utility.set_location('g_element_table.element_type_id = ' || g_element_table(l_index).element_type_id,20);
1371: LOOP
1372:
1373: hr_utility.set_location('element_type_id = ' || g_element_table(l_index).element_type_id,10);
1374: hr_utility.set_location('input_value_id = ' || g_element_table(l_index).input_value_id,10);
1375: hr_utility.set_location('Archiving EMEA ELEMENT INFO',20);
1376:
1377: hr_utility.set_location('l_element_type_id = ' || l_element_type_id,20);
1378: hr_utility.set_location('g_element_table.element_type_id = ' || g_element_table(l_index).element_type_id,20);
1379:
1373: hr_utility.set_location('element_type_id = ' || g_element_table(l_index).element_type_id,10);
1374: hr_utility.set_location('input_value_id = ' || g_element_table(l_index).input_value_id,10);
1375: hr_utility.set_location('Archiving EMEA ELEMENT INFO',20);
1376:
1377: hr_utility.set_location('l_element_type_id = ' || l_element_type_id,20);
1378: hr_utility.set_location('g_element_table.element_type_id = ' || g_element_table(l_index).element_type_id,20);
1379:
1380:
1381: IF l_element_type_id <> g_element_table(l_index).element_type_id
1374: hr_utility.set_location('input_value_id = ' || g_element_table(l_index).input_value_id,10);
1375: hr_utility.set_location('Archiving EMEA ELEMENT INFO',20);
1376:
1377: hr_utility.set_location('l_element_type_id = ' || l_element_type_id,20);
1378: hr_utility.set_location('g_element_table.element_type_id = ' || g_element_table(l_index).element_type_id,20);
1379:
1380:
1381: IF l_element_type_id <> g_element_table(l_index).element_type_id
1382:
1385: l_main_sequence := l_main_sequence + 1;
1386:
1387: END IF;
1388:
1389: hr_utility.set_location('l_main_sequence = ' || l_main_sequence,20);
1390:
1391: l_column_sequence := l_column_sequence + 1;
1392:
1393: -- If the run method is P, Process Separate, then only archive the data if
1570: l_tax_period_no VARCHAR2(30);
1571:
1572: BEGIN
1573:
1574: -- hr_utility.trace_on(NULL,'UKPS1');
1575:
1576: hr_utility.set_location('Entering ' || l_proc,10);
1577:
1578: pay_gb_payslip_archive.get_parameters (
1572: BEGIN
1573:
1574: -- hr_utility.trace_on(NULL,'UKPS1');
1575:
1576: hr_utility.set_location('Entering ' || l_proc,10);
1577:
1578: pay_gb_payslip_archive.get_parameters (
1579: p_payroll_action_id => pactid
1580: , p_token_name => 'PAYROLL'
1604: p_payroll_action_id => pactid
1605: , p_token_name => 'BG_ID'
1606: , p_token_value => l_bg_id);
1607:
1608: hr_utility.set_location('Step ' || l_proc,20);
1609: hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
1610: hr_utility.set_location('l_start_date = ' || l_start_date,20);
1611: hr_utility.set_location('l_end_date = ' || l_end_date,20);
1612:
1605: , p_token_name => 'BG_ID'
1606: , p_token_value => l_bg_id);
1607:
1608: hr_utility.set_location('Step ' || l_proc,20);
1609: hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
1610: hr_utility.set_location('l_start_date = ' || l_start_date,20);
1611: hr_utility.set_location('l_end_date = ' || l_end_date,20);
1612:
1613: l_canonical_start_date := TO_DATE(l_start_date,'yyyy/mm/dd');
1606: , p_token_value => l_bg_id);
1607:
1608: hr_utility.set_location('Step ' || l_proc,20);
1609: hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
1610: hr_utility.set_location('l_start_date = ' || l_start_date,20);
1611: hr_utility.set_location('l_end_date = ' || l_end_date,20);
1612:
1613: l_canonical_start_date := TO_DATE(l_start_date,'yyyy/mm/dd');
1614: l_canonical_end_date := TO_DATE(l_end_date,'yyyy/mm/dd');
1607:
1608: hr_utility.set_location('Step ' || l_proc,20);
1609: hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
1610: hr_utility.set_location('l_start_date = ' || l_start_date,20);
1611: hr_utility.set_location('l_end_date = ' || l_end_date,20);
1612:
1613: l_canonical_start_date := TO_DATE(l_start_date,'yyyy/mm/dd');
1614: l_canonical_end_date := TO_DATE(l_end_date,'yyyy/mm/dd');
1615:
1614: l_canonical_end_date := TO_DATE(l_end_date,'yyyy/mm/dd');
1615:
1616: -- archive EMEA PAYROLL INFO for each prepayment run identified
1617:
1618: hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
1619: hr_utility.set_location('l_consolidation_set = ' || l_consolidation_set,20);
1620: hr_utility.set_location('l_canonical_start_date = ' || l_canonical_start_date,20);
1621: hr_utility.set_location('l_canonical_end_date = ' || l_canonical_end_date,20);
1622:
1615:
1616: -- archive EMEA PAYROLL INFO for each prepayment run identified
1617:
1618: hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
1619: hr_utility.set_location('l_consolidation_set = ' || l_consolidation_set,20);
1620: hr_utility.set_location('l_canonical_start_date = ' || l_canonical_start_date,20);
1621: hr_utility.set_location('l_canonical_end_date = ' || l_canonical_end_date,20);
1622:
1623: g_max_user_balance_index := 0;
1616: -- archive EMEA PAYROLL INFO for each prepayment run identified
1617:
1618: hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
1619: hr_utility.set_location('l_consolidation_set = ' || l_consolidation_set,20);
1620: hr_utility.set_location('l_canonical_start_date = ' || l_canonical_start_date,20);
1621: hr_utility.set_location('l_canonical_end_date = ' || l_canonical_end_date,20);
1622:
1623: g_max_user_balance_index := 0;
1624:
1617:
1618: hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
1619: hr_utility.set_location('l_consolidation_set = ' || l_consolidation_set,20);
1620: hr_utility.set_location('l_canonical_start_date = ' || l_canonical_start_date,20);
1621: hr_utility.set_location('l_canonical_end_date = ' || l_canonical_end_date,20);
1622:
1623: g_max_user_balance_index := 0;
1624:
1625: pay_gb_payslip_archive.get_eit_definitions (
1652: l_consolidation_set,
1653: l_canonical_end_date)
1654: LOOP
1655:
1656: hr_utility.set_location('Calling arch_pay_action_level_data',25);
1657:
1658: pay_emp_action_arch.arch_pay_action_level_data (
1659: p_payroll_action_id => pactid
1660: , p_payroll_id => rec_payrolls.payroll_id
1675:
1676: pay_balance_pkg.set_context('PAYROLL_ACTION_ID'
1677: , rec_payroll_info.payroll_action_id);
1678:
1679: hr_utility.set_location('rec_payroll_info.payroll_action_id = ' || rec_payroll_info.payroll_action_id,30);
1680: hr_utility.set_location('rec_payroll_info.tax_office_name = ' || rec_payroll_info.tax_office_name,30);
1681: hr_utility.set_location('rec_payroll_info.tax_office_phone_no = ' || rec_payroll_info.tax_office_phone_no,30);
1682: hr_utility.set_location('rec_payroll_info.employers_ref_no = ' || rec_payroll_info.employers_ref_no,30);
1683:
1676: pay_balance_pkg.set_context('PAYROLL_ACTION_ID'
1677: , rec_payroll_info.payroll_action_id);
1678:
1679: hr_utility.set_location('rec_payroll_info.payroll_action_id = ' || rec_payroll_info.payroll_action_id,30);
1680: hr_utility.set_location('rec_payroll_info.tax_office_name = ' || rec_payroll_info.tax_office_name,30);
1681: hr_utility.set_location('rec_payroll_info.tax_office_phone_no = ' || rec_payroll_info.tax_office_phone_no,30);
1682: hr_utility.set_location('rec_payroll_info.employers_ref_no = ' || rec_payroll_info.employers_ref_no,30);
1683:
1684: hr_utility.set_location('Archiving EMEA PAYROLL INFO',30);
1677: , rec_payroll_info.payroll_action_id);
1678:
1679: hr_utility.set_location('rec_payroll_info.payroll_action_id = ' || rec_payroll_info.payroll_action_id,30);
1680: hr_utility.set_location('rec_payroll_info.tax_office_name = ' || rec_payroll_info.tax_office_name,30);
1681: hr_utility.set_location('rec_payroll_info.tax_office_phone_no = ' || rec_payroll_info.tax_office_phone_no,30);
1682: hr_utility.set_location('rec_payroll_info.employers_ref_no = ' || rec_payroll_info.employers_ref_no,30);
1683:
1684: hr_utility.set_location('Archiving EMEA PAYROLL INFO',30);
1685:
1678:
1679: hr_utility.set_location('rec_payroll_info.payroll_action_id = ' || rec_payroll_info.payroll_action_id,30);
1680: hr_utility.set_location('rec_payroll_info.tax_office_name = ' || rec_payroll_info.tax_office_name,30);
1681: hr_utility.set_location('rec_payroll_info.tax_office_phone_no = ' || rec_payroll_info.tax_office_phone_no,30);
1682: hr_utility.set_location('rec_payroll_info.employers_ref_no = ' || rec_payroll_info.employers_ref_no,30);
1683:
1684: hr_utility.set_location('Archiving EMEA PAYROLL INFO',30);
1685:
1686: -- Added for 4071160
1680: hr_utility.set_location('rec_payroll_info.tax_office_name = ' || rec_payroll_info.tax_office_name,30);
1681: hr_utility.set_location('rec_payroll_info.tax_office_phone_no = ' || rec_payroll_info.tax_office_phone_no,30);
1682: hr_utility.set_location('rec_payroll_info.employers_ref_no = ' || rec_payroll_info.employers_ref_no,30);
1683:
1684: hr_utility.set_location('Archiving EMEA PAYROLL INFO',30);
1685:
1686: -- Added for 4071160
1687: pay_emp_action_arch.arch_pay_action_level_data (
1688: p_payroll_action_id => pactid
1749: if l_payroll_id is null then
1750: --
1751: -- Use full cursor not restricting by payroll
1752: --
1753: hr_utility.trace('Range Cursor Not using Payroll Restriction');
1754: sqlstr := 'SELECT DISTINCT person_id
1755: FROM per_people_f ppf,
1756: pay_payroll_actions ppa
1757: WHERE ppa.payroll_action_id = :payroll_action_id
1760: else
1761: --
1762: -- The Payroll ID was used as parameter, so restrict by this
1763: --
1764: hr_utility.trace('Range Cursor using Payroll Restriction');
1765: sqlstr := 'SELECT DISTINCT ppf.person_id
1766: FROM per_all_people_f ppf,
1767: pay_payroll_actions ppa,
1768: per_all_assignments_f paaf
1772: AND paaf.payroll_id = '|| to_char(l_payroll_id) ||
1773: ' ORDER BY ppf.person_id';
1774: end if;
1775: --
1776: hr_utility.set_location('Leaving ' || l_proc,40);
1777:
1778: END range_cursor;
1779: ---------------------------------------------------------------------------
1780: -- Function: range_person_on.
1802: l_action_param_val varchar2(30);
1803: l_report_param_val varchar2(30);
1804: --
1805: BEGIN
1806: hr_utility.set_location('range_person_on',10);
1807: --
1808: BEGIN
1809: open csr_action_parameter;
1810: fetch csr_action_parameter into l_action_param_val;
1809: open csr_action_parameter;
1810: fetch csr_action_parameter into l_action_param_val;
1811: close csr_action_parameter;
1812: --
1813: hr_utility.set_location('range_person_on',20);
1814: open csr_range_format_param;
1815: fetch csr_range_format_param into l_report_param_val;
1816: close csr_range_format_param;
1817: --
1814: open csr_range_format_param;
1815: fetch csr_range_format_param into l_report_param_val;
1816: close csr_range_format_param;
1817: --
1818: hr_utility.set_location('range_person_on',30);
1819: EXCEPTION WHEN NO_DATA_FOUND THEN
1820: l_return := FALSE;
1821: END;
1822: --
1819: EXCEPTION WHEN NO_DATA_FOUND THEN
1820: l_return := FALSE;
1821: END;
1822: --
1823: hr_utility.set_location('range_person_on',40);
1824: IF l_action_param_val = 'Y' AND l_report_param_val = 'Y' THEN
1825: l_return := TRUE;
1826: hr_utility.trace('Range Person = True');
1827: ELSE
1822: --
1823: hr_utility.set_location('range_person_on',40);
1824: IF l_action_param_val = 'Y' AND l_report_param_val = 'Y' THEN
1825: l_return := TRUE;
1826: hr_utility.trace('Range Person = True');
1827: ELSE
1828: l_return := FALSE;
1829: END IF;
1830: --
1948:
1949: l_proc VARCHAR2(50) := g_package||'action_creation';
1950:
1951: BEGIN
1952: -- hr_utility.trace_on(null,'UKPS3');
1953: hr_utility.set_location('Entering ' || l_proc,10);
1954:
1955: pay_gb_payslip_archive.get_parameters (
1956: p_payroll_action_id => pactid
1949: l_proc VARCHAR2(50) := g_package||'action_creation';
1950:
1951: BEGIN
1952: -- hr_utility.trace_on(null,'UKPS3');
1953: hr_utility.set_location('Entering ' || l_proc,10);
1954:
1955: pay_gb_payslip_archive.get_parameters (
1956: p_payroll_action_id => pactid
1957: , p_token_name => 'PAYROLL'
1971: p_payroll_action_id => pactid
1972: , p_token_name => 'END_DATE'
1973: , p_token_value => l_end_date);
1974:
1975: hr_utility.set_location('Step ' || l_proc,20);
1976: hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
1977: hr_utility.set_location('l_start_date = ' || l_start_date,20);
1978: hr_utility.set_location('l_end_date = ' || l_end_date,20);
1979:
1972: , p_token_name => 'END_DATE'
1973: , p_token_value => l_end_date);
1974:
1975: hr_utility.set_location('Step ' || l_proc,20);
1976: hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
1977: hr_utility.set_location('l_start_date = ' || l_start_date,20);
1978: hr_utility.set_location('l_end_date = ' || l_end_date,20);
1979:
1980: l_canonical_start_date := TO_DATE(l_start_date,'yyyy/mm/dd');
1973: , p_token_value => l_end_date);
1974:
1975: hr_utility.set_location('Step ' || l_proc,20);
1976: hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
1977: hr_utility.set_location('l_start_date = ' || l_start_date,20);
1978: hr_utility.set_location('l_end_date = ' || l_end_date,20);
1979:
1980: l_canonical_start_date := TO_DATE(l_start_date,'yyyy/mm/dd');
1981: l_canonical_end_date := TO_DATE(l_end_date,'yyyy/mm/dd');
1974:
1975: hr_utility.set_location('Step ' || l_proc,20);
1976: hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
1977: hr_utility.set_location('l_start_date = ' || l_start_date,20);
1978: hr_utility.set_location('l_end_date = ' || l_end_date,20);
1979:
1980: l_canonical_start_date := TO_DATE(l_start_date,'yyyy/mm/dd');
1981: l_canonical_end_date := TO_DATE(l_end_date,'yyyy/mm/dd');
1982:
2001: --
2002: -- Create Archive to master action interlock and
2003: -- the archive to prepayment asg action interlock
2004: --
2005: hr_utility.trace('creating lock1 ' || l_actid || ' to ' || csr_rec.run_action_id);
2006: hr_utility.trace('creating lock2 ' || l_actid || ' to ' || csr_rec.prepaid_action_id);
2007: --
2008: hr_nonrun_asact.insint(l_actid,csr_rec.prepaid_action_id);
2009: END IF;
2002: -- Create Archive to master action interlock and
2003: -- the archive to prepayment asg action interlock
2004: --
2005: hr_utility.trace('creating lock1 ' || l_actid || ' to ' || csr_rec.run_action_id);
2006: hr_utility.trace('creating lock2 ' || l_actid || ' to ' || csr_rec.prepaid_action_id);
2007: --
2008: hr_nonrun_asact.insint(l_actid,csr_rec.prepaid_action_id);
2009: END IF;
2010: --
2038:
2039: -- CREATE THE ARCHIVE TO PAYROLL MASTER ASSIGNMENT ACTION INTERLOCK AND
2040: -- THE ARCHIVE TO PREPAYMENT ASSIGNMENT ACTION INTERLOCK
2041:
2042: hr_utility.set_location('creating lock1 ' || l_actid || ' to ' || csr_rec.run_action_id,20);
2043: hr_utility.set_location('creating lock2 ' || l_actid || ' to ' || csr_rec.prepaid_action_id,20);
2044:
2045: hr_nonrun_asact.insint(l_actid,csr_rec.prepaid_action_id);
2046:
2039: -- CREATE THE ARCHIVE TO PAYROLL MASTER ASSIGNMENT ACTION INTERLOCK AND
2040: -- THE ARCHIVE TO PREPAYMENT ASSIGNMENT ACTION INTERLOCK
2041:
2042: hr_utility.set_location('creating lock1 ' || l_actid || ' to ' || csr_rec.run_action_id,20);
2043: hr_utility.set_location('creating lock2 ' || l_actid || ' to ' || csr_rec.prepaid_action_id,20);
2044:
2045: hr_nonrun_asact.insint(l_actid,csr_rec.prepaid_action_id);
2046:
2047: END IF;
2053: END LOOP;
2054: --
2055: END IF; -- Range Person Code check.
2056:
2057: hr_utility.set_location('Leaving ' || l_proc,20);
2058:
2059: END action_creation;
2060:
2061: PROCEDURE archive_code (p_assactid in number,
2153: l_proc VARCHAR2(50) := g_package || 'archive_code';
2154:
2155: BEGIN
2156:
2157: -- hr_utility.trace_on(NULL,'UKPS2');
2158:
2159: hr_utility.set_location('Entering '|| l_proc,10);
2160:
2161: hr_utility.set_location('Step '|| l_proc,20);
2155: BEGIN
2156:
2157: -- hr_utility.trace_on(NULL,'UKPS2');
2158:
2159: hr_utility.set_location('Entering '|| l_proc,10);
2160:
2161: hr_utility.set_location('Step '|| l_proc,20);
2162: hr_utility.set_location('p_assactid = ' || p_assactid,20);
2163:
2157: -- hr_utility.trace_on(NULL,'UKPS2');
2158:
2159: hr_utility.set_location('Entering '|| l_proc,10);
2160:
2161: hr_utility.set_location('Step '|| l_proc,20);
2162: hr_utility.set_location('p_assactid = ' || p_assactid,20);
2163:
2164: -- retrieve the chunk number for the current assignment action
2165: SELECT paa.chunk_number
2158:
2159: hr_utility.set_location('Entering '|| l_proc,10);
2160:
2161: hr_utility.set_location('Step '|| l_proc,20);
2162: hr_utility.set_location('p_assactid = ' || p_assactid,20);
2163:
2164: -- retrieve the chunk number for the current assignment action
2165: SELECT paa.chunk_number
2166: INTO l_chunk_number
2177: *****************************************************************/
2178: OPEN csr_assignment_actions(p_assactid);
2179: LOOP
2180: fetch csr_assignment_actions into csr_rec;
2181: hr_utility.set_location('csr_rec.master_assignment_action_id = ' ||
2182: csr_rec.master_assignment_action_id,20);
2183: hr_utility.set_location('csr_rec.pre_assignment_action_id = ' ||
2184: csr_rec.pre_assignment_action_id,20);
2185:
2179: LOOP
2180: fetch csr_assignment_actions into csr_rec;
2181: hr_utility.set_location('csr_rec.master_assignment_action_id = ' ||
2182: csr_rec.master_assignment_action_id,20);
2183: hr_utility.set_location('csr_rec.pre_assignment_action_id = ' ||
2184: csr_rec.pre_assignment_action_id,20);
2185:
2186: /*****************************************************************
2187: ** Archive the employee details for the last row returned by
2238: SELECT pay_assignment_actions_s.NEXTVAL
2239: INTO l_actid
2240: FROM dual;
2241:
2242: hr_utility.set_location('csr_child_rec.run_type = ' ||
2243: csr_child_rec.run_type,30);
2244: hr_utility.set_location('csr_rec.master_assignment_action_id = ' ||
2245: csr_rec.master_assignment_action_id,30);
2246:
2240: FROM dual;
2241:
2242: hr_utility.set_location('csr_child_rec.run_type = ' ||
2243: csr_child_rec.run_type,30);
2244: hr_utility.set_location('csr_rec.master_assignment_action_id = ' ||
2245: csr_rec.master_assignment_action_id,30);
2246:
2247: hr_nonrun_asact.insact(
2248: lockingactid => l_actid
2254: ,status => 'C'
2255: ,source_act => p_assactid);
2256:
2257: IF csr_child_rec.run_type = 'S' THEN
2258: hr_utility.set_location('creating lock3 ' || l_actid || ' to ' ||
2259: csr_child_rec.child_assignment_action_id,30);
2260:
2261: hr_nonrun_asact.insint(
2262: lockingactid => l_actid
2310: csr_rec.pay_payroll_action_id,
2311: csr_rec.assignment_id,
2312: csr_rec.effective_date)
2313: LOOP
2314: hr_utility.set_location('creating lock4 ' || l_actid || ' to ' ||
2315: csr_np_rec.np_assignment_action_id,30);
2316:
2317: hr_nonrun_asact.insint(
2318: lockingactid => l_actid
2342: -- Both User and Statutory Balances are archived for all Separate
2343: -- Payment assignment actions and the last (i.e. highest action_sequence)
2344: -- Process Separately assignment action (EMEA BALANCES) archive
2345: -- user balances
2346: hr_utility.set_location('Archive User Balances - Starting',60);
2347: hr_utility.set_location('g_max_user_balance_index = '||
2348: g_max_user_balance_index,60);
2349:
2350: FOR l_index IN 1 .. g_max_user_balance_index
2343: -- Payment assignment actions and the last (i.e. highest action_sequence)
2344: -- Process Separately assignment action (EMEA BALANCES) archive
2345: -- user balances
2346: hr_utility.set_location('Archive User Balances - Starting',60);
2347: hr_utility.set_location('g_max_user_balance_index = '||
2348: g_max_user_balance_index,60);
2349:
2350: FOR l_index IN 1 .. g_max_user_balance_index
2351: LOOP
2361: , p_record_count => l_record_count);
2362:
2363: END LOOP;
2364:
2365: hr_utility.set_location('Archive User Balances - Complete',60);
2366:
2367: -- archive statutory balances
2368: hr_utility.set_location('Archive Statutory Balances - Starting',70);
2369: hr_utility.set_location('g_max_statutory_balance_index = '||
2364:
2365: hr_utility.set_location('Archive User Balances - Complete',60);
2366:
2367: -- archive statutory balances
2368: hr_utility.set_location('Archive Statutory Balances - Starting',70);
2369: hr_utility.set_location('g_max_statutory_balance_index = '||
2370: g_max_statutory_balance_index,70);
2371:
2372: FOR l_index IN 1 .. g_max_statutory_balance_index
2365: hr_utility.set_location('Archive User Balances - Complete',60);
2366:
2367: -- archive statutory balances
2368: hr_utility.set_location('Archive Statutory Balances - Starting',70);
2369: hr_utility.set_location('g_max_statutory_balance_index = '||
2370: g_max_statutory_balance_index,70);
2371:
2372: FOR l_index IN 1 .. g_max_statutory_balance_index
2373: LOOP
2370: g_max_statutory_balance_index,70);
2371:
2372: FOR l_index IN 1 .. g_max_statutory_balance_index
2373: LOOP
2374: hr_utility.set_location('l_index = ' || l_index,70);
2375: pay_gb_payslip_archive.process_balance (
2376: p_action_context_id => l_action_context_id
2377: , p_assignment_id => csr_rec.assignment_id
2378: , p_source_id => csr_child_rec.child_assignment_action_id
2383: , p_ni_type => g_statutory_balance_table(l_index).ni_type_ind
2384: , p_record_count => l_record_count);
2385: END LOOP;
2386:
2387: hr_utility.set_location('Archive Statutory Balances - Complete',70);
2388:
2389: /*****************************************************************
2390: ** Below call is to address bug #7171712.
2391: ** It archives the payments and deductions details for the employee
2394:
2395: -- Moved down the below call for the bug 10217859
2396: -- PAY_GB_PAYSLIP_ARCHIVE.get_pay_deduct_element_info (p_assactid);
2397:
2398: -- hr_utility.set_location('Archive Payments and Deductions data - Complete',75);
2399:
2400: END LOOP; -- child assignment actions
2401:
2402: l_record_count := l_record_count + 1;
2413:
2414: -- Moved here the below call for the bug 10217859
2415: PAY_GB_PAYSLIP_ARCHIVE.get_pay_deduct_element_info (p_assactid);
2416:
2417: hr_utility.set_location('Archive Payments and Deductions data - Complete',75);
2418:
2419: hr_utility.set_location('Leaving '|| l_proc,80);
2420:
2421: END archive_code;
2415: PAY_GB_PAYSLIP_ARCHIVE.get_pay_deduct_element_info (p_assactid);
2416:
2417: hr_utility.set_location('Archive Payments and Deductions data - Complete',75);
2418:
2419: hr_utility.set_location('Leaving '|| l_proc,80);
2420:
2421: END archive_code;
2422:
2423: --Added for bug fix 5209228
2512:
2513:
2514: BEGIN
2515:
2516: hr_utility.set_location('Entering ' || l_proc,10);
2517:
2518:
2519: -- To avoid re-archiving while Retry
2520: delete from pay_action_information pai
2559: , p_token_name => 'BG_ID'
2560: , p_token_value => l_bg_id);
2561:
2562:
2563: hr_utility.set_location('Step ' || l_proc,20);
2564: hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
2565: hr_utility.set_location('l_start_date = ' || l_start_date,20);
2566: hr_utility.set_location('l_end_date = ' || l_end_date,20);
2567:
2560: , p_token_value => l_bg_id);
2561:
2562:
2563: hr_utility.set_location('Step ' || l_proc,20);
2564: hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
2565: hr_utility.set_location('l_start_date = ' || l_start_date,20);
2566: hr_utility.set_location('l_end_date = ' || l_end_date,20);
2567:
2568: l_canonical_start_date := TO_DATE(l_start_date,'yyyy/mm/dd');
2561:
2562:
2563: hr_utility.set_location('Step ' || l_proc,20);
2564: hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
2565: hr_utility.set_location('l_start_date = ' || l_start_date,20);
2566: hr_utility.set_location('l_end_date = ' || l_end_date,20);
2567:
2568: l_canonical_start_date := TO_DATE(l_start_date,'yyyy/mm/dd');
2569: l_canonical_end_date := TO_DATE(l_end_date,'yyyy/mm/dd');
2562:
2563: hr_utility.set_location('Step ' || l_proc,20);
2564: hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
2565: hr_utility.set_location('l_start_date = ' || l_start_date,20);
2566: hr_utility.set_location('l_end_date = ' || l_end_date,20);
2567:
2568: l_canonical_start_date := TO_DATE(l_start_date,'yyyy/mm/dd');
2569: l_canonical_end_date := TO_DATE(l_end_date,'yyyy/mm/dd');
2570:
2569: l_canonical_end_date := TO_DATE(l_end_date,'yyyy/mm/dd');
2570:
2571: -- archive EMEA PAYROLL INFO for each prepayment run identified
2572:
2573: hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
2574: hr_utility.set_location('l_consolidation_set = ' || l_consolidation_set,20);
2575: hr_utility.set_location('l_canonical_start_date = ' || l_canonical_start_date,20);
2576: hr_utility.set_location('l_canonical_end_date = ' || l_canonical_end_date,20);
2577:
2570:
2571: -- archive EMEA PAYROLL INFO for each prepayment run identified
2572:
2573: hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
2574: hr_utility.set_location('l_consolidation_set = ' || l_consolidation_set,20);
2575: hr_utility.set_location('l_canonical_start_date = ' || l_canonical_start_date,20);
2576: hr_utility.set_location('l_canonical_end_date = ' || l_canonical_end_date,20);
2577:
2578:
2571: -- archive EMEA PAYROLL INFO for each prepayment run identified
2572:
2573: hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
2574: hr_utility.set_location('l_consolidation_set = ' || l_consolidation_set,20);
2575: hr_utility.set_location('l_canonical_start_date = ' || l_canonical_start_date,20);
2576: hr_utility.set_location('l_canonical_end_date = ' || l_canonical_end_date,20);
2577:
2578:
2579: --Archiving contexts EMPLOYEE OTHER INFORMATION for MESG and
2572:
2573: hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
2574: hr_utility.set_location('l_consolidation_set = ' || l_consolidation_set,20);
2575: hr_utility.set_location('l_canonical_start_date = ' || l_canonical_start_date,20);
2576: hr_utility.set_location('l_canonical_end_date = ' || l_canonical_end_date,20);
2577:
2578:
2579: --Archiving contexts EMPLOYEE OTHER INFORMATION for MESG and
2580: --ADDRESS DETAILS for Employer Address
2595: pay_balance_pkg.set_context('PAYROLL_ACTION_ID'
2596: , rec_payroll_info.payroll_action_id);
2597:
2598:
2599: hr_utility.set_location('rec_payroll_info.payroll_action_id = ' || rec_payroll_info.payroll_action_id,30);
2600: hr_utility.set_location('rec_payroll_info.tax_office_name = ' || rec_payroll_info.tax_office_name,30);
2601: hr_utility.set_location('rec_payroll_info.tax_office_phone_no = ' || rec_payroll_info.tax_office_phone_no,30);
2602: hr_utility.set_location('rec_payroll_info.employers_ref_no = ' || rec_payroll_info.employers_ref_no,30);
2603:
2596: , rec_payroll_info.payroll_action_id);
2597:
2598:
2599: hr_utility.set_location('rec_payroll_info.payroll_action_id = ' || rec_payroll_info.payroll_action_id,30);
2600: hr_utility.set_location('rec_payroll_info.tax_office_name = ' || rec_payroll_info.tax_office_name,30);
2601: hr_utility.set_location('rec_payroll_info.tax_office_phone_no = ' || rec_payroll_info.tax_office_phone_no,30);
2602: hr_utility.set_location('rec_payroll_info.employers_ref_no = ' || rec_payroll_info.employers_ref_no,30);
2603:
2604: hr_utility.set_location('Archiving EMEA PAYROLL INFO',30);
2597:
2598:
2599: hr_utility.set_location('rec_payroll_info.payroll_action_id = ' || rec_payroll_info.payroll_action_id,30);
2600: hr_utility.set_location('rec_payroll_info.tax_office_name = ' || rec_payroll_info.tax_office_name,30);
2601: hr_utility.set_location('rec_payroll_info.tax_office_phone_no = ' || rec_payroll_info.tax_office_phone_no,30);
2602: hr_utility.set_location('rec_payroll_info.employers_ref_no = ' || rec_payroll_info.employers_ref_no,30);
2603:
2604: hr_utility.set_location('Archiving EMEA PAYROLL INFO',30);
2605:
2598:
2599: hr_utility.set_location('rec_payroll_info.payroll_action_id = ' || rec_payroll_info.payroll_action_id,30);
2600: hr_utility.set_location('rec_payroll_info.tax_office_name = ' || rec_payroll_info.tax_office_name,30);
2601: hr_utility.set_location('rec_payroll_info.tax_office_phone_no = ' || rec_payroll_info.tax_office_phone_no,30);
2602: hr_utility.set_location('rec_payroll_info.employers_ref_no = ' || rec_payroll_info.employers_ref_no,30);
2603:
2604: hr_utility.set_location('Archiving EMEA PAYROLL INFO',30);
2605:
2606: pay_action_information_api.create_action_information (
2600: hr_utility.set_location('rec_payroll_info.tax_office_name = ' || rec_payroll_info.tax_office_name,30);
2601: hr_utility.set_location('rec_payroll_info.tax_office_phone_no = ' || rec_payroll_info.tax_office_phone_no,30);
2602: hr_utility.set_location('rec_payroll_info.employers_ref_no = ' || rec_payroll_info.employers_ref_no,30);
2603:
2604: hr_utility.set_location('Archiving EMEA PAYROLL INFO',30);
2605:
2606: pay_action_information_api.create_action_information (
2607: p_action_information_id => l_action_info_id
2608: , p_action_context_id => p_payroll_action_id
2654: END IF;
2655:
2656: END LOOP;
2657:
2658: hr_utility.set_location('Leaving ' || l_proc,40);
2659: END ARCHIVE_DEINIT;
2660: -- Start fix for Bug#7171712
2661: --Added the below procedure for populating the historic data in to pay_action_information table
2662: PROCEDURE get_pay_deduct_element_info ( p_assignment_action_id IN NUMBER,
2718:
2719: l_assignment_id NUMBER;
2720: l_effective_date DATE;
2721: BEGIN
2722: hr_utility.set_location('Entering get_pay_deduct_element_info',10);
2723: hr_utility.set_location('p_assignment_action_id = ' || p_assignment_action_id,10);
2724:
2725: if (p_assignment_id is null or p_effective_date is null)
2726: then
2719: l_assignment_id NUMBER;
2720: l_effective_date DATE;
2721: BEGIN
2722: hr_utility.set_location('Entering get_pay_deduct_element_info',10);
2723: hr_utility.set_location('p_assignment_action_id = ' || p_assignment_action_id,10);
2724:
2725: if (p_assignment_id is null or p_effective_date is null)
2726: then
2727: select paa.assignment_id, ppa.effective_date
2742: , 'P'
2743: , 'D')
2744: loop
2745:
2746: hr_utility.set_location('element_type_id = ' || rec_element_value.element_type_id,20);
2747: hr_utility.set_location('input_value_id = ' || rec_element_value.input_value_id,20);
2748: hr_utility.set_location('assignment_id = ' || l_assignment_id,20);
2749: hr_utility.set_location('effective_date = ' || l_effective_date,20);
2750:
2743: , 'D')
2744: loop
2745:
2746: hr_utility.set_location('element_type_id = ' || rec_element_value.element_type_id,20);
2747: hr_utility.set_location('input_value_id = ' || rec_element_value.input_value_id,20);
2748: hr_utility.set_location('assignment_id = ' || l_assignment_id,20);
2749: hr_utility.set_location('effective_date = ' || l_effective_date,20);
2750:
2751: if ((rec_element_value.element_type_id is not null)
2744: loop
2745:
2746: hr_utility.set_location('element_type_id = ' || rec_element_value.element_type_id,20);
2747: hr_utility.set_location('input_value_id = ' || rec_element_value.input_value_id,20);
2748: hr_utility.set_location('assignment_id = ' || l_assignment_id,20);
2749: hr_utility.set_location('effective_date = ' || l_effective_date,20);
2750:
2751: if ((rec_element_value.element_type_id is not null)
2752: and (rec_element_value.input_value_id is not null)
2745:
2746: hr_utility.set_location('element_type_id = ' || rec_element_value.element_type_id,20);
2747: hr_utility.set_location('input_value_id = ' || rec_element_value.input_value_id,20);
2748: hr_utility.set_location('assignment_id = ' || l_assignment_id,20);
2749: hr_utility.set_location('effective_date = ' || l_effective_date,20);
2750:
2751: if ((rec_element_value.element_type_id is not null)
2752: and (rec_element_value.input_value_id is not null)
2753: and (rec_element_value.payment_type is not null)
2753: and (rec_element_value.payment_type is not null)
2754: and (rec_element_value.value is not null)
2755: and (rec_element_value.narrative is not null))
2756: then
2757: hr_utility.set_location('Archiving GB ELEMENT PAYSLIP INFO',30);
2758: /* Creating action information */
2759: pay_action_information_api.create_action_information (
2760: p_action_information_id => l_action_info_id
2761: , p_action_context_id => p_assignment_action_id
2772: );
2773:
2774: end if;
2775: end loop;
2776: hr_utility.set_location('Leaving get_pay_deduct_element_info',40);
2777: EXCEPTION
2778:
2779: WHEN OTHERS
2780: THEN
2777: EXCEPTION
2778:
2779: WHEN OTHERS
2780: THEN
2781: hr_utility.set_location('Exception occured in get_pay_deduct_element_info '||SQLERRM,50);
2782: RAISE;
2783: END get_pay_deduct_element_info;
2784: -- End fix for Bug#7171712
2785: END;