99: begin
100: l_proc := g_package || 'get_parameters';
101: -- Removed default assignment to remove GSCC warning
102:
103: hr_utility.set_location('Entering ' || l_proc, 10);
104:
105: hr_utility.set_location('Step ' || l_proc, 20);
106: hr_utility.set_location('p_token_name = ' || p_token_name, 20);
107:
101: -- Removed default assignment to remove GSCC warning
102:
103: hr_utility.set_location('Entering ' || l_proc, 10);
104:
105: hr_utility.set_location('Step ' || l_proc, 20);
106: hr_utility.set_location('p_token_name = ' || p_token_name, 20);
107:
108: open csr_parameter_info
109: (
102:
103: hr_utility.set_location('Entering ' || l_proc, 10);
104:
105: hr_utility.set_location('Step ' || l_proc, 20);
106: hr_utility.set_location('p_token_name = ' || p_token_name, 20);
107:
108: open csr_parameter_info
109: (
110: p_payroll_action_id,
122: p_token_value := l_token_value;
123:
124: end if;
125:
126: hr_utility.set_location('l_token_value = ' || p_token_value, 20);
127: hr_utility.set_location('Leaving ' || l_proc, 30);
128:
129: exception
130: when others then
123:
124: end if;
125:
126: hr_utility.set_location('l_token_value = ' || p_token_value, 20);
127: hr_utility.set_location('Leaving ' || l_proc, 30);
128:
129: exception
130: when others then
131: p_token_value := null;
222: begin
223: l_proc := g_package || 'get_eit_definitions';
224: -- Removed default assignment to remove GSCC warning
225:
226: hr_utility.set_location('Entering ' || l_proc, 10);
227:
228: hr_utility.set_location('Step ' || l_proc, 20);
229: hr_utility.set_location('p_eit_context = ' || p_eit_context, 20);
230:
224: -- Removed default assignment to remove GSCC warning
225:
226: hr_utility.set_location('Entering ' || l_proc, 10);
227:
228: hr_utility.set_location('Step ' || l_proc, 20);
229: hr_utility.set_location('p_eit_context = ' || p_eit_context, 20);
230:
231: -- Loop through all the Org Developer Flex values for the specified context
232: for csr_eit_rec in csr_eit_values
225:
226: hr_utility.set_location('Entering ' || l_proc, 10);
227:
228: hr_utility.set_location('Step ' || l_proc, 20);
229: hr_utility.set_location('p_eit_context = ' || p_eit_context, 20);
230:
231: -- Loop through all the Org Developer Flex values for the specified context
232: for csr_eit_rec in csr_eit_values
233: (
235: p_eit_context
236: )
237: loop
238:
239: hr_utility.set_location('Step ' || l_proc, 30);
240:
241: hr_utility.set_location('org_information1 = ' || csr_eit_rec.org_information1, 30);
242: hr_utility.set_location('org_information2 = ' || csr_eit_rec.org_information2, 30);
243: hr_utility.set_location('org_information3 = ' || csr_eit_rec.org_information3, 30);
237: loop
238:
239: hr_utility.set_location('Step ' || l_proc, 30);
240:
241: hr_utility.set_location('org_information1 = ' || csr_eit_rec.org_information1, 30);
242: hr_utility.set_location('org_information2 = ' || csr_eit_rec.org_information2, 30);
243: hr_utility.set_location('org_information3 = ' || csr_eit_rec.org_information3, 30);
244: hr_utility.set_location('org_information4 = ' || csr_eit_rec.org_information4, 30);
245: hr_utility.set_location('org_information5 = ' || csr_eit_rec.org_information5, 30);
238:
239: hr_utility.set_location('Step ' || l_proc, 30);
240:
241: hr_utility.set_location('org_information1 = ' || csr_eit_rec.org_information1, 30);
242: hr_utility.set_location('org_information2 = ' || csr_eit_rec.org_information2, 30);
243: hr_utility.set_location('org_information3 = ' || csr_eit_rec.org_information3, 30);
244: hr_utility.set_location('org_information4 = ' || csr_eit_rec.org_information4, 30);
245: hr_utility.set_location('org_information5 = ' || csr_eit_rec.org_information5, 30);
246: hr_utility.set_location('org_information6 = ' || csr_eit_rec.org_information6, 30);
239: hr_utility.set_location('Step ' || l_proc, 30);
240:
241: hr_utility.set_location('org_information1 = ' || csr_eit_rec.org_information1, 30);
242: hr_utility.set_location('org_information2 = ' || csr_eit_rec.org_information2, 30);
243: hr_utility.set_location('org_information3 = ' || csr_eit_rec.org_information3, 30);
244: hr_utility.set_location('org_information4 = ' || csr_eit_rec.org_information4, 30);
245: hr_utility.set_location('org_information5 = ' || csr_eit_rec.org_information5, 30);
246: hr_utility.set_location('org_information6 = ' || csr_eit_rec.org_information6, 30);
247:
240:
241: hr_utility.set_location('org_information1 = ' || csr_eit_rec.org_information1, 30);
242: hr_utility.set_location('org_information2 = ' || csr_eit_rec.org_information2, 30);
243: hr_utility.set_location('org_information3 = ' || csr_eit_rec.org_information3, 30);
244: hr_utility.set_location('org_information4 = ' || csr_eit_rec.org_information4, 30);
245: hr_utility.set_location('org_information5 = ' || csr_eit_rec.org_information5, 30);
246: hr_utility.set_location('org_information6 = ' || csr_eit_rec.org_information6, 30);
247:
248: -- Business Group Level Balances
241: hr_utility.set_location('org_information1 = ' || csr_eit_rec.org_information1, 30);
242: hr_utility.set_location('org_information2 = ' || csr_eit_rec.org_information2, 30);
243: hr_utility.set_location('org_information3 = ' || csr_eit_rec.org_information3, 30);
244: hr_utility.set_location('org_information4 = ' || csr_eit_rec.org_information4, 30);
245: hr_utility.set_location('org_information5 = ' || csr_eit_rec.org_information5, 30);
246: hr_utility.set_location('org_information6 = ' || csr_eit_rec.org_information6, 30);
247:
248: -- Business Group Level Balances
249: if p_eit_context = g_balance_context then
242: hr_utility.set_location('org_information2 = ' || csr_eit_rec.org_information2, 30);
243: hr_utility.set_location('org_information3 = ' || csr_eit_rec.org_information3, 30);
244: hr_utility.set_location('org_information4 = ' || csr_eit_rec.org_information4, 30);
245: hr_utility.set_location('org_information5 = ' || csr_eit_rec.org_information5, 30);
246: hr_utility.set_location('org_information6 = ' || csr_eit_rec.org_information6, 30);
247:
248: -- Business Group Level Balances
249: if p_eit_context = g_balance_context then
250:
266: g_user_balance_table(l_index).defined_balance_id;
267:
268: close csr_balance_name;
269:
270: hr_utility.set_location('g_user_balance_table(l_index).balance_name = ' ||
271: g_user_balance_table(l_index).balance_name, 50);
272:
273: hr_utility.set_location('Arch EMEA BALANCE DEFINITION', 99);
274:
269:
270: hr_utility.set_location('g_user_balance_table(l_index).balance_name = ' ||
271: g_user_balance_table(l_index).balance_name, 50);
272:
273: hr_utility.set_location('Arch EMEA BALANCE DEFINITION', 99);
274:
275: -- Archive the balance definition in 'EMEA BALANCE DEFINITION' if archive is Y
276: if p_archive = 'Y' then
277:
331:
332:
333: /* Added for Bug#10242073 */
334:
335: hr_utility.set_location('g_element_table(l_index).once_each_period_flag: '||g_element_table(l_index).once_each_period_flag,10);
336: hr_utility.set_location('g_element_table(l_index).formula_id: '||to_char(g_element_table(l_index).formula_id),10);
337:
338: -- Archive the element definition in 'EMEA ELEMENT DEFINITION' if archive is Y
339: -- Note: These are the elements on the Organization Developer Flexfield only
332:
333: /* Added for Bug#10242073 */
334:
335: hr_utility.set_location('g_element_table(l_index).once_each_period_flag: '||g_element_table(l_index).once_each_period_flag,10);
336: hr_utility.set_location('g_element_table(l_index).formula_id: '||to_char(g_element_table(l_index).formula_id),10);
337:
338: -- Archive the element definition in 'EMEA ELEMENT DEFINITION' if archive is Y
339: -- Note: These are the elements on the Organization Developer Flexfield only
340: if p_archive = 'Y' then
338: -- Archive the element definition in 'EMEA ELEMENT DEFINITION' if archive is Y
339: -- Note: These are the elements on the Organization Developer Flexfield only
340: if p_archive = 'Y' then
341:
342: hr_utility.set_location('Arch EMEA ELEMENT DEFINITION', 99);
343:
344: pay_action_information_api.create_action_information
345: (
346: p_action_information_id => l_action_info_id,
364: end if;
365:
366: l_index := l_index + 1;
367:
368: hr_utility.set_location('l_index = ' || l_index, 99);
369:
370: end loop;
371:
372: g_max_element_index := l_index;
380: g_element_archive_index := l_index - 1;
381:
382: end if;
383:
384: hr_utility.set_location('g_balance_archive_index = ' || g_balance_archive_index, 99);
385:
386: hr_utility.set_location('Leaving ' || l_proc, 30);
387:
388: end get_eit_definitions;
382: end if;
383:
384: hr_utility.set_location('g_balance_archive_index = ' || g_balance_archive_index, 99);
385:
386: hr_utility.set_location('Leaving ' || l_proc, 30);
387:
388: end get_eit_definitions;
389:
390: procedure setup_element_definitions
453: begin
454: l_proc := g_package || 'setup_element_definitions';
455: -- Removed default assignment to remove GSCC warning
456:
457: hr_utility.set_location('Entering ' || l_proc, 10);
458: hr_utility.set_location('p_payroll_pact = ' || p_payroll_pact, 10);
459:
460: -- Loop through all elements for the specified Prepayment and Classifications
461: for csr_element_rec in csr_element_name(p_payroll_pact) loop -- Payroll Action of Prepayments
454: l_proc := g_package || 'setup_element_definitions';
455: -- Removed default assignment to remove GSCC warning
456:
457: hr_utility.set_location('Entering ' || l_proc, 10);
458: hr_utility.set_location('p_payroll_pact = ' || p_payroll_pact, 10);
459:
460: -- Loop through all elements for the specified Prepayment and Classifications
461: for csr_element_rec in csr_element_name(p_payroll_pact) loop -- Payroll Action of Prepayments
462:
459:
460: -- Loop through all elements for the specified Prepayment and Classifications
461: for csr_element_rec in csr_element_name(p_payroll_pact) loop -- Payroll Action of Prepayments
462:
463: hr_utility.set_location('csr_element_rec.element_type_id = ' || csr_element_rec.element_type_id, 20);
464: hr_utility.set_location('csr_element_rec.element_name = ' || csr_element_rec.element_name, 20);
465:
466: -- Classify the Element according to Classification
467: -- FIX which classifications should i use?
460: -- Loop through all elements for the specified Prepayment and Classifications
461: for csr_element_rec in csr_element_name(p_payroll_pact) loop -- Payroll Action of Prepayments
462:
463: hr_utility.set_location('csr_element_rec.element_type_id = ' || csr_element_rec.element_type_id, 20);
464: hr_utility.set_location('csr_element_rec.element_name = ' || csr_element_rec.element_name, 20);
465:
466: -- Classify the Element according to Classification
467: -- FIX which classifications should i use?
468: if csr_element_rec.classification_name in ('Normal Income', 'Allowances', 'Direct Payments', 'Lump Sum Amounts') then
478: l_payment_type := 'D'; -- Deduction
479:
480: end if;
481:
482: hr_utility.set_location('Arch EMEA ELEMENT DEFINITION', 99);
483:
484: -- Archive the element definition in 'EMEA ELEMENT DEFINITION'
485: -- Note: These are the Elements from the above Classifications and not the ones on the Org Flex
486: pay_action_information_api.create_action_information
502: );
503:
504: end loop;
505:
506: hr_utility.set_location('Leaving ' || l_proc, 30);
507:
508: end setup_element_definitions;
509:
510: procedure setup_standard_balance_table is
554: l_dimension := '_ASG_TAX_YTD';
555: l_proc := g_package || 'setup_standard_balance_table';
556: -- Removed default assignment to remove GSCC warning
557:
558: hr_utility.set_location('Entering ' || l_proc, 10);
559: hr_utility.set_location('Step ' || l_proc, 20);
560:
561: l_statutory_balance(1 ).balance_name := 'Taxable Income RFI';
562: l_statutory_balance(2 ).balance_name := 'Taxable Income PKG';
555: l_proc := g_package || 'setup_standard_balance_table';
556: -- Removed default assignment to remove GSCC warning
557:
558: hr_utility.set_location('Entering ' || l_proc, 10);
559: hr_utility.set_location('Step ' || l_proc, 20);
560:
561: l_statutory_balance(1 ).balance_name := 'Taxable Income RFI';
562: l_statutory_balance(2 ).balance_name := 'Taxable Income PKG';
563: l_statutory_balance(3 ).balance_name := 'Taxable Income NRFI';
817: -- 2013 TAX YEAR CHANGES.
818:
819: -- l_statutory_balance(224).balance_name := 'Medical Tax Credit Used on Lump Sums';
820:
821: hr_utility.set_location('Step = ' || l_proc, 30);
822:
823: for l_index in 1..l_max_stat_balance loop
824:
825: hr_utility.set_location('l_index = ' || l_index, 30);
821: hr_utility.set_location('Step = ' || l_proc, 30);
822:
823: for l_index in 1..l_max_stat_balance loop
824:
825: hr_utility.set_location('l_index = ' || l_index, 30);
826: hr_utility.set_location('balance_name = ' || l_statutory_balance(l_index).balance_name, 30);
827: hr_utility.set_location('l_dimension = ' || l_dimension, 30);
828:
829: open csr_balance_dimension(l_statutory_balance(l_index).balance_name, l_dimension);
822:
823: for l_index in 1..l_max_stat_balance loop
824:
825: hr_utility.set_location('l_index = ' || l_index, 30);
826: hr_utility.set_location('balance_name = ' || l_statutory_balance(l_index).balance_name, 30);
827: hr_utility.set_location('l_dimension = ' || l_dimension, 30);
828:
829: open csr_balance_dimension(l_statutory_balance(l_index).balance_name, l_dimension);
830: fetch csr_balance_dimension
823: for l_index in 1..l_max_stat_balance loop
824:
825: hr_utility.set_location('l_index = ' || l_index, 30);
826: hr_utility.set_location('balance_name = ' || l_statutory_balance(l_index).balance_name, 30);
827: hr_utility.set_location('l_dimension = ' || l_dimension, 30);
828:
829: open csr_balance_dimension(l_statutory_balance(l_index).balance_name, l_dimension);
830: fetch csr_balance_dimension
831: into l_statutory_bal_id(l_index).defined_balance_id;
837: end if;
838:
839: close csr_balance_dimension;
840:
841: hr_utility.set_location('defined_balance_id = ' || l_statutory_bal_id(l_index).defined_balance_id, 30);
842:
843: end loop;
844:
845: hr_utility.set_location('Step = ' || l_proc, 40);
841: hr_utility.set_location('defined_balance_id = ' || l_statutory_bal_id(l_index).defined_balance_id, 30);
842:
843: end loop;
844:
845: hr_utility.set_location('Step = ' || l_proc, 40);
846:
847: hr_utility.set_location('l_max_stat_balance = ' || l_max_stat_balance, 40);
848: hr_utility.set_location('g_max_user_balance_index = ' || g_max_user_balance_index, 40);
849:
843: end loop;
844:
845: hr_utility.set_location('Step = ' || l_proc, 40);
846:
847: hr_utility.set_location('l_max_stat_balance = ' || l_max_stat_balance, 40);
848: hr_utility.set_location('g_max_user_balance_index = ' || g_max_user_balance_index, 40);
849:
850: for l_index in 1..l_max_stat_balance loop
851:
844:
845: hr_utility.set_location('Step = ' || l_proc, 40);
846:
847: hr_utility.set_location('l_max_stat_balance = ' || l_max_stat_balance, 40);
848: hr_utility.set_location('g_max_user_balance_index = ' || g_max_user_balance_index, 40);
849:
850: for l_index in 1..l_max_stat_balance loop
851:
852: l_found := 'N';
852: l_found := 'N';
853:
854: for l_eit_index in 1..g_max_user_balance_index loop
855:
856: hr_utility.set_location('l_index = ' || l_index, 40);
857: hr_utility.set_location('l_eit_index = ' || l_eit_index, 40);
858: hr_utility.set_location('defined_balance_id = ' || l_statutory_bal_id(l_index).defined_balance_id, 40);
859: hr_utility.set_location('l_found = ' || l_found, 40);
860:
853:
854: for l_eit_index in 1..g_max_user_balance_index loop
855:
856: hr_utility.set_location('l_index = ' || l_index, 40);
857: hr_utility.set_location('l_eit_index = ' || l_eit_index, 40);
858: hr_utility.set_location('defined_balance_id = ' || l_statutory_bal_id(l_index).defined_balance_id, 40);
859: hr_utility.set_location('l_found = ' || l_found, 40);
860:
861: if l_statutory_bal_id(l_index).defined_balance_id
854: for l_eit_index in 1..g_max_user_balance_index loop
855:
856: hr_utility.set_location('l_index = ' || l_index, 40);
857: hr_utility.set_location('l_eit_index = ' || l_eit_index, 40);
858: hr_utility.set_location('defined_balance_id = ' || l_statutory_bal_id(l_index).defined_balance_id, 40);
859: hr_utility.set_location('l_found = ' || l_found, 40);
860:
861: if l_statutory_bal_id(l_index).defined_balance_id
862: = g_user_balance_table(l_eit_index).defined_balance_id then
855:
856: hr_utility.set_location('l_index = ' || l_index, 40);
857: hr_utility.set_location('l_eit_index = ' || l_eit_index, 40);
858: hr_utility.set_location('defined_balance_id = ' || l_statutory_bal_id(l_index).defined_balance_id, 40);
859: hr_utility.set_location('l_found = ' || l_found, 40);
860:
861: if l_statutory_bal_id(l_index).defined_balance_id
862: = g_user_balance_table(l_eit_index).defined_balance_id then
863:
868: end loop;
869:
870: if l_found = 'N' then
871:
872: hr_utility.set_location('l_archive_index = ' || l_archive_index, 40);
873:
874: l_archive_index := l_archive_index + 1;
875: g_statutory_balance_table(l_archive_index).defined_balance_id := l_statutory_bal_id(l_index).defined_balance_id;
876:
879: end loop;
880:
881: g_max_statutory_balance_index := l_archive_index;
882:
883: hr_utility.set_location('Step ' || l_proc, 50);
884: hr_utility.set_location('l_archive_index = ' || l_archive_index, 50);
885:
886: hr_utility.set_location('Leaving ' || l_proc, 60);
887:
880:
881: g_max_statutory_balance_index := l_archive_index;
882:
883: hr_utility.set_location('Step ' || l_proc, 50);
884: hr_utility.set_location('l_archive_index = ' || l_archive_index, 50);
885:
886: hr_utility.set_location('Leaving ' || l_proc, 60);
887:
888: end setup_standard_balance_table;
882:
883: hr_utility.set_location('Step ' || l_proc, 50);
884: hr_utility.set_location('l_archive_index = ' || l_archive_index, 50);
885:
886: hr_utility.set_location('Leaving ' || l_proc, 60);
887:
888: end setup_standard_balance_table;
889:
890: procedure arch_za_pay_action_level_data(
947: begin
948: l_proc := g_package || 'arch_za_pay_action_level_data';
949: -- Removed default assignment to remove GSCC warning
950:
951: hr_utility.set_location('Entering ' || l_proc, 10);
952:
953: hr_utility.set_location('Step ' || l_proc, 20);
954:
955: for rec_get_organization in csr_get_organization(p_payroll_id,p_effective_date)
949: -- Removed default assignment to remove GSCC warning
950:
951: hr_utility.set_location('Entering ' || l_proc, 10);
952:
953: hr_utility.set_location('Step ' || l_proc, 20);
954:
955: for rec_get_organization in csr_get_organization(p_payroll_id,p_effective_date)
956:
957: loop
998: );
999:
1000: end loop;
1001:
1002: hr_utility.set_location('Leaving ' || l_proc, 30);
1003:
1004: end arch_za_pay_action_level_data;
1005:
1006: procedure update_employee_information(
1074:
1075: begin
1076: l_proc := g_package || 'update_employee_information';
1077: -- Removed default assignment to remove GSCC warning
1078: hr_utility.set_location('Entering ' || l_proc, 10);
1079:
1080: hr_utility.set_location('Step ' || l_proc, 20);
1081:
1082: open csr_get_archive_info(p_action_context_id,p_assignment_id);
1076: l_proc := g_package || 'update_employee_information';
1077: -- Removed default assignment to remove GSCC warning
1078: hr_utility.set_location('Entering ' || l_proc, 10);
1079:
1080: hr_utility.set_location('Step ' || l_proc, 20);
1081:
1082: open csr_get_archive_info(p_action_context_id,p_assignment_id);
1083:
1084: loop
1147: end if;
1148: close csr_employee_address;
1149:
1150:
1151: hr_utility.set_location('Leaving ' || l_proc, 30);
1152:
1153: end update_employee_information;
1154:
1155: -- This procedure gets called third to do initialization.
1213: begin
1214: l_proc := g_package || 'archinit';
1215: -- Removed default assignment to remove GSCC warning
1216:
1217: -- hr_utility.trace_on(null,'ZA_SOE');
1218: hr_utility.set_location('Entering ' || l_proc, 10);
1219:
1220: g_archive_pact := p_payroll_action_id; -- Payroll Action of the Archiver
1221:
1214: l_proc := g_package || 'archinit';
1215: -- Removed default assignment to remove GSCC warning
1216:
1217: -- hr_utility.trace_on(null,'ZA_SOE');
1218: hr_utility.set_location('Entering ' || l_proc, 10);
1219:
1220: g_archive_pact := p_payroll_action_id; -- Payroll Action of the Archiver
1221:
1222: -- Get the effective date of the payroll action
1271: update pay_payroll_actions
1272: set payroll_id = l_payroll_id, consolidation_set_id = l_consolidation_set
1273: where payroll_action_id=p_payroll_action_id;
1274:
1275: hr_utility.set_location('Step ' || l_proc, 20);
1276: hr_utility.set_location('l_payroll_id = ' || l_payroll_id, 20);
1277: hr_utility.set_location('l_start_date = ' || l_start_date, 20);
1278: hr_utility.set_location('l_end_date = ' || l_end_date, 20);
1279:
1272: set payroll_id = l_payroll_id, consolidation_set_id = l_consolidation_set
1273: where payroll_action_id=p_payroll_action_id;
1274:
1275: hr_utility.set_location('Step ' || l_proc, 20);
1276: hr_utility.set_location('l_payroll_id = ' || l_payroll_id, 20);
1277: hr_utility.set_location('l_start_date = ' || l_start_date, 20);
1278: hr_utility.set_location('l_end_date = ' || l_end_date, 20);
1279:
1280: l_canonical_start_date := to_date(l_start_date,'yyyy/mm/dd');
1273: where payroll_action_id=p_payroll_action_id;
1274:
1275: hr_utility.set_location('Step ' || l_proc, 20);
1276: hr_utility.set_location('l_payroll_id = ' || l_payroll_id, 20);
1277: hr_utility.set_location('l_start_date = ' || l_start_date, 20);
1278: hr_utility.set_location('l_end_date = ' || l_end_date, 20);
1279:
1280: l_canonical_start_date := to_date(l_start_date,'yyyy/mm/dd');
1281: l_canonical_end_date := to_date(l_end_date,'yyyy/mm/dd');
1274:
1275: hr_utility.set_location('Step ' || l_proc, 20);
1276: hr_utility.set_location('l_payroll_id = ' || l_payroll_id, 20);
1277: hr_utility.set_location('l_start_date = ' || l_start_date, 20);
1278: hr_utility.set_location('l_end_date = ' || l_end_date, 20);
1279:
1280: l_canonical_start_date := to_date(l_start_date,'yyyy/mm/dd');
1281: l_canonical_end_date := to_date(l_end_date,'yyyy/mm/dd');
1282:
1284: open csr_input_value_id('ZA_Tax','Tax Status');
1285: fetch csr_input_value_id into g_tax_element_id;
1286: close csr_input_value_id;
1287:
1288: hr_utility.set_location('l_payroll_id = ' || l_payroll_id, 20);
1289: hr_utility.set_location('l_consolidation_set = ' || l_consolidation_set, 20);
1290: hr_utility.set_location('l_canonical_start_date = ' || l_canonical_start_date, 20);
1291: hr_utility.set_location('l_canonical_end_date = ' || l_canonical_end_date, 20);
1292:
1285: fetch csr_input_value_id into g_tax_element_id;
1286: close csr_input_value_id;
1287:
1288: hr_utility.set_location('l_payroll_id = ' || l_payroll_id, 20);
1289: hr_utility.set_location('l_consolidation_set = ' || l_consolidation_set, 20);
1290: hr_utility.set_location('l_canonical_start_date = ' || l_canonical_start_date, 20);
1291: hr_utility.set_location('l_canonical_end_date = ' || l_canonical_end_date, 20);
1292:
1293: -- Loop through all the prepayments for the specified parameters
1286: close csr_input_value_id;
1287:
1288: hr_utility.set_location('l_payroll_id = ' || l_payroll_id, 20);
1289: hr_utility.set_location('l_consolidation_set = ' || l_consolidation_set, 20);
1290: hr_utility.set_location('l_canonical_start_date = ' || l_canonical_start_date, 20);
1291: hr_utility.set_location('l_canonical_end_date = ' || l_canonical_end_date, 20);
1292:
1293: -- Loop through all the prepayments for the specified parameters
1294: for rec_payroll_info in csr_payroll_info
1287:
1288: hr_utility.set_location('l_payroll_id = ' || l_payroll_id, 20);
1289: hr_utility.set_location('l_consolidation_set = ' || l_consolidation_set, 20);
1290: hr_utility.set_location('l_canonical_start_date = ' || l_canonical_start_date, 20);
1291: hr_utility.set_location('l_canonical_end_date = ' || l_canonical_end_date, 20);
1292:
1293: -- Loop through all the prepayments for the specified parameters
1294: for rec_payroll_info in csr_payroll_info
1295: (
1303: -- Retrieve and archive user definitions from EITs
1304: -- The definitions are archived again for each prepayment
1305: g_max_user_balance_index := 0;
1306:
1307: hr_utility.set_location('get_eit_definitions - balances', 20);
1308:
1309: pay_za_payslip_archive.get_eit_definitions
1310: (
1311: p_pactid => p_payroll_action_id, -- Payroll Action of the Archiver
1315: p_eit_context => g_balance_context,
1316: p_archive => 'N'
1317: );
1318:
1319: hr_utility.set_location('get_eit_definitions - elements', 20);
1320:
1321: pay_za_payslip_archive.get_eit_definitions
1322: (
1323: p_pactid => p_payroll_action_id, -- Payroll Action of the Archiver
1341:
1342: -- Setup statutory balances pl/sql table
1343: pay_za_payslip_archive.setup_standard_balance_table;
1344:
1345: hr_utility.set_location('Leaving ' || l_proc, 20);
1346:
1347: end archinit;
1348:
1349: procedure archive_employee_details
1370:
1371: begin
1372: l_proc := g_package || 'archive_employee_details';
1373: -- Removed default assignment to remove GSCC warning
1374: hr_utility.set_location('Entering ' || l_proc, 10);
1375:
1376: -- Call generic procedure to retrieve and archive all data for
1377: -- EMPLOYEE DETAILS, ADDRESS DETAILS and EMPLOYEE NET PAY DISTRIBUTION
1378: hr_utility.set_location('Calling pay_emp_action_arch', 20);
1374: hr_utility.set_location('Entering ' || l_proc, 10);
1375:
1376: -- Call generic procedure to retrieve and archive all data for
1377: -- EMPLOYEE DETAILS, ADDRESS DETAILS and EMPLOYEE NET PAY DISTRIBUTION
1378: hr_utility.set_location('Calling pay_emp_action_arch', 20);
1379:
1380: -- Archive Employee Details through core package
1381: pay_emp_action_arch.get_personal_information
1382: (
1391: p_time_period_id => p_time_period_id, -- payroll time_period_id
1392: p_ppp_source_action_id => null
1393: );
1394:
1395: hr_utility.set_location('Returned from pay_emp_action_arch', 30);
1396:
1397: -- Call procedure to archive ZA specific data in generic EMPLOYEE DETAILS
1398:
1399: hr_utility.set_location('Calling update_employee_information', 40);
1395: hr_utility.set_location('Returned from pay_emp_action_arch', 30);
1396:
1397: -- Call procedure to archive ZA specific data in generic EMPLOYEE DETAILS
1398:
1399: hr_utility.set_location('Calling update_employee_information', 40);
1400:
1401: update_employee_information
1402: (
1403: p_action_context_id => p_assactid,
1403: p_action_context_id => p_assactid,
1404: p_assignment_id => p_assignment_id
1405: );
1406:
1407: hr_utility.set_location('Returned from update_employee_information', 50);
1408:
1409: -- Retrieve the ZA specific employee details
1410: -- Person Id
1411: select max(person_id)
1496: l_termination_date := null;
1497:
1498: end;
1499:
1500: hr_utility.set_location('Archiving ZA EMPLOYEE DETAILS', 50);
1501:
1502: -- Archive the ZA specific employee details
1503: pay_action_information_api.create_action_information
1504: (
1544:
1545: begin
1546: l_proc := g_package || 'process_balance';
1547: -- Removed default assignment to remove GSCC warning
1548: hr_utility.set_location('Entering ' || l_proc, 10);
1549:
1550: hr_utility.set_location('Step ' || l_proc, 20);
1551: hr_utility.set_location('p_source_id = ' || p_source_id, 20);
1552: hr_utility.set_location('p_balance = ' || p_balance, 20);
1546: l_proc := g_package || 'process_balance';
1547: -- Removed default assignment to remove GSCC warning
1548: hr_utility.set_location('Entering ' || l_proc, 10);
1549:
1550: hr_utility.set_location('Step ' || l_proc, 20);
1551: hr_utility.set_location('p_source_id = ' || p_source_id, 20);
1552: hr_utility.set_location('p_balance = ' || p_balance, 20);
1553: hr_utility.set_location('p_dimension = ' || p_dimension, 20);
1554: hr_utility.set_location('p_defined_bal_id = ' || p_defined_bal_id, 20);
1547: -- Removed default assignment to remove GSCC warning
1548: hr_utility.set_location('Entering ' || l_proc, 10);
1549:
1550: hr_utility.set_location('Step ' || l_proc, 20);
1551: hr_utility.set_location('p_source_id = ' || p_source_id, 20);
1552: hr_utility.set_location('p_balance = ' || p_balance, 20);
1553: hr_utility.set_location('p_dimension = ' || p_dimension, 20);
1554: hr_utility.set_location('p_defined_bal_id = ' || p_defined_bal_id, 20);
1555:
1548: hr_utility.set_location('Entering ' || l_proc, 10);
1549:
1550: hr_utility.set_location('Step ' || l_proc, 20);
1551: hr_utility.set_location('p_source_id = ' || p_source_id, 20);
1552: hr_utility.set_location('p_balance = ' || p_balance, 20);
1553: hr_utility.set_location('p_dimension = ' || p_dimension, 20);
1554: hr_utility.set_location('p_defined_bal_id = ' || p_defined_bal_id, 20);
1555:
1556: l_balance_value := pay_balance_pkg.get_value
1549:
1550: hr_utility.set_location('Step ' || l_proc, 20);
1551: hr_utility.set_location('p_source_id = ' || p_source_id, 20);
1552: hr_utility.set_location('p_balance = ' || p_balance, 20);
1553: hr_utility.set_location('p_dimension = ' || p_dimension, 20);
1554: hr_utility.set_location('p_defined_bal_id = ' || p_defined_bal_id, 20);
1555:
1556: l_balance_value := pay_balance_pkg.get_value
1557: (
1550: hr_utility.set_location('Step ' || l_proc, 20);
1551: hr_utility.set_location('p_source_id = ' || p_source_id, 20);
1552: hr_utility.set_location('p_balance = ' || p_balance, 20);
1553: hr_utility.set_location('p_dimension = ' || p_dimension, 20);
1554: hr_utility.set_location('p_defined_bal_id = ' || p_defined_bal_id, 20);
1555:
1556: l_balance_value := pay_balance_pkg.get_value
1557: (
1558: p_defined_balance_id => p_defined_bal_id,
1558: p_defined_balance_id => p_defined_bal_id,
1559: p_assignment_action_id => p_source_id
1560: );
1561:
1562: hr_utility.set_location('l_balance_value = ' || l_balance_value, 20);
1563:
1564: if p_record_count = 0 then
1565:
1566: l_record_count := null;
1572: end if;
1573:
1574: if l_balance_value <> 0 then
1575:
1576: hr_utility.set_location('Archiving EMEA BALANCES', 20);
1577:
1578: pay_action_information_api.create_action_information
1579: (
1580: p_action_information_id => l_action_info_id,
1594: );
1595:
1596: end if;
1597:
1598: hr_utility.set_location('Leaving ' || l_proc, 30);
1599:
1600: exception
1601: when no_data_found then
1602: null;
1680:
1681: l_proc := g_package || 'get_element_info';
1682: -- Removed default assignment to remove GSCC warning
1683:
1684: hr_utility.set_location('Entering ' || l_proc, 10);
1685:
1686: l_column_sequence := 0;
1687: l_element_type_id := 0;
1688: l_main_sequence := 0;
1697: l_record_count := p_record_count + 1;
1698:
1699: end if;
1700:
1701: hr_utility.set_location('g_max_element_index = ' || g_max_element_index, 10);
1702:
1703: open csr_paye_er_contr_ele_type_id;
1704: fetch csr_paye_er_contr_ele_type_id into l_paye_er_contr;
1705: close csr_paye_er_contr_ele_type_id;
1705: close csr_paye_er_contr_ele_type_id;
1706:
1707: for l_index in 1 .. g_max_element_index loop
1708:
1709: hr_utility.set_location('element_type_id = ' || g_element_table(l_index).element_type_id, 10);
1710: hr_utility.set_location('input_value_id = ' || g_element_table(l_index).input_value_id, 10);
1711: hr_utility.set_location('p_child_assignment_action = ' || p_child_assignment_action, 10);
1712: hr_utility.set_location('uom = ' || g_element_table(l_index).uom, 10);
1713:
1706:
1707: for l_index in 1 .. g_max_element_index loop
1708:
1709: hr_utility.set_location('element_type_id = ' || g_element_table(l_index).element_type_id, 10);
1710: hr_utility.set_location('input_value_id = ' || g_element_table(l_index).input_value_id, 10);
1711: hr_utility.set_location('p_child_assignment_action = ' || p_child_assignment_action, 10);
1712: hr_utility.set_location('uom = ' || g_element_table(l_index).uom, 10);
1713:
1714: if (g_element_table(l_index).element_type_id <> l_paye_er_contr) then
1707: for l_index in 1 .. g_max_element_index loop
1708:
1709: hr_utility.set_location('element_type_id = ' || g_element_table(l_index).element_type_id, 10);
1710: hr_utility.set_location('input_value_id = ' || g_element_table(l_index).input_value_id, 10);
1711: hr_utility.set_location('p_child_assignment_action = ' || p_child_assignment_action, 10);
1712: hr_utility.set_location('uom = ' || g_element_table(l_index).uom, 10);
1713:
1714: if (g_element_table(l_index).element_type_id <> l_paye_er_contr) then
1715:
1708:
1709: hr_utility.set_location('element_type_id = ' || g_element_table(l_index).element_type_id, 10);
1710: hr_utility.set_location('input_value_id = ' || g_element_table(l_index).input_value_id, 10);
1711: hr_utility.set_location('p_child_assignment_action = ' || p_child_assignment_action, 10);
1712: hr_utility.set_location('uom = ' || g_element_table(l_index).uom, 10);
1713:
1714: if (g_element_table(l_index).element_type_id <> l_paye_er_contr) then
1715:
1716: for rec_element_value in csr_element_values
1721: )
1722:
1723: loop
1724:
1725: hr_utility.set_location('element_type_id = ' || g_element_table(l_index).element_type_id, 10);
1726: hr_utility.set_location('input_value_id = ' || g_element_table(l_index).input_value_id, 10);
1727: hr_utility.set_location('Archiving EMEA ELEMENT INFO', 20);
1728:
1729: /* Added for Bug#10242073 */
1722:
1723: loop
1724:
1725: hr_utility.set_location('element_type_id = ' || g_element_table(l_index).element_type_id, 10);
1726: hr_utility.set_location('input_value_id = ' || g_element_table(l_index).input_value_id, 10);
1727: hr_utility.set_location('Archiving EMEA ELEMENT INFO', 20);
1728:
1729: /* Added for Bug#10242073 */
1730:
1723: loop
1724:
1725: hr_utility.set_location('element_type_id = ' || g_element_table(l_index).element_type_id, 10);
1726: hr_utility.set_location('input_value_id = ' || g_element_table(l_index).input_value_id, 10);
1727: hr_utility.set_location('Archiving EMEA ELEMENT INFO', 20);
1728:
1729: /* Added for Bug#10242073 */
1730:
1731: if g_element_table(l_index).uom in ('N','M') then
1743: l_main_sequence := l_main_sequence + 1;
1744:
1745: end if;
1746:
1747: hr_utility.set_location('l_main_sequence = ' || l_main_sequence, 20);
1748:
1749: l_column_sequence := l_column_sequence + 1;
1750:
1751: -- If the run method is P, Process Separate, then only archive the data if
1765: */
1766: if (p_run_method = 'P' and
1767: (g_element_table(l_index).formula_id is null AND nvl(g_element_table(l_index).once_each_period_flag,'N') <> 'Y')) then
1768:
1769: hr_utility.set_location('Not archiving element',25);
1770: null;
1771:
1772: else
1773:
1770: null;
1771:
1772: else
1773:
1774: hr_utility.set_location('Result_Value = ' || rec_element_value.result_value, 21);
1775:
1776: pay_action_information_api.create_action_information
1777: (
1778: p_action_information_id => l_action_info_id,
1809: g_element_table(l_index).input_value_id
1810: )
1811:
1812: loop
1813: hr_utility.set_location('Archiving Paye ER Contribution',30);
1814: hr_utility.set_location('element_type_id = ' || g_element_table(l_index).element_type_id, 30);
1815: hr_utility.set_location('input_value_id = ' || g_element_table(l_index).input_value_id, 30);
1816: hr_utility.set_location('Archiving EMEA ELEMENT INFO', 30);
1817:
1810: )
1811:
1812: loop
1813: hr_utility.set_location('Archiving Paye ER Contribution',30);
1814: hr_utility.set_location('element_type_id = ' || g_element_table(l_index).element_type_id, 30);
1815: hr_utility.set_location('input_value_id = ' || g_element_table(l_index).input_value_id, 30);
1816: hr_utility.set_location('Archiving EMEA ELEMENT INFO', 30);
1817:
1818: l_main_sequence := l_main_sequence + 1;
1811:
1812: loop
1813: hr_utility.set_location('Archiving Paye ER Contribution',30);
1814: hr_utility.set_location('element_type_id = ' || g_element_table(l_index).element_type_id, 30);
1815: hr_utility.set_location('input_value_id = ' || g_element_table(l_index).input_value_id, 30);
1816: hr_utility.set_location('Archiving EMEA ELEMENT INFO', 30);
1817:
1818: l_main_sequence := l_main_sequence + 1;
1819:
1812: loop
1813: hr_utility.set_location('Archiving Paye ER Contribution',30);
1814: hr_utility.set_location('element_type_id = ' || g_element_table(l_index).element_type_id, 30);
1815: hr_utility.set_location('input_value_id = ' || g_element_table(l_index).input_value_id, 30);
1816: hr_utility.set_location('Archiving EMEA ELEMENT INFO', 30);
1817:
1818: l_main_sequence := l_main_sequence + 1;
1819:
1820: hr_utility.set_location('l_main_sequence = ' || l_main_sequence, 30);
1816: hr_utility.set_location('Archiving EMEA ELEMENT INFO', 30);
1817:
1818: l_main_sequence := l_main_sequence + 1;
1819:
1820: hr_utility.set_location('l_main_sequence = ' || l_main_sequence, 30);
1821: hr_utility.set_location('rec_paye_er_contr.result_value ='||rec_paye_er_contr.result_value,30);
1822:
1823: l_column_sequence := l_column_sequence + 1;
1824:
1817:
1818: l_main_sequence := l_main_sequence + 1;
1819:
1820: hr_utility.set_location('l_main_sequence = ' || l_main_sequence, 30);
1821: hr_utility.set_location('rec_paye_er_contr.result_value ='||rec_paye_er_contr.result_value,30);
1822:
1823: l_column_sequence := l_column_sequence + 1;
1824:
1825:
1822:
1823: l_column_sequence := l_column_sequence + 1;
1824:
1825:
1826: hr_utility.set_location('Result_Value = ' || rec_paye_er_contr.result_value, 22);
1827:
1828:
1829: pay_action_information_api.create_action_information
1830: (
1994: begin
1995: l_legislation_code := 'ZA';
1996: -- Removed default assignment to remove GSCC warning
1997: --
1998: --hr_utility.trace_on(null, 'ZA_SOE');
1999: hr_utility.set_location('Entering ' || l_proc, 10);
2000:
2001: -- Retrieve the legislative parameters from the payroll action
2002: pay_za_payslip_archive.get_parameters
1995: l_legislation_code := 'ZA';
1996: -- Removed default assignment to remove GSCC warning
1997: --
1998: --hr_utility.trace_on(null, 'ZA_SOE');
1999: hr_utility.set_location('Entering ' || l_proc, 10);
2000:
2001: -- Retrieve the legislative parameters from the payroll action
2002: pay_za_payslip_archive.get_parameters
2003: (
2040: p_token_name => 'BG_ID',
2041: p_token_value => l_bg_id
2042: );
2043:
2044: hr_utility.set_location('Step ' || l_proc, 20);
2045: hr_utility.set_location('l_payroll_id = ' || l_payroll_id, 20);
2046: hr_utility.set_location('l_start_date = ' || l_start_date, 20);
2047: hr_utility.set_location('l_end_date = ' || l_end_date, 20);
2048:
2041: p_token_value => l_bg_id
2042: );
2043:
2044: hr_utility.set_location('Step ' || l_proc, 20);
2045: hr_utility.set_location('l_payroll_id = ' || l_payroll_id, 20);
2046: hr_utility.set_location('l_start_date = ' || l_start_date, 20);
2047: hr_utility.set_location('l_end_date = ' || l_end_date, 20);
2048:
2049: l_canonical_start_date := to_date(l_start_date, 'yyyy/mm/dd');
2042: );
2043:
2044: hr_utility.set_location('Step ' || l_proc, 20);
2045: hr_utility.set_location('l_payroll_id = ' || l_payroll_id, 20);
2046: hr_utility.set_location('l_start_date = ' || l_start_date, 20);
2047: hr_utility.set_location('l_end_date = ' || l_end_date, 20);
2048:
2049: l_canonical_start_date := to_date(l_start_date, 'yyyy/mm/dd');
2050: l_canonical_end_date := to_date(l_end_date, 'yyyy/mm/dd');
2043:
2044: hr_utility.set_location('Step ' || l_proc, 20);
2045: hr_utility.set_location('l_payroll_id = ' || l_payroll_id, 20);
2046: hr_utility.set_location('l_start_date = ' || l_start_date, 20);
2047: hr_utility.set_location('l_end_date = ' || l_end_date, 20);
2048:
2049: l_canonical_start_date := to_date(l_start_date, 'yyyy/mm/dd');
2050: l_canonical_end_date := to_date(l_end_date, 'yyyy/mm/dd');
2051:
2049: l_canonical_start_date := to_date(l_start_date, 'yyyy/mm/dd');
2050: l_canonical_end_date := to_date(l_end_date, 'yyyy/mm/dd');
2051:
2052: -- Archive EMEA PAYROLL INFO for each prepayment run identified
2053: hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
2054: hr_utility.set_location('l_consolidation_set = ' || l_consolidation_set,20);
2055: hr_utility.set_location('l_canonical_start_date = ' || l_canonical_start_date,20);
2056: hr_utility.set_location('l_canonical_end_date = ' || l_canonical_end_date,20);
2057: --
2050: l_canonical_end_date := to_date(l_end_date, 'yyyy/mm/dd');
2051:
2052: -- Archive EMEA PAYROLL INFO for each prepayment run identified
2053: hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
2054: hr_utility.set_location('l_consolidation_set = ' || l_consolidation_set,20);
2055: hr_utility.set_location('l_canonical_start_date = ' || l_canonical_start_date,20);
2056: hr_utility.set_location('l_canonical_end_date = ' || l_canonical_end_date,20);
2057: --
2058: -- Loop through all the prepayments for the specified parameters that has not been archived yet
2051:
2052: -- Archive EMEA PAYROLL INFO for each prepayment run identified
2053: hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
2054: hr_utility.set_location('l_consolidation_set = ' || l_consolidation_set,20);
2055: hr_utility.set_location('l_canonical_start_date = ' || l_canonical_start_date,20);
2056: hr_utility.set_location('l_canonical_end_date = ' || l_canonical_end_date,20);
2057: --
2058: -- Loop through all the prepayments for the specified parameters that has not been archived yet
2059: for rec_payroll_info in csr_payroll_info
2052: -- Archive EMEA PAYROLL INFO for each prepayment run identified
2053: hr_utility.set_location('l_payroll_id = ' || l_payroll_id,20);
2054: hr_utility.set_location('l_consolidation_set = ' || l_consolidation_set,20);
2055: hr_utility.set_location('l_canonical_start_date = ' || l_canonical_start_date,20);
2056: hr_utility.set_location('l_canonical_end_date = ' || l_canonical_end_date,20);
2057: --
2058: -- Loop through all the prepayments for the specified parameters that has not been archived yet
2059: for rec_payroll_info in csr_payroll_info
2060: (l_payroll_id
2106: ,l_consolidation_set
2107: ,l_canonical_end_date)
2108: LOOP
2109: -- Start Bug No 3436989 passing rec_payrolls.payroll_id parameter instead of l_payroll_id
2110: hr_utility.set_location('Calling arch_pay_action_level_data', 25);
2111: pay_emp_action_arch.arch_pay_action_level_data
2112: (p_payroll_action_id => pactid
2113: ,p_payroll_id => rec_payrolls.payroll_id -- l_payroll_id
2114: ,p_effective_date => l_canonical_end_date
2113: ,p_payroll_id => rec_payrolls.payroll_id -- l_payroll_id
2114: ,p_effective_date => l_canonical_end_date
2115: );
2116:
2117: hr_utility.set_location('Calling arch_za_pay_action_level_data', 27);
2118: arch_za_pay_action_level_data
2119: (p_payroll_action_id => pactid
2120: ,p_payroll_id => rec_payrolls.payroll_id -- l_payroll_id
2121: ,p_effective_date => l_canonical_end_date
2145: );
2146: --
2147: --
2148: -- Added for Bug 4153551
2149: hr_utility.set_location('Calling arch_pay_action_level_data', 25);
2150: pay_emp_action_arch.arch_pay_action_level_data(
2151: p_payroll_action_id => pactid
2152: ,p_payroll_id => rec_payroll_info.payroll_id -- l_payroll_id (for bug 3436989)
2153: ,p_effective_date => l_canonical_end_date
2154: );
2155: -- fix for bug#16608448
2156: IF (l_addr_arch_flag = false) THEN
2157: IF (rec_payroll_info.payroll_id IS NOT null) THEN
2158: hr_utility.set_location('Calling arch_za_pay_action_level_data', 27);
2159: arch_za_pay_action_level_data(
2160: p_payroll_action_id => pactid
2161: ,p_payroll_id => rec_payroll_info.payroll_id -- l_payroll_id (for bug 3436989)
2162: ,p_effective_date => l_canonical_end_date
2166: END IF;
2167: -- End Bug 4153551
2168: --
2169: --
2170: hr_utility.set_location('rec_payroll_info.payroll_action_id = ' || rec_payroll_info.payroll_action_id, 30);
2171: --
2172: hr_utility.set_location('Archiving EMEA PAYROLL INFO', 30);
2173: --
2174: -- Archive the Payroll Info in 'EMEA PAYROLL INFO'
2168: --
2169: --
2170: hr_utility.set_location('rec_payroll_info.payroll_action_id = ' || rec_payroll_info.payroll_action_id, 30);
2171: --
2172: hr_utility.set_location('Archiving EMEA PAYROLL INFO', 30);
2173: --
2174: -- Archive the Payroll Info in 'EMEA PAYROLL INFO'
2175: -- Note: Actually information on Org DF Tax Details References
2176: pay_action_information_api.create_action_information
2230: where ppa.payroll_action_id = :payroll_action_id
2231: and ppf.business_group_id = ppa.business_group_id
2232: order by ppf.person_id';
2233:
2234: hr_utility.set_location('Leaving ' || l_proc, 40);
2235: -- hr_utility.trace_off;
2236:
2237: exception
2238: when others then
2231: and ppf.business_group_id = ppa.business_group_id
2232: order by ppf.person_id';
2233:
2234: hr_utility.set_location('Leaving ' || l_proc, 40);
2235: -- hr_utility.trace_off;
2236:
2237: exception
2238: when others then
2239: sqlstr := null;
2326: begin
2327:
2328: l_proc := g_package || 'action_creation';
2329: -- Removed default assignment to remove GSCC warning
2330: --hr_utility.trace_on(null, 'ZA_SOE');
2331: hr_utility.set_location('Entering ' || l_proc, 10);
2332:
2333: -- Retrieve the legislative parameters from the payroll action
2334: pay_za_payslip_archive.get_parameters
2327:
2328: l_proc := g_package || 'action_creation';
2329: -- Removed default assignment to remove GSCC warning
2330: --hr_utility.trace_on(null, 'ZA_SOE');
2331: hr_utility.set_location('Entering ' || l_proc, 10);
2332:
2333: -- Retrieve the legislative parameters from the payroll action
2334: pay_za_payslip_archive.get_parameters
2335: (
2358: p_token_name => 'END_DATE',
2359: p_token_value => l_end_date
2360: );
2361:
2362: hr_utility.set_location('Step ' || l_proc, 20);
2363: hr_utility.set_location('l_payroll_id = ' || l_payroll_id, 20);
2364: hr_utility.set_location('l_start_date = ' || l_start_date, 20);
2365: hr_utility.set_location('l_end_date = ' || l_end_date, 20);
2366: hr_utility.set_location('pactid = ' || pactid, 20);
2359: p_token_value => l_end_date
2360: );
2361:
2362: hr_utility.set_location('Step ' || l_proc, 20);
2363: hr_utility.set_location('l_payroll_id = ' || l_payroll_id, 20);
2364: hr_utility.set_location('l_start_date = ' || l_start_date, 20);
2365: hr_utility.set_location('l_end_date = ' || l_end_date, 20);
2366: hr_utility.set_location('pactid = ' || pactid, 20);
2367:
2360: );
2361:
2362: hr_utility.set_location('Step ' || l_proc, 20);
2363: hr_utility.set_location('l_payroll_id = ' || l_payroll_id, 20);
2364: hr_utility.set_location('l_start_date = ' || l_start_date, 20);
2365: hr_utility.set_location('l_end_date = ' || l_end_date, 20);
2366: hr_utility.set_location('pactid = ' || pactid, 20);
2367:
2368: l_canonical_start_date := to_date(l_start_date, 'yyyy/mm/dd');
2361:
2362: hr_utility.set_location('Step ' || l_proc, 20);
2363: hr_utility.set_location('l_payroll_id = ' || l_payroll_id, 20);
2364: hr_utility.set_location('l_start_date = ' || l_start_date, 20);
2365: hr_utility.set_location('l_end_date = ' || l_end_date, 20);
2366: hr_utility.set_location('pactid = ' || pactid, 20);
2367:
2368: l_canonical_start_date := to_date(l_start_date, 'yyyy/mm/dd');
2369: l_canonical_end_date := to_date(l_end_date, 'yyyy/mm/dd');
2362: hr_utility.set_location('Step ' || l_proc, 20);
2363: hr_utility.set_location('l_payroll_id = ' || l_payroll_id, 20);
2364: hr_utility.set_location('l_start_date = ' || l_start_date, 20);
2365: hr_utility.set_location('l_end_date = ' || l_end_date, 20);
2366: hr_utility.set_location('pactid = ' || pactid, 20);
2367:
2368: l_canonical_start_date := to_date(l_start_date, 'yyyy/mm/dd');
2369: l_canonical_end_date := to_date(l_end_date, 'yyyy/mm/dd');
2370:
2371: l_prepay_action_id := 0;
2372:
2373: -- Loop through all runs and prepayments that have not already been locked by
2374: -- an Payslip Archive process
2375: hr_utility.set_location('csr_prepaid_assignments info', 99);
2376: hr_utility.set_location('pactid = '||pactid, 99);
2377: hr_utility.set_location('stperson = '||stperson, 99);
2378: hr_utility.set_location('endperson = '||endperson, 99);
2379: hr_utility.set_location('l_payroll_id = '||l_payroll_id, 99);
2372:
2373: -- Loop through all runs and prepayments that have not already been locked by
2374: -- an Payslip Archive process
2375: hr_utility.set_location('csr_prepaid_assignments info', 99);
2376: hr_utility.set_location('pactid = '||pactid, 99);
2377: hr_utility.set_location('stperson = '||stperson, 99);
2378: hr_utility.set_location('endperson = '||endperson, 99);
2379: hr_utility.set_location('l_payroll_id = '||l_payroll_id, 99);
2380: hr_utility.set_location('l_consolidation_set = '||l_consolidation_set, 99);
2373: -- Loop through all runs and prepayments that have not already been locked by
2374: -- an Payslip Archive process
2375: hr_utility.set_location('csr_prepaid_assignments info', 99);
2376: hr_utility.set_location('pactid = '||pactid, 99);
2377: hr_utility.set_location('stperson = '||stperson, 99);
2378: hr_utility.set_location('endperson = '||endperson, 99);
2379: hr_utility.set_location('l_payroll_id = '||l_payroll_id, 99);
2380: hr_utility.set_location('l_consolidation_set = '||l_consolidation_set, 99);
2381: for csr_rec in csr_prepaid_assignments
2374: -- an Payslip Archive process
2375: hr_utility.set_location('csr_prepaid_assignments info', 99);
2376: hr_utility.set_location('pactid = '||pactid, 99);
2377: hr_utility.set_location('stperson = '||stperson, 99);
2378: hr_utility.set_location('endperson = '||endperson, 99);
2379: hr_utility.set_location('l_payroll_id = '||l_payroll_id, 99);
2380: hr_utility.set_location('l_consolidation_set = '||l_consolidation_set, 99);
2381: for csr_rec in csr_prepaid_assignments
2382: (
2375: hr_utility.set_location('csr_prepaid_assignments info', 99);
2376: hr_utility.set_location('pactid = '||pactid, 99);
2377: hr_utility.set_location('stperson = '||stperson, 99);
2378: hr_utility.set_location('endperson = '||endperson, 99);
2379: hr_utility.set_location('l_payroll_id = '||l_payroll_id, 99);
2380: hr_utility.set_location('l_consolidation_set = '||l_consolidation_set, 99);
2381: for csr_rec in csr_prepaid_assignments
2382: (
2383: pactid,
2376: hr_utility.set_location('pactid = '||pactid, 99);
2377: hr_utility.set_location('stperson = '||stperson, 99);
2378: hr_utility.set_location('endperson = '||endperson, 99);
2379: hr_utility.set_location('l_payroll_id = '||l_payroll_id, 99);
2380: hr_utility.set_location('l_consolidation_set = '||l_consolidation_set, 99);
2381: for csr_rec in csr_prepaid_assignments
2382: (
2383: pactid,
2384: stperson,
2408: hr_nonrun_asact.insact(l_actid, csr_rec.assignment_id, pactid, chunk, l_tax_unit_id);
2409:
2410: -- Create the archive to payroll master assignment action interlock and
2411: -- the archive to prepayment assignment action interlock
2412: hr_utility.set_location('creating lock for assignment_id ' || csr_rec.assignment_id, 20);
2413: hr_utility.set_location('creating lock1 ' || l_actid || ' to ' || csr_rec.run_action_id, 20);
2414: hr_utility.set_location('creating lock2 ' || l_actid || ' to ' || csr_rec.prepaid_action_id, 20);
2415:
2416: hr_nonrun_asact.insint(l_actid, csr_rec.prepaid_action_id);
2409:
2410: -- Create the archive to payroll master assignment action interlock and
2411: -- the archive to prepayment assignment action interlock
2412: hr_utility.set_location('creating lock for assignment_id ' || csr_rec.assignment_id, 20);
2413: hr_utility.set_location('creating lock1 ' || l_actid || ' to ' || csr_rec.run_action_id, 20);
2414: hr_utility.set_location('creating lock2 ' || l_actid || ' to ' || csr_rec.prepaid_action_id, 20);
2415:
2416: hr_nonrun_asact.insint(l_actid, csr_rec.prepaid_action_id);
2417:
2410: -- Create the archive to payroll master assignment action interlock and
2411: -- the archive to prepayment assignment action interlock
2412: hr_utility.set_location('creating lock for assignment_id ' || csr_rec.assignment_id, 20);
2413: hr_utility.set_location('creating lock1 ' || l_actid || ' to ' || csr_rec.run_action_id, 20);
2414: hr_utility.set_location('creating lock2 ' || l_actid || ' to ' || csr_rec.prepaid_action_id, 20);
2415:
2416: hr_nonrun_asact.insint(l_actid, csr_rec.prepaid_action_id);
2417:
2418: end if;
2421: l_prepay_action_id := csr_rec.prepaid_action_id;
2422:
2423: end loop;
2424:
2425: hr_utility.set_location('Leaving ' || l_proc, 20);
2426:
2427: end action_creation;
2428:
2429: -- This procedure gets called fourth to archive each assignment action.
2543:
2544:
2545:
2546: -- Removed default assignment to remove GSCC warning
2547: -- hr_utility.trace_on(null, 'ZA_SOE');
2548: hr_utility.set_location('Entering '|| l_proc, 10);
2549:
2550: hr_utility.set_location('Step '|| l_proc, 20);
2551: hr_utility.set_location('p_assactid = ' || p_assactid, 20);
2544:
2545:
2546: -- Removed default assignment to remove GSCC warning
2547: -- hr_utility.trace_on(null, 'ZA_SOE');
2548: hr_utility.set_location('Entering '|| l_proc, 10);
2549:
2550: hr_utility.set_location('Step '|| l_proc, 20);
2551: hr_utility.set_location('p_assactid = ' || p_assactid, 20);
2552:
2546: -- Removed default assignment to remove GSCC warning
2547: -- hr_utility.trace_on(null, 'ZA_SOE');
2548: hr_utility.set_location('Entering '|| l_proc, 10);
2549:
2550: hr_utility.set_location('Step '|| l_proc, 20);
2551: hr_utility.set_location('p_assactid = ' || p_assactid, 20);
2552:
2553: -- Retrieve the chunk number for the current assignment action
2554: select paa.chunk_number
2547: -- hr_utility.trace_on(null, 'ZA_SOE');
2548: hr_utility.set_location('Entering '|| l_proc, 10);
2549:
2550: hr_utility.set_location('Step '|| l_proc, 20);
2551: hr_utility.set_location('p_assactid = ' || p_assactid, 20);
2552:
2553: -- Retrieve the chunk number for the current assignment action
2554: select paa.chunk_number
2555: into l_chunk_number
2564: -- 3693941 initialise the l_pre_assignment_action_id variable.
2565: -- Loop through all the Prepayments and Runs for the current Archiver Assignment Action
2566: for csr_rec in csr_assignment_actions(p_assactid) loop
2567:
2568: hr_utility.set_location('csr_rec.master_assignment_action_id = ' || csr_rec.master_assignment_action_id, 20);
2569: hr_utility.set_location('csr_rec.pre_assignment_action_id = ' || csr_rec.pre_assignment_action_id, 20);
2570: hr_utility.set_location('csr_rec.assignment_id = ' || csr_rec.assignment_id,20);
2571: hr_utility.set_location('csr_rec.date_earned = ' ||to_char( csr_rec.date_earned,'dd-mon-yyyy'),20);
2572: hr_utility.set_location('csr_rec.pre_effective_date = ' ||to_char( csr_rec.pre_effective_date,'dd-mon-yyyy'),20);
2565: -- Loop through all the Prepayments and Runs for the current Archiver Assignment Action
2566: for csr_rec in csr_assignment_actions(p_assactid) loop
2567:
2568: hr_utility.set_location('csr_rec.master_assignment_action_id = ' || csr_rec.master_assignment_action_id, 20);
2569: hr_utility.set_location('csr_rec.pre_assignment_action_id = ' || csr_rec.pre_assignment_action_id, 20);
2570: hr_utility.set_location('csr_rec.assignment_id = ' || csr_rec.assignment_id,20);
2571: hr_utility.set_location('csr_rec.date_earned = ' ||to_char( csr_rec.date_earned,'dd-mon-yyyy'),20);
2572: hr_utility.set_location('csr_rec.pre_effective_date = ' ||to_char( csr_rec.pre_effective_date,'dd-mon-yyyy'),20);
2573: hr_utility.set_location('csr_rec.time_period_id = ' || csr_rec.time_period_id,20);
2566: for csr_rec in csr_assignment_actions(p_assactid) loop
2567:
2568: hr_utility.set_location('csr_rec.master_assignment_action_id = ' || csr_rec.master_assignment_action_id, 20);
2569: hr_utility.set_location('csr_rec.pre_assignment_action_id = ' || csr_rec.pre_assignment_action_id, 20);
2570: hr_utility.set_location('csr_rec.assignment_id = ' || csr_rec.assignment_id,20);
2571: hr_utility.set_location('csr_rec.date_earned = ' ||to_char( csr_rec.date_earned,'dd-mon-yyyy'),20);
2572: hr_utility.set_location('csr_rec.pre_effective_date = ' ||to_char( csr_rec.pre_effective_date,'dd-mon-yyyy'),20);
2573: hr_utility.set_location('csr_rec.time_period_id = ' || csr_rec.time_period_id,20);
2574:
2567:
2568: hr_utility.set_location('csr_rec.master_assignment_action_id = ' || csr_rec.master_assignment_action_id, 20);
2569: hr_utility.set_location('csr_rec.pre_assignment_action_id = ' || csr_rec.pre_assignment_action_id, 20);
2570: hr_utility.set_location('csr_rec.assignment_id = ' || csr_rec.assignment_id,20);
2571: hr_utility.set_location('csr_rec.date_earned = ' ||to_char( csr_rec.date_earned,'dd-mon-yyyy'),20);
2572: hr_utility.set_location('csr_rec.pre_effective_date = ' ||to_char( csr_rec.pre_effective_date,'dd-mon-yyyy'),20);
2573: hr_utility.set_location('csr_rec.time_period_id = ' || csr_rec.time_period_id,20);
2574:
2575: if l_record_count = 0 then
2568: hr_utility.set_location('csr_rec.master_assignment_action_id = ' || csr_rec.master_assignment_action_id, 20);
2569: hr_utility.set_location('csr_rec.pre_assignment_action_id = ' || csr_rec.pre_assignment_action_id, 20);
2570: hr_utility.set_location('csr_rec.assignment_id = ' || csr_rec.assignment_id,20);
2571: hr_utility.set_location('csr_rec.date_earned = ' ||to_char( csr_rec.date_earned,'dd-mon-yyyy'),20);
2572: hr_utility.set_location('csr_rec.pre_effective_date = ' ||to_char( csr_rec.pre_effective_date,'dd-mon-yyyy'),20);
2573: hr_utility.set_location('csr_rec.time_period_id = ' || csr_rec.time_period_id,20);
2574:
2575: if l_record_count = 0 then
2576:
2569: hr_utility.set_location('csr_rec.pre_assignment_action_id = ' || csr_rec.pre_assignment_action_id, 20);
2570: hr_utility.set_location('csr_rec.assignment_id = ' || csr_rec.assignment_id,20);
2571: hr_utility.set_location('csr_rec.date_earned = ' ||to_char( csr_rec.date_earned,'dd-mon-yyyy'),20);
2572: hr_utility.set_location('csr_rec.pre_effective_date = ' ||to_char( csr_rec.pre_effective_date,'dd-mon-yyyy'),20);
2573: hr_utility.set_location('csr_rec.time_period_id = ' || csr_rec.time_period_id,20);
2574:
2575: if l_record_count = 0 then
2576:
2577: hr_utility.set_location(' record_count = 0 , starting archive_employee_details' , 23);
2573: hr_utility.set_location('csr_rec.time_period_id = ' || csr_rec.time_period_id,20);
2574:
2575: if l_record_count = 0 then
2576:
2577: hr_utility.set_location(' record_count = 0 , starting archive_employee_details' , 23);
2578:
2579: -- Archive the Employee Details in 'EMPLOYEE DETAILS', 'ADDRESS DETAILS',
2580: -- 'EMPLOYEE NET PAY DISTRIBUTION' and 'ZA EMPLOYEE DETAILS'
2581: pay_za_payslip_archive.archive_employee_details
2587: p_curr_pymt_eff_date => csr_rec.pre_effective_date, -- prepayment effective_date
2588: p_time_period_id => csr_rec.time_period_id -- payroll time_period_id
2589: );
2590:
2591: hr_utility.set_location(' out of archive_employee_details ' , 25);
2592:
2593: end if;
2594:
2595: --Start changes for Multiple Run Types
2630: SELECT pay_assignment_actions_s.NEXTVAL
2631: INTO l_actid
2632: FROM dual;
2633:
2634: hr_utility.set_location('csr_child_rec.run_type = ' ||
2635: csr_child_rec.run_type,30);
2636: hr_utility.set_location('csr_rec.master_assignment_action_id = ' ||
2637: csr_rec.master_assignment_action_id,30);
2638:
2632: FROM dual;
2633:
2634: hr_utility.set_location('csr_child_rec.run_type = ' ||
2635: csr_child_rec.run_type,30);
2636: hr_utility.set_location('csr_rec.master_assignment_action_id = ' ||
2637: csr_rec.master_assignment_action_id,30);
2638:
2639: hr_nonrun_asact.insact(
2640: lockingactid => l_actid
2646: ,status => 'C'
2647: ,source_act => p_assactid);
2648:
2649: IF csr_child_rec.run_type = 'S' THEN
2650: hr_utility.set_location('creating lock3 ' || l_actid || ' to ' ||
2651: csr_child_rec.child_assignment_action_id,30);
2652:
2653: hr_nonrun_asact.insint(
2654: lockingactid => l_actid
2673: csr_rec.pay_payroll_action_id,
2674: csr_rec.assignment_id,
2675: csr_rec.effective_date)
2676: LOOP
2677: hr_utility.set_location('creating lock4 ' || l_actid || ' to ' ||
2678: csr_np_rec.np_assignment_action_id,30);
2679:
2680: hr_nonrun_asact.insint(
2681: lockingactid => l_actid
2717: -- and the last (i.e. highest action_sequence) Process Separately assignment action
2718: -- (EMEA BALANCES)
2719:
2720: -- Archive user balances
2721: hr_utility.set_location('l_pre_assignment_action_id = '|| l_pre_assignment_action_id, 60);
2722:
2723: l_pre_assignment_action_id := csr_rec.pre_assignment_action_id;
2724:
2725: hr_utility.set_location('Archive User Balances - Starting', 60);
2721: hr_utility.set_location('l_pre_assignment_action_id = '|| l_pre_assignment_action_id, 60);
2722:
2723: l_pre_assignment_action_id := csr_rec.pre_assignment_action_id;
2724:
2725: hr_utility.set_location('Archive User Balances - Starting', 60);
2726: hr_utility.set_location('g_max_user_balance_index = '|| g_max_user_balance_index, 60);
2727: hr_utility.set_location('l_pre_assignment_action_id = '|| l_pre_assignment_action_id, 60);
2728:
2729: for l_index in 1..g_max_user_balance_index loop
2722:
2723: l_pre_assignment_action_id := csr_rec.pre_assignment_action_id;
2724:
2725: hr_utility.set_location('Archive User Balances - Starting', 60);
2726: hr_utility.set_location('g_max_user_balance_index = '|| g_max_user_balance_index, 60);
2727: hr_utility.set_location('l_pre_assignment_action_id = '|| l_pre_assignment_action_id, 60);
2728:
2729: for l_index in 1..g_max_user_balance_index loop
2730: -- Bug 5507715
2723: l_pre_assignment_action_id := csr_rec.pre_assignment_action_id;
2724:
2725: hr_utility.set_location('Archive User Balances - Starting', 60);
2726: hr_utility.set_location('g_max_user_balance_index = '|| g_max_user_balance_index, 60);
2727: hr_utility.set_location('l_pre_assignment_action_id = '|| l_pre_assignment_action_id, 60);
2728:
2729: for l_index in 1..g_max_user_balance_index loop
2730: -- Bug 5507715
2731: pay_za_payslip_archive.process_balance
2767: END if;*/
2768:
2769: end loop;
2770:
2771: hr_utility.set_location('Archive User Balances - Complete', 60);
2772:
2773: -- Archive statutory balances
2774: hr_utility.set_location('Archive Statutory Balances - Starting', 70);
2775: hr_utility.set_location('g_max_statutory_balance_index = '|| g_max_statutory_balance_index, 70);
2770:
2771: hr_utility.set_location('Archive User Balances - Complete', 60);
2772:
2773: -- Archive statutory balances
2774: hr_utility.set_location('Archive Statutory Balances - Starting', 70);
2775: hr_utility.set_location('g_max_statutory_balance_index = '|| g_max_statutory_balance_index, 70);
2776:
2777: for l_index in 1..g_max_statutory_balance_index loop
2778:
2771: hr_utility.set_location('Archive User Balances - Complete', 60);
2772:
2773: -- Archive statutory balances
2774: hr_utility.set_location('Archive Statutory Balances - Starting', 70);
2775: hr_utility.set_location('g_max_statutory_balance_index = '|| g_max_statutory_balance_index, 70);
2776:
2777: for l_index in 1..g_max_statutory_balance_index loop
2778:
2779: hr_utility.set_location('l_index = ' || l_index, 70);
2775: hr_utility.set_location('g_max_statutory_balance_index = '|| g_max_statutory_balance_index, 70);
2776:
2777: for l_index in 1..g_max_statutory_balance_index loop
2778:
2779: hr_utility.set_location('l_index = ' || l_index, 70);
2780: --5507715
2781: pay_za_payslip_archive.process_balance
2782: (
2783: p_action_context_id => l_action_context_id,
2819: end loop;
2820: end if;
2821: -- and passed the csr_rec.pre_assignment_action_id instead of master_assignment_action_id
2822: -- End of if condition for the bug 3693941
2823: hr_utility.set_location('Archive Statutory Balances - Complete', 70);
2824:
2825: l_record_count := l_record_count + 1;
2826:
2827: end loop;
2825: l_record_count := l_record_count + 1;
2826:
2827: end loop;
2828:
2829: hr_utility.set_location('Leaving '|| l_proc, 80);
2830:
2831: end archive_code;
2832:
2833: /*********************************************************************
2891: open c_effective_date (p_payroll_action_id);
2892: fetch c_effective_date into l_effective_date;
2893:
2894: if c_effective_date%notfound then
2895: hr_utility.trace('Effective Date not found for p_payroll_action_id : ' || p_payroll_action_id);
2896: hr_utility.raise_error;
2897: end if;
2898: close c_effective_date;
2899:
2892: fetch c_effective_date into l_effective_date;
2893:
2894: if c_effective_date%notfound then
2895: hr_utility.trace('Effective Date not found for p_payroll_action_id : ' || p_payroll_action_id);
2896: hr_utility.raise_error;
2897: end if;
2898: close c_effective_date;
2899:
2900: pay_emp_action_arch.arch_pay_action_level_data
2921: -- fix for bug#16608448
2922: IF (l_addr_arch_flag = false) THEN
2923:
2924: IF (rec_payroll_info.payroll_id IS NOT null) THEN
2925: hr_utility.set_location('Calling arch_za_pay_action_level_data', 27);
2926: arch_za_pay_action_level_data(
2927: p_payroll_action_id => p_payroll_action_id
2928: ,p_payroll_id => rec_payroll_info.payroll_id -- l_payroll_id (for bug 3436989)
2929: ,p_effective_date => l_canonical_end_date
2940: when others then
2941: lv_error_message := 'Error in ' ||
2942: g_package || lv_procedure_name;
2943:
2944: hr_utility.trace(lv_error_message || '-' || sqlerrm);
2945:
2946: lv_error_message :=
2947: pay_emp_action_arch.set_error_message(lv_error_message);
2948:
2945:
2946: lv_error_message :=
2947: pay_emp_action_arch.set_error_message(lv_error_message);
2948:
2949: hr_utility.set_message(801,'HR_ELE_ENTRY_FORMULA_HINT');
2950: hr_utility.set_message_token('FORMULA_TEXT', lv_error_message);
2951: hr_utility.raise_error;
2952: end action_archdeinit;
2953:
2946: lv_error_message :=
2947: pay_emp_action_arch.set_error_message(lv_error_message);
2948:
2949: hr_utility.set_message(801,'HR_ELE_ENTRY_FORMULA_HINT');
2950: hr_utility.set_message_token('FORMULA_TEXT', lv_error_message);
2951: hr_utility.raise_error;
2952: end action_archdeinit;
2953:
2954:
2947: pay_emp_action_arch.set_error_message(lv_error_message);
2948:
2949: hr_utility.set_message(801,'HR_ELE_ENTRY_FORMULA_HINT');
2950: hr_utility.set_message_token('FORMULA_TEXT', lv_error_message);
2951: hr_utility.raise_error;
2952: end action_archdeinit;
2953:
2954:
2955: end;