[Home] [Help]
61: --
62:
63: l_procedure := g_package || 'range_code';
64: g_debug := hr_utility.debug_enabled;
65: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
66:
67: --------------------------------------------------------------------------------+
68: -- Call to range_code from common apac package 'pay_apac_payslip_archive'
69: -- to archive the payroll action level data and EIT defintions.
76:
77: -- Call core package to return SQL string to SELECT a range
78: -- of assignments eligible for archival
79: --
80: pay_in_utils.set_location(g_debug,l_procedure,20);
81:
82: pay_core_payslip_utils.range_cursor(p_payroll_action_id
83: ,p_sql);
84:
81:
82: pay_core_payslip_utils.range_cursor(p_payroll_action_id
83: ,p_sql);
84:
85: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 30);
86: --
87: EXCEPTION
88: WHEN OTHERS THEN
89: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
85: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 30);
86: --
87: EXCEPTION
88: WHEN OTHERS THEN
89: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
90: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 30);
91: pay_in_utils.trace(l_message,l_procedure);
92: RAISE;
93: --
86: --
87: EXCEPTION
88: WHEN OTHERS THEN
89: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
90: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 30);
91: pay_in_utils.trace(l_message,l_procedure);
92: RAISE;
93: --
94: END range_code;
87: EXCEPTION
88: WHEN OTHERS THEN
89: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
90: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 30);
91: pay_in_utils.trace(l_message,l_procedure);
92: RAISE;
93: --
94: END range_code;
95:
182: --
183: l_procedure := g_package || 'initialization_code';
184:
185: g_debug := hr_utility.debug_enabled;
186: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
187:
188: --------------------------------------------------------------------------
189: -- Code to update the payroll_id in the pay_payroll_actions tabel.
190: --------------------------------------------------------------------------
217: pay_apac_payslip_archive.initialization_code(
218: p_payroll_action_id => p_payroll_action_id
219: );
220:
221: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 20);
222: --
223: EXCEPTION
224: WHEN OTHERS THEN
225: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
221: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 20);
222: --
223: EXCEPTION
224: WHEN OTHERS THEN
225: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
226: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 30);
227: pay_in_utils.trace(l_message,l_procedure);
228: RAISE;
229: --
222: --
223: EXCEPTION
224: WHEN OTHERS THEN
225: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
226: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 30);
227: pay_in_utils.trace(l_message,l_procedure);
228: RAISE;
229: --
230: END initialization_code;
223: EXCEPTION
224: WHEN OTHERS THEN
225: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
226: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 30);
227: pay_in_utils.trace(l_message,l_procedure);
228: RAISE;
229: --
230: END initialization_code;
231:
270: BEGIN
271:
272: l_procedure := g_package || 'get_parameters';
273:
274: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
275:
276:
277: OPEN csr_parameter_info(p_payroll_action_id,
278: p_token_name);
287: p_token_value := l_token_value;
288: END IF;
289:
290: IF g_debug THEN
291: pay_in_utils.trace('Token Name ',p_token_name);
292: pay_in_utils.trace('Token Value ',p_token_value);
293: END IF;
294:
295: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 20);
288: END IF;
289:
290: IF g_debug THEN
291: pay_in_utils.trace('Token Name ',p_token_name);
292: pay_in_utils.trace('Token Value ',p_token_value);
293: END IF;
294:
295: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 20);
296:
291: pay_in_utils.trace('Token Name ',p_token_name);
292: pay_in_utils.trace('Token Value ',p_token_value);
293: END IF;
294:
295: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 20);
296:
297:
298: END get_parameters;
299:
370: p_start_person AND p_end_person
371: AND paf.assignment_id = paa_init.assignment_id
372: AND ppa_init.effective_date BETWEEN paf.effective_start_date AND paf.effective_end_date
373: AND ppa_init.effective_date BETWEEN p_start_date AND p_end_date
374: AND paa_init.action_sequence = pay_in_utils.get_max_act_sequence(paa_init.assignment_id
375: ,'I'
376: ,ppa_init.effective_date
377: )
378: AND NOT EXISTS (SELECT NULL
394: l_procedure := g_package || 'assignment_action_code';
395:
396: g_debug := hr_utility.debug_enabled;
397:
398: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
399:
400: get_parameters( p_payroll_action_id => p_payroll_action_id
401: , p_token_name => 'PAYROLL'
402: , p_token_value => l_payroll_id);
419:
420: l_canonical_start_date := TO_DATE(l_start_date,'yyyy/mm/dd');
421: l_canonical_end_date := TO_DATE(l_end_date,'yyyy/mm/dd');
422:
423: pay_in_utils.set_location(g_debug,l_procedure,20);
424: -- Call core package to create assignment actions
425: pay_core_payslip_utils.action_creation (
426: p_payroll_action_id
427: ,p_start_person
428: ,p_end_person
429: ,p_chunk
430: ,'IN_PAYSLIP_ARCHIVE'
431: ,'IN');
432: pay_in_utils.set_location(g_debug,l_procedure,30);
433:
434: IF g_debug THEN
435: pay_in_utils.trace('Canonical Start and End Date ',l_canonical_start_date||' '||l_canonical_end_date );
436: END IF;
431: ,'IN');
432: pay_in_utils.set_location(g_debug,l_procedure,30);
433:
434: IF g_debug THEN
435: pay_in_utils.trace('Canonical Start and End Date ',l_canonical_start_date||' '||l_canonical_end_date );
436: END IF;
437:
438: FOR i in csr_bal_init (l_payroll_id,l_canonical_start_date,l_canonical_end_date,l_consolidation_set)
439: LOOP
448: -- CREATE THE ARCHIVE ACTION TO 'I' interlock
449: hr_nonrun_asact.insint(l_actid,i.assignment_action_id);
450:
451: END LOOP;
452: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 40);
453: --
454: EXCEPTION
455: --
456: WHEN OTHERS THEN
453: --
454: EXCEPTION
455: --
456: WHEN OTHERS THEN
457: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
458: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 50);
459: pay_in_utils.trace(l_message,l_procedure);
460: RAISE;
461: --
454: EXCEPTION
455: --
456: WHEN OTHERS THEN
457: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
458: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 50);
459: pay_in_utils.trace(l_message,l_procedure);
460: RAISE;
461: --
462: END assignment_action_code;
455: --
456: WHEN OTHERS THEN
457: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
458: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 50);
459: pay_in_utils.trace(l_message,l_procedure);
460: RAISE;
461: --
462: END assignment_action_code;
463:
562: BEGIN
563: --
564:
565: l_procedure := g_package || 'archive_accrual_details';
566: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
567:
568: IF g_debug THEN
569: pay_in_utils.trace('**************************************************','********************');
570: pay_in_utils.trace('Payroll Action id ',p_payroll_action_id);
565: l_procedure := g_package || 'archive_accrual_details';
566: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
567:
568: IF g_debug THEN
569: pay_in_utils.trace('**************************************************','********************');
570: pay_in_utils.trace('Payroll Action id ',p_payroll_action_id);
571: pay_in_utils.trace('Time Period id ',p_time_period_id);
572: pay_in_utils.trace('Assignment id ',p_assignment_id);
573: pay_in_utils.trace('Date Earned ',p_date_earned);
566: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
567:
568: IF g_debug THEN
569: pay_in_utils.trace('**************************************************','********************');
570: pay_in_utils.trace('Payroll Action id ',p_payroll_action_id);
571: pay_in_utils.trace('Time Period id ',p_time_period_id);
572: pay_in_utils.trace('Assignment id ',p_assignment_id);
573: pay_in_utils.trace('Date Earned ',p_date_earned);
574: pay_in_utils.trace('Action Context id ',p_assact_id);
567:
568: IF g_debug THEN
569: pay_in_utils.trace('**************************************************','********************');
570: pay_in_utils.trace('Payroll Action id ',p_payroll_action_id);
571: pay_in_utils.trace('Time Period id ',p_time_period_id);
572: pay_in_utils.trace('Assignment id ',p_assignment_id);
573: pay_in_utils.trace('Date Earned ',p_date_earned);
574: pay_in_utils.trace('Action Context id ',p_assact_id);
575: pay_in_utils.trace('Assignment Action id ',p_assignment_action_id);
568: IF g_debug THEN
569: pay_in_utils.trace('**************************************************','********************');
570: pay_in_utils.trace('Payroll Action id ',p_payroll_action_id);
571: pay_in_utils.trace('Time Period id ',p_time_period_id);
572: pay_in_utils.trace('Assignment id ',p_assignment_id);
573: pay_in_utils.trace('Date Earned ',p_date_earned);
574: pay_in_utils.trace('Action Context id ',p_assact_id);
575: pay_in_utils.trace('Assignment Action id ',p_assignment_action_id);
576: pay_in_utils.trace('Period End Date ',p_period_end_date);
569: pay_in_utils.trace('**************************************************','********************');
570: pay_in_utils.trace('Payroll Action id ',p_payroll_action_id);
571: pay_in_utils.trace('Time Period id ',p_time_period_id);
572: pay_in_utils.trace('Assignment id ',p_assignment_id);
573: pay_in_utils.trace('Date Earned ',p_date_earned);
574: pay_in_utils.trace('Action Context id ',p_assact_id);
575: pay_in_utils.trace('Assignment Action id ',p_assignment_action_id);
576: pay_in_utils.trace('Period End Date ',p_period_end_date);
577: pay_in_utils.trace('Period Start Date ',p_period_start_date);
570: pay_in_utils.trace('Payroll Action id ',p_payroll_action_id);
571: pay_in_utils.trace('Time Period id ',p_time_period_id);
572: pay_in_utils.trace('Assignment id ',p_assignment_id);
573: pay_in_utils.trace('Date Earned ',p_date_earned);
574: pay_in_utils.trace('Action Context id ',p_assact_id);
575: pay_in_utils.trace('Assignment Action id ',p_assignment_action_id);
576: pay_in_utils.trace('Period End Date ',p_period_end_date);
577: pay_in_utils.trace('Period Start Date ',p_period_start_date);
578: pay_in_utils.trace('**************************************************','********************');
571: pay_in_utils.trace('Time Period id ',p_time_period_id);
572: pay_in_utils.trace('Assignment id ',p_assignment_id);
573: pay_in_utils.trace('Date Earned ',p_date_earned);
574: pay_in_utils.trace('Action Context id ',p_assact_id);
575: pay_in_utils.trace('Assignment Action id ',p_assignment_action_id);
576: pay_in_utils.trace('Period End Date ',p_period_end_date);
577: pay_in_utils.trace('Period Start Date ',p_period_start_date);
578: pay_in_utils.trace('**************************************************','********************');
579: END IF;
572: pay_in_utils.trace('Assignment id ',p_assignment_id);
573: pay_in_utils.trace('Date Earned ',p_date_earned);
574: pay_in_utils.trace('Action Context id ',p_assact_id);
575: pay_in_utils.trace('Assignment Action id ',p_assignment_action_id);
576: pay_in_utils.trace('Period End Date ',p_period_end_date);
577: pay_in_utils.trace('Period Start Date ',p_period_start_date);
578: pay_in_utils.trace('**************************************************','********************');
579: END IF;
580:
573: pay_in_utils.trace('Date Earned ',p_date_earned);
574: pay_in_utils.trace('Action Context id ',p_assact_id);
575: pay_in_utils.trace('Assignment Action id ',p_assignment_action_id);
576: pay_in_utils.trace('Period End Date ',p_period_end_date);
577: pay_in_utils.trace('Period Start Date ',p_period_start_date);
578: pay_in_utils.trace('**************************************************','********************');
579: END IF;
580:
581:
574: pay_in_utils.trace('Action Context id ',p_assact_id);
575: pay_in_utils.trace('Assignment Action id ',p_assignment_action_id);
576: pay_in_utils.trace('Period End Date ',p_period_end_date);
577: pay_in_utils.trace('Period Start Date ',p_period_start_date);
578: pay_in_utils.trace('**************************************************','********************');
579: END IF;
580:
581:
582: FOR rec IN csr_leave_balance
583: LOOP
584: --
585: -- Call to get annual leave balance
586:
587: pay_in_utils.set_location(g_debug,l_procedure, 20);
588:
589: per_accrual_calc_functions.get_net_accrual
590: (
591: p_assignment_id => p_assignment_id -- number in
607: --
608: END IF;
609:
610:
611: pay_in_utils.set_location(g_debug,l_procedure, 30);
612:
613: l_leave_taken := per_accrual_calc_functions.get_absence
614: (
615: p_assignment_id
637: ,p_action_information4 => fnd_number.number_to_canonical(l_annual_leave_balance)
638: ,p_action_information5 => rec.accrual_uom
639: );
640: IF g_debug THEN
641: pay_in_utils.trace('**************************************************','********************');
642: pay_in_utils.trace('Accrual Plan Name ',rec.accrual_plan_name);
643: pay_in_utils.trace('Accrual Category ',rec.accrual_category);
644: pay_in_utils.trace('Annual Leave Balance ',fnd_number.number_to_canonical(l_annual_leave_balance));
645: pay_in_utils.trace('Accrual UOM ',rec.accrual_uom);
638: ,p_action_information5 => rec.accrual_uom
639: );
640: IF g_debug THEN
641: pay_in_utils.trace('**************************************************','********************');
642: pay_in_utils.trace('Accrual Plan Name ',rec.accrual_plan_name);
643: pay_in_utils.trace('Accrual Category ',rec.accrual_category);
644: pay_in_utils.trace('Annual Leave Balance ',fnd_number.number_to_canonical(l_annual_leave_balance));
645: pay_in_utils.trace('Accrual UOM ',rec.accrual_uom);
646: pay_in_utils.trace('**************************************************','********************');
639: );
640: IF g_debug THEN
641: pay_in_utils.trace('**************************************************','********************');
642: pay_in_utils.trace('Accrual Plan Name ',rec.accrual_plan_name);
643: pay_in_utils.trace('Accrual Category ',rec.accrual_category);
644: pay_in_utils.trace('Annual Leave Balance ',fnd_number.number_to_canonical(l_annual_leave_balance));
645: pay_in_utils.trace('Accrual UOM ',rec.accrual_uom);
646: pay_in_utils.trace('**************************************************','********************');
647: END IF;
640: IF g_debug THEN
641: pay_in_utils.trace('**************************************************','********************');
642: pay_in_utils.trace('Accrual Plan Name ',rec.accrual_plan_name);
643: pay_in_utils.trace('Accrual Category ',rec.accrual_category);
644: pay_in_utils.trace('Annual Leave Balance ',fnd_number.number_to_canonical(l_annual_leave_balance));
645: pay_in_utils.trace('Accrual UOM ',rec.accrual_uom);
646: pay_in_utils.trace('**************************************************','********************');
647: END IF;
648: --
641: pay_in_utils.trace('**************************************************','********************');
642: pay_in_utils.trace('Accrual Plan Name ',rec.accrual_plan_name);
643: pay_in_utils.trace('Accrual Category ',rec.accrual_category);
644: pay_in_utils.trace('Annual Leave Balance ',fnd_number.number_to_canonical(l_annual_leave_balance));
645: pay_in_utils.trace('Accrual UOM ',rec.accrual_uom);
646: pay_in_utils.trace('**************************************************','********************');
647: END IF;
648: --
649: END IF;
642: pay_in_utils.trace('Accrual Plan Name ',rec.accrual_plan_name);
643: pay_in_utils.trace('Accrual Category ',rec.accrual_category);
644: pay_in_utils.trace('Annual Leave Balance ',fnd_number.number_to_canonical(l_annual_leave_balance));
645: pay_in_utils.trace('Accrual UOM ',rec.accrual_uom);
646: pay_in_utils.trace('**************************************************','********************');
647: END IF;
648: --
649: END IF;
650: --
651: --
652: END LOOP;
653: --
654:
655: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 40);
656:
657: --
658: EXCEPTION
659: WHEN OTHERS THEN
662: CLOSE csr_leave_balance;
663: --
664: END IF;
665: --
666: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
667: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 50);
668: pay_in_utils.trace(l_message,l_procedure);
669:
670: RAISE;
663: --
664: END IF;
665: --
666: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
667: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 50);
668: pay_in_utils.trace(l_message,l_procedure);
669:
670: RAISE;
671: --
664: END IF;
665: --
666: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
667: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 50);
668: pay_in_utils.trace(l_message,l_procedure);
669:
670: RAISE;
671: --
672: END archive_accrual_details;
755: BEGIN
756: --
757: l_procedure := g_package || 'archive_absences';
758:
759: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
760:
761: IF g_debug THEN
762: pay_in_utils.trace('Archive Action ID ',p_arch_act_id);
763: pay_in_utils.trace('Assignment Action ID ',p_assg_act_id);
758:
759: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
760:
761: IF g_debug THEN
762: pay_in_utils.trace('Archive Action ID ',p_arch_act_id);
763: pay_in_utils.trace('Assignment Action ID ',p_assg_act_id);
764: pay_in_utils.trace('Effective Date ',p_pre_effective_date);
765: END IF;
766:
759: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
760:
761: IF g_debug THEN
762: pay_in_utils.trace('Archive Action ID ',p_arch_act_id);
763: pay_in_utils.trace('Assignment Action ID ',p_assg_act_id);
764: pay_in_utils.trace('Effective Date ',p_pre_effective_date);
765: END IF;
766:
767: --
760:
761: IF g_debug THEN
762: pay_in_utils.trace('Archive Action ID ',p_arch_act_id);
763: pay_in_utils.trace('Assignment Action ID ',p_assg_act_id);
764: pay_in_utils.trace('Effective Date ',p_pre_effective_date);
765: END IF;
766:
767: --
768: FOR csr_rec in csr_asg_absences
768: FOR csr_rec in csr_asg_absences
769: LOOP
770: --
771: IF g_debug THEN
772: pay_in_utils.trace('Absence Type ',csr_rec.absence_type);
773: pay_in_utils.trace('Element Reporting Name ',csr_rec.reporting_name);
774: pay_in_utils.trace('Start Date ',to_char(csr_rec.start_date,'DD-MON-YYYY'));
775: pay_in_utils.trace('End Date ',to_char(csr_rec.end_date,'DD-MON-YYYY'));
776: pay_in_utils.trace('Absence Days ',csr_rec.absence_days);
769: LOOP
770: --
771: IF g_debug THEN
772: pay_in_utils.trace('Absence Type ',csr_rec.absence_type);
773: pay_in_utils.trace('Element Reporting Name ',csr_rec.reporting_name);
774: pay_in_utils.trace('Start Date ',to_char(csr_rec.start_date,'DD-MON-YYYY'));
775: pay_in_utils.trace('End Date ',to_char(csr_rec.end_date,'DD-MON-YYYY'));
776: pay_in_utils.trace('Absence Days ',csr_rec.absence_days);
777: END IF;
770: --
771: IF g_debug THEN
772: pay_in_utils.trace('Absence Type ',csr_rec.absence_type);
773: pay_in_utils.trace('Element Reporting Name ',csr_rec.reporting_name);
774: pay_in_utils.trace('Start Date ',to_char(csr_rec.start_date,'DD-MON-YYYY'));
775: pay_in_utils.trace('End Date ',to_char(csr_rec.end_date,'DD-MON-YYYY'));
776: pay_in_utils.trace('Absence Days ',csr_rec.absence_days);
777: END IF;
778:
771: IF g_debug THEN
772: pay_in_utils.trace('Absence Type ',csr_rec.absence_type);
773: pay_in_utils.trace('Element Reporting Name ',csr_rec.reporting_name);
774: pay_in_utils.trace('Start Date ',to_char(csr_rec.start_date,'DD-MON-YYYY'));
775: pay_in_utils.trace('End Date ',to_char(csr_rec.end_date,'DD-MON-YYYY'));
776: pay_in_utils.trace('Absence Days ',csr_rec.absence_days);
777: END IF;
778:
779: pay_in_utils.set_location(g_debug,l_procedure, 20);
772: pay_in_utils.trace('Absence Type ',csr_rec.absence_type);
773: pay_in_utils.trace('Element Reporting Name ',csr_rec.reporting_name);
774: pay_in_utils.trace('Start Date ',to_char(csr_rec.start_date,'DD-MON-YYYY'));
775: pay_in_utils.trace('End Date ',to_char(csr_rec.end_date,'DD-MON-YYYY'));
776: pay_in_utils.trace('Absence Days ',csr_rec.absence_days);
777: END IF;
778:
779: pay_in_utils.set_location(g_debug,l_procedure, 20);
780:
775: pay_in_utils.trace('End Date ',to_char(csr_rec.end_date,'DD-MON-YYYY'));
776: pay_in_utils.trace('Absence Days ',csr_rec.absence_days);
777: END IF;
778:
779: pay_in_utils.set_location(g_debug,l_procedure, 20);
780:
781: l_start_date := fnd_date.date_to_canonical(csr_rec.start_date);
782: l_end_date := fnd_date.date_to_canonical(csr_rec.end_date);
783:
803: );
804: --
805: END LOOP;
806: --
807: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 30);
808: --
809: EXCEPTION
810: --
811: WHEN others THEN
811: WHEN others THEN
812: IF csr_asg_absences%ISOPEN THEN
813: CLOSE csr_asg_absences;
814: END IF;
815: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
816: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 40);
817: pay_in_utils.trace(l_message,l_procedure);
818: RAISE;
819: --
812: IF csr_asg_absences%ISOPEN THEN
813: CLOSE csr_asg_absences;
814: END IF;
815: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
816: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 40);
817: pay_in_utils.trace(l_message,l_procedure);
818: RAISE;
819: --
820: END archive_absences;
813: CLOSE csr_asg_absences;
814: END IF;
815: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
816: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 40);
817: pay_in_utils.trace(l_message,l_procedure);
818: RAISE;
819: --
820: END archive_absences;
821: --
885: BEGIN
886: --
887:
888: l_procedure := g_package ||'archive_stat_elements';
889: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
890:
891: IF g_debug THEN
892: pay_in_utils.trace('Assignment Action id ',p_assignment_action_id);
893: pay_in_utils.trace('Effective Date ',p_effective_date);
888: l_procedure := g_package ||'archive_stat_elements';
889: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
890:
891: IF g_debug THEN
892: pay_in_utils.trace('Assignment Action id ',p_assignment_action_id);
893: pay_in_utils.trace('Effective Date ',p_effective_date);
894: pay_in_utils.trace('Assact ID ',p_assact_id);
895: END IF;
896:
889: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
890:
891: IF g_debug THEN
892: pay_in_utils.trace('Assignment Action id ',p_assignment_action_id);
893: pay_in_utils.trace('Effective Date ',p_effective_date);
894: pay_in_utils.trace('Assact ID ',p_assact_id);
895: END IF;
896:
897:
890:
891: IF g_debug THEN
892: pay_in_utils.trace('Assignment Action id ',p_assignment_action_id);
893: pay_in_utils.trace('Effective Date ',p_effective_date);
894: pay_in_utils.trace('Assact ID ',p_assact_id);
895: END IF;
896:
897:
898: FOR csr_rec IN csr_std_elements
897:
898: FOR csr_rec IN csr_std_elements
899: LOOP
900: --
901: pay_in_utils.set_location(g_debug,l_procedure, 20);
902:
903: IF nvl(csr_rec.exchange_rate,0) <> 0 THEN
904: l_foreign_currency_amount := csr_rec.amount / csr_rec.exchange_rate;
905: ELSE
910: IF ((csr_rec.classification_name IN ('Advances','Fringe Benefits')) AND csr_rec.amount = 0) THEN
911: ---Do not archive any value--
912: l_no_value_archived :='Yes';
913: ELSE
914: pay_in_utils.set_location(g_debug,l_procedure, 30);
915:
916: pay_action_information_api.create_action_information
917: (
918: p_action_information_id => l_action_info_id
932: ,p_action_information11 => fnd_number.number_to_canonical(l_foreign_currency_amount)
933: ,p_action_information12 => csr_rec.foreign_currency_code
934: );
935: IF g_debug THEN
936: pay_in_utils.trace('Element Name ',csr_rec.element_reporting_name);
937: pay_in_utils.trace('Amount ',fnd_number.number_to_canonical(csr_rec.amount));
938: END IF;
939: END IF;
940:
933: ,p_action_information12 => csr_rec.foreign_currency_code
934: );
935: IF g_debug THEN
936: pay_in_utils.trace('Element Name ',csr_rec.element_reporting_name);
937: pay_in_utils.trace('Amount ',fnd_number.number_to_canonical(csr_rec.amount));
938: END IF;
939: END IF;
940:
941: --
973: ,p_action_information12 => NULL
974: );
975: END IF;
976:
977: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 40);
978: --
979: EXCEPTION
980: --
981: WHEN OTHERS THEN
984: CLOSE csr_std_elements;
985: --
986: END IF;
987: --
988: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
989: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 50);
990: pay_in_utils.trace(l_message,l_procedure);
991:
992: RAISE;
985: --
986: END IF;
987: --
988: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
989: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 50);
990: pay_in_utils.trace(l_message,l_procedure);
991:
992: RAISE;
993: --
986: END IF;
987: --
988: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
989: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 50);
990: pay_in_utils.trace(l_message,l_procedure);
991:
992: RAISE;
993: --
994: END archive_stat_elements;
1035: BEGIN
1036: --
1037: l_procedure := g_package || 'archive_balances';
1038:
1039: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
1040:
1041: -- Archive Statutory balances
1042: IF g_debug THEN
1043: pay_in_utils.trace('**************************************************','********************');
1039: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
1040:
1041: -- Archive Statutory balances
1042: IF g_debug THEN
1043: pay_in_utils.trace('**************************************************','********************');
1044: pay_in_utils.trace('Narrative ',p_narrative);
1045: pay_in_utils.trace('Action Context ID ',p_assact_id);
1046: pay_in_utils.trace('Balance value ',p_value_ytd);
1047: pay_in_utils.trace('Effective Date ',p_effective_date);
1040:
1041: -- Archive Statutory balances
1042: IF g_debug THEN
1043: pay_in_utils.trace('**************************************************','********************');
1044: pay_in_utils.trace('Narrative ',p_narrative);
1045: pay_in_utils.trace('Action Context ID ',p_assact_id);
1046: pay_in_utils.trace('Balance value ',p_value_ytd);
1047: pay_in_utils.trace('Effective Date ',p_effective_date);
1048: pay_in_utils.trace('**************************************************','********************');
1041: -- Archive Statutory balances
1042: IF g_debug THEN
1043: pay_in_utils.trace('**************************************************','********************');
1044: pay_in_utils.trace('Narrative ',p_narrative);
1045: pay_in_utils.trace('Action Context ID ',p_assact_id);
1046: pay_in_utils.trace('Balance value ',p_value_ytd);
1047: pay_in_utils.trace('Effective Date ',p_effective_date);
1048: pay_in_utils.trace('**************************************************','********************');
1049: END IF;
1042: IF g_debug THEN
1043: pay_in_utils.trace('**************************************************','********************');
1044: pay_in_utils.trace('Narrative ',p_narrative);
1045: pay_in_utils.trace('Action Context ID ',p_assact_id);
1046: pay_in_utils.trace('Balance value ',p_value_ytd);
1047: pay_in_utils.trace('Effective Date ',p_effective_date);
1048: pay_in_utils.trace('**************************************************','********************');
1049: END IF;
1050:
1043: pay_in_utils.trace('**************************************************','********************');
1044: pay_in_utils.trace('Narrative ',p_narrative);
1045: pay_in_utils.trace('Action Context ID ',p_assact_id);
1046: pay_in_utils.trace('Balance value ',p_value_ytd);
1047: pay_in_utils.trace('Effective Date ',p_effective_date);
1048: pay_in_utils.trace('**************************************************','********************');
1049: END IF;
1050:
1051: pay_action_information_api.create_action_information
1044: pay_in_utils.trace('Narrative ',p_narrative);
1045: pay_in_utils.trace('Action Context ID ',p_assact_id);
1046: pay_in_utils.trace('Balance value ',p_value_ytd);
1047: pay_in_utils.trace('Effective Date ',p_effective_date);
1048: pay_in_utils.trace('**************************************************','********************');
1049: END IF;
1050:
1051: pay_action_information_api.create_action_information
1052: (
1067: hr_utility.set_location('Leaving ' || l_procedure,30);
1068: --
1069: EXCEPTION
1070: WHEN OTHERS THEN
1071: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
1072: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 30);
1073: pay_in_utils.trace(l_message,l_procedure);
1074: RAISE;
1075: --
1068: --
1069: EXCEPTION
1070: WHEN OTHERS THEN
1071: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
1072: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 30);
1073: pay_in_utils.trace(l_message,l_procedure);
1074: RAISE;
1075: --
1076: END archive_balances;
1069: EXCEPTION
1070: WHEN OTHERS THEN
1071: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
1072: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 30);
1073: pay_in_utils.trace(l_message,l_procedure);
1074: RAISE;
1075: --
1076: END archive_balances;
1077: --
1136: g_bal_name(9) := 'F16 Total Tax payable';
1137:
1138: l_procedure := g_package || 'archive_stat_balances';
1139:
1140: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
1141:
1142: IF g_debug THEN
1143: pay_in_utils.trace('**************************************************','********************');
1144: pay_in_utils.trace('Assignment Action id ',p_assignment_action_id);
1139:
1140: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
1141:
1142: IF g_debug THEN
1143: pay_in_utils.trace('**************************************************','********************');
1144: pay_in_utils.trace('Assignment Action id ',p_assignment_action_id);
1145: END IF;
1146:
1147: FOR i IN 1..9
1140: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
1141:
1142: IF g_debug THEN
1143: pay_in_utils.trace('**************************************************','********************');
1144: pay_in_utils.trace('Assignment Action id ',p_assignment_action_id);
1145: END IF;
1146:
1147: FOR i IN 1..9
1148: LOOP
1156: g_bal_name(i) := 'F16 Allowances Exempted u/s 10';
1157: END IF;
1158:
1159: IF g_debug THEN
1160: pay_in_utils.trace('Balance Name ',g_bal_name(i));
1161: pay_in_utils.trace('Balance Value ',l_value);
1162: END IF;
1163:
1164: archive_balances(
1157: END IF;
1158:
1159: IF g_debug THEN
1160: pay_in_utils.trace('Balance Name ',g_bal_name(i));
1161: pay_in_utils.trace('Balance Value ',l_value);
1162: END IF;
1163:
1164: archive_balances(
1165: p_effective_date => p_effective_date,
1169: );
1170:
1171: END LOOP;
1172:
1173: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 20);
1174: --
1175: EXCEPTION
1176: WHEN OTHERS THEN
1177: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
1173: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 20);
1174: --
1175: EXCEPTION
1176: WHEN OTHERS THEN
1177: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
1178: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 30);
1179: pay_in_utils.trace(l_message,l_procedure);
1180: RAISE;
1181: --
1174: --
1175: EXCEPTION
1176: WHEN OTHERS THEN
1177: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
1178: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 30);
1179: pay_in_utils.trace(l_message,l_procedure);
1180: RAISE;
1181: --
1182: END archive_stat_balances;
1175: EXCEPTION
1176: WHEN OTHERS THEN
1177: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
1178: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 30);
1179: pay_in_utils.trace(l_message,l_procedure);
1180: RAISE;
1181: --
1182: END archive_stat_balances;
1183:
1346:
1347: l_procedure := g_package || 'archive_form24q_balances';
1348:
1349:
1350: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
1351: IF g_debug THEN
1352: pay_in_utils.trace('**************************************************','********************');
1353: pay_in_utils.trace('Assignment Action id ',p_assignment_action_id);
1354: pay_in_utils.trace('Assignment id ',p_assignment_id);
1348:
1349:
1350: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
1351: IF g_debug THEN
1352: pay_in_utils.trace('**************************************************','********************');
1353: pay_in_utils.trace('Assignment Action id ',p_assignment_action_id);
1354: pay_in_utils.trace('Assignment id ',p_assignment_id);
1355: pay_in_utils.trace('Earned date ',p_date_earned);
1356: pay_in_utils.trace('Effective Date ',p_effective_date);
1349:
1350: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
1351: IF g_debug THEN
1352: pay_in_utils.trace('**************************************************','********************');
1353: pay_in_utils.trace('Assignment Action id ',p_assignment_action_id);
1354: pay_in_utils.trace('Assignment id ',p_assignment_id);
1355: pay_in_utils.trace('Earned date ',p_date_earned);
1356: pay_in_utils.trace('Effective Date ',p_effective_date);
1357: pay_in_utils.trace('Assignment action id ',p_assact_id);
1350: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
1351: IF g_debug THEN
1352: pay_in_utils.trace('**************************************************','********************');
1353: pay_in_utils.trace('Assignment Action id ',p_assignment_action_id);
1354: pay_in_utils.trace('Assignment id ',p_assignment_id);
1355: pay_in_utils.trace('Earned date ',p_date_earned);
1356: pay_in_utils.trace('Effective Date ',p_effective_date);
1357: pay_in_utils.trace('Assignment action id ',p_assact_id);
1358: pay_in_utils.trace('Payroll action id ',p_payroll_action_id);
1351: IF g_debug THEN
1352: pay_in_utils.trace('**************************************************','********************');
1353: pay_in_utils.trace('Assignment Action id ',p_assignment_action_id);
1354: pay_in_utils.trace('Assignment id ',p_assignment_id);
1355: pay_in_utils.trace('Earned date ',p_date_earned);
1356: pay_in_utils.trace('Effective Date ',p_effective_date);
1357: pay_in_utils.trace('Assignment action id ',p_assact_id);
1358: pay_in_utils.trace('Payroll action id ',p_payroll_action_id);
1359: pay_in_utils.trace('Run Payroll action id ',p_run_payroll_action_id);
1352: pay_in_utils.trace('**************************************************','********************');
1353: pay_in_utils.trace('Assignment Action id ',p_assignment_action_id);
1354: pay_in_utils.trace('Assignment id ',p_assignment_id);
1355: pay_in_utils.trace('Earned date ',p_date_earned);
1356: pay_in_utils.trace('Effective Date ',p_effective_date);
1357: pay_in_utils.trace('Assignment action id ',p_assact_id);
1358: pay_in_utils.trace('Payroll action id ',p_payroll_action_id);
1359: pay_in_utils.trace('Run Payroll action id ',p_run_payroll_action_id);
1360: pay_in_utils.trace('Prepayment assignmentaction id ',p_pre_assact_id);
1353: pay_in_utils.trace('Assignment Action id ',p_assignment_action_id);
1354: pay_in_utils.trace('Assignment id ',p_assignment_id);
1355: pay_in_utils.trace('Earned date ',p_date_earned);
1356: pay_in_utils.trace('Effective Date ',p_effective_date);
1357: pay_in_utils.trace('Assignment action id ',p_assact_id);
1358: pay_in_utils.trace('Payroll action id ',p_payroll_action_id);
1359: pay_in_utils.trace('Run Payroll action id ',p_run_payroll_action_id);
1360: pay_in_utils.trace('Prepayment assignmentaction id ',p_pre_assact_id);
1361: END IF;
1354: pay_in_utils.trace('Assignment id ',p_assignment_id);
1355: pay_in_utils.trace('Earned date ',p_date_earned);
1356: pay_in_utils.trace('Effective Date ',p_effective_date);
1357: pay_in_utils.trace('Assignment action id ',p_assact_id);
1358: pay_in_utils.trace('Payroll action id ',p_payroll_action_id);
1359: pay_in_utils.trace('Run Payroll action id ',p_run_payroll_action_id);
1360: pay_in_utils.trace('Prepayment assignmentaction id ',p_pre_assact_id);
1361: END IF;
1362:
1355: pay_in_utils.trace('Earned date ',p_date_earned);
1356: pay_in_utils.trace('Effective Date ',p_effective_date);
1357: pay_in_utils.trace('Assignment action id ',p_assact_id);
1358: pay_in_utils.trace('Payroll action id ',p_payroll_action_id);
1359: pay_in_utils.trace('Run Payroll action id ',p_run_payroll_action_id);
1360: pay_in_utils.trace('Prepayment assignmentaction id ',p_pre_assact_id);
1361: END IF;
1362:
1363: OPEN c_multi_rec_count(p_pre_assact_id);
1356: pay_in_utils.trace('Effective Date ',p_effective_date);
1357: pay_in_utils.trace('Assignment action id ',p_assact_id);
1358: pay_in_utils.trace('Payroll action id ',p_payroll_action_id);
1359: pay_in_utils.trace('Run Payroll action id ',p_run_payroll_action_id);
1360: pay_in_utils.trace('Prepayment assignmentaction id ',p_pre_assact_id);
1361: END IF;
1362:
1363: OPEN c_multi_rec_count(p_pre_assact_id);
1364: FETCH c_multi_rec_count INTO l_count;
1369: FOR i IN l_bal_name_val.first..l_bal_name_val.last
1370: LOOP
1371: IF l_count > 1 THEN
1372: l_multirec_value := 0;
1373: pay_in_utils.set_location(g_debug,l_procedure, 20);
1374:
1375: FOR rec_multi IN c_multi_records( p_pre_assact_id) LOOP
1376: l_date :=rec_multi.date_earned;
1377: l_eff_date := rec_multi.effective_date;
1374:
1375: FOR rec_multi IN c_multi_records( p_pre_assact_id) LOOP
1376: l_date :=rec_multi.date_earned;
1377: l_eff_date := rec_multi.effective_date;
1378: pay_in_utils.set_location(g_debug,l_procedure, 30);
1379: l_multirec_value := l_multirec_value + pay_in_tax_utils.get_balance_value(p_assignment_action_id => rec_multi.assignment_action_id,
1380: p_balance_name => l_bal_name_val(i).l_balance_name,
1381: p_dimension_name => '_ASG_RUN',
1382: p_context_name => 'NULL',
1395: );
1396: END IF;
1397:
1398: IF g_debug THEN
1399: pay_in_utils.trace('Balance Name ',l_bal_name_val(i).l_balance_name);
1400: pay_in_utils.trace('Balance Value ',l_bal_name_val(i).l_balance_val);
1401: END IF;
1402: END LOOP;
1403: /* Bug 7165051 Start */
1396: END IF;
1397:
1398: IF g_debug THEN
1399: pay_in_utils.trace('Balance Name ',l_bal_name_val(i).l_balance_name);
1400: pay_in_utils.trace('Balance Value ',l_bal_name_val(i).l_balance_val);
1401: END IF;
1402: END LOOP;
1403: /* Bug 7165051 Start */
1404: l_bal_name_val(1).l_balance_val := l_bal_name_val(1).l_balance_val +
1415: IF l_add_to_net_flag ='Y' THEN
1416: l_bal_name_val(1).l_balance_val :=l_bal_name_val(1).l_balance_val - l_bal_name_val(12).l_balance_val;
1417:
1418: IF g_debug THEN
1419: pay_in_utils.trace('Balance Name ',l_bal_name_val(1).l_balance_name);
1420: pay_in_utils.trace('Balance Value ',l_bal_name_val(1).l_balance_val);
1421: pay_in_utils.trace('Balance Name ',l_bal_name_val(12).l_balance_name);
1422: pay_in_utils.trace('Balance Value ',l_bal_name_val(12).l_balance_val);
1423: END IF;
1416: l_bal_name_val(1).l_balance_val :=l_bal_name_val(1).l_balance_val - l_bal_name_val(12).l_balance_val;
1417:
1418: IF g_debug THEN
1419: pay_in_utils.trace('Balance Name ',l_bal_name_val(1).l_balance_name);
1420: pay_in_utils.trace('Balance Value ',l_bal_name_val(1).l_balance_val);
1421: pay_in_utils.trace('Balance Name ',l_bal_name_val(12).l_balance_name);
1422: pay_in_utils.trace('Balance Value ',l_bal_name_val(12).l_balance_val);
1423: END IF;
1424:
1417:
1418: IF g_debug THEN
1419: pay_in_utils.trace('Balance Name ',l_bal_name_val(1).l_balance_name);
1420: pay_in_utils.trace('Balance Value ',l_bal_name_val(1).l_balance_val);
1421: pay_in_utils.trace('Balance Name ',l_bal_name_val(12).l_balance_name);
1422: pay_in_utils.trace('Balance Value ',l_bal_name_val(12).l_balance_val);
1423: END IF;
1424:
1425: END IF;
1418: IF g_debug THEN
1419: pay_in_utils.trace('Balance Name ',l_bal_name_val(1).l_balance_name);
1420: pay_in_utils.trace('Balance Value ',l_bal_name_val(1).l_balance_val);
1421: pay_in_utils.trace('Balance Name ',l_bal_name_val(12).l_balance_name);
1422: pay_in_utils.trace('Balance Value ',l_bal_name_val(12).l_balance_val);
1423: END IF;
1424:
1425: END IF;
1426: CLOSE c_med_added_to_net_pay;
1430: OPEN c_payroll_id(p_run_payroll_action_id);
1431: FETCH c_payroll_id INTO l_payroll_id,l_payroll_name;
1432: CLOSE c_payroll_id;
1433: /* Bug 12660389 */
1434: l_next_year := to_char(pay_in_utils.next_tax_year(p_effective_date),'YYYY');
1435: l_assessment_year := l_next_year || '-' || to_char(to_number(l_next_year)+1);
1436: l_tan := pay_in_form_24q_web_adi.get_tan_number(p_assignment_id, nvl(l_date, p_effective_date));
1437: l_period := pay_in_tax_utils.get_period_number(l_payroll_id, nvl(TRUNC(l_date), p_effective_date));
1438: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 35);
1434: l_next_year := to_char(pay_in_utils.next_tax_year(p_effective_date),'YYYY');
1435: l_assessment_year := l_next_year || '-' || to_char(to_number(l_next_year)+1);
1436: l_tan := pay_in_form_24q_web_adi.get_tan_number(p_assignment_id, nvl(l_date, p_effective_date));
1437: l_period := pay_in_tax_utils.get_period_number(l_payroll_id, nvl(TRUNC(l_date), p_effective_date));
1438: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 35);
1439:
1440: pay_action_information_api.create_action_information
1441: (
1442: p_action_information_id => l_action_info_id
1461: ,p_action_information11 => p_payroll_action_id
1462: ,p_action_information12 => p_pre_assact_id
1463: ,p_action_information13 => l_payroll_name);
1464:
1465: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 40);
1466: l_bal_name_val.delete;
1467: EXCEPTION
1468: WHEN OTHERS THEN
1469: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
1465: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 40);
1466: l_bal_name_val.delete;
1467: EXCEPTION
1468: WHEN OTHERS THEN
1469: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
1470: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 50);
1471: pay_in_utils.trace(l_message,l_procedure);
1472: RAISE;
1473: --
1466: l_bal_name_val.delete;
1467: EXCEPTION
1468: WHEN OTHERS THEN
1469: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
1470: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 50);
1471: pay_in_utils.trace(l_message,l_procedure);
1472: RAISE;
1473: --
1474: END archive_Form24Q_balances;
1467: EXCEPTION
1468: WHEN OTHERS THEN
1469: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
1470: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 50);
1471: pay_in_utils.trace(l_message,l_procedure);
1472: RAISE;
1473: --
1474: END archive_Form24Q_balances;
1475: --------------------------------------------------------------------------
1704: BEGIN
1705: --
1706: l_procedure := g_package || 'archive_employee_details';
1707:
1708: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
1709:
1710: -- call generic procedure to retrieve and archive all data for
1711: -- EMPLOYEE DETAILS, ADDRESS DETAILS and EMPLOYEE NET PAY DISTRIBUTION
1712:
1710: -- call generic procedure to retrieve and archive all data for
1711: -- EMPLOYEE DETAILS, ADDRESS DETAILS and EMPLOYEE NET PAY DISTRIBUTION
1712:
1713: IF g_debug THEN
1714: pay_in_utils.trace('**************************************************','********************');
1715: pay_in_utils.trace('Assignment id ',p_assignment_id);
1716: pay_in_utils.trace('Archive Action id ',p_assactid);
1717: pay_in_utils.trace('Tax unit id ',l_tax_unit_id);
1718: pay_in_utils.trace('Prepayment Assignment Action id ',p_curr_pymt_ass_act_id);
1711: -- EMPLOYEE DETAILS, ADDRESS DETAILS and EMPLOYEE NET PAY DISTRIBUTION
1712:
1713: IF g_debug THEN
1714: pay_in_utils.trace('**************************************************','********************');
1715: pay_in_utils.trace('Assignment id ',p_assignment_id);
1716: pay_in_utils.trace('Archive Action id ',p_assactid);
1717: pay_in_utils.trace('Tax unit id ',l_tax_unit_id);
1718: pay_in_utils.trace('Prepayment Assignment Action id ',p_curr_pymt_ass_act_id);
1719: pay_in_utils.trace('Run Effective Date ',p_run_effective_date);
1712:
1713: IF g_debug THEN
1714: pay_in_utils.trace('**************************************************','********************');
1715: pay_in_utils.trace('Assignment id ',p_assignment_id);
1716: pay_in_utils.trace('Archive Action id ',p_assactid);
1717: pay_in_utils.trace('Tax unit id ',l_tax_unit_id);
1718: pay_in_utils.trace('Prepayment Assignment Action id ',p_curr_pymt_ass_act_id);
1719: pay_in_utils.trace('Run Effective Date ',p_run_effective_date);
1720: pay_in_utils.trace('**************************************************','********************');
1713: IF g_debug THEN
1714: pay_in_utils.trace('**************************************************','********************');
1715: pay_in_utils.trace('Assignment id ',p_assignment_id);
1716: pay_in_utils.trace('Archive Action id ',p_assactid);
1717: pay_in_utils.trace('Tax unit id ',l_tax_unit_id);
1718: pay_in_utils.trace('Prepayment Assignment Action id ',p_curr_pymt_ass_act_id);
1719: pay_in_utils.trace('Run Effective Date ',p_run_effective_date);
1720: pay_in_utils.trace('**************************************************','********************');
1721: END IF;
1714: pay_in_utils.trace('**************************************************','********************');
1715: pay_in_utils.trace('Assignment id ',p_assignment_id);
1716: pay_in_utils.trace('Archive Action id ',p_assactid);
1717: pay_in_utils.trace('Tax unit id ',l_tax_unit_id);
1718: pay_in_utils.trace('Prepayment Assignment Action id ',p_curr_pymt_ass_act_id);
1719: pay_in_utils.trace('Run Effective Date ',p_run_effective_date);
1720: pay_in_utils.trace('**************************************************','********************');
1721: END IF;
1722:
1715: pay_in_utils.trace('Assignment id ',p_assignment_id);
1716: pay_in_utils.trace('Archive Action id ',p_assactid);
1717: pay_in_utils.trace('Tax unit id ',l_tax_unit_id);
1718: pay_in_utils.trace('Prepayment Assignment Action id ',p_curr_pymt_ass_act_id);
1719: pay_in_utils.trace('Run Effective Date ',p_run_effective_date);
1720: pay_in_utils.trace('**************************************************','********************');
1721: END IF;
1722:
1723:
1716: pay_in_utils.trace('Archive Action id ',p_assactid);
1717: pay_in_utils.trace('Tax unit id ',l_tax_unit_id);
1718: pay_in_utils.trace('Prepayment Assignment Action id ',p_curr_pymt_ass_act_id);
1719: pay_in_utils.trace('Run Effective Date ',p_run_effective_date);
1720: pay_in_utils.trace('**************************************************','********************');
1721: END IF;
1722:
1723:
1724: OPEN csr_tax_unit_id;
1724: OPEN csr_tax_unit_id;
1725: FETCH csr_tax_unit_id INTO l_tax_unit_id;
1726: CLOSE csr_tax_unit_id;
1727:
1728: pay_in_utils.set_location(g_debug,l_procedure, 20);
1729:
1730: pay_emp_action_arch.get_personal_information
1731: (
1732: p_payroll_action_id => p_payroll_action_id -- archive payroll_action_id
1740: ,p_time_period_id => p_time_period_id -- time_period_id from per_time_periods
1741: ,p_ppp_source_action_id => NULL
1742: ,p_run_action_id => p_pay_assignment_action_id
1743: );
1744: pay_in_utils.set_location(g_debug,l_procedure, 30);
1745:
1746: /* Bug 4159662*/
1747: --Find the Registered Name of GRE
1748: OPEN c_reg_name;
1748: OPEN c_reg_name;
1749: FETCH c_reg_name INTO l_reg_name;
1750: CLOSE c_reg_name;
1751:
1752: pay_in_utils.set_location(g_debug,l_procedure, 40);
1753:
1754: --Update the name in archived data
1755: OPEN csr_emp_details;
1756: FETCH csr_emp_details INTO l_act_inf_id;
1761: p_action_information_id => l_act_inf_id
1762: ,p_object_version_number => l_ovn
1763: ,p_action_information18 => l_reg_name
1764: );
1765: pay_in_utils.set_location(g_debug,l_procedure, 50);
1766:
1767: FOR net_pay_rec in csr_net_pay_action_info_id
1768:
1769: LOOP
1767: FOR net_pay_rec in csr_net_pay_action_info_id
1768:
1769: LOOP
1770: --
1771: pay_in_utils.set_location(g_debug,l_procedure, 60);
1772: OPEN csr_bank_details(
1773: net_pay_rec.action_information2
1774: ,net_pay_rec.action_information1
1775: );
1781: ,l_currency_code;
1782: CLOSE csr_bank_details;
1783:
1784: IF g_debug THEN
1785: pay_in_utils.trace('Bank Name ',l_bank_name);
1786: pay_in_utils.trace('Bank branch ',l_bank_branch);
1787: END IF;
1788:
1789: IF (l_bank_branch IS NULL) OR (l_bank_name IS NULL) THEN
1782: CLOSE csr_bank_details;
1783:
1784: IF g_debug THEN
1785: pay_in_utils.trace('Bank Name ',l_bank_name);
1786: pay_in_utils.trace('Bank branch ',l_bank_branch);
1787: END IF;
1788:
1789: IF (l_bank_branch IS NULL) OR (l_bank_name IS NULL) THEN
1790: --
1797: hr_general.decode_lookup('IN_BANK',l_bank_name)||','||
1798: hr_general.decode_lookup('IN_BANK_BRANCH',l_bank_branch);
1799: --
1800: END IF;
1801: pay_in_utils.set_location(g_debug,l_procedure, 70);
1802: l_ovn := 1;
1803:
1804: pay_action_information_api.update_action_information
1805: (
1812: );
1813: --
1814: END LOOP;
1815:
1816: pay_in_utils.set_location(g_debug,l_procedure, 80);
1817:
1818: OPEN csr_emp_det_action_info_id;
1819: FETCH csr_emp_det_action_info_id INTO l_emp_det_act_info_id;
1820: CLOSE csr_emp_det_action_info_id;
1818: OPEN csr_emp_det_action_info_id;
1819: FETCH csr_emp_det_action_info_id INTO l_emp_det_act_info_id;
1820: CLOSE csr_emp_det_action_info_id;
1821:
1822: pay_in_utils.set_location(g_debug,l_procedure, 90);
1823:
1824: -- Bug 3139966 starts
1825: -- Added code to archive Expatriate Indicator, Passport
1826: OPEN csr_person_id;
1828: INTO l_person_id;
1829: CLOSE csr_person_id;
1830:
1831: IF g_debug THEN
1832: pay_in_utils.trace('Person ID ',l_person_id);
1833: pay_in_utils.trace('Effective Date ',p_pre_effective_date);
1834: END IF;
1835:
1836: pay_in_utils.set_location(g_debug,l_procedure, 100);
1829: CLOSE csr_person_id;
1830:
1831: IF g_debug THEN
1832: pay_in_utils.trace('Person ID ',l_person_id);
1833: pay_in_utils.trace('Effective Date ',p_pre_effective_date);
1834: END IF;
1835:
1836: pay_in_utils.set_location(g_debug,l_procedure, 100);
1837:
1832: pay_in_utils.trace('Person ID ',l_person_id);
1833: pay_in_utils.trace('Effective Date ',p_pre_effective_date);
1834: END IF;
1835:
1836: pay_in_utils.set_location(g_debug,l_procedure, 100);
1837:
1838: OPEN csr_person_details (l_person_id);
1839: FETCH csr_person_details
1840: INTO l_dob
1847: CLOSE csr_person_details;
1848:
1849: IF l_email_address IS NOT NULL
1850: THEN
1851: pay_in_utils.set_location(g_debug,l_procedure, 105);
1852: pay_action_information_api.create_action_information
1853: (p_action_context_id => p_assactid
1854: ,p_action_context_type => 'AAP'
1855: ,p_action_information_category => 'IN_EMPLOYEE_DETAILS'
1863:
1864: l_month := TRIM(TO_CHAR(p_pre_effective_date,'Month'));
1865: l_year := TO_CHAR(p_pre_effective_date,'YYYY');
1866:
1867: pay_in_utils.set_location(g_debug,l_procedure, 110);
1868: -- Fetch Professinal tax Number
1869: --
1870: OPEN csr_prof_tax_number;
1871: FETCH csr_prof_tax_number
1879:
1880: -- Update Payroll Location,Tax Area, Passport and Expatriate Indicator
1881: --
1882:
1883: pay_in_utils.set_location(g_debug,l_procedure, 120);
1884: l_ovn := 1;
1885: pay_action_information_api.update_action_information
1886: (
1887: p_action_information_id => l_emp_det_act_info_id
1895: ,p_action_information25 => l_pan
1896: ,p_action_information27 => l_superannuation_number
1897: );
1898:
1899: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 130);
1900: --
1901: EXCEPTION
1902: --
1903: WHEN OTHERS THEN
1921: END IF;
1922: IF csr_prof_tax_number%ISOPEN THEN
1923: CLOSE csr_prof_tax_number;
1924: END IF;
1925: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
1926: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 140);
1927: pay_in_utils.trace(l_message,l_procedure);
1928: RAISE;
1929: --
1922: IF csr_prof_tax_number%ISOPEN THEN
1923: CLOSE csr_prof_tax_number;
1924: END IF;
1925: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
1926: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 140);
1927: pay_in_utils.trace(l_message,l_procedure);
1928: RAISE;
1929: --
1930: END archive_employee_details;
1923: CLOSE csr_prof_tax_number;
1924: END IF;
1925: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
1926: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 140);
1927: pay_in_utils.trace(l_message,l_procedure);
1928: RAISE;
1929: --
1930: END archive_employee_details;
1931:
2204:
2205:
2206: g_debug := hr_utility.debug_enabled;
2207: l_procedure := g_package ||'archive_form_data';
2208: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
2209:
2210: IF g_debug THEN
2211: pay_in_utils.trace('**************************************************','********************');
2212: pay_in_utils.trace('Assignment Action id ',p_assignment_action_id);
2207: l_procedure := g_package ||'archive_form_data';
2208: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
2209:
2210: IF g_debug THEN
2211: pay_in_utils.trace('**************************************************','********************');
2212: pay_in_utils.trace('Assignment Action id ',p_assignment_action_id);
2213: pay_in_utils.trace('Assignment id ',p_assignment_id);
2214: pay_in_utils.trace('Payroll Date ',p_payroll_date);
2215: pay_in_utils.trace('**************************************************','********************');
2208: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
2209:
2210: IF g_debug THEN
2211: pay_in_utils.trace('**************************************************','********************');
2212: pay_in_utils.trace('Assignment Action id ',p_assignment_action_id);
2213: pay_in_utils.trace('Assignment id ',p_assignment_id);
2214: pay_in_utils.trace('Payroll Date ',p_payroll_date);
2215: pay_in_utils.trace('**************************************************','********************');
2216: END IF;
2209:
2210: IF g_debug THEN
2211: pay_in_utils.trace('**************************************************','********************');
2212: pay_in_utils.trace('Assignment Action id ',p_assignment_action_id);
2213: pay_in_utils.trace('Assignment id ',p_assignment_id);
2214: pay_in_utils.trace('Payroll Date ',p_payroll_date);
2215: pay_in_utils.trace('**************************************************','********************');
2216: END IF;
2217:
2210: IF g_debug THEN
2211: pay_in_utils.trace('**************************************************','********************');
2212: pay_in_utils.trace('Assignment Action id ',p_assignment_action_id);
2213: pay_in_utils.trace('Assignment id ',p_assignment_id);
2214: pay_in_utils.trace('Payroll Date ',p_payroll_date);
2215: pay_in_utils.trace('**************************************************','********************');
2216: END IF;
2217:
2218:
2211: pay_in_utils.trace('**************************************************','********************');
2212: pay_in_utils.trace('Assignment Action id ',p_assignment_action_id);
2213: pay_in_utils.trace('Assignment id ',p_assignment_id);
2214: pay_in_utils.trace('Payroll Date ',p_payroll_date);
2215: pay_in_utils.trace('**************************************************','********************');
2216: END IF;
2217:
2218:
2219: --V
2218:
2219: --V
2220: FOR c_rec IN c_pf_org_id(p_assignment_action_id)
2221: LOOP
2222: pay_in_utils.set_location(g_debug,l_procedure, 20);
2223: l_source_id:=c_rec.source_id;
2224:
2225: IF g_debug THEN
2226: pay_in_utils.trace('Source id ',l_source_id);
2222: pay_in_utils.set_location(g_debug,l_procedure, 20);
2223: l_source_id:=c_rec.source_id;
2224:
2225: IF g_debug THEN
2226: pay_in_utils.trace('Source id ',l_source_id);
2227: END IF;
2228:
2229: --A,B,C
2230: OPEN c_name_pfno_fh_name(p_assignment_action_id);
2236: FETCH csr_pf_people INTO l_term_date,l_reason;
2237: CLOSE csr_pf_people;
2238:
2239: IF g_debug THEN
2240: pay_in_utils.trace('l_term_date ',l_term_date);
2241: pay_in_utils.trace('l_reason ',l_reason);
2242: END IF;
2243:
2244: pay_in_utils.set_location(g_debug,l_procedure, 30);
2237: CLOSE csr_pf_people;
2238:
2239: IF g_debug THEN
2240: pay_in_utils.trace('l_term_date ',l_term_date);
2241: pay_in_utils.trace('l_reason ',l_reason);
2242: END IF;
2243:
2244: pay_in_utils.set_location(g_debug,l_procedure, 30);
2245:
2240: pay_in_utils.trace('l_term_date ',l_term_date);
2241: pay_in_utils.trace('l_reason ',l_reason);
2242: END IF;
2243:
2244: pay_in_utils.set_location(g_debug,l_procedure, 30);
2245:
2246: OPEN csr_contact_details(l_contact_id);
2247: FETCH csr_contact_details INTO l_fh_hus;
2248: CLOSE csr_contact_details;
2247: FETCH csr_contact_details INTO l_fh_hus;
2248: CLOSE csr_contact_details;
2249:
2250: IF g_debug THEN
2251: pay_in_utils.trace('Person id ',l_person_id);
2252: pay_in_utils.trace('Full Name ',l_full_name);
2253: pay_in_utils.trace('Contact id ',l_contact_id);
2254: END IF;
2255:
2248: CLOSE csr_contact_details;
2249:
2250: IF g_debug THEN
2251: pay_in_utils.trace('Person id ',l_person_id);
2252: pay_in_utils.trace('Full Name ',l_full_name);
2253: pay_in_utils.trace('Contact id ',l_contact_id);
2254: END IF;
2255:
2256:
2249:
2250: IF g_debug THEN
2251: pay_in_utils.trace('Person id ',l_person_id);
2252: pay_in_utils.trace('Full Name ',l_full_name);
2253: pay_in_utils.trace('Contact id ',l_contact_id);
2254: END IF;
2255:
2256:
2257: -- Bug 4033745
2258: l_start_date := trunc(p_payroll_date,'MM');
2259: l_end_date := ADD_MONTHS(l_start_date,1) - 1;
2260:
2261: IF g_debug THEN
2262: pay_in_utils.trace('Start Date ',l_start_date);
2263: pay_in_utils.trace('End Date ',l_end_date);
2264: END IF;
2265:
2266: pay_in_utils.set_location(g_debug,l_procedure, 40);
2259: l_end_date := ADD_MONTHS(l_start_date,1) - 1;
2260:
2261: IF g_debug THEN
2262: pay_in_utils.trace('Start Date ',l_start_date);
2263: pay_in_utils.trace('End Date ',l_end_date);
2264: END IF;
2265:
2266: pay_in_utils.set_location(g_debug,l_procedure, 40);
2267:
2262: pay_in_utils.trace('Start Date ',l_start_date);
2263: pay_in_utils.trace('End Date ',l_end_date);
2264: END IF;
2265:
2266: pay_in_utils.set_location(g_debug,l_procedure, 40);
2267:
2268: OPEN csr_asg_effective_date(p_assignment_id,l_source_id,l_start_date,l_end_date);
2269: FETCH csr_asg_effective_date INTO l_asg_start_date;
2270: CLOSE csr_asg_effective_date;
2271:
2272: l_asg_start_date := LEAST(l_asg_start_date,l_end_date);
2273:
2274: IF g_debug THEN
2275: pay_in_utils.trace('Assignment Start Date ',l_asg_start_date);
2276: END IF;
2277:
2278: pay_in_utils.set_location(g_debug,l_procedure, 50);
2279:
2274: IF g_debug THEN
2275: pay_in_utils.trace('Assignment Start Date ',l_asg_start_date);
2276: END IF;
2277:
2278: pay_in_utils.set_location(g_debug,l_procedure, 50);
2279:
2280: OPEN csr_pension_number(p_assignment_id,l_asg_start_date);
2281: FETCH csr_pension_number INTO l_pension_num,l_pf_number;
2282: CLOSE csr_pension_number;
2281: FETCH csr_pension_number INTO l_pension_num,l_pf_number;
2282: CLOSE csr_pension_number;
2283:
2284: -- Bug 4033745
2285: pay_in_utils.set_location(g_debug,l_procedure, 60);
2286:
2287: IF (l_pf_number IS NULL) AND (l_pension_num IS NULL) THEN
2288: RETURN;
2289: END IF;
2288: RETURN;
2289: END IF;
2290:
2291: IF g_debug THEN
2292: pay_in_utils.trace('PF Number ',l_pf_number);
2293: pay_in_utils.trace('Pension Number ',l_pension_num);
2294: END IF;
2295:
2296:
2289: END IF;
2290:
2291: IF g_debug THEN
2292: pay_in_utils.trace('PF Number ',l_pf_number);
2293: pay_in_utils.trace('Pension Number ',l_pension_num);
2294: END IF;
2295:
2296:
2297: -- Hire date is dependent on pension number change and PF organization change. So, we will archive it only
2298: -- when pension number is entered.In case of PF org change followed by pension number change, the transfer-in date
2299: -- will be archived. Otherwise hire/rehire date will be used
2300:
2301: --Pension Start
2302: pay_in_utils.set_location(g_debug,l_procedure, 70);
2303:
2304: IF (l_pension_num IS NOT NULL AND l_source_id IS NOT NULL) THEN
2305: pay_in_utils.set_location(g_debug,l_procedure, 80);
2306: OPEN csr_asg_pforg_start(l_person_id,l_source_id);
2301: --Pension Start
2302: pay_in_utils.set_location(g_debug,l_procedure, 70);
2303:
2304: IF (l_pension_num IS NOT NULL AND l_source_id IS NOT NULL) THEN
2305: pay_in_utils.set_location(g_debug,l_procedure, 80);
2306: OPEN csr_asg_pforg_start(l_person_id,l_source_id);
2307: FETCH csr_asg_pforg_start INTO l_asg_start_date;
2308: CLOSE csr_asg_pforg_start;
2309:
2307: FETCH csr_asg_pforg_start INTO l_asg_start_date;
2308: CLOSE csr_asg_pforg_start;
2309:
2310: IF g_debug THEN
2311: pay_in_utils.trace('Asg Earliest Start Date ',l_asg_start_date);
2312: END IF;
2313:
2314:
2315: OPEN csr_chk_trsfr_pforg(l_person_id
2317: ,l_asg_start_date);
2318: FETCH csr_chk_trsfr_pforg INTO l_exists;
2319: CLOSE csr_chk_trsfr_pforg;
2320:
2321: pay_in_utils.set_location(g_debug,l_procedure, 90);
2322:
2323: IF l_exists IS NOT NULL THEN
2324: pay_in_utils.set_location(g_debug,l_procedure, 100);
2325: OPEN csr_chk_pension_number_change(l_person_id
2320:
2321: pay_in_utils.set_location(g_debug,l_procedure, 90);
2322:
2323: IF l_exists IS NOT NULL THEN
2324: pay_in_utils.set_location(g_debug,l_procedure, 100);
2325: OPEN csr_chk_pension_number_change(l_person_id
2326: ,l_asg_start_date);
2327: FETCH csr_chk_pension_number_change INTO l_exists;
2328: CLOSE csr_chk_pension_number_change ;
2328: CLOSE csr_chk_pension_number_change ;
2329: END IF;
2330:
2331: IF g_debug THEN
2332: pay_in_utils.trace('Pension Change Exists ',l_exists);
2333: END IF;
2334:
2335: pay_in_utils.set_location(g_debug,l_procedure, 120);
2336: IF (nvl(l_exists,l_pension_num) = l_pension_num) THEN
2331: IF g_debug THEN
2332: pay_in_utils.trace('Pension Change Exists ',l_exists);
2333: END IF;
2334:
2335: pay_in_utils.set_location(g_debug,l_procedure, 120);
2336: IF (nvl(l_exists,l_pension_num) = l_pension_num) THEN
2337: OPEN csr_hire_date(l_person_id
2338: ,l_pension_num);
2339: FETCH csr_hire_date INTO l_asg_start_date;
2338: ,l_pension_num);
2339: FETCH csr_hire_date INTO l_asg_start_date;
2340: CLOSE csr_hire_date;
2341:
2342: pay_in_utils.set_location(g_debug,l_procedure,130);
2343:
2344: END IF;
2345:
2346: END IF;
2368: END IF;
2369: --
2370: l_balance_defined_id :=0;
2371: --
2372: pay_in_utils.set_location(g_debug,l_procedure, 140);
2373: --F
2374: OPEN c_defined_balance_id('PF Actual Salary','_ASG_ORG_MAR_FEB_YTD');
2375: FETCH c_defined_balance_id INTO l_balance_defined_id;
2376: CLOSE c_defined_balance_id;
2383: p_source_id =>l_source_id,
2384: p_tax_group =>null,
2385: p_date_earned =>null);
2386:
2387: pay_in_utils.set_location(g_debug,l_procedure, 150);
2388:
2389: OPEN c_defined_balance_id('Employee Voluntary PF Contribution','_ASG_ORG_MAR_FEB_YTD');
2390: FETCH c_defined_balance_id INTO l_balance_defined_id;
2391: CLOSE c_defined_balance_id;
2403: l_contribution_rate:=0;
2404: ELSE
2405: l_contribution_rate:=round((l_VPF_value/l_APF_value)*100,2);
2406: END IF;
2407: pay_in_utils.set_location(g_debug,l_procedure, 160);
2408:
2409: --H
2410: OPEN c_defined_balance_id('PF Actual Salary','_ASG_ORG_DE_PTD');
2411: FETCH c_defined_balance_id INTO l_balance_defined_id;
2420: p_tax_group =>null,
2421: p_date_earned =>null);
2422:
2423: IF g_debug THEN
2424: pay_in_utils.trace('PF Actual Salary PTD ',wage_value);
2425: END IF;
2426: pay_in_utils.set_location(g_debug,l_procedure, 170);
2427:
2428: --K
2422:
2423: IF g_debug THEN
2424: pay_in_utils.trace('PF Actual Salary PTD ',wage_value);
2425: END IF;
2426: pay_in_utils.set_location(g_debug,l_procedure, 170);
2427:
2428: --K
2429: OPEN c_defined_balance_id('EPS Contribution','_ASG_ORG_DE_PTD');
2430: FETCH c_defined_balance_id INTO l_balance_defined_id;
2439: p_tax_group =>null,
2440: p_date_earned =>null);
2441:
2442: IF g_debug THEN
2443: pay_in_utils.trace('PF Actual Salary PTD ',wage_value);
2444: END IF;
2445: pay_in_utils.set_location(g_debug,l_procedure, 180);
2446: --I,J
2447: OPEN c_defined_balance_id('Employee Statutory PF Contribution','_ASG_ORG_DE_PTD');
2441:
2442: IF g_debug THEN
2443: pay_in_utils.trace('PF Actual Salary PTD ',wage_value);
2444: END IF;
2445: pay_in_utils.set_location(g_debug,l_procedure, 180);
2446: --I,J
2447: OPEN c_defined_balance_id('Employee Statutory PF Contribution','_ASG_ORG_DE_PTD');
2448: FETCH c_defined_balance_id INTO l_balance_defined_id;
2449: CLOSE c_defined_balance_id;
2459:
2460: l_epf_diff:=employee_pf_value-pension_fund;
2461:
2462: IF g_debug THEN
2463: pay_in_utils.trace('Employee Statutory PF Contribution PTD ',employee_pf_value);
2464: END IF;
2465: pay_in_utils.set_location(g_debug,l_procedure, 190);
2466:
2467: OPEN c_defined_balance_id('Employee Voluntary PF Contribution','_ASG_ORG_DE_PTD');
2461:
2462: IF g_debug THEN
2463: pay_in_utils.trace('Employee Statutory PF Contribution PTD ',employee_pf_value);
2464: END IF;
2465: pay_in_utils.set_location(g_debug,l_procedure, 190);
2466:
2467: OPEN c_defined_balance_id('Employee Voluntary PF Contribution','_ASG_ORG_DE_PTD');
2468: FETCH c_defined_balance_id INTO l_balance_defined_id;
2469: CLOSE c_defined_balance_id;
2466:
2467: OPEN c_defined_balance_id('Employee Voluntary PF Contribution','_ASG_ORG_DE_PTD');
2468: FETCH c_defined_balance_id INTO l_balance_defined_id;
2469: CLOSE c_defined_balance_id;
2470: pay_in_utils.set_location(g_debug,l_procedure, 200);
2471: employee_pf_value := employee_pf_value+pay_balance_pkg.get_value(
2472: p_defined_balance_id =>l_balance_defined_id,
2473: p_assignment_action_id =>p_assignment_action_id,
2474: p_tax_unit_id =>null,
2477: p_tax_group =>null,
2478: p_date_earned =>null);
2479:
2480: IF g_debug THEN
2481: pay_in_utils.trace('Employee Voluntary PF Contribution PTD ',employee_pf_value);
2482: END IF;
2483:
2484:
2485:
2486: --M
2487: OPEN c_defined_balance_id('Non Contributory Period','_ASG_DE_PTD');
2488: FETCH c_defined_balance_id INTO l_balance_defined_id;
2489: CLOSE c_defined_balance_id;
2490: pay_in_utils.set_location(g_debug,l_procedure, 210);
2491: l_absence := pay_balance_pkg.get_value(
2492: p_defined_balance_id =>l_balance_defined_id,
2493: p_assignment_action_id =>p_assignment_action_id);
2494:
2492: p_defined_balance_id =>l_balance_defined_id,
2493: p_assignment_action_id =>p_assignment_action_id);
2494:
2495: IF g_debug THEN
2496: pay_in_utils.trace('Absence ',l_absence);
2497: END IF;
2498:
2499: /*added 14784847 start*/
2500: OPEN c_defined_balance_id('EPS Wages','_ASG_DE_PTD');
2501: FETCH c_defined_balance_id INTO l_balance_defined_id;
2502: CLOSE c_defined_balance_id;
2503:
2504: IF g_debug THEN
2505: pay_in_utils.trace('EPS Wages l_balance_defined_id ',l_balance_defined_id);
2506: END IF;
2507:
2508: pay_in_utils.set_location(g_debug,l_procedure, 215);
2509: l_eps_wages := pay_balance_pkg.get_value(
2504: IF g_debug THEN
2505: pay_in_utils.trace('EPS Wages l_balance_defined_id ',l_balance_defined_id);
2506: END IF;
2507:
2508: pay_in_utils.set_location(g_debug,l_procedure, 215);
2509: l_eps_wages := pay_balance_pkg.get_value(
2510: p_defined_balance_id =>l_balance_defined_id,
2511: p_assignment_action_id =>p_assignment_action_id);
2512:
2510: p_defined_balance_id =>l_balance_defined_id,
2511: p_assignment_action_id =>p_assignment_action_id);
2512:
2513: IF g_debug THEN
2514: pay_in_utils.trace('EPS Wages ',l_eps_wages);
2515: END IF;
2516: /*14784847 end*/
2517:
2518: --N
2523: OPEN c_pf_name(l_source_id,p_payroll_date);
2524: FETCH c_pf_name INTO l_pf_org_name;
2525: CLOSE c_pf_name;
2526:
2527: pay_in_utils.set_location(g_debug,l_procedure, 220);
2528:
2529: --Contribution Period
2530: l_start_date := p_payroll_date;
2531: l_end_date := p_payroll_date;
2543: OPEN c_defined_balance_id('PF Computation Salary','_ASG_DE_PTD');
2544: FETCH c_defined_balance_id INTO l_balance_defined_id;
2545: CLOSE c_defined_balance_id;
2546:
2547: pay_in_utils.set_location(g_debug,l_procedure, 230);
2548:
2549: l_pf_comp_salary :=pay_balance_pkg.get_value(p_defined_balance_id =>l_balance_defined_id,
2550: p_assignment_action_id =>p_assignment_action_id);
2551:
2549: l_pf_comp_salary :=pay_balance_pkg.get_value(p_defined_balance_id =>l_balance_defined_id,
2550: p_assignment_action_id =>p_assignment_action_id);
2551:
2552: IF g_debug THEN
2553: pay_in_utils.trace('PF Computation Salary PTD ',l_pf_comp_salary);
2554: END IF;
2555: pay_in_utils.set_location(g_debug,l_procedure, 240);
2556:
2557: pay_action_information_api.create_action_information
2551:
2552: IF g_debug THEN
2553: pay_in_utils.trace('PF Computation Salary PTD ',l_pf_comp_salary);
2554: END IF;
2555: pay_in_utils.set_location(g_debug,l_procedure, 240);
2556:
2557: pay_action_information_api.create_action_information
2558: (p_action_context_id => p_archive_action_id --Archive Action id
2559: ,p_action_context_type => 'AAP'
2597: ,p_action_information30 => l_sex -- Gender
2598: ,p_action_information_id => l_action_info_id --OUT Parameters
2599: ,p_object_version_number => l_ovn --OUT Parameters
2600: );
2601: pay_in_utils.set_location(g_debug,l_procedure, 250);
2602: END LOOP;
2603:
2604: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 260);
2605:
2600: );
2601: pay_in_utils.set_location(g_debug,l_procedure, 250);
2602: END LOOP;
2603:
2604: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 260);
2605:
2606: EXCEPTION
2607: WHEN OTHERS THEN
2608: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
2604: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 260);
2605:
2606: EXCEPTION
2607: WHEN OTHERS THEN
2608: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
2609: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 270);
2610: pay_in_utils.trace(l_message,l_procedure);
2611: RAISE;
2612:
2605:
2606: EXCEPTION
2607: WHEN OTHERS THEN
2608: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
2609: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 270);
2610: pay_in_utils.trace(l_message,l_procedure);
2611: RAISE;
2612:
2613: END archive_form_data;
2606: EXCEPTION
2607: WHEN OTHERS THEN
2608: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
2609: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 270);
2610: pay_in_utils.trace(l_message,l_procedure);
2611: RAISE;
2612:
2613: END archive_form_data;
2614:
2871: BEGIN
2872:
2873: g_debug := hr_utility.debug_enabled;
2874: l_procedure := g_package ||'archive_esi_data';
2875: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
2876:
2877:
2878: IF g_debug THEN
2879: pay_in_utils.trace('Assignment Action id ',p_assignment_action_id);
2875: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
2876:
2877:
2878: IF g_debug THEN
2879: pay_in_utils.trace('Assignment Action id ',p_assignment_action_id);
2880: pay_in_utils.trace('Payroll Action id ',p_payroll_action_id);
2881: pay_in_utils.trace('Archive Action id ',p_archive_action_id);
2882: pay_in_utils.trace('Assignment id ',p_assignment_id);
2883: pay_in_utils.trace('Payroll Date ',p_payroll_date);
2876:
2877:
2878: IF g_debug THEN
2879: pay_in_utils.trace('Assignment Action id ',p_assignment_action_id);
2880: pay_in_utils.trace('Payroll Action id ',p_payroll_action_id);
2881: pay_in_utils.trace('Archive Action id ',p_archive_action_id);
2882: pay_in_utils.trace('Assignment id ',p_assignment_id);
2883: pay_in_utils.trace('Payroll Date ',p_payroll_date);
2884: pay_in_utils.trace('Prepayment_date ',p_prepayment_date);
2877:
2878: IF g_debug THEN
2879: pay_in_utils.trace('Assignment Action id ',p_assignment_action_id);
2880: pay_in_utils.trace('Payroll Action id ',p_payroll_action_id);
2881: pay_in_utils.trace('Archive Action id ',p_archive_action_id);
2882: pay_in_utils.trace('Assignment id ',p_assignment_id);
2883: pay_in_utils.trace('Payroll Date ',p_payroll_date);
2884: pay_in_utils.trace('Prepayment_date ',p_prepayment_date);
2885: END IF;
2878: IF g_debug THEN
2879: pay_in_utils.trace('Assignment Action id ',p_assignment_action_id);
2880: pay_in_utils.trace('Payroll Action id ',p_payroll_action_id);
2881: pay_in_utils.trace('Archive Action id ',p_archive_action_id);
2882: pay_in_utils.trace('Assignment id ',p_assignment_id);
2883: pay_in_utils.trace('Payroll Date ',p_payroll_date);
2884: pay_in_utils.trace('Prepayment_date ',p_prepayment_date);
2885: END IF;
2886:
2879: pay_in_utils.trace('Assignment Action id ',p_assignment_action_id);
2880: pay_in_utils.trace('Payroll Action id ',p_payroll_action_id);
2881: pay_in_utils.trace('Archive Action id ',p_archive_action_id);
2882: pay_in_utils.trace('Assignment id ',p_assignment_id);
2883: pay_in_utils.trace('Payroll Date ',p_payroll_date);
2884: pay_in_utils.trace('Prepayment_date ',p_prepayment_date);
2885: END IF;
2886:
2887:
2880: pay_in_utils.trace('Payroll Action id ',p_payroll_action_id);
2881: pay_in_utils.trace('Archive Action id ',p_archive_action_id);
2882: pay_in_utils.trace('Assignment id ',p_assignment_id);
2883: pay_in_utils.trace('Payroll Date ',p_payroll_date);
2884: pay_in_utils.trace('Prepayment_date ',p_prepayment_date);
2885: END IF;
2886:
2887:
2888: --Determine the distinct ESI Organizations for that assignment in that payroll run
2890: LOOP
2891:
2892: l_source_id:=c_rec.source_id;
2893: IF g_debug THEN
2894: pay_in_utils.trace('ESI Organization id ',l_source_id);
2895: END IF;
2896: pay_in_utils.set_location(g_debug,l_procedure, 20);
2897:
2898: --Find the assignments's full name and esi number
2892: l_source_id:=c_rec.source_id;
2893: IF g_debug THEN
2894: pay_in_utils.trace('ESI Organization id ',l_source_id);
2895: END IF;
2896: pay_in_utils.set_location(g_debug,l_procedure, 20);
2897:
2898: --Find the assignments's full name and esi number
2899: OPEN c_name_esino_fh_name(p_assignment_action_id);
2900: FETCH c_name_esino_fh_name INTO l_full_name,l_esi_number,l_person_id;
2902:
2903: l_start_date := TRUNC(p_payroll_date,'MM');
2904: l_end_date := ADD_MONTHS(l_start_date,1) - 1;
2905:
2906: pay_in_utils.set_location(g_debug,l_procedure, 20);
2907:
2908: OPEN csr_asg_effective_date(p_assignment_id,l_source_id,l_start_date,l_end_date);
2909: FETCH csr_asg_effective_date INTO l_asg_start_date;
2910: CLOSE csr_asg_effective_date;
2908: OPEN csr_asg_effective_date(p_assignment_id,l_source_id,l_start_date,l_end_date);
2909: FETCH csr_asg_effective_date INTO l_asg_start_date;
2910: CLOSE csr_asg_effective_date;
2911:
2912: pay_in_utils.set_location(g_debug,l_procedure, 30);
2913:
2914: l_asg_start_date := LEAST(l_asg_start_date,l_end_date);
2915:
2916: IF g_debug THEN
2913:
2914: l_asg_start_date := LEAST(l_asg_start_date,l_end_date);
2915:
2916: IF g_debug THEN
2917: pay_in_utils.trace('Assignment Start Date ',l_asg_start_date);
2918: pay_in_utils.trace('End Date ',l_end_date);
2919: END IF;
2920:
2921: OPEN csr_esi_number(p_assignment_id,l_asg_start_date);
2914: l_asg_start_date := LEAST(l_asg_start_date,l_end_date);
2915:
2916: IF g_debug THEN
2917: pay_in_utils.trace('Assignment Start Date ',l_asg_start_date);
2918: pay_in_utils.trace('End Date ',l_end_date);
2919: END IF;
2920:
2921: OPEN csr_esi_number(p_assignment_id,l_asg_start_date);
2922: FETCH csr_esi_number INTO l_esi_number;
2921: OPEN csr_esi_number(p_assignment_id,l_asg_start_date);
2922: FETCH csr_esi_number INTO l_esi_number;
2923: CLOSE csr_esi_number;
2924:
2925: pay_in_utils.set_location(g_debug,l_procedure, 40);
2926:
2927:
2928: IF (l_esi_number IS NULL)THEN
2929: pay_in_utils.set_location(g_debug,l_procedure, 50);
2925: pay_in_utils.set_location(g_debug,l_procedure, 40);
2926:
2927:
2928: IF (l_esi_number IS NULL)THEN
2929: pay_in_utils.set_location(g_debug,l_procedure, 50);
2930: RETURN;
2931: END IF;
2932:
2933: IF g_debug THEN
2930: RETURN;
2931: END IF;
2932:
2933: IF g_debug THEN
2934: pay_in_utils.trace('ESI Number ',l_esi_number);
2935: END IF;
2936:
2937:
2938: -- Populating the PL/SQL Tables with ESI Number and corresponding payroll action id
2937:
2938: -- Populating the PL/SQL Tables with ESI Number and corresponding payroll action id
2939: flag:=TRUE;
2940:
2941: pay_in_utils.set_location(g_debug,l_procedure, 60);
2942:
2943: FOR i IN 1..g_cnt_esi LOOP
2944: pay_in_utils.set_location(g_debug,l_procedure, 70);
2945: IF g_esi_org_id(i)=l_source_id THEN
2940:
2941: pay_in_utils.set_location(g_debug,l_procedure, 60);
2942:
2943: FOR i IN 1..g_cnt_esi LOOP
2944: pay_in_utils.set_location(g_debug,l_procedure, 70);
2945: IF g_esi_org_id(i)=l_source_id THEN
2946: flag:=FALSE;
2947: EXIT;
2948: END IF;
2946: flag:=FALSE;
2947: EXIT;
2948: END IF;
2949: END LOOP;
2950: pay_in_utils.set_location(g_debug,l_procedure, 80);
2951: IF flag THEN
2952: g_cnt_esi:=g_cnt_esi+1;
2953: g_esi_org_id(g_cnt_esi):=l_source_id;
2954: g_esi_act_id(g_cnt_esi):=p_payroll_action_id;
2953: g_esi_org_id(g_cnt_esi):=l_source_id;
2954: g_esi_act_id(g_cnt_esi):=p_payroll_action_id;
2955:
2956: IF g_debug THEN
2957: pay_in_utils.trace('g_esi_org_id table ',g_esi_org_id(g_cnt_esi));
2958: END IF;
2959:
2960: END IF;
2961: --
2960: END IF;
2961: --
2962: l_balance_defined_id :=0;
2963: --
2964: pay_in_utils.set_location(g_debug,l_procedure, 90);
2965: --ESI Actual Salary for dimension _ASG_ORG_HYTD
2966: OPEN c_defined_balance_id('ESI Actual Salary','_ASG_ORG_HYTD');
2967: FETCH c_defined_balance_id INTO l_balance_defined_id;
2968: CLOSE c_defined_balance_id;
2965: --ESI Actual Salary for dimension _ASG_ORG_HYTD
2966: OPEN c_defined_balance_id('ESI Actual Salary','_ASG_ORG_HYTD');
2967: FETCH c_defined_balance_id INTO l_balance_defined_id;
2968: CLOSE c_defined_balance_id;
2969: pay_in_utils.set_location(g_debug,l_procedure, 90);
2970:
2971: wage_value := pay_balance_pkg.get_value(
2972: p_defined_balance_id => l_balance_defined_id,
2973: p_assignment_action_id => p_assignment_action_id,
2978: p_date_earned => null
2979: );
2980:
2981: IF g_debug THEN
2982: pay_in_utils.trace('ESI Wages ',wage_value);
2983: END IF;
2984:
2985: --Employee Contribution
2986: OPEN c_defined_balance_id('Employee ESI Contribution','_ASG_ORG_HYTD');
2986: OPEN c_defined_balance_id('Employee ESI Contribution','_ASG_ORG_HYTD');
2987: FETCH c_defined_balance_id INTO l_balance_defined_id;
2988: CLOSE c_defined_balance_id;
2989:
2990: pay_in_utils.set_location(g_debug,l_procedure, 100);
2991:
2992: l_employee_contribution :=pay_balance_pkg.get_value(
2993: p_defined_balance_id =>l_balance_defined_id,
2994: p_assignment_action_id =>p_assignment_action_id,
2998: p_tax_group =>null,
2999: p_date_earned =>null);
3000:
3001: IF g_debug THEN
3002: pay_in_utils.trace('ESI Employee Contribution ',l_employee_contribution);
3003: END IF;
3004:
3005:
3006: --Employer Contribution
3007: OPEN c_defined_balance_id('Employer ESI Contribution','_ASG_ORG_HYTD');
3008: FETCH c_defined_balance_id INTO l_balance_defined_id;
3009: CLOSE c_defined_balance_id;
3010:
3011: pay_in_utils.set_location(g_debug,l_procedure, 110);
3012:
3013: l_employer_contribution :=pay_balance_pkg.get_value(
3014: p_defined_balance_id =>l_balance_defined_id,
3015: p_assignment_action_id =>p_assignment_action_id,
3018: p_source_id =>l_source_id,
3019: p_tax_group =>null,
3020: p_date_earned =>null);
3021: IF g_debug THEN
3022: pay_in_utils.trace('ESI Employer Contribution ',l_employer_contribution);
3023: END IF;
3024:
3025:
3026:
3028: OPEN c_defined_balance_id('Non Contributory Period','_ASG_RUN');
3029: FETCH c_defined_balance_id INTO l_balance_defined_id;
3030: CLOSE c_defined_balance_id;
3031:
3032: pay_in_utils.set_location(g_debug,l_procedure, 100);
3033:
3034: l_absence := pay_balance_pkg.get_value(
3035: p_defined_balance_id =>l_balance_defined_id,
3036: p_assignment_action_id =>p_assignment_action_id
3036: p_assignment_action_id =>p_assignment_action_id
3037: );
3038:
3039: IF g_debug THEN
3040: pay_in_utils.trace('Employee absence ',l_absence);
3041: END IF;
3042:
3043:
3044:
3047: OPEN c_defined_balance_id('ESI Eligible Salary','_ASG_DE_PTD');
3048: FETCH c_defined_balance_id INTO l_balance_defined_id;
3049: CLOSE c_defined_balance_id;
3050:
3051: pay_in_utils.set_location(g_debug,l_procedure, 120);
3052:
3053:
3054:
3055: l_eligible_salary := pay_balance_pkg.get_value(
3062: p_date_earned => null
3063: );
3064:
3065: IF g_debug THEN
3066: pay_in_utils.trace('Esi Eligible Salary ',l_eligible_salary);
3067: END IF;
3068:
3069:
3070: --Reason for Exemption, Remarks and ESI Coverage Status
3072: OPEN c_death_date(l_person_id,p_payroll_date);
3073: FETCH c_death_date INTO l_temp;
3074: CLOSE c_death_date;
3075:
3076: pay_in_utils.set_location(g_debug,l_procedure, 130);
3077:
3078: OPEN c_term_check(l_person_id,p_payroll_date);
3079: FETCH c_term_check INTO l_temp;
3080: CLOSE c_term_check;
3078: OPEN c_term_check(l_person_id,p_payroll_date);
3079: FETCH c_term_check INTO l_temp;
3080: CLOSE c_term_check;
3081:
3082: pay_in_utils.set_location(g_debug,l_procedure, 140);
3083:
3084: l_asg_id := p_assignment_id;
3085: -- l_remarks := NULL;
3086: l_reason_for_exem := NULL;
3097: FETCH c_iv_id INTO l_reason_iv_id;
3098: CLOSE c_iv_id;
3099:
3100:
3101: pay_in_utils.set_location(g_debug,l_procedure, 150);
3102:
3103: FOR c_rec IN c_run_result_id(l_element_type_id)
3104: LOOP
3105:
3102:
3103: FOR c_rec IN c_run_result_id(l_element_type_id)
3104: LOOP
3105:
3106: pay_in_utils.set_location(g_debug,l_procedure, 160);
3107:
3108: OPEN c_remarks(c_rec.run_result_id,l_org_iv_id,l_reason_iv_id,l_source_id);
3109: FETCH c_remarks INTO l_reason_for_exem;
3110: CLOSE c_remarks;
3111:
3112: END LOOP;
3113:
3114: IF g_debug THEN
3115: pay_in_utils.trace('ESI Reason for Exemption ',l_reason_for_exem);
3116: END IF;
3117:
3118: IF (l_reason_for_exem IS NOT NULL)
3119: OR
3129: --ESI Organization Name
3130: OPEN c_esi_name(l_source_id,p_payroll_date);
3131: FETCH c_esi_name INTO l_esi_org_name;
3132: CLOSE c_esi_name;
3133: pay_in_utils.set_location(g_debug,l_procedure, 170);
3134:
3135:
3136:
3137: -----get salary in a specified contribution period ---------
3142: ,p_eligible_amt =>l_eligible_salary
3143: );
3144:
3145: IF g_debug THEN
3146: pay_in_utils.trace('Eligibility Salary in Contribution Period ',l_esi_con_salary);
3147: END IF;
3148:
3149: l_dummy := pay_in_ff_pkg.get_esi_disability_details(p_assignment_id => p_assignment_id
3150: ,p_date_earned => p_payroll_date
3180: FETCH c_esi_ceiling_value INTO l_esi_ceiling_value;
3181: CLOSE c_esi_ceiling_value;
3182:
3183:
3184: pay_in_utils.set_location(g_debug,l_procedure, 180);
3185:
3186: IF (l_esi_con_salary > l_esi_ceiling_value)THEN
3187: RETURN ;
3188: END IF ;
3186: IF (l_esi_con_salary > l_esi_ceiling_value)THEN
3187: RETURN ;
3188: END IF ;
3189:
3190: pay_in_utils.set_location(g_debug,l_procedure, 190);
3191:
3192:
3193: --Contribution Period
3194: IF(to_number(to_char(p_payroll_date,'MM'))) > 3 AND (to_number(to_char(p_payroll_date,'MM'))) < 10 THEN
3198: END IF;
3199: --ESI Coverage
3200:
3201: IF g_debug THEN
3202: pay_in_utils.trace('Contribution Period End ',l_contr_period);
3203: END IF;
3204:
3205:
3206: pay_action_information_api.create_action_information
3246: ,p_action_information30 => null
3247: ,p_action_information_id => l_action_info_id --OUT Parameters
3248: ,p_object_version_number => l_ovn --OUT Parameters
3249: );
3250: pay_in_utils.set_location(g_debug,l_procedure, 200);
3251:
3252: END LOOP;
3253: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 210);
3254:
3249: );
3250: pay_in_utils.set_location(g_debug,l_procedure, 200);
3251:
3252: END LOOP;
3253: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 210);
3254:
3255: EXCEPTION
3256: WHEN OTHERS THEN
3257: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
3253: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 210);
3254:
3255: EXCEPTION
3256: WHEN OTHERS THEN
3257: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
3258: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 220);
3259: pay_in_utils.trace(l_message,l_procedure);
3260: RAISE;
3261: END archive_esi_data;
3254:
3255: EXCEPTION
3256: WHEN OTHERS THEN
3257: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
3258: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 220);
3259: pay_in_utils.trace(l_message,l_procedure);
3260: RAISE;
3261: END archive_esi_data;
3262:
3255: EXCEPTION
3256: WHEN OTHERS THEN
3257: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
3258: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 220);
3259: pay_in_utils.trace(l_message,l_procedure);
3260: RAISE;
3261: END archive_esi_data;
3262:
3263: --------------------------------------------------------------------------
3423:
3424: BEGIN
3425:
3426: l_procedure := g_package ||'archive_payroll_data';
3427: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
3428:
3429: l_count := 0;
3430: IF p_context = 'PF' THEN
3431: l_count:= g_cnt_pf;
3435: l_act_inf_cat:='IN_ESI_PAY';
3436: END IF;
3437:
3438: IF g_debug THEN
3439: pay_in_utils.trace('Context ',p_context);
3440: END IF;
3441:
3442: FOR i IN 1..l_count LOOP
3443: pay_in_utils.set_location(g_debug,l_procedure, 20);
3439: pay_in_utils.trace('Context ',p_context);
3440: END IF;
3441:
3442: FOR i IN 1..l_count LOOP
3443: pay_in_utils.set_location(g_debug,l_procedure, 20);
3444: IF p_context = 'PF' THEN
3445: l_act_id:=g_pa_act_id(i);
3446: l_org_id:=g_pf_org_id(i);
3447: ELSE
3449: l_org_id:=g_esi_org_id(i);
3450: END IF;
3451:
3452: IF g_debug THEN
3453: pay_in_utils.trace('Payroll_Level Asg ID ',l_act_id);
3454: pay_in_utils.trace('Payroll_Level Org ID ',l_org_id);
3455: END IF;
3456:
3457: --Effective Date
3450: END IF;
3451:
3452: IF g_debug THEN
3453: pay_in_utils.trace('Payroll_Level Asg ID ',l_act_id);
3454: pay_in_utils.trace('Payroll_Level Org ID ',l_org_id);
3455: END IF;
3456:
3457: --Effective Date
3458: OPEN c_effective_date(l_act_id);
3458: OPEN c_effective_date(l_act_id);
3459: FETCH c_effective_date INTO l_effective_date;
3460: CLOSE c_effective_date;
3461:
3462: pay_in_utils.set_location(g_debug,l_procedure, 30);
3463:
3464: IF g_debug THEN
3465: pay_in_utils.trace('Effective Date ',l_effective_date);
3466: END IF;
3461:
3462: pay_in_utils.set_location(g_debug,l_procedure, 30);
3463:
3464: IF g_debug THEN
3465: pay_in_utils.trace('Effective Date ',l_effective_date);
3466: END IF;
3467:
3468:
3469: --Contribution Period
3467:
3468:
3469: --Contribution Period
3470: IF p_context = 'PF' THEN
3471: pay_in_utils.set_location(g_debug,l_procedure, 40);
3472: l_start_date := l_effective_date;
3473: l_end_date := l_effective_date;
3474: l_start_date_1 := l_effective_date;
3475: l_end_date_1 := l_effective_date;
3481:
3482: l_contr_period := TO_CHAR(pay_in_tax_utils.get_financial_year_start(l_start_date),'YYYY')||'-'||to_char(pay_in_tax_utils.get_financial_year_end(l_end_date),'YYYY');
3483: l_contr_period_1:=to_char(pay_in_tax_utils.get_financial_year_start(l_start_date_1),'YYYY')||'-'||to_char(pay_in_tax_utils.get_financial_year_end(l_end_date_1),'YYYY');
3484: ELSIF p_context = 'ESI' THEN
3485: pay_in_utils.set_location(g_debug,l_procedure, 50);
3486: IF(TO_NUMBER(TO_CHAR(l_effective_date,'MM'))) > 3 AND (TO_NUMBER(TO_CHAR(l_effective_date,'MM'))) < 10 THEN
3487: l_contr_period:='Apr-'||to_char(l_effective_date,'YYYY')||' - '||'Sep-'||to_char(l_effective_date,'YYYY');
3488: ELSE
3489: l_contr_period:='Oct-'||to_char(pay_in_tax_utils.get_financial_year_start(l_effective_date),'YYYY')||' - '||'Mar-'||to_char(pay_in_tax_utils.get_financial_year_end(l_effective_date),'YYYY');
3490:
3491: END IF;
3492: END IF;
3493:
3494: pay_in_utils.set_location(g_debug,l_procedure, 50);
3495:
3496: --Checking for PA level Data's presence in the already archived data
3497: OPEN c_pa_data(p_context,l_org_id,l_act_id,l_contr_period);
3498: FETCH c_pa_data INTO l_flag;
3497: OPEN c_pa_data(p_context,l_org_id,l_act_id,l_contr_period);
3498: FETCH c_pa_data INTO l_flag;
3499: CLOSE c_pa_data;
3500:
3501: pay_in_utils.set_location(g_debug,l_procedure, 60);
3502:
3503: /* If l_flag is 0 then archive else skip this org as its already there*/
3504: IF (l_flag = 0)
3505: THEN
3502:
3503: /* If l_flag is 0 then archive else skip this org as its already there*/
3504: IF (l_flag = 0)
3505: THEN
3506: pay_in_utils.set_location(g_debug,l_procedure, 70);
3507: --Registered Name
3508: OPEN c_registered_name(l_org_id,l_effective_date);
3509: FETCH c_registered_name INTO l_reg_name,l_code,l_class,l_address;
3510: CLOSE c_registered_name;
3518: OPEN c_org_name(l_org_id,l_effective_date);
3519: FETCH c_org_name INTO l_org_name;
3520: CLOSE c_org_name;
3521:
3522: pay_in_utils.set_location(g_debug,l_procedure, 60);
3523: IF g_debug THEN
3524: pay_in_utils.trace('Registered Name ',l_reg_name);
3525: pay_in_utils.trace('Representative Name ',l_org_rep_name);
3526: END IF;
3520: CLOSE c_org_name;
3521:
3522: pay_in_utils.set_location(g_debug,l_procedure, 60);
3523: IF g_debug THEN
3524: pay_in_utils.trace('Registered Name ',l_reg_name);
3525: pay_in_utils.trace('Representative Name ',l_org_rep_name);
3526: END IF;
3527:
3528: IF p_context = 'ESI' THEN
3521:
3522: pay_in_utils.set_location(g_debug,l_procedure, 60);
3523: IF g_debug THEN
3524: pay_in_utils.trace('Registered Name ',l_reg_name);
3525: pay_in_utils.trace('Representative Name ',l_org_rep_name);
3526: END IF;
3527:
3528: IF p_context = 'ESI' THEN
3529: pay_in_utils.set_location(g_debug,l_procedure, 70);
3525: pay_in_utils.trace('Representative Name ',l_org_rep_name);
3526: END IF;
3527:
3528: IF p_context = 'ESI' THEN
3529: pay_in_utils.set_location(g_debug,l_procedure, 70);
3530: OPEN c_rep_adr(l_rep_person_id,l_effective_date);
3531: FETCH c_rep_adr INTO l_rep_addr;
3532: CLOSE c_rep_adr;
3533:
3536: CLOSE c_rep_pos;
3537:
3538: l_class := NULL;
3539: ELSE
3540: pay_in_utils.set_location(g_debug,l_procedure, 80);
3541: l_rep_pos := NULL;
3542: l_rep_addr:= NULL;
3543: END IF;
3544:
3571: );
3572: END IF;
3573: END LOOP;
3574:
3575: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 20);
3576: EXCEPTION
3577: WHEN OTHERS THEN
3578: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
3579: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 30);
3574:
3575: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 20);
3576: EXCEPTION
3577: WHEN OTHERS THEN
3578: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
3579: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 30);
3580: pay_in_utils.trace(l_message,l_procedure);
3581: RAISE;
3582:
3575: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 20);
3576: EXCEPTION
3577: WHEN OTHERS THEN
3578: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
3579: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 30);
3580: pay_in_utils.trace(l_message,l_procedure);
3581: RAISE;
3582:
3583: END archive_payroll_data;
3576: EXCEPTION
3577: WHEN OTHERS THEN
3578: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
3579: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 30);
3580: pay_in_utils.trace(l_message,l_procedure);
3581: RAISE;
3582:
3583: END archive_payroll_data;
3584:
3745: l_asg_end_date DATE;
3746: BEGIN
3747:
3748: l_procedure := g_package ||'archive_pt_data';
3749: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
3750:
3751: IF g_debug THEN
3752: pay_in_utils.trace('Assignment Action id ',p_assignment_action_id);
3753: pay_in_utils.trace('Payroll Action id ',p_payroll_action_id);
3748: l_procedure := g_package ||'archive_pt_data';
3749: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
3750:
3751: IF g_debug THEN
3752: pay_in_utils.trace('Assignment Action id ',p_assignment_action_id);
3753: pay_in_utils.trace('Payroll Action id ',p_payroll_action_id);
3754: pay_in_utils.trace('Archive Action id ',p_archive_action_id);
3755: pay_in_utils.trace('Assignment id ',p_assignment_id);
3756: pay_in_utils.trace('Payroll Date ',p_payroll_date);
3749: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
3750:
3751: IF g_debug THEN
3752: pay_in_utils.trace('Assignment Action id ',p_assignment_action_id);
3753: pay_in_utils.trace('Payroll Action id ',p_payroll_action_id);
3754: pay_in_utils.trace('Archive Action id ',p_archive_action_id);
3755: pay_in_utils.trace('Assignment id ',p_assignment_id);
3756: pay_in_utils.trace('Payroll Date ',p_payroll_date);
3757: pay_in_utils.trace('Prepayment Date ',p_prepayment_date);
3750:
3751: IF g_debug THEN
3752: pay_in_utils.trace('Assignment Action id ',p_assignment_action_id);
3753: pay_in_utils.trace('Payroll Action id ',p_payroll_action_id);
3754: pay_in_utils.trace('Archive Action id ',p_archive_action_id);
3755: pay_in_utils.trace('Assignment id ',p_assignment_id);
3756: pay_in_utils.trace('Payroll Date ',p_payroll_date);
3757: pay_in_utils.trace('Prepayment Date ',p_prepayment_date);
3758: END IF;
3751: IF g_debug THEN
3752: pay_in_utils.trace('Assignment Action id ',p_assignment_action_id);
3753: pay_in_utils.trace('Payroll Action id ',p_payroll_action_id);
3754: pay_in_utils.trace('Archive Action id ',p_archive_action_id);
3755: pay_in_utils.trace('Assignment id ',p_assignment_id);
3756: pay_in_utils.trace('Payroll Date ',p_payroll_date);
3757: pay_in_utils.trace('Prepayment Date ',p_prepayment_date);
3758: END IF;
3759:
3752: pay_in_utils.trace('Assignment Action id ',p_assignment_action_id);
3753: pay_in_utils.trace('Payroll Action id ',p_payroll_action_id);
3754: pay_in_utils.trace('Archive Action id ',p_archive_action_id);
3755: pay_in_utils.trace('Assignment id ',p_assignment_id);
3756: pay_in_utils.trace('Payroll Date ',p_payroll_date);
3757: pay_in_utils.trace('Prepayment Date ',p_prepayment_date);
3758: END IF;
3759:
3760:
3753: pay_in_utils.trace('Payroll Action id ',p_payroll_action_id);
3754: pay_in_utils.trace('Archive Action id ',p_archive_action_id);
3755: pay_in_utils.trace('Assignment id ',p_assignment_id);
3756: pay_in_utils.trace('Payroll Date ',p_payroll_date);
3757: pay_in_utils.trace('Prepayment Date ',p_prepayment_date);
3758: END IF;
3759:
3760:
3761:
3761:
3762: --For each PT State for that assignment in that payroll run
3763: FOR c_rec_state IN c_pt_state(p_assignment_action_id)
3764: LOOP
3765: pay_in_utils.set_location(g_debug,l_procedure, 20);
3766:
3767: l_jur_code := c_rec_state.jurisdiction_code;
3768:
3769: IF g_debug THEN
3766:
3767: l_jur_code := c_rec_state.jurisdiction_code;
3768:
3769: IF g_debug THEN
3770: pay_in_utils.trace('Jurisdiction Code ',l_jur_code);
3771: END IF;
3772:
3773: /* Removed this as a part of bug fix 4774108
3774: FOR c_rec IN c_pt_org_id(p_assignment_action_id
3784: OPEN c_pt_org_id(p_assignment_action_id,l_jur_code);
3785: FETCH c_pt_org_id INTO l_source_id,l_pt_org_name,l_asg_end_date;
3786: CLOSE c_pt_org_id;
3787:
3788: pay_in_utils.set_location(g_debug,l_procedure, 20);
3789:
3790: --Find the assignments's full name
3791: OPEN c_person_full_name(p_assignment_action_id);
3792: FETCH c_person_full_name INTO l_full_name, l_person_id;
3792: FETCH c_person_full_name INTO l_full_name, l_person_id;
3793: CLOSE c_person_full_name;
3794:
3795: IF g_debug THEN
3796: pay_in_utils.trace('Jurisdiction Code ',l_jur_code);
3797: END IF;
3798:
3799:
3800: l_start_date := TRUNC(p_payroll_date, 'MM');
3800: l_start_date := TRUNC(p_payroll_date, 'MM');
3801: l_end_date := ADD_MONTHS(l_start_date, 1) - 1;
3802:
3803: IF g_debug THEN
3804: pay_in_utils.trace('PT-III l_start_date ',l_start_date);
3805: pay_in_utils.trace('PT-III l_end_date ',l_end_date);
3806: END IF;
3807:
3808:
3801: l_end_date := ADD_MONTHS(l_start_date, 1) - 1;
3802:
3803: IF g_debug THEN
3804: pay_in_utils.trace('PT-III l_start_date ',l_start_date);
3805: pay_in_utils.trace('PT-III l_end_date ',l_end_date);
3806: END IF;
3807:
3808:
3809: -- Populating the PL/SQL Tables with State and payroll action id
3807:
3808:
3809: -- Populating the PL/SQL Tables with State and payroll action id
3810:
3811: pay_in_utils.set_location(g_debug,l_procedure, 30);
3812:
3813: g_cnt_pt := g_cnt_pt + 1;
3814:
3815: g_pt_org_id(g_cnt_pt) := l_source_id;
3819: g_pt_jur_code(g_cnt_pt) := l_jur_code;
3820:
3821:
3822: IF g_debug THEN
3823: pay_in_utils.trace('PT-III g_pt_org_id ',g_pt_org_id(g_cnt_pt));
3824: pay_in_utils.trace('PT-III g_pt_org_id ',g_pt_act_id(g_cnt_pt));
3825: pay_in_utils.trace('PT-III g_pt_jur_code ',g_pt_jur_code(g_cnt_pt));
3826: END IF;
3827:
3820:
3821:
3822: IF g_debug THEN
3823: pay_in_utils.trace('PT-III g_pt_org_id ',g_pt_org_id(g_cnt_pt));
3824: pay_in_utils.trace('PT-III g_pt_org_id ',g_pt_act_id(g_cnt_pt));
3825: pay_in_utils.trace('PT-III g_pt_jur_code ',g_pt_jur_code(g_cnt_pt));
3826: END IF;
3827:
3828: --PT Salary
3821:
3822: IF g_debug THEN
3823: pay_in_utils.trace('PT-III g_pt_org_id ',g_pt_org_id(g_cnt_pt));
3824: pay_in_utils.trace('PT-III g_pt_org_id ',g_pt_act_id(g_cnt_pt));
3825: pay_in_utils.trace('PT-III g_pt_jur_code ',g_pt_jur_code(g_cnt_pt));
3826: END IF;
3827:
3828: --PT Salary
3829: pt_salary := pay_in_tax_utils.get_balance_value(
3832: ,p_dimension_name => '_ASG_STATE_DE_PTD'
3833: ,p_context_name => 'JURISDICTION_CODE'
3834: ,p_context_value => l_jur_code
3835: );
3836: pay_in_utils.set_location(g_debug,l_procedure, 20);
3837:
3838: IF g_debug THEN
3839: pay_in_utils.trace('PT Salary ',pt_salary);
3840: END IF;
3835: );
3836: pay_in_utils.set_location(g_debug,l_procedure, 20);
3837:
3838: IF g_debug THEN
3839: pay_in_utils.trace('PT Salary ',pt_salary);
3840: END IF;
3841:
3842: --Professional Tax
3843: pt := pay_in_tax_utils.get_balance_value(
3846: ,p_dimension_name => '_ASG_STATE_DE_PTD'
3847: ,p_context_name => 'JURISDICTION_CODE'
3848: ,p_context_value => l_jur_code
3849: );
3850: pay_in_utils.set_location(g_debug,l_procedure, 20);
3851:
3852: IF g_debug THEN
3853: pay_in_utils.trace('PT ',pt);
3854: END IF;
3849: );
3850: pay_in_utils.set_location(g_debug,l_procedure, 20);
3851:
3852: IF g_debug THEN
3853: pay_in_utils.trace('PT ',pt);
3854: END IF;
3855:
3856: l_asg_id := p_assignment_id;
3857: l_reason_for_exem := NULL;
3865: OPEN c_iv_id(l_element_type_id, 'State');
3866: FETCH c_iv_id INTO l_state_iv_id;
3867: CLOSE c_iv_id;
3868:
3869: pay_in_utils.set_location(g_debug,l_procedure, 20);
3870:
3871: OPEN c_iv_id(l_element_type_id, 'Exemption Reason');
3872: FETCH c_iv_id INTO l_reason_iv_id;
3873: CLOSE c_iv_id;
3871: OPEN c_iv_id(l_element_type_id, 'Exemption Reason');
3872: FETCH c_iv_id INTO l_reason_iv_id;
3873: CLOSE c_iv_id;
3874:
3875: pay_in_utils.set_location(g_debug,l_procedure, 20);
3876:
3877: FOR c_rec IN c_run_result_id(l_element_type_id)
3878: LOOP
3879: pay_in_utils.set_location(g_debug,l_procedure, 20);
3875: pay_in_utils.set_location(g_debug,l_procedure, 20);
3876:
3877: FOR c_rec IN c_run_result_id(l_element_type_id)
3878: LOOP
3879: pay_in_utils.set_location(g_debug,l_procedure, 20);
3880: OPEN c_exempt_reason(c_rec.run_result_id
3881: ,l_state_iv_id
3882: ,l_reason_iv_id
3883: ,l_jur_code);
3885: CLOSE c_exempt_reason;
3886:
3887: END LOOP;
3888:
3889: pay_in_utils.set_location(g_debug,l_procedure, 20);
3890:
3891: IF g_debug THEN
3892: pay_in_utils.trace('PT Exemption Reason ',l_reason_for_exem);
3893: END IF;
3888:
3889: pay_in_utils.set_location(g_debug,l_procedure, 20);
3890:
3891: IF g_debug THEN
3892: pay_in_utils.trace('PT Exemption Reason ',l_reason_for_exem);
3893: END IF;
3894:
3895: IF (l_reason_for_exem IS NOT NULL) THEN
3896: l_exempted_frm_pt := 'Yes';
3946: ,p_object_version_number => l_ovn --OUT Parameters
3947: );
3948:
3949: END LOOP;
3950: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 20);
3951: EXCEPTION
3952: WHEN OTHERS THEN
3953: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
3954: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 30);
3949: END LOOP;
3950: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 20);
3951: EXCEPTION
3952: WHEN OTHERS THEN
3953: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
3954: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 30);
3955: pay_in_utils.trace(l_message,l_procedure);
3956: RAISE;
3957:
3950: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 20);
3951: EXCEPTION
3952: WHEN OTHERS THEN
3953: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
3954: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 30);
3955: pay_in_utils.trace(l_message,l_procedure);
3956: RAISE;
3957:
3958: END archive_pt_data;
3951: EXCEPTION
3952: WHEN OTHERS THEN
3953: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
3954: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 30);
3955: pay_in_utils.trace(l_message,l_procedure);
3956: RAISE;
3957:
3958: END archive_pt_data;
3959:
4084: l_act_inf_cat := 'IN_PT_PAY';
4085:
4086:
4087: l_procedure := g_package ||'archive_pt_payroll_data';
4088: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
4089:
4090:
4091: FOR i IN 1..l_count LOOP
4092: pay_in_utils.set_location(g_debug,l_procedure, 20);
4088: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
4089:
4090:
4091: FOR i IN 1..l_count LOOP
4092: pay_in_utils.set_location(g_debug,l_procedure, 20);
4093:
4094: -- Getting Action Id, Organization Id, Jurisdiction Code
4095: l_act_id := g_pt_act_id(i);
4096: l_org_id := g_pt_org_id(i);
4097: l_jur_code := g_pt_jur_code(i);
4098: l_source_id := l_org_id;
4099:
4100: IF g_debug THEN
4101: pay_in_utils.trace('PT-III Payroll_Level Org ID ',l_org_id);
4102: END IF;
4103:
4104:
4105:
4107: OPEN c_effective_date(l_act_id);
4108: FETCH c_effective_date INTO l_effective_date;
4109: CLOSE c_effective_date;
4110:
4111: pay_in_utils.set_location(g_debug,l_procedure, 30);
4112:
4113:
4114: --Contribution Period
4115: l_contr_year := TO_CHAR(pay_in_tax_utils.get_financial_year_start(l_effective_date), 'YYYY')||'-'||to_char(pay_in_tax_utils.get_financial_year_end(l_effective_date), 'YYYY');
4123: ,l_bsrtc_no
4124: ,l_address;
4125: CLOSE c_registered_name;
4126:
4127: pay_in_utils.set_location(g_debug,l_procedure, 40);
4128:
4129: --PT Org Name
4130: OPEN c_org_name(l_org_id
4131: ,l_effective_date);
4139: FETCH c_rep_name INTO l_org_rep_name
4140: , l_rep_person_id;
4141: CLOSE c_rep_name;
4142:
4143: pay_in_utils.set_location(g_debug,l_procedure, 50);
4144:
4145: -- Representative Designation
4146: OPEN c_rep_pos(l_rep_person_id
4147: ,l_effective_date);
4147: ,l_effective_date);
4148: FETCH c_rep_pos INTO l_rep_pos;
4149: CLOSE c_rep_pos;
4150:
4151: pay_in_utils.set_location(g_debug,l_procedure, 60);
4152:
4153: pay_action_information_api.create_action_information
4154: (p_action_context_id => l_act_id --Payroll Action id
4155: ,p_action_context_type => 'PA'
4175: );
4176: END LOOP;
4177:
4178: IF g_debug THEN
4179: pay_in_utils.trace('Payroll Action id ',l_act_id);
4180: pay_in_utils.trace('Action Information Category ',l_act_inf_cat);
4181: pay_in_utils.trace('Jurisdiction Code ',l_jur_code);
4182: pay_in_utils.trace('Source ID ',l_source_id);
4183: pay_in_utils.trace('Effective Date ',l_effective_date);
4176: END LOOP;
4177:
4178: IF g_debug THEN
4179: pay_in_utils.trace('Payroll Action id ',l_act_id);
4180: pay_in_utils.trace('Action Information Category ',l_act_inf_cat);
4181: pay_in_utils.trace('Jurisdiction Code ',l_jur_code);
4182: pay_in_utils.trace('Source ID ',l_source_id);
4183: pay_in_utils.trace('Effective Date ',l_effective_date);
4184: pay_in_utils.trace('Contribution year ',l_contr_year);
4177:
4178: IF g_debug THEN
4179: pay_in_utils.trace('Payroll Action id ',l_act_id);
4180: pay_in_utils.trace('Action Information Category ',l_act_inf_cat);
4181: pay_in_utils.trace('Jurisdiction Code ',l_jur_code);
4182: pay_in_utils.trace('Source ID ',l_source_id);
4183: pay_in_utils.trace('Effective Date ',l_effective_date);
4184: pay_in_utils.trace('Contribution year ',l_contr_year);
4185: pay_in_utils.trace('Contribution Month ',l_contr_month);
4178: IF g_debug THEN
4179: pay_in_utils.trace('Payroll Action id ',l_act_id);
4180: pay_in_utils.trace('Action Information Category ',l_act_inf_cat);
4181: pay_in_utils.trace('Jurisdiction Code ',l_jur_code);
4182: pay_in_utils.trace('Source ID ',l_source_id);
4183: pay_in_utils.trace('Effective Date ',l_effective_date);
4184: pay_in_utils.trace('Contribution year ',l_contr_year);
4185: pay_in_utils.trace('Contribution Month ',l_contr_month);
4186: pay_in_utils.trace('bsrtc number ',l_bsrtc_no);
4179: pay_in_utils.trace('Payroll Action id ',l_act_id);
4180: pay_in_utils.trace('Action Information Category ',l_act_inf_cat);
4181: pay_in_utils.trace('Jurisdiction Code ',l_jur_code);
4182: pay_in_utils.trace('Source ID ',l_source_id);
4183: pay_in_utils.trace('Effective Date ',l_effective_date);
4184: pay_in_utils.trace('Contribution year ',l_contr_year);
4185: pay_in_utils.trace('Contribution Month ',l_contr_month);
4186: pay_in_utils.trace('bsrtc number ',l_bsrtc_no);
4187: pay_in_utils.trace('Registered name ',l_reg_name);
4180: pay_in_utils.trace('Action Information Category ',l_act_inf_cat);
4181: pay_in_utils.trace('Jurisdiction Code ',l_jur_code);
4182: pay_in_utils.trace('Source ID ',l_source_id);
4183: pay_in_utils.trace('Effective Date ',l_effective_date);
4184: pay_in_utils.trace('Contribution year ',l_contr_year);
4185: pay_in_utils.trace('Contribution Month ',l_contr_month);
4186: pay_in_utils.trace('bsrtc number ',l_bsrtc_no);
4187: pay_in_utils.trace('Registered name ',l_reg_name);
4188: pay_in_utils.trace('Representative Name ',l_org_rep_name);
4181: pay_in_utils.trace('Jurisdiction Code ',l_jur_code);
4182: pay_in_utils.trace('Source ID ',l_source_id);
4183: pay_in_utils.trace('Effective Date ',l_effective_date);
4184: pay_in_utils.trace('Contribution year ',l_contr_year);
4185: pay_in_utils.trace('Contribution Month ',l_contr_month);
4186: pay_in_utils.trace('bsrtc number ',l_bsrtc_no);
4187: pay_in_utils.trace('Registered name ',l_reg_name);
4188: pay_in_utils.trace('Representative Name ',l_org_rep_name);
4189: pay_in_utils.trace('Address ',l_address);
4182: pay_in_utils.trace('Source ID ',l_source_id);
4183: pay_in_utils.trace('Effective Date ',l_effective_date);
4184: pay_in_utils.trace('Contribution year ',l_contr_year);
4185: pay_in_utils.trace('Contribution Month ',l_contr_month);
4186: pay_in_utils.trace('bsrtc number ',l_bsrtc_no);
4187: pay_in_utils.trace('Registered name ',l_reg_name);
4188: pay_in_utils.trace('Representative Name ',l_org_rep_name);
4189: pay_in_utils.trace('Address ',l_address);
4190: pay_in_utils.trace('Registration No ',l_reg_no);
4183: pay_in_utils.trace('Effective Date ',l_effective_date);
4184: pay_in_utils.trace('Contribution year ',l_contr_year);
4185: pay_in_utils.trace('Contribution Month ',l_contr_month);
4186: pay_in_utils.trace('bsrtc number ',l_bsrtc_no);
4187: pay_in_utils.trace('Registered name ',l_reg_name);
4188: pay_in_utils.trace('Representative Name ',l_org_rep_name);
4189: pay_in_utils.trace('Address ',l_address);
4190: pay_in_utils.trace('Registration No ',l_reg_no);
4191: pay_in_utils.trace('PT Org Name ',l_org_name);
4184: pay_in_utils.trace('Contribution year ',l_contr_year);
4185: pay_in_utils.trace('Contribution Month ',l_contr_month);
4186: pay_in_utils.trace('bsrtc number ',l_bsrtc_no);
4187: pay_in_utils.trace('Registered name ',l_reg_name);
4188: pay_in_utils.trace('Representative Name ',l_org_rep_name);
4189: pay_in_utils.trace('Address ',l_address);
4190: pay_in_utils.trace('Registration No ',l_reg_no);
4191: pay_in_utils.trace('PT Org Name ',l_org_name);
4192: pay_in_utils.trace('PT Org Rep Pos ',l_rep_pos);
4185: pay_in_utils.trace('Contribution Month ',l_contr_month);
4186: pay_in_utils.trace('bsrtc number ',l_bsrtc_no);
4187: pay_in_utils.trace('Registered name ',l_reg_name);
4188: pay_in_utils.trace('Representative Name ',l_org_rep_name);
4189: pay_in_utils.trace('Address ',l_address);
4190: pay_in_utils.trace('Registration No ',l_reg_no);
4191: pay_in_utils.trace('PT Org Name ',l_org_name);
4192: pay_in_utils.trace('PT Org Rep Pos ',l_rep_pos);
4193: pay_in_utils.trace('Action information id ',l_action_info_id);
4186: pay_in_utils.trace('bsrtc number ',l_bsrtc_no);
4187: pay_in_utils.trace('Registered name ',l_reg_name);
4188: pay_in_utils.trace('Representative Name ',l_org_rep_name);
4189: pay_in_utils.trace('Address ',l_address);
4190: pay_in_utils.trace('Registration No ',l_reg_no);
4191: pay_in_utils.trace('PT Org Name ',l_org_name);
4192: pay_in_utils.trace('PT Org Rep Pos ',l_rep_pos);
4193: pay_in_utils.trace('Action information id ',l_action_info_id);
4194: pay_in_utils.trace('Next Period Date ',l_ovn);
4187: pay_in_utils.trace('Registered name ',l_reg_name);
4188: pay_in_utils.trace('Representative Name ',l_org_rep_name);
4189: pay_in_utils.trace('Address ',l_address);
4190: pay_in_utils.trace('Registration No ',l_reg_no);
4191: pay_in_utils.trace('PT Org Name ',l_org_name);
4192: pay_in_utils.trace('PT Org Rep Pos ',l_rep_pos);
4193: pay_in_utils.trace('Action information id ',l_action_info_id);
4194: pay_in_utils.trace('Next Period Date ',l_ovn);
4195:
4188: pay_in_utils.trace('Representative Name ',l_org_rep_name);
4189: pay_in_utils.trace('Address ',l_address);
4190: pay_in_utils.trace('Registration No ',l_reg_no);
4191: pay_in_utils.trace('PT Org Name ',l_org_name);
4192: pay_in_utils.trace('PT Org Rep Pos ',l_rep_pos);
4193: pay_in_utils.trace('Action information id ',l_action_info_id);
4194: pay_in_utils.trace('Next Period Date ',l_ovn);
4195:
4196: END IF;
4189: pay_in_utils.trace('Address ',l_address);
4190: pay_in_utils.trace('Registration No ',l_reg_no);
4191: pay_in_utils.trace('PT Org Name ',l_org_name);
4192: pay_in_utils.trace('PT Org Rep Pos ',l_rep_pos);
4193: pay_in_utils.trace('Action information id ',l_action_info_id);
4194: pay_in_utils.trace('Next Period Date ',l_ovn);
4195:
4196: END IF;
4197:
4190: pay_in_utils.trace('Registration No ',l_reg_no);
4191: pay_in_utils.trace('PT Org Name ',l_org_name);
4192: pay_in_utils.trace('PT Org Rep Pos ',l_rep_pos);
4193: pay_in_utils.trace('Action information id ',l_action_info_id);
4194: pay_in_utils.trace('Next Period Date ',l_ovn);
4195:
4196: END IF;
4197:
4198: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 70);
4194: pay_in_utils.trace('Next Period Date ',l_ovn);
4195:
4196: END IF;
4197:
4198: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 70);
4199: EXCEPTION
4200: WHEN OTHERS THEN
4201: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
4202: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 80);
4197:
4198: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 70);
4199: EXCEPTION
4200: WHEN OTHERS THEN
4201: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
4202: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 80);
4203: pay_in_utils.trace(l_message,l_procedure);
4204:
4205: RAISE;
4198: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 70);
4199: EXCEPTION
4200: WHEN OTHERS THEN
4201: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
4202: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 80);
4203: pay_in_utils.trace(l_message,l_procedure);
4204:
4205: RAISE;
4206:
4199: EXCEPTION
4200: WHEN OTHERS THEN
4201: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
4202: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 80);
4203: pay_in_utils.trace(l_message,l_procedure);
4204:
4205: RAISE;
4206:
4207: END archive_pt_payroll_data;
4419: BEGIN
4420: --
4421: g_debug := hr_utility.debug_enabled;
4422: l_procedure := g_package || '.archive_code';
4423: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
4424:
4425: pay_in_utils.set_location(g_debug,l_procedure, 20);
4426:
4427: IF g_debug THEN
4421: g_debug := hr_utility.debug_enabled;
4422: l_procedure := g_package || '.archive_code';
4423: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
4424:
4425: pay_in_utils.set_location(g_debug,l_procedure, 20);
4426:
4427: IF g_debug THEN
4428:
4429: pay_in_utils.trace('Assignment Action id ',p_assignment_action_id);
4425: pay_in_utils.set_location(g_debug,l_procedure, 20);
4426:
4427: IF g_debug THEN
4428:
4429: pay_in_utils.trace('Assignment Action id ',p_assignment_action_id);
4430: pay_in_utils.trace('Effective Date ',p_effective_date);
4431:
4432: END IF;
4433:
4426:
4427: IF g_debug THEN
4428:
4429: pay_in_utils.trace('Assignment Action id ',p_assignment_action_id);
4430: pay_in_utils.trace('Effective Date ',p_effective_date);
4431:
4432: END IF;
4433:
4434:
4439: l_init_exists := 0;
4440: -- use cursor suggested by core
4441: FOR csr_init_rec IN get_bal_init_aa(p_assignment_action_id)
4442: LOOP
4443: pay_in_utils.set_location(g_debug,l_procedure, 30);
4444:
4445: IF g_debug THEN
4446:
4447: pay_in_utils.trace('p_assignment_action_id ',csr_init_rec.init_assignment_action_id);
4443: pay_in_utils.set_location(g_debug,l_procedure, 30);
4444:
4445: IF g_debug THEN
4446:
4447: pay_in_utils.trace('p_assignment_action_id ',csr_init_rec.init_assignment_action_id);
4448: pay_in_utils.trace('p_archive_action_id ',csr_init_rec.arch_assignment_action_id);
4449: pay_in_utils.trace('p_assignment_id ',csr_init_rec.assignment_id);
4450: pay_in_utils.trace('p_payroll_date ',csr_init_rec.init_effective_date);
4451: pay_in_utils.trace('p_payroll_action_id ',csr_init_rec.arch_payroll_action_id);
4444:
4445: IF g_debug THEN
4446:
4447: pay_in_utils.trace('p_assignment_action_id ',csr_init_rec.init_assignment_action_id);
4448: pay_in_utils.trace('p_archive_action_id ',csr_init_rec.arch_assignment_action_id);
4449: pay_in_utils.trace('p_assignment_id ',csr_init_rec.assignment_id);
4450: pay_in_utils.trace('p_payroll_date ',csr_init_rec.init_effective_date);
4451: pay_in_utils.trace('p_payroll_action_id ',csr_init_rec.arch_payroll_action_id);
4452: pay_in_utils.trace('p_run_payroll_action_id ',csr_init_rec.init_payroll_action_id );
4445: IF g_debug THEN
4446:
4447: pay_in_utils.trace('p_assignment_action_id ',csr_init_rec.init_assignment_action_id);
4448: pay_in_utils.trace('p_archive_action_id ',csr_init_rec.arch_assignment_action_id);
4449: pay_in_utils.trace('p_assignment_id ',csr_init_rec.assignment_id);
4450: pay_in_utils.trace('p_payroll_date ',csr_init_rec.init_effective_date);
4451: pay_in_utils.trace('p_payroll_action_id ',csr_init_rec.arch_payroll_action_id);
4452: pay_in_utils.trace('p_run_payroll_action_id ',csr_init_rec.init_payroll_action_id );
4453: END IF;
4446:
4447: pay_in_utils.trace('p_assignment_action_id ',csr_init_rec.init_assignment_action_id);
4448: pay_in_utils.trace('p_archive_action_id ',csr_init_rec.arch_assignment_action_id);
4449: pay_in_utils.trace('p_assignment_id ',csr_init_rec.assignment_id);
4450: pay_in_utils.trace('p_payroll_date ',csr_init_rec.init_effective_date);
4451: pay_in_utils.trace('p_payroll_action_id ',csr_init_rec.arch_payroll_action_id);
4452: pay_in_utils.trace('p_run_payroll_action_id ',csr_init_rec.init_payroll_action_id );
4453: END IF;
4454:
4447: pay_in_utils.trace('p_assignment_action_id ',csr_init_rec.init_assignment_action_id);
4448: pay_in_utils.trace('p_archive_action_id ',csr_init_rec.arch_assignment_action_id);
4449: pay_in_utils.trace('p_assignment_id ',csr_init_rec.assignment_id);
4450: pay_in_utils.trace('p_payroll_date ',csr_init_rec.init_effective_date);
4451: pay_in_utils.trace('p_payroll_action_id ',csr_init_rec.arch_payroll_action_id);
4452: pay_in_utils.trace('p_run_payroll_action_id ',csr_init_rec.init_payroll_action_id );
4453: END IF;
4454:
4455: archive_form_data( p_assignment_action_id => csr_init_rec.init_assignment_action_id
4448: pay_in_utils.trace('p_archive_action_id ',csr_init_rec.arch_assignment_action_id);
4449: pay_in_utils.trace('p_assignment_id ',csr_init_rec.assignment_id);
4450: pay_in_utils.trace('p_payroll_date ',csr_init_rec.init_effective_date);
4451: pay_in_utils.trace('p_payroll_action_id ',csr_init_rec.arch_payroll_action_id);
4452: pay_in_utils.trace('p_run_payroll_action_id ',csr_init_rec.init_payroll_action_id );
4453: END IF;
4454:
4455: archive_form_data( p_assignment_action_id => csr_init_rec.init_assignment_action_id
4456: ,p_archive_action_id => csr_init_rec.arch_assignment_action_id
4460: ,p_payroll_action_id => csr_init_rec.arch_payroll_action_id
4461: ,p_run_payroll_action_id => csr_init_rec.init_payroll_action_id
4462: );
4463:
4464: pay_in_utils.set_location(g_debug,l_procedure, 40);
4465:
4466: archive_esi_data( p_assignment_action_id => csr_init_rec.init_assignment_action_id
4467: ,p_archive_action_id => csr_init_rec.arch_assignment_action_id
4468: ,p_assignment_id => csr_init_rec.assignment_id
4470: ,p_prepayment_date => csr_init_rec.init_effective_date
4471: ,p_payroll_action_id => csr_init_rec.arch_payroll_action_id
4472: );
4473:
4474: pay_in_utils.set_location(g_debug,l_procedure, 50);
4475:
4476: archive_pt_data( p_assignment_action_id => csr_init_rec.init_assignment_action_id
4477: ,p_archive_action_id => csr_init_rec.arch_assignment_action_id
4478: ,p_assignment_id => csr_init_rec.assignment_id
4479: ,p_payroll_date => csr_init_rec.init_effective_date
4480: ,p_prepayment_date => csr_init_rec.init_effective_date
4481: ,p_payroll_action_id => csr_init_rec.arch_payroll_action_id
4482: );
4483: pay_in_utils.set_location(g_debug,l_procedure, 60);
4484:
4485: archive_form24q_balances
4486: (
4487: p_assignment_action_id => csr_init_rec.init_assignment_action_id
4492: ,p_payroll_action_id => csr_init_rec.arch_payroll_action_id
4493: ,p_run_payroll_action_id => csr_init_rec.init_payroll_action_id
4494: ,p_pre_assact_id => csr_init_rec.init_assignment_action_id
4495: );
4496: pay_in_utils.set_location(g_debug,l_procedure, 70);
4497:
4498: l_init_exists := 1;
4499: END LOOP;
4500:
4499: END LOOP;
4500:
4501:
4502:
4503: pay_in_utils.set_location(g_debug,l_procedure, 80);
4504:
4505: IF l_init_exists = 0 THEN
4506: pay_in_utils.set_location(g_debug,l_procedure, 90);
4507: -- Create Child Assignment Actions
4502:
4503: pay_in_utils.set_location(g_debug,l_procedure, 80);
4504:
4505: IF l_init_exists = 0 THEN
4506: pay_in_utils.set_location(g_debug,l_procedure, 90);
4507: -- Create Child Assignment Actions
4508: pay_core_payslip_utils.generate_child_actions(p_assignment_action_id
4509: ,p_effective_date);
4510:
4510:
4511: FOR csr_rec IN get_payslip_aa(p_assignment_action_id)
4512: LOOP
4513: --
4514: pay_in_utils.set_location(g_debug,l_procedure, 100);
4515: -- Added for bug 5593925
4516: open csr_payment_date(csr_rec.run_assignment_action_id);
4517: fetch csr_payment_date into l_payment_date;
4518: if csr_payment_date%NOTFOUND then
4520: end if;
4521: close csr_payment_date;
4522:
4523: IF g_debug THEN
4524: pay_in_utils.trace('Pre assignment_action_id ',csr_rec.pre_assignment_action_id);
4525: pay_in_utils.trace('Run Date Earned ',csr_rec.run_date_earned);
4526: pay_in_utils.trace('Child assignment_action_id ',csr_rec.chld_arc_assignment_action_id);
4527: pay_in_utils.trace('Assignment id ',csr_rec.assignment_id);
4528: pay_in_utils.trace('Pre Effective Date ',csr_rec.pre_effective_date);
4521: close csr_payment_date;
4522:
4523: IF g_debug THEN
4524: pay_in_utils.trace('Pre assignment_action_id ',csr_rec.pre_assignment_action_id);
4525: pay_in_utils.trace('Run Date Earned ',csr_rec.run_date_earned);
4526: pay_in_utils.trace('Child assignment_action_id ',csr_rec.chld_arc_assignment_action_id);
4527: pay_in_utils.trace('Assignment id ',csr_rec.assignment_id);
4528: pay_in_utils.trace('Pre Effective Date ',csr_rec.pre_effective_date);
4529: pay_in_utils.trace('Arc payroll action_id ',csr_rec.arc_payroll_action_id);
4522:
4523: IF g_debug THEN
4524: pay_in_utils.trace('Pre assignment_action_id ',csr_rec.pre_assignment_action_id);
4525: pay_in_utils.trace('Run Date Earned ',csr_rec.run_date_earned);
4526: pay_in_utils.trace('Child assignment_action_id ',csr_rec.chld_arc_assignment_action_id);
4527: pay_in_utils.trace('Assignment id ',csr_rec.assignment_id);
4528: pay_in_utils.trace('Pre Effective Date ',csr_rec.pre_effective_date);
4529: pay_in_utils.trace('Arc payroll action_id ',csr_rec.arc_payroll_action_id);
4530: pay_in_utils.trace('Run Payroll action_id ',csr_rec.run_payroll_action_id);
4523: IF g_debug THEN
4524: pay_in_utils.trace('Pre assignment_action_id ',csr_rec.pre_assignment_action_id);
4525: pay_in_utils.trace('Run Date Earned ',csr_rec.run_date_earned);
4526: pay_in_utils.trace('Child assignment_action_id ',csr_rec.chld_arc_assignment_action_id);
4527: pay_in_utils.trace('Assignment id ',csr_rec.assignment_id);
4528: pay_in_utils.trace('Pre Effective Date ',csr_rec.pre_effective_date);
4529: pay_in_utils.trace('Arc payroll action_id ',csr_rec.arc_payroll_action_id);
4530: pay_in_utils.trace('Run Payroll action_id ',csr_rec.run_payroll_action_id);
4531: END IF;
4524: pay_in_utils.trace('Pre assignment_action_id ',csr_rec.pre_assignment_action_id);
4525: pay_in_utils.trace('Run Date Earned ',csr_rec.run_date_earned);
4526: pay_in_utils.trace('Child assignment_action_id ',csr_rec.chld_arc_assignment_action_id);
4527: pay_in_utils.trace('Assignment id ',csr_rec.assignment_id);
4528: pay_in_utils.trace('Pre Effective Date ',csr_rec.pre_effective_date);
4529: pay_in_utils.trace('Arc payroll action_id ',csr_rec.arc_payroll_action_id);
4530: pay_in_utils.trace('Run Payroll action_id ',csr_rec.run_payroll_action_id);
4531: END IF;
4532:
4525: pay_in_utils.trace('Run Date Earned ',csr_rec.run_date_earned);
4526: pay_in_utils.trace('Child assignment_action_id ',csr_rec.chld_arc_assignment_action_id);
4527: pay_in_utils.trace('Assignment id ',csr_rec.assignment_id);
4528: pay_in_utils.trace('Pre Effective Date ',csr_rec.pre_effective_date);
4529: pay_in_utils.trace('Arc payroll action_id ',csr_rec.arc_payroll_action_id);
4530: pay_in_utils.trace('Run Payroll action_id ',csr_rec.run_payroll_action_id);
4531: END IF;
4532:
4533: OPEN c_multi_rec_count(csr_rec.pre_assignment_action_id);
4526: pay_in_utils.trace('Child assignment_action_id ',csr_rec.chld_arc_assignment_action_id);
4527: pay_in_utils.trace('Assignment id ',csr_rec.assignment_id);
4528: pay_in_utils.trace('Pre Effective Date ',csr_rec.pre_effective_date);
4529: pay_in_utils.trace('Arc payroll action_id ',csr_rec.arc_payroll_action_id);
4530: pay_in_utils.trace('Run Payroll action_id ',csr_rec.run_payroll_action_id);
4531: END IF;
4532:
4533: OPEN c_multi_rec_count(csr_rec.pre_assignment_action_id);
4534: FETCH c_multi_rec_count INTO l_count;
4534: FETCH c_multi_rec_count INTO l_count;
4535: CLOSE c_multi_rec_count;
4536: FOR i IN 0..l_count
4537: LOOP
4538: pay_in_utils.set_location(g_debug,l_procedure, 110);
4539: l_asg_id:=NULL;
4540: l_date:=NULL;
4541: OPEN c_multi_records(csr_rec.pre_assignment_action_id,csr_rec.run_date_earned,i);
4542: FETCH c_multi_records INTO l_asg_id,l_date;
4546: FETCH get_rvsl_records INTO l_reversal_asg_action_id;
4547: CLOSE get_rvsl_records;
4548:
4549: IF (l_asg_id IS NOT NULL)AND(l_date IS NOT NULL) THEN
4550: pay_in_utils.set_location(g_debug,l_procedure, 120);
4551: archive_form_data(
4552: p_assignment_action_id => nvl(l_reversal_asg_action_id,l_asg_id)
4553: ,p_archive_action_id => csr_rec.chld_arc_assignment_action_id
4554: ,p_assignment_id => csr_rec.assignment_id
4561:
4562:
4563:
4564: IF g_debug THEN
4565: pay_in_utils.trace('l_date ',l_date);
4566: END IF;
4567:
4568: pay_in_utils.set_location(g_debug,l_procedure, 130);
4569:
4564: IF g_debug THEN
4565: pay_in_utils.trace('l_date ',l_date);
4566: END IF;
4567:
4568: pay_in_utils.set_location(g_debug,l_procedure, 130);
4569:
4570: archive_esi_data(
4571: p_assignment_action_id =>nvl(l_reversal_asg_action_id,l_asg_id)
4572: ,p_archive_action_id =>csr_rec.chld_arc_assignment_action_id
4574: ,p_payroll_date =>l_date
4575: ,p_prepayment_date =>csr_rec.pre_effective_date
4576: ,p_payroll_action_id =>csr_rec.arc_payroll_action_id
4577: );
4578: pay_in_utils.set_location(g_debug,l_procedure, 140);
4579:
4580: archive_pt_data(
4581: p_assignment_action_id =>nvl(l_reversal_asg_action_id,l_asg_id)
4582: ,p_archive_action_id =>csr_rec.chld_arc_assignment_action_id
4588: ELSE
4589: EXIT;
4590: END IF;
4591: END LOOP;
4592: pay_in_utils.set_location(g_debug,l_procedure, 150);
4593: --
4594: -- Call to procedure to archive User Configurable Balances
4595: --
4596:
4600: ,p_run_assignment_action_id => csr_rec.run_assignment_action_id -- payroll assignment action id
4601: ,p_pre_effective_date => csr_rec.pre_effective_date -- prepayment effecive date
4602: );
4603:
4604: pay_in_utils.set_location(g_debug,l_procedure, 160);
4605: --
4606: -- Call to procedure to archive User Configurable Elements
4607: --
4608:
4613: ,p_latest_run_assact_id => csr_rec.run_assignment_action_id -- payroll assignment action id
4614: ,p_pre_effective_date => csr_rec.pre_effective_date -- prepayment effective date
4615: );
4616:
4617: pay_in_utils.set_location(g_debug,l_procedure, 170);
4618: --
4619: -- Call to procedure to archive Statutory Elements
4620: --
4621:
4625: ,p_effective_date => csr_rec.pre_effective_date -- prepayment effective date
4626: ,p_assact_id => csr_rec.chld_arc_assignment_action_id -- archive assignment action id
4627: );
4628:
4629: pay_in_utils.set_location(g_debug,l_procedure, 180);
4630: --
4631: -- Call to procedure to archive Statutory Balances
4632: --
4633:
4639: ,p_effective_date => csr_rec.pre_effective_date -- prepayments effective date
4640: ,p_assact_id => csr_rec.chld_arc_assignment_action_id -- archive assignment action id
4641: );
4642:
4643: pay_in_utils.set_location(g_debug,l_procedure, 190);
4644: --
4645: -- Call to procedure to archive Employee Details
4646: --
4647:
4657: ,p_run_effective_date => csr_rec.run_effective_date -- run effective Date
4658: ,p_time_period_id => csr_rec.time_period_id -- time_period_id from per_time_periods
4659: ,p_pre_effective_date => csr_rec.pre_effective_date -- prepayment effective date
4660: );
4661: pay_in_utils.set_location(g_debug,l_procedure, 200);
4662:
4663: --
4664: -- Call to procedure to archive accrual details
4665: --
4676: ,p_period_end_date => csr_rec.period_end_date -- latest period end date
4677: ,p_period_start_date => csr_rec.period_start_date -- latest period start date
4678: );
4679:
4680: pay_in_utils.set_location(g_debug,l_procedure, 210);
4681: --
4682: -- Call to procedure to archive absences
4683: --
4684:
4687: p_arch_act_id => csr_rec.chld_arc_assignment_action_id -- archive assignment action id
4688: ,p_assg_act_id => csr_rec.run_assignment_action_id -- payroll run action id
4689: ,p_pre_effective_date => csr_rec.pre_effective_date -- prepayment effective date
4690: );
4691: pay_in_utils.set_location(g_debug,l_procedure, 220);
4692:
4693: --
4694: -- Call to procedure to archive form24 tax Balances
4695: --
4703: ,p_payroll_action_id => csr_rec.arc_payroll_action_id
4704: ,p_run_payroll_action_id =>csr_rec.run_payroll_action_id
4705: ,p_pre_assact_id => csr_rec.pre_assignment_action_id
4706: );
4707: pay_in_utils.set_location(g_debug,l_procedure, 230);
4708: --
4709: END LOOP;
4710: END IF;
4711: archive_payroll_data('PF');
4708: --
4709: END LOOP;
4710: END IF;
4711: archive_payroll_data('PF');
4712: pay_in_utils.set_location(g_debug,l_procedure, 240);
4713:
4714: archive_payroll_data('ESI');
4715: pay_in_utils.set_location(g_debug,l_procedure, 250);
4716:
4711: archive_payroll_data('PF');
4712: pay_in_utils.set_location(g_debug,l_procedure, 240);
4713:
4714: archive_payroll_data('ESI');
4715: pay_in_utils.set_location(g_debug,l_procedure, 250);
4716:
4717: archive_pt_payroll_data;
4718: pay_in_utils.set_location(g_debug,l_procedure, 260);
4719:
4714: archive_payroll_data('ESI');
4715: pay_in_utils.set_location(g_debug,l_procedure, 250);
4716:
4717: archive_pt_payroll_data;
4718: pay_in_utils.set_location(g_debug,l_procedure, 260);
4719:
4720: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 270);
4721: --
4722:
4716:
4717: archive_pt_payroll_data;
4718: pay_in_utils.set_location(g_debug,l_procedure, 260);
4719:
4720: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 270);
4721: --
4722:
4723: EXCEPTION
4724: WHEN OTHERS THEN
4724: WHEN OTHERS THEN
4725: IF get_payslip_aa%ISOPEN THEN
4726: CLOSE get_payslip_aa;
4727: END IF;
4728: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
4729: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 280);
4730: pay_in_utils.trace(l_message,l_procedure);
4731:
4732: RAISE;
4725: IF get_payslip_aa%ISOPEN THEN
4726: CLOSE get_payslip_aa;
4727: END IF;
4728: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
4729: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 280);
4730: pay_in_utils.trace(l_message,l_procedure);
4731:
4732: RAISE;
4733: --
4726: CLOSE get_payslip_aa;
4727: END IF;
4728: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
4729: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 280);
4730: pay_in_utils.trace(l_message,l_procedure);
4731:
4732: RAISE;
4733: --
4734: END archive_code;