[Home] [Help]
52: l_procedure := g_package || 'range_code';
53: -- Call core package to return SQL string to SELECT a range
54: -- of assignments eligible for archival
55: --
56: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
57: pay_core_payslip_utils.range_cursor(p_payroll_action_id
58: ,p_sql);
59: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 20);
60: --
55: --
56: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
57: pay_core_payslip_utils.range_cursor(p_payroll_action_id
58: ,p_sql);
59: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 20);
60: --
61: EXCEPTION
62: WHEN OTHERS THEN
63: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
59: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 20);
60: --
61: EXCEPTION
62: WHEN OTHERS THEN
63: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
64: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 30);
65: pay_in_utils.trace(l_message,l_procedure);
66: RAISE;
67: --
60: --
61: EXCEPTION
62: WHEN OTHERS THEN
63: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
64: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 30);
65: pay_in_utils.trace(l_message,l_procedure);
66: RAISE;
67: --
68: END range_code;
61: EXCEPTION
62: WHEN OTHERS THEN
63: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
64: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 30);
65: pay_in_utils.trace(l_message,l_procedure);
66: RAISE;
67: --
68: END range_code;
69:
109: BEGIN
110:
111:
112: l_procedure := g_package ||'get_parameters';
113: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
114:
115:
116: IF g_debug THEN
117: pay_in_utils.trace('Payroll Action id ',p_payroll_action_id);
113: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
114:
115:
116: IF g_debug THEN
117: pay_in_utils.trace('Payroll Action id ',p_payroll_action_id);
118: pay_in_utils.trace('Token Name ',p_token_name);
119: END IF;
120:
121:
114:
115:
116: IF g_debug THEN
117: pay_in_utils.trace('Payroll Action id ',p_payroll_action_id);
118: pay_in_utils.trace('Token Name ',p_token_name);
119: END IF;
120:
121:
122: OPEN csr_parameter_info(p_payroll_action_id,
136: p_token_value := '%';
137: END IF;
138:
139: IF g_debug THEN
140: pay_in_utils.trace('Token Value ',p_token_value);
141: END IF;
142:
143: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 20);
144:
139: IF g_debug THEN
140: pay_in_utils.trace('Token Value ',p_token_value);
141: END IF;
142:
143: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 20);
144:
145:
146: END get_parameters;
147: --------------------------------------------------------------------------
176: --
177: g_debug := hr_utility.debug_enabled;
178: l_procedure := g_package || 'initialization_code';
179:
180: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
181:
182: g_archive_pact := p_payroll_action_id;
183:
184: IF g_debug THEN
181:
182: g_archive_pact := p_payroll_action_id;
183:
184: IF g_debug THEN
185: pay_in_utils.trace('Payroll Action id ',p_payroll_action_id);
186: END IF;
187:
188: get_parameters(p_payroll_action_id,'YEAR',g_year);
189: get_parameters(p_payroll_action_id,'GRE',g_gre_id);
194: INTO g_system_date
195: FROM fnd_sessions
196: WHERE session_id = USERENV('sessionid');
197:
198: pay_in_utils.set_location(g_debug,l_procedure, 20);
199:
200: g_start_date := fnd_date.string_to_date(('01/04/'|| SUBSTR(g_year,1,4)),'DD/MM/YYYY');
201: g_end_date := fnd_date.string_to_date(('31/03/'|| SUBSTR(g_year,6)),'DD/MM/YYYY');
202:
206: SELECT FND_PROFILE.VALUE('PER_BUSINESS_GROUP_ID')
207: INTO g_bg_id
208: FROM dual;
209:
210: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 30);
211: --
212: EXCEPTION
213: WHEN OTHERS THEN
214: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
210: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 30);
211: --
212: EXCEPTION
213: WHEN OTHERS THEN
214: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
215: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 40);
216: pay_in_utils.trace(l_message,l_procedure);
217: RAISE;
218: END initialization_code;
211: --
212: EXCEPTION
213: WHEN OTHERS THEN
214: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
215: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 40);
216: pay_in_utils.trace(l_message,l_procedure);
217: RAISE;
218: END initialization_code;
219:
212: EXCEPTION
213: WHEN OTHERS THEN
214: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
215: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 40);
216: pay_in_utils.trace(l_message,l_procedure);
217: RAISE;
218: END initialization_code;
219:
220:
307: --
308: BEGIN
309:
310: l_procedure := g_package ||'process_employee_type';
311: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
312:
313: -- Determine the presence of an asg in a GRE, if GRE was specified.
314: IF (g_gre_id <> '%')
315: THEN
312:
313: -- Determine the presence of an asg in a GRE, if GRE was specified.
314: IF (g_gre_id <> '%')
315: THEN
316: pay_in_utils.set_location(g_debug,l_procedure, 20);
317: OPEN c_gre_employee;
318: FETCH c_gre_employee INTO l_flag;
319: CLOSE c_gre_employee;
320: -- Added NVL for bug 4964645
318: FETCH c_gre_employee INTO l_flag;
319: CLOSE c_gre_employee;
320: -- Added NVL for bug 4964645
321: IF (NVL(l_flag,-1) <> 1) THEN
322: pay_in_utils.set_location(g_debug,l_procedure, 30);
323: RETURN FALSE;
324: END IF;
325:
326: END IF;
331: CLOSE c_termination_check;
332: --
333: l_flag := NULL;
334: --
335: pay_in_utils.set_location(g_debug,l_procedure, 20);
336: IF (g_employee_type NOT IN('ALL','CURRENT'))
337: THEN
338: pay_in_utils.set_location(g_debug,l_procedure, 30);
339: --Checking for terminated and transferred cases.
334: --
335: pay_in_utils.set_location(g_debug,l_procedure, 20);
336: IF (g_employee_type NOT IN('ALL','CURRENT'))
337: THEN
338: pay_in_utils.set_location(g_debug,l_procedure, 30);
339: --Checking for terminated and transferred cases.
340: IF (g_term_date BETWEEN g_start_date AND g_end_date-1)
341: THEN
342: RETURN TRUE;
345: l_flag := NULL;
346: OPEN c_gre_count;
347: FETCH c_gre_count INTO l_flag;
348: CLOSE c_gre_count;
349: pay_in_utils.set_location(g_debug,l_procedure, 40);
350: IF (l_flag < 2)
351: THEN
352: pay_in_utils.set_location(g_debug,l_procedure, 50);
353: RETURN FALSE; /* This assignment did not go any change in GRE/Legal entity and hence
348: CLOSE c_gre_count;
349: pay_in_utils.set_location(g_debug,l_procedure, 40);
350: IF (l_flag < 2)
351: THEN
352: pay_in_utils.set_location(g_debug,l_procedure, 50);
353: RETURN FALSE; /* This assignment did not go any change in GRE/Legal entity and hence
354: returning false */
355: ELSIF(g_gre_id = '%') THEN
356: pay_in_utils.set_location(g_debug,l_procedure, 60);
352: pay_in_utils.set_location(g_debug,l_procedure, 50);
353: RETURN FALSE; /* This assignment did not go any change in GRE/Legal entity and hence
354: returning false */
355: ELSIF(g_gre_id = '%') THEN
356: pay_in_utils.set_location(g_debug,l_procedure, 60);
357: RETURN TRUE; /* Returning true as this asg had changes in GRE/Legal Entity. */
358: ELSE
359: pay_in_utils.set_location(g_debug,l_procedure, 70);
360: l_flag := NULL; -- This assignment was attached to the specified GRE.
355: ELSIF(g_gre_id = '%') THEN
356: pay_in_utils.set_location(g_debug,l_procedure, 60);
357: RETURN TRUE; /* Returning true as this asg had changes in GRE/Legal Entity. */
358: ELSE
359: pay_in_utils.set_location(g_debug,l_procedure, 70);
360: l_flag := NULL; -- This assignment was attached to the specified GRE.
361: OPEN c_gre_id; -- Now check for transfer. For this check the GRE as on the
362: FETCH c_gre_id INTO l_flag; -- last day of financial year. If its same, then there was
363: CLOSE c_gre_id; -- no transfer and return false, else return true.
370: END IF;
371: ELSE
372: --Start Checking for Regular Employee, i.e the employees who are attached to the specified GRE
373: --as on the last day of the financial year.
374: pay_in_utils.set_location(g_debug,l_procedure, 80);
375: IF (g_term_date >= g_end_date)
376: THEN -- Employee is a regular one.
377: pay_in_utils.set_location(g_debug,l_procedure, 90);
378: IF(g_gre_id = '%')
373: --as on the last day of the financial year.
374: pay_in_utils.set_location(g_debug,l_procedure, 80);
375: IF (g_term_date >= g_end_date)
376: THEN -- Employee is a regular one.
377: pay_in_utils.set_location(g_debug,l_procedure, 90);
378: IF(g_gre_id = '%')
379: THEN
380: RETURN TRUE;
381: ELSE
389: RETURN FALSE;
390: END IF;
391: END IF;
392: ELSE
393: pay_in_utils.set_location(g_debug,l_procedure, 100);
394: IF (g_employee_type ='ALL')
395: THEN
396: RETURN TRUE;
397: ELSE
463: BEGIN
464: --
465: l_procedure := g_package || 'assignment_action_code';
466: g_debug := hr_utility.debug_enabled;
467: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
468:
469: get_parameters(p_payroll_action_id,'BG_ID',l_bg_id);
470: get_parameters(p_payroll_action_id,'YEAR',g_year);
471: get_parameters(p_payroll_action_id,'GRE',g_gre_id);
470: get_parameters(p_payroll_action_id,'YEAR',g_year);
471: get_parameters(p_payroll_action_id,'GRE',g_gre_id);
472: get_parameters(p_payroll_action_id,'EMPLOYEE_TYPE',g_employee_type);
473:
474: pay_in_utils.set_location(g_debug,l_procedure, 20);
475: SELECT TRUNC(effective_date)
476: INTO g_system_date
477: FROM fnd_sessions
478: WHERE session_id = USERENV('sessionid');
486:
487: g_start_date := ADD_MONTHS(g_start_date,-12);
488: g_end_date := ADD_MONTHS(g_end_date,-12);
489:
490: pay_in_utils.set_location(g_debug,l_procedure, 30);
491:
492:
493: FOR csr_rec IN c_process_assignments
494: LOOP
491:
492:
493: FOR csr_rec IN c_process_assignments
494: LOOP
495: pay_in_utils.set_location(g_debug,l_procedure, 40);
496: l_flag := FALSE;
497:
498: IF g_debug THEN
499: pay_in_utils.trace('Assignment id ',csr_rec.assignment_id);
495: pay_in_utils.set_location(g_debug,l_procedure, 40);
496: l_flag := FALSE;
497:
498: IF g_debug THEN
499: pay_in_utils.trace('Assignment id ',csr_rec.assignment_id);
500: END IF;
501:
502:
503: l_flag := process_employee_type(p_employee_type => g_employee_type
503: l_flag := process_employee_type(p_employee_type => g_employee_type
504: ,p_assignment_id => csr_rec.assignment_id
505: ,p_gre_id => g_gre_id);
506: IF (l_flag = TRUE) THEN
507: pay_in_utils.set_location(g_debug,l_procedure, 50);
508: SELECT pay_assignment_actions_s.NEXTVAL
509: INTO l_action_id
510: FROM dual;
511:
516: );
517: END IF;
518:
519: END LOOP;
520: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 60);
521: --
522: EXCEPTION
523: WHEN OTHERS THEN
524: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
520: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 60);
521: --
522: EXCEPTION
523: WHEN OTHERS THEN
524: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
525: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 70);
526: pay_in_utils.trace(l_message,l_procedure);
527: RAISE;
528: END assignment_action_code;
521: --
522: EXCEPTION
523: WHEN OTHERS THEN
524: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
525: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 70);
526: pay_in_utils.trace(l_message,l_procedure);
527: RAISE;
528: END assignment_action_code;
529:
522: EXCEPTION
523: WHEN OTHERS THEN
524: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
525: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 70);
526: pay_in_utils.trace(l_message,l_procedure);
527: RAISE;
528: END assignment_action_code;
529:
530: --------------------------------------------------------------------------
672:
673: BEGIN
674:
675: l_procedure := g_package ||'archive_person_data';
676: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
677:
678: IF g_debug THEN
679: pay_in_utils.trace('Run Assignment Action id ',p_run_asg_action_id);
680: pay_in_utils.trace('Archive Assignment Action id ',p_arc_asg_action_id);
675: l_procedure := g_package ||'archive_person_data';
676: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
677:
678: IF g_debug THEN
679: pay_in_utils.trace('Run Assignment Action id ',p_run_asg_action_id);
680: pay_in_utils.trace('Archive Assignment Action id ',p_arc_asg_action_id);
681: pay_in_utils.trace('Archive payroll Action id ',p_arc_payroll_act_id);
682: pay_in_utils.trace('Prepayment Date ',p_prepayment_date);
683: pay_in_utils.trace('Assignment id ',p_assignment_id);
676: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
677:
678: IF g_debug THEN
679: pay_in_utils.trace('Run Assignment Action id ',p_run_asg_action_id);
680: pay_in_utils.trace('Archive Assignment Action id ',p_arc_asg_action_id);
681: pay_in_utils.trace('Archive payroll Action id ',p_arc_payroll_act_id);
682: pay_in_utils.trace('Prepayment Date ',p_prepayment_date);
683: pay_in_utils.trace('Assignment id ',p_assignment_id);
684: pay_in_utils.trace('GRE id ',p_gre_id);
677:
678: IF g_debug THEN
679: pay_in_utils.trace('Run Assignment Action id ',p_run_asg_action_id);
680: pay_in_utils.trace('Archive Assignment Action id ',p_arc_asg_action_id);
681: pay_in_utils.trace('Archive payroll Action id ',p_arc_payroll_act_id);
682: pay_in_utils.trace('Prepayment Date ',p_prepayment_date);
683: pay_in_utils.trace('Assignment id ',p_assignment_id);
684: pay_in_utils.trace('GRE id ',p_gre_id);
685: pay_in_utils.trace('Payroll Run Date ',p_payroll_run_date);
678: IF g_debug THEN
679: pay_in_utils.trace('Run Assignment Action id ',p_run_asg_action_id);
680: pay_in_utils.trace('Archive Assignment Action id ',p_arc_asg_action_id);
681: pay_in_utils.trace('Archive payroll Action id ',p_arc_payroll_act_id);
682: pay_in_utils.trace('Prepayment Date ',p_prepayment_date);
683: pay_in_utils.trace('Assignment id ',p_assignment_id);
684: pay_in_utils.trace('GRE id ',p_gre_id);
685: pay_in_utils.trace('Payroll Run Date ',p_payroll_run_date);
686: pay_in_utils.trace('Effective Start Date ',p_effective_start_date);
679: pay_in_utils.trace('Run Assignment Action id ',p_run_asg_action_id);
680: pay_in_utils.trace('Archive Assignment Action id ',p_arc_asg_action_id);
681: pay_in_utils.trace('Archive payroll Action id ',p_arc_payroll_act_id);
682: pay_in_utils.trace('Prepayment Date ',p_prepayment_date);
683: pay_in_utils.trace('Assignment id ',p_assignment_id);
684: pay_in_utils.trace('GRE id ',p_gre_id);
685: pay_in_utils.trace('Payroll Run Date ',p_payroll_run_date);
686: pay_in_utils.trace('Effective Start Date ',p_effective_start_date);
687: pay_in_utils.trace('Effective End Date ',p_effective_end_date);
680: pay_in_utils.trace('Archive Assignment Action id ',p_arc_asg_action_id);
681: pay_in_utils.trace('Archive payroll Action id ',p_arc_payroll_act_id);
682: pay_in_utils.trace('Prepayment Date ',p_prepayment_date);
683: pay_in_utils.trace('Assignment id ',p_assignment_id);
684: pay_in_utils.trace('GRE id ',p_gre_id);
685: pay_in_utils.trace('Payroll Run Date ',p_payroll_run_date);
686: pay_in_utils.trace('Effective Start Date ',p_effective_start_date);
687: pay_in_utils.trace('Effective End Date ',p_effective_end_date);
688: END IF;
681: pay_in_utils.trace('Archive payroll Action id ',p_arc_payroll_act_id);
682: pay_in_utils.trace('Prepayment Date ',p_prepayment_date);
683: pay_in_utils.trace('Assignment id ',p_assignment_id);
684: pay_in_utils.trace('GRE id ',p_gre_id);
685: pay_in_utils.trace('Payroll Run Date ',p_payroll_run_date);
686: pay_in_utils.trace('Effective Start Date ',p_effective_start_date);
687: pay_in_utils.trace('Effective End Date ',p_effective_end_date);
688: END IF;
689:
682: pay_in_utils.trace('Prepayment Date ',p_prepayment_date);
683: pay_in_utils.trace('Assignment id ',p_assignment_id);
684: pay_in_utils.trace('GRE id ',p_gre_id);
685: pay_in_utils.trace('Payroll Run Date ',p_payroll_run_date);
686: pay_in_utils.trace('Effective Start Date ',p_effective_start_date);
687: pay_in_utils.trace('Effective End Date ',p_effective_end_date);
688: END IF;
689:
690: OPEN c_emp_no;
683: pay_in_utils.trace('Assignment id ',p_assignment_id);
684: pay_in_utils.trace('GRE id ',p_gre_id);
685: pay_in_utils.trace('Payroll Run Date ',p_payroll_run_date);
686: pay_in_utils.trace('Effective Start Date ',p_effective_start_date);
687: pay_in_utils.trace('Effective End Date ',p_effective_end_date);
688: END IF;
689:
690: OPEN c_emp_no;
691: FETCH c_emp_no INTO l_emp_no,l_person_id,l_interest,l_pan,l_name,l_emp_title,l_dob,l_gender,l_residential_status, l_email_address;
700: OPEN c_pos;
701: FETCH c_pos INTO l_pos,l_job;
702: CLOSE c_pos;
703:
704: pay_in_utils.set_location(g_debug,l_procedure, 20);
705:
706: OPEN c_father_name(l_person_id);
707: FETCH c_father_name INTO l_father_name,l_emp_fath_title;
708: CLOSE c_father_name;
713:
714: OPEN c_phone(l_person_id);
715: FETCH c_phone INTO l_phone_no,l_phone_type;
716: CLOSE c_phone;
717: pay_in_utils.set_location(g_debug,l_procedure, 30);
718: --
719: -- Bug 4621622 : Added this code to handle termination case
720: --
721: IF p_effective_start_date > p_effective_end_date THEN
725: END IF;
726: --
727: -- Bug 4621622 changes end
728: --
729: pay_in_utils.set_location(g_debug,l_procedure, 40);
730:
731: pay_action_information_api.create_action_information
732: (p_action_context_id => p_arc_asg_action_id
733: ,p_action_context_type => 'AAP'
762: ,p_object_version_number => l_ovn
763: );
764:
765: IF g_debug THEN
766: pay_in_utils.trace('Employee Name ',l_name);
767: pay_in_utils.trace('Employee Number ',l_emp_no);
768: pay_in_utils.trace('Start Date ',p_effective_start_date);
769: pay_in_utils.trace('End Date ',l_effective_end_date);
770: pay_in_utils.trace('Job ',l_job);
763: );
764:
765: IF g_debug THEN
766: pay_in_utils.trace('Employee Name ',l_name);
767: pay_in_utils.trace('Employee Number ',l_emp_no);
768: pay_in_utils.trace('Start Date ',p_effective_start_date);
769: pay_in_utils.trace('End Date ',l_effective_end_date);
770: pay_in_utils.trace('Job ',l_job);
771: pay_in_utils.trace('Position ',l_pos);
764:
765: IF g_debug THEN
766: pay_in_utils.trace('Employee Name ',l_name);
767: pay_in_utils.trace('Employee Number ',l_emp_no);
768: pay_in_utils.trace('Start Date ',p_effective_start_date);
769: pay_in_utils.trace('End Date ',l_effective_end_date);
770: pay_in_utils.trace('Job ',l_job);
771: pay_in_utils.trace('Position ',l_pos);
772: END IF;
765: IF g_debug THEN
766: pay_in_utils.trace('Employee Name ',l_name);
767: pay_in_utils.trace('Employee Number ',l_emp_no);
768: pay_in_utils.trace('Start Date ',p_effective_start_date);
769: pay_in_utils.trace('End Date ',l_effective_end_date);
770: pay_in_utils.trace('Job ',l_job);
771: pay_in_utils.trace('Position ',l_pos);
772: END IF;
773:
766: pay_in_utils.trace('Employee Name ',l_name);
767: pay_in_utils.trace('Employee Number ',l_emp_no);
768: pay_in_utils.trace('Start Date ',p_effective_start_date);
769: pay_in_utils.trace('End Date ',l_effective_end_date);
770: pay_in_utils.trace('Job ',l_job);
771: pay_in_utils.trace('Position ',l_pos);
772: END IF;
773:
774: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 50);
767: pay_in_utils.trace('Employee Number ',l_emp_no);
768: pay_in_utils.trace('Start Date ',p_effective_start_date);
769: pay_in_utils.trace('End Date ',l_effective_end_date);
770: pay_in_utils.trace('Job ',l_job);
771: pay_in_utils.trace('Position ',l_pos);
772: END IF;
773:
774: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 50);
775:
770: pay_in_utils.trace('Job ',l_job);
771: pay_in_utils.trace('Position ',l_pos);
772: END IF;
773:
774: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 50);
775:
776: END archive_person_data;
777:
778: --------------------------------------------------------------------------
803:
804: BEGIN
805:
806: l_procedure := g_package ||'balance_difference';
807: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
808:
809: FOR i IN 1..GREATEST(g_result_table1.COUNT,g_result_table2.COUNT)
810: LOOP
811: g_result_table(i).balance_value :=
811: g_result_table(i).balance_value :=
812: NVL(g_result_table1(i).balance_value,0)
813: - NVL(g_result_table2(i).balance_value,0);
814: END LOOP;
815: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 20);
816:
817: END;
818: --------------------------------------------------------------------------
819: -- --
867:
868: BEGIN
869:
870: l_procedure := g_package ||'archive_balances';
871: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
872:
873:
874: IF g_debug THEN
875: pay_in_utils.trace('Run Asg Action id ',p_run_asg_action_id);
871: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
872:
873:
874: IF g_debug THEN
875: pay_in_utils.trace('Run Asg Action id ',p_run_asg_action_id);
876: pay_in_utils.trace('Prev GRE Asg action id ',pre_gre_asg_act_id);
877: pay_in_utils.trace('Archive Asg Action id ',p_arc_asg_action_id);
878: pay_in_utils.trace('GRE id ',p_gre_id);
879: pay_in_utils.trace('Action Info Category ',p_action_inf_category);
872:
873:
874: IF g_debug THEN
875: pay_in_utils.trace('Run Asg Action id ',p_run_asg_action_id);
876: pay_in_utils.trace('Prev GRE Asg action id ',pre_gre_asg_act_id);
877: pay_in_utils.trace('Archive Asg Action id ',p_arc_asg_action_id);
878: pay_in_utils.trace('GRE id ',p_gre_id);
879: pay_in_utils.trace('Action Info Category ',p_action_inf_category);
880: pay_in_utils.trace('Balance name ',p_balance_name);
873:
874: IF g_debug THEN
875: pay_in_utils.trace('Run Asg Action id ',p_run_asg_action_id);
876: pay_in_utils.trace('Prev GRE Asg action id ',pre_gre_asg_act_id);
877: pay_in_utils.trace('Archive Asg Action id ',p_arc_asg_action_id);
878: pay_in_utils.trace('GRE id ',p_gre_id);
879: pay_in_utils.trace('Action Info Category ',p_action_inf_category);
880: pay_in_utils.trace('Balance name ',p_balance_name);
881: pay_in_utils.trace('Balance name1 ',p_balance_name1);
874: IF g_debug THEN
875: pay_in_utils.trace('Run Asg Action id ',p_run_asg_action_id);
876: pay_in_utils.trace('Prev GRE Asg action id ',pre_gre_asg_act_id);
877: pay_in_utils.trace('Archive Asg Action id ',p_arc_asg_action_id);
878: pay_in_utils.trace('GRE id ',p_gre_id);
879: pay_in_utils.trace('Action Info Category ',p_action_inf_category);
880: pay_in_utils.trace('Balance name ',p_balance_name);
881: pay_in_utils.trace('Balance name1 ',p_balance_name1);
882: pay_in_utils.trace('Balance name2 ',p_balance_name2);
875: pay_in_utils.trace('Run Asg Action id ',p_run_asg_action_id);
876: pay_in_utils.trace('Prev GRE Asg action id ',pre_gre_asg_act_id);
877: pay_in_utils.trace('Archive Asg Action id ',p_arc_asg_action_id);
878: pay_in_utils.trace('GRE id ',p_gre_id);
879: pay_in_utils.trace('Action Info Category ',p_action_inf_category);
880: pay_in_utils.trace('Balance name ',p_balance_name);
881: pay_in_utils.trace('Balance name1 ',p_balance_name1);
882: pay_in_utils.trace('Balance name2 ',p_balance_name2);
883: pay_in_utils.trace('Balance name31 ',p_balance_name3);
876: pay_in_utils.trace('Prev GRE Asg action id ',pre_gre_asg_act_id);
877: pay_in_utils.trace('Archive Asg Action id ',p_arc_asg_action_id);
878: pay_in_utils.trace('GRE id ',p_gre_id);
879: pay_in_utils.trace('Action Info Category ',p_action_inf_category);
880: pay_in_utils.trace('Balance name ',p_balance_name);
881: pay_in_utils.trace('Balance name1 ',p_balance_name1);
882: pay_in_utils.trace('Balance name2 ',p_balance_name2);
883: pay_in_utils.trace('Balance name31 ',p_balance_name3);
884: pay_in_utils.trace('Dimension Name ',p_balance_dimension);
877: pay_in_utils.trace('Archive Asg Action id ',p_arc_asg_action_id);
878: pay_in_utils.trace('GRE id ',p_gre_id);
879: pay_in_utils.trace('Action Info Category ',p_action_inf_category);
880: pay_in_utils.trace('Balance name ',p_balance_name);
881: pay_in_utils.trace('Balance name1 ',p_balance_name1);
882: pay_in_utils.trace('Balance name2 ',p_balance_name2);
883: pay_in_utils.trace('Balance name31 ',p_balance_name3);
884: pay_in_utils.trace('Dimension Name ',p_balance_dimension);
885: pay_in_utils.trace('Dimension Name1 ',p_balance_dimension1);
878: pay_in_utils.trace('GRE id ',p_gre_id);
879: pay_in_utils.trace('Action Info Category ',p_action_inf_category);
880: pay_in_utils.trace('Balance name ',p_balance_name);
881: pay_in_utils.trace('Balance name1 ',p_balance_name1);
882: pay_in_utils.trace('Balance name2 ',p_balance_name2);
883: pay_in_utils.trace('Balance name31 ',p_balance_name3);
884: pay_in_utils.trace('Dimension Name ',p_balance_dimension);
885: pay_in_utils.trace('Dimension Name1 ',p_balance_dimension1);
886: pay_in_utils.trace('Dimension Name2 ',p_balance_dimension2);
879: pay_in_utils.trace('Action Info Category ',p_action_inf_category);
880: pay_in_utils.trace('Balance name ',p_balance_name);
881: pay_in_utils.trace('Balance name1 ',p_balance_name1);
882: pay_in_utils.trace('Balance name2 ',p_balance_name2);
883: pay_in_utils.trace('Balance name31 ',p_balance_name3);
884: pay_in_utils.trace('Dimension Name ',p_balance_dimension);
885: pay_in_utils.trace('Dimension Name1 ',p_balance_dimension1);
886: pay_in_utils.trace('Dimension Name2 ',p_balance_dimension2);
887: pay_in_utils.trace('Dimension Name3 ',p_balance_dimension3);
880: pay_in_utils.trace('Balance name ',p_balance_name);
881: pay_in_utils.trace('Balance name1 ',p_balance_name1);
882: pay_in_utils.trace('Balance name2 ',p_balance_name2);
883: pay_in_utils.trace('Balance name31 ',p_balance_name3);
884: pay_in_utils.trace('Dimension Name ',p_balance_dimension);
885: pay_in_utils.trace('Dimension Name1 ',p_balance_dimension1);
886: pay_in_utils.trace('Dimension Name2 ',p_balance_dimension2);
887: pay_in_utils.trace('Dimension Name3 ',p_balance_dimension3);
888:
881: pay_in_utils.trace('Balance name1 ',p_balance_name1);
882: pay_in_utils.trace('Balance name2 ',p_balance_name2);
883: pay_in_utils.trace('Balance name31 ',p_balance_name3);
884: pay_in_utils.trace('Dimension Name ',p_balance_dimension);
885: pay_in_utils.trace('Dimension Name1 ',p_balance_dimension1);
886: pay_in_utils.trace('Dimension Name2 ',p_balance_dimension2);
887: pay_in_utils.trace('Dimension Name3 ',p_balance_dimension3);
888:
889: END IF;
882: pay_in_utils.trace('Balance name2 ',p_balance_name2);
883: pay_in_utils.trace('Balance name31 ',p_balance_name3);
884: pay_in_utils.trace('Dimension Name ',p_balance_dimension);
885: pay_in_utils.trace('Dimension Name1 ',p_balance_dimension1);
886: pay_in_utils.trace('Dimension Name2 ',p_balance_dimension2);
887: pay_in_utils.trace('Dimension Name3 ',p_balance_dimension3);
888:
889: END IF;
890:
883: pay_in_utils.trace('Balance name31 ',p_balance_name3);
884: pay_in_utils.trace('Dimension Name ',p_balance_dimension);
885: pay_in_utils.trace('Dimension Name1 ',p_balance_dimension1);
886: pay_in_utils.trace('Dimension Name2 ',p_balance_dimension2);
887: pay_in_utils.trace('Dimension Name3 ',p_balance_dimension3);
888:
889: END IF;
890:
891: /* Allowance Advance functionality Start */
889: END IF;
890:
891: /* Allowance Advance functionality Start */
892: IF (p_action_inf_category ='IN_EOY_ALLOW') THEN
893: pay_in_utils.set_location(g_debug,l_procedure, 21);
894:
895: g_balance_value_tab(1).defined_balance_id :=
896: pay_in_tax_utils.get_defined_balance('Adjusted Advance for Allowances','_ASG_COMP_YTD');
897:
899: ,p_defined_balance_lst => g_balance_value_tab
900: ,p_context_lst => g_context_table
901: ,p_output_table => l_result_table1
902: );
903: pay_in_utils.set_location(g_debug,l_procedure, 22);
904:
905: IF pre_gre_asg_act_id IS NOT NULL
906: THEN
907: pay_in_utils.set_location(g_debug,l_procedure, 30);
903: pay_in_utils.set_location(g_debug,l_procedure, 22);
904:
905: IF pre_gre_asg_act_id IS NOT NULL
906: THEN
907: pay_in_utils.set_location(g_debug,l_procedure, 30);
908: pay_balance_pkg.get_value(p_assignment_action_id => pre_gre_asg_act_id
909: ,p_defined_balance_lst => g_balance_value_tab
910: ,p_context_lst => g_context_table
911: ,p_output_table => l_result_table2
913: balance_difference(l_result_table1,l_result_table2,l_result_table4);
914: ELSE
915: l_result_table4 := l_result_table1;
916: END IF;
917: pay_in_utils.set_location(g_debug,l_procedure, 23);
918:
919: l_result_table1.DELETE;
920: l_result_table2.DELETE;
921:
920: l_result_table2.DELETE;
921:
922:
923: END IF;
924: pay_in_utils.set_location(g_debug,l_procedure, 25);
925: /* Allowance Advance functionality End*/
926:
927: g_balance_value_tab(1).defined_balance_id :=
928: pay_in_tax_utils.get_defined_balance(p_balance_name,p_balance_dimension);
932: ,p_context_lst => g_context_table
933: ,p_output_table => l_result_table1--g_result_table
934: );
935:
936: pay_in_utils.set_location(g_debug,l_procedure, 20);
937:
938: IF pre_gre_asg_act_id IS NOT NULL
939: THEN
940: pay_in_utils.set_location(g_debug,l_procedure, 30);
936: pay_in_utils.set_location(g_debug,l_procedure, 20);
937:
938: IF pre_gre_asg_act_id IS NOT NULL
939: THEN
940: pay_in_utils.set_location(g_debug,l_procedure, 30);
941: pay_balance_pkg.get_value(p_assignment_action_id => pre_gre_asg_act_id
942: ,p_defined_balance_lst => g_balance_value_tab
943: ,p_context_lst => g_context_table
944: ,p_output_table => l_result_table2
947: ELSE
948: g_result_table := l_result_table1;
949: END IF;
950:
951: pay_in_utils.set_location(g_debug,l_procedure, 40);
952:
953: IF (p_balance_name1 IS NOT NULL)
954: THEN
955: pay_in_utils.set_location(g_debug,l_procedure, 50);
951: pay_in_utils.set_location(g_debug,l_procedure, 40);
952:
953: IF (p_balance_name1 IS NOT NULL)
954: THEN
955: pay_in_utils.set_location(g_debug,l_procedure, 50);
956: g_balance_value_tab(1).defined_balance_id :=
957: pay_in_tax_utils.get_defined_balance(p_balance_name1,p_balance_dimension1);
958:
959: pay_balance_pkg.get_value(p_assignment_action_id => p_run_asg_action_id
962: ,p_output_table => l_result_table1--g_result_table1
963: );
964: IF pre_gre_asg_act_id IS NOT NULL AND p_action_inf_category = 'IN_EOY_PERQ'
965: THEN
966: pay_in_utils.set_location(g_debug,l_procedure, 60);
967: pay_balance_pkg.get_value(p_assignment_action_id => pre_gre_asg_act_id
968: ,p_defined_balance_lst => g_balance_value_tab
969: ,p_context_lst => g_context_table
970: ,p_output_table => l_result_table2
970: ,p_output_table => l_result_table2
971: );
972: balance_difference(l_result_table1,l_result_table2,g_result_table1);
973: ELSE
974: pay_in_utils.set_location(g_debug,l_procedure, 70);
975: g_result_table1 := l_result_table1;
976: END IF;
977: END IF;
978: pay_in_utils.set_location(g_debug,l_procedure, 80);
974: pay_in_utils.set_location(g_debug,l_procedure, 70);
975: g_result_table1 := l_result_table1;
976: END IF;
977: END IF;
978: pay_in_utils.set_location(g_debug,l_procedure, 80);
979:
980: IF (p_balance_name2 IS NOT NULL)
981: THEN
982: pay_in_utils.set_location(g_debug,l_procedure, 90);
978: pay_in_utils.set_location(g_debug,l_procedure, 80);
979:
980: IF (p_balance_name2 IS NOT NULL)
981: THEN
982: pay_in_utils.set_location(g_debug,l_procedure, 90);
983: g_balance_value_tab(1).defined_balance_id :=
984: pay_in_tax_utils.get_defined_balance(p_balance_name2,p_balance_dimension2);
985:
986: pay_balance_pkg.get_value(p_assignment_action_id => p_run_asg_action_id
989: ,p_output_table => l_result_table1--g_result_table2
990: );
991: IF pre_gre_asg_act_id IS NOT NULL
992: THEN
993: pay_in_utils.set_location(g_debug,l_procedure, 100);
994: pay_balance_pkg.get_value(p_assignment_action_id => pre_gre_asg_act_id
995: ,p_defined_balance_lst => g_balance_value_tab
996: ,p_context_lst => g_context_table
997: ,p_output_table => l_result_table2
1000: ELSE
1001: g_result_table2 := l_result_table1;
1002: END IF;
1003: END IF;
1004: pay_in_utils.set_location(g_debug,l_procedure, 110);
1005:
1006: IF (p_balance_name3 IS NOT NULL)
1007: THEN
1008: pay_in_utils.set_location(g_debug,l_procedure, 120);
1004: pay_in_utils.set_location(g_debug,l_procedure, 110);
1005:
1006: IF (p_balance_name3 IS NOT NULL)
1007: THEN
1008: pay_in_utils.set_location(g_debug,l_procedure, 120);
1009: g_balance_value_tab(1).defined_balance_id :=
1010: pay_in_tax_utils.get_defined_balance(p_balance_name3,p_balance_dimension3);
1011:
1012: pay_balance_pkg.get_value(p_assignment_action_id => p_run_asg_action_id
1015: ,p_output_table => g_result_table3
1016: );
1017: END IF;
1018:
1019: pay_in_utils.set_location(g_debug,l_procedure, 130);
1020: pay_in_utils.trace('**************************************************','********************');
1021: IF (p_action_inf_category = 'IN_EOY_ALLOW')
1022: THEN
1023: pay_in_utils.set_location(g_debug,l_procedure, 140);
1016: );
1017: END IF;
1018:
1019: pay_in_utils.set_location(g_debug,l_procedure, 130);
1020: pay_in_utils.trace('**************************************************','********************');
1021: IF (p_action_inf_category = 'IN_EOY_ALLOW')
1022: THEN
1023: pay_in_utils.set_location(g_debug,l_procedure, 140);
1024: FOR i IN 1..g_context_table.COUNT
1019: pay_in_utils.set_location(g_debug,l_procedure, 130);
1020: pay_in_utils.trace('**************************************************','********************');
1021: IF (p_action_inf_category = 'IN_EOY_ALLOW')
1022: THEN
1023: pay_in_utils.set_location(g_debug,l_procedure, 140);
1024: FOR i IN 1..g_context_table.COUNT
1025: LOOP
1026: IF ((g_result_table(i).balance_value <> 0)
1027: OR(NVL(g_result_table1(i).balance_value,0) <> 0)
1043: ,p_action_information_id => l_action_info_id
1044: ,p_object_version_number => l_ovn
1045: );
1046: IF g_debug THEN
1047: pay_in_utils.trace('ALLOWANCE Name ',g_context_table(i).source_text2);
1048: pay_in_utils.trace('ALLOWANCE Amt ',NVL(g_result_table(i).balance_value,0));
1049: pay_in_utils.trace('ALLOWANCE Taxable Amt ',NVL(g_result_table1(i).balance_value,0));
1050: pay_in_utils.trace('ALLOWANCE Std Amt ',NVL(g_result_table2(i).balance_value,0));
1051: pay_in_utils.trace('ALLOWANCE Std Taxable Amt ',NVL(g_result_table3(i).balance_value,0));
1044: ,p_object_version_number => l_ovn
1045: );
1046: IF g_debug THEN
1047: pay_in_utils.trace('ALLOWANCE Name ',g_context_table(i).source_text2);
1048: pay_in_utils.trace('ALLOWANCE Amt ',NVL(g_result_table(i).balance_value,0));
1049: pay_in_utils.trace('ALLOWANCE Taxable Amt ',NVL(g_result_table1(i).balance_value,0));
1050: pay_in_utils.trace('ALLOWANCE Std Amt ',NVL(g_result_table2(i).balance_value,0));
1051: pay_in_utils.trace('ALLOWANCE Std Taxable Amt ',NVL(g_result_table3(i).balance_value,0));
1052: END IF;
1045: );
1046: IF g_debug THEN
1047: pay_in_utils.trace('ALLOWANCE Name ',g_context_table(i).source_text2);
1048: pay_in_utils.trace('ALLOWANCE Amt ',NVL(g_result_table(i).balance_value,0));
1049: pay_in_utils.trace('ALLOWANCE Taxable Amt ',NVL(g_result_table1(i).balance_value,0));
1050: pay_in_utils.trace('ALLOWANCE Std Amt ',NVL(g_result_table2(i).balance_value,0));
1051: pay_in_utils.trace('ALLOWANCE Std Taxable Amt ',NVL(g_result_table3(i).balance_value,0));
1052: END IF;
1053:
1046: IF g_debug THEN
1047: pay_in_utils.trace('ALLOWANCE Name ',g_context_table(i).source_text2);
1048: pay_in_utils.trace('ALLOWANCE Amt ',NVL(g_result_table(i).balance_value,0));
1049: pay_in_utils.trace('ALLOWANCE Taxable Amt ',NVL(g_result_table1(i).balance_value,0));
1050: pay_in_utils.trace('ALLOWANCE Std Amt ',NVL(g_result_table2(i).balance_value,0));
1051: pay_in_utils.trace('ALLOWANCE Std Taxable Amt ',NVL(g_result_table3(i).balance_value,0));
1052: END IF;
1053:
1054: END IF;
1047: pay_in_utils.trace('ALLOWANCE Name ',g_context_table(i).source_text2);
1048: pay_in_utils.trace('ALLOWANCE Amt ',NVL(g_result_table(i).balance_value,0));
1049: pay_in_utils.trace('ALLOWANCE Taxable Amt ',NVL(g_result_table1(i).balance_value,0));
1050: pay_in_utils.trace('ALLOWANCE Std Amt ',NVL(g_result_table2(i).balance_value,0));
1051: pay_in_utils.trace('ALLOWANCE Std Taxable Amt ',NVL(g_result_table3(i).balance_value,0));
1052: END IF;
1053:
1054: END IF;
1055: END LOOP;
1054: END IF;
1055: END LOOP;
1056: ELSIF (p_action_inf_category = 'IN_EOY_PERQ')
1057: THEN
1058: pay_in_utils.set_location(g_debug,l_procedure, 150);
1059: FOR i IN 1..g_context_table.COUNT
1060: LOOP
1061: IF ((g_result_table(i).balance_value <> 0)
1062: OR(NVL(g_result_table1(i).balance_value,0) <> 0)
1074: ,p_object_version_number => l_ovn
1075: );
1076:
1077: IF g_debug THEN
1078: pay_in_utils.trace('PERQ Name ',g_context_table(i).source_text2);
1079: pay_in_utils.trace('PERQ Taxable Amt ',NVL(g_result_table(i).balance_value,0));
1080: pay_in_utils.trace('PERQ Employee Contribution ',NVL(g_result_table1(i).balance_value,0));
1081: END IF;
1082:
1075: );
1076:
1077: IF g_debug THEN
1078: pay_in_utils.trace('PERQ Name ',g_context_table(i).source_text2);
1079: pay_in_utils.trace('PERQ Taxable Amt ',NVL(g_result_table(i).balance_value,0));
1080: pay_in_utils.trace('PERQ Employee Contribution ',NVL(g_result_table1(i).balance_value,0));
1081: END IF;
1082:
1083: END IF;
1076:
1077: IF g_debug THEN
1078: pay_in_utils.trace('PERQ Name ',g_context_table(i).source_text2);
1079: pay_in_utils.trace('PERQ Taxable Amt ',NVL(g_result_table(i).balance_value,0));
1080: pay_in_utils.trace('PERQ Employee Contribution ',NVL(g_result_table1(i).balance_value,0));
1081: END IF;
1082:
1083: END IF;
1084: END LOOP;
1082:
1083: END IF;
1084: END LOOP;
1085: ELSE
1086: pay_in_utils.set_location(g_debug,l_procedure, 160);
1087: FOR i IN 1..g_context_table.COUNT
1088: LOOP
1089: IF (g_result_table(i).balance_value <> 0)
1090: THEN
1099: ,p_object_version_number => l_ovn
1100: );
1101:
1102: IF g_debug THEN
1103: pay_in_utils.trace('Oth Balance name ',g_context_table(i).source_text2);
1104: pay_in_utils.trace('Oth Balance Value ',g_result_table(i).balance_value);
1105: END IF;
1106:
1107:
1100: );
1101:
1102: IF g_debug THEN
1103: pay_in_utils.trace('Oth Balance name ',g_context_table(i).source_text2);
1104: pay_in_utils.trace('Oth Balance Value ',g_result_table(i).balance_value);
1105: END IF;
1106:
1107:
1108: END IF;
1107:
1108: END IF;
1109: END LOOP;
1110: END IF;
1111: pay_in_utils.trace('**************************************************','********************');
1112: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 170);
1113:
1114: END archive_balances;
1115: --------------------------------------------------------------------------
1108: END IF;
1109: END LOOP;
1110: END IF;
1111: pay_in_utils.trace('**************************************************','********************');
1112: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 170);
1113:
1114: END archive_balances;
1115: --------------------------------------------------------------------------
1116: -- --
1216: BEGIN
1217: --Qualifying Amount determination and archival for 80E,80GG and 80U
1218:
1219: l_procedure := g_package ||'archive_via_details';
1220: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
1221:
1222:
1223: i := 1;
1224: g_bal_name_tab.DELETE;
1230: g_bal_name_tab(i).balance_name := c_rec.balance_name;
1231: i := i + 1;
1232: END LOOP;
1233:
1234: pay_in_utils.set_location(g_debug,l_procedure, 20);
1235:
1236: g_context_table(1).tax_unit_id := p_gre_id;
1237:
1238: pay_balance_pkg.get_value(p_assignment_action_id => p_run_asg_action_id
1240: ,p_context_lst => g_context_table
1241: ,p_output_table => g_result_table
1242: );
1243:
1244: pay_in_utils.set_location(g_debug,l_procedure, 30);
1245: pay_in_utils.trace('**************************************************','********************');
1246: FOR i IN 1..g_balance_value_tab.COUNT
1247: LOOP
1248: IF (g_result_table(i).balance_value <> 0)
1241: ,p_output_table => g_result_table
1242: );
1243:
1244: pay_in_utils.set_location(g_debug,l_procedure, 30);
1245: pay_in_utils.trace('**************************************************','********************');
1246: FOR i IN 1..g_balance_value_tab.COUNT
1247: LOOP
1248: IF (g_result_table(i).balance_value <> 0)
1249: THEN
1246: FOR i IN 1..g_balance_value_tab.COUNT
1247: LOOP
1248: IF (g_result_table(i).balance_value <> 0)
1249: THEN
1250: pay_in_utils.set_location(g_debug,l_procedure, 40);
1251: pay_action_information_api.create_action_information
1252: (p_action_context_id => p_arc_asg_action_id
1253: ,p_action_context_type => 'AAP'
1254: ,p_action_information_category => 'IN_EOY_VIA'
1258: ,p_action_information_id => l_action_info_id
1259: ,p_object_version_number => l_ovn
1260: );
1261: IF g_debug THEN
1262: pay_in_utils.trace('VIA Balance name ',g_bal_name_tab(i).balance_name);
1263: pay_in_utils.trace('VIA Balance Value ',g_result_table(i).balance_value);
1264: END IF;
1265:
1266: END IF;
1259: ,p_object_version_number => l_ovn
1260: );
1261: IF g_debug THEN
1262: pay_in_utils.trace('VIA Balance name ',g_bal_name_tab(i).balance_name);
1263: pay_in_utils.trace('VIA Balance Value ',g_result_table(i).balance_value);
1264: END IF;
1265:
1266: END IF;
1267: END LOOP;
1271: g_bal_name_tab.DELETE;
1272: g_balance_value_tab.DELETE;
1273: g_result_table.DELETE;
1274:
1275: pay_in_utils.set_location(g_debug,l_procedure, 50);
1276:
1277: FOR c_rec IN c_defined_balance_id
1278: LOOP
1279: g_balance_value_tab(i).defined_balance_id := c_rec.balance_id;
1287: ,p_defined_balance_lst => g_balance_value_tab
1288: ,p_context_lst => g_context_table
1289: ,p_output_table => g_result_table
1290: );
1291: pay_in_utils.set_location(g_debug,l_procedure, 60);
1292:
1293: --Gross Amount determination for 80D,80DD,80DDB,80G,80GGA
1294:
1295: g_result_table1.DELETE;
1316: ,p_context_lst => g_context_table
1317: ,p_output_table => g_result_table1
1318: );
1319:
1320: pay_in_utils.set_location(g_debug,l_procedure, 70);
1321:
1322: --Archiving the QA and Gross Amount in the same record for 80D,80DD,80DDB,80G,80GGA
1323: FOR i IN 1..g_balance_value_tab.COUNT
1324: LOOP
1323: FOR i IN 1..g_balance_value_tab.COUNT
1324: LOOP
1325: IF ((g_result_table(i).balance_value <> 0)OR(g_result_table1(i).balance_value <> 0))
1326: THEN
1327: pay_in_utils.set_location(g_debug,l_procedure, 80);
1328: pay_action_information_api.create_action_information
1329: (p_action_context_id => p_arc_asg_action_id
1330: ,p_action_context_type => 'AAP'
1331: ,p_action_information_category => 'IN_EOY_VIA'
1337: ,p_object_version_number => l_ovn
1338: );
1339:
1340: IF g_debug THEN
1341: pay_in_utils.trace('VIA Balance name ',g_bal_name_tab(i).balance_name);
1342: pay_in_utils.trace('VIA Qualifying Amt ',g_result_table(i).balance_value);
1343: pay_in_utils.trace('VIA Gross Amt ',g_result_table1(i).balance_value);
1344: END IF;
1345:
1338: );
1339:
1340: IF g_debug THEN
1341: pay_in_utils.trace('VIA Balance name ',g_bal_name_tab(i).balance_name);
1342: pay_in_utils.trace('VIA Qualifying Amt ',g_result_table(i).balance_value);
1343: pay_in_utils.trace('VIA Gross Amt ',g_result_table1(i).balance_value);
1344: END IF;
1345:
1346:
1339:
1340: IF g_debug THEN
1341: pay_in_utils.trace('VIA Balance name ',g_bal_name_tab(i).balance_name);
1342: pay_in_utils.trace('VIA Qualifying Amt ',g_result_table(i).balance_value);
1343: pay_in_utils.trace('VIA Gross Amt ',g_result_table1(i).balance_value);
1344: END IF;
1345:
1346:
1347: END IF;
1402: ,g_result_table3 => g_result_table3
1403: ,g_balance_value_tab => g_balance_value_tab
1404: );
1405:
1406: pay_in_utils.set_location(g_debug,l_procedure, 90);
1407:
1408: --Archive record for Deferred Anuity and Life Insurance Premium
1409: g_context_table.DELETE;
1410: g_result_table1.DELETE;
1442:
1443: --Gross Amount for Life Insurance
1444: g_context_table.DELETE;
1445:
1446: pay_in_utils.set_location(g_debug,l_procedure, 100);
1447: g_context_table(1).source_text2 := 'Life Insurance Premium';
1448: g_context_table(1).tax_unit_id := p_gre_id;
1449: g_balance_value_tab1(1).defined_balance_id :=
1450: pay_in_tax_utils.get_defined_balance('Gross Chapter VIA Deductions','_ASG_LE_COMP_DE_PTD');
1459:
1460: g_balance_value_tab1.DELETE;
1461: g_result_table1.DELETE;
1462:
1463: pay_in_utils.set_location(g_debug,l_procedure, 120);
1464: --Gross Amount for Deferred Annuity
1465: g_context_table.DELETE;
1466: g_context_table(1).tax_unit_id := p_gre_id;
1467:
1493:
1494: l_scss_gross := NVL(g_result_table1(3).balance_value,0);
1495:
1496:
1497: pay_in_utils.set_location(g_debug,l_procedure, 140);
1498:
1499: g_balance_value_tab1.DELETE;
1500: g_result_table1.DELETE;
1501: g_context_table.DELETE;
1534: ,p_action_information_id => l_action_info_id
1535: ,p_object_version_number => l_ovn
1536: );
1537: IF g_debug THEN
1538: pay_in_utils.trace('VIA LIC Qualifying Amt ',l_li_qa_amt);
1539: pay_in_utils.trace('VIA LIC Gross Amt ',l_li_gross);
1540: END IF;
1541: END IF;
1542:
1535: ,p_object_version_number => l_ovn
1536: );
1537: IF g_debug THEN
1538: pay_in_utils.trace('VIA LIC Qualifying Amt ',l_li_qa_amt);
1539: pay_in_utils.trace('VIA LIC Gross Amt ',l_li_gross);
1540: END IF;
1541: END IF;
1542:
1543: IF (l_da_gross <> 0 OR l_da_qa_amt <> 0)
1553: ,p_action_information_id => l_action_info_id
1554: ,p_object_version_number => l_ovn
1555: );
1556: IF g_debug THEN
1557: pay_in_utils.trace('VIA Deferred Annuity Qualifying Amt ',l_da_qa_amt);
1558: pay_in_utils.trace('VIA Deferred Annuity Gross Amt ',l_da_gross);
1559: END IF;
1560:
1561: END IF;
1554: ,p_object_version_number => l_ovn
1555: );
1556: IF g_debug THEN
1557: pay_in_utils.trace('VIA Deferred Annuity Qualifying Amt ',l_da_qa_amt);
1558: pay_in_utils.trace('VIA Deferred Annuity Gross Amt ',l_da_gross);
1559: END IF;
1560:
1561: END IF;
1562:
1574: ,p_object_version_number => l_ovn
1575: );
1576:
1577: IF g_debug THEN
1578: pay_in_utils.trace('VIA 80CCC Qualifying Amt ',l_li_qa_amt);
1579: pay_in_utils.trace('VIA 80CCC Gross Amt ',l_li_gross);
1580: END IF;
1581:
1582: END IF;
1575: );
1576:
1577: IF g_debug THEN
1578: pay_in_utils.trace('VIA 80CCC Qualifying Amt ',l_li_qa_amt);
1579: pay_in_utils.trace('VIA 80CCC Gross Amt ',l_li_gross);
1580: END IF;
1581:
1582: END IF;
1583:
1595: ,p_object_version_number => l_ovn
1596: );
1597:
1598: IF g_debug THEN
1599: pay_in_utils.trace('Senior Citizens Savings Scheme Qualifying Amt ',l_scss_qa_amt);
1600: pay_in_utils.trace('Senior Citizens Savings Scheme Gross Amt ',l_scss_gross);
1601: END IF;
1602:
1603: END IF;
1596: );
1597:
1598: IF g_debug THEN
1599: pay_in_utils.trace('Senior Citizens Savings Scheme Qualifying Amt ',l_scss_qa_amt);
1600: pay_in_utils.trace('Senior Citizens Savings Scheme Gross Amt ',l_scss_gross);
1601: END IF;
1602:
1603: END IF;
1604:
1616: ,p_action_information_id => l_action_info_id
1617: ,p_object_version_number => l_ovn
1618: );
1619: IF g_debug THEN
1620: pay_in_utils.trace('VIA Deduction under Section 80CCD Qualifying Amt ',l_80ccd_qa_amt);
1621: pay_in_utils.trace('VIA Deduction under Section 80CCD Gross Amt ',l_80ccd_gross);
1622: END IF;
1623: END IF;
1624: pay_in_utils.trace('**************************************************','********************');
1617: ,p_object_version_number => l_ovn
1618: );
1619: IF g_debug THEN
1620: pay_in_utils.trace('VIA Deduction under Section 80CCD Qualifying Amt ',l_80ccd_qa_amt);
1621: pay_in_utils.trace('VIA Deduction under Section 80CCD Gross Amt ',l_80ccd_gross);
1622: END IF;
1623: END IF;
1624: pay_in_utils.trace('**************************************************','********************');
1625: pay_in_utils.set_location(g_debug,l_procedure, 150);
1620: pay_in_utils.trace('VIA Deduction under Section 80CCD Qualifying Amt ',l_80ccd_qa_amt);
1621: pay_in_utils.trace('VIA Deduction under Section 80CCD Gross Amt ',l_80ccd_gross);
1622: END IF;
1623: END IF;
1624: pay_in_utils.trace('**************************************************','********************');
1625: pay_in_utils.set_location(g_debug,l_procedure, 150);
1626:
1627: END archive_via_details;
1628: --------------------------------------------------------------------------
1621: pay_in_utils.trace('VIA Deduction under Section 80CCD Gross Amt ',l_80ccd_gross);
1622: END IF;
1623: END IF;
1624: pay_in_utils.trace('**************************************************','********************');
1625: pay_in_utils.set_location(g_debug,l_procedure, 150);
1626:
1627: END archive_via_details;
1628: --------------------------------------------------------------------------
1629: -- --
1689:
1690: BEGIN
1691:
1692: l_procedure := g_package ||'archive_allowances';
1693: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
1694:
1695:
1696: FOR c_rec IN c_comp_name
1697: LOOP
1699: g_context_table(i).source_text2 := c_rec.name;
1700: END LOOP;
1701:
1702: IF g_debug THEN
1703: pay_in_utils.trace('Assignment Action id ',p_run_asg_action_id);
1704: pay_in_utils.trace('Archive Asg Action id ',p_arc_asg_action_id);
1705: pay_in_utils.trace('GRE id ',p_gre_id);
1706: pay_in_utils.trace('Previous GRE Asg Action id ',pre_gre_asg_act_id);
1707: END IF;
1700: END LOOP;
1701:
1702: IF g_debug THEN
1703: pay_in_utils.trace('Assignment Action id ',p_run_asg_action_id);
1704: pay_in_utils.trace('Archive Asg Action id ',p_arc_asg_action_id);
1705: pay_in_utils.trace('GRE id ',p_gre_id);
1706: pay_in_utils.trace('Previous GRE Asg Action id ',pre_gre_asg_act_id);
1707: END IF;
1708:
1701:
1702: IF g_debug THEN
1703: pay_in_utils.trace('Assignment Action id ',p_run_asg_action_id);
1704: pay_in_utils.trace('Archive Asg Action id ',p_arc_asg_action_id);
1705: pay_in_utils.trace('GRE id ',p_gre_id);
1706: pay_in_utils.trace('Previous GRE Asg Action id ',pre_gre_asg_act_id);
1707: END IF;
1708:
1709:
1702: IF g_debug THEN
1703: pay_in_utils.trace('Assignment Action id ',p_run_asg_action_id);
1704: pay_in_utils.trace('Archive Asg Action id ',p_arc_asg_action_id);
1705: pay_in_utils.trace('GRE id ',p_gre_id);
1706: pay_in_utils.trace('Previous GRE Asg Action id ',pre_gre_asg_act_id);
1707: END IF;
1708:
1709:
1710: archive_balances(p_run_asg_action_id => p_run_asg_action_id
1726: ,g_result_table2 => g_result_table2
1727: ,g_result_table3 => g_result_table3
1728: ,g_balance_value_tab => g_balance_value_tab
1729: );
1730: pay_in_utils.set_location(g_debug,l_procedure, 20);
1731:
1732: OPEN c_hra;
1733: FETCH c_hra INTO l_action_info_id,l_ovn;
1734: CLOSE c_hra;
1734: CLOSE c_hra;
1735:
1736: IF l_action_info_id IS NOT NULL
1737: THEN
1738: pay_in_utils.set_location(g_debug,l_procedure, 30);
1739: IF (pre_gre_asg_act_id IS NOT NULL)--Not the first record
1740: THEN
1741: IF p_flag -- Neither the first nor the last record. Hence diff of THRA _ASG_YTD at 2 diff act ids.
1742: THEN
1760: );
1761: END IF;
1762: ELSIF p_flag -- First Record in a multi tan scenario, hence take the THRA_ASG_YTD
1763: THEN
1764: pay_in_utils.set_location(g_debug,l_procedure, 40);
1765: l_defined_balance_id := pay_in_tax_utils.get_defined_balance('Taxable House Rent Allowance','_ASG_YTD');
1766: l_value := pay_balance_pkg.get_value(p_defined_balance_id => l_defined_balance_id
1767: ,p_assignment_action_id => p_run_asg_action_id
1768: );
1766: l_value := pay_balance_pkg.get_value(p_defined_balance_id => l_defined_balance_id
1767: ,p_assignment_action_id => p_run_asg_action_id
1768: );
1769: ELSE -- Only a single record exists, hence take the Projetced value
1770: pay_in_utils.set_location(g_debug,l_procedure, 50);
1771: l_defined_balance_id := pay_in_tax_utils.get_defined_balance('Taxable House Rent Allowance for Projection','_ASG_DE_PTD');
1772: l_value := pay_balance_pkg.get_value(p_defined_balance_id => l_defined_balance_id
1773: ,p_assignment_action_id => p_run_asg_action_id
1774: );
1774: );
1775: END IF;
1776:
1777: IF g_debug THEN
1778: pay_in_utils.trace('Balance value ',l_value);
1779: END IF;
1780:
1781: pay_action_information_api.update_action_information
1782: (
1783: p_action_information_id => l_action_info_id
1784: ,p_object_version_number => l_ovn
1785: ,p_action_information5 => l_value
1786: );
1787: pay_in_utils.set_location(g_debug,l_procedure, 60);
1788: END IF;
1789: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 70);
1790:
1791:
1785: ,p_action_information5 => l_value
1786: );
1787: pay_in_utils.set_location(g_debug,l_procedure, 60);
1788: END IF;
1789: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 70);
1790:
1791:
1792: END archive_allowances;
1793:
1827: l_procedure VARCHAR2(100);
1828:
1829: BEGIN
1830: l_procedure := g_package ||'archive_perquisites';
1831: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
1832:
1833: IF g_debug THEN
1834: pay_in_utils.trace('Assignment Action id ',p_run_asg_action_id);
1835: pay_in_utils.trace('Archive Asg Action id ',p_arc_asg_action_id);
1830: l_procedure := g_package ||'archive_perquisites';
1831: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
1832:
1833: IF g_debug THEN
1834: pay_in_utils.trace('Assignment Action id ',p_run_asg_action_id);
1835: pay_in_utils.trace('Archive Asg Action id ',p_arc_asg_action_id);
1836: pay_in_utils.trace('GRE id ',p_gre_id);
1837: pay_in_utils.trace('Previous GRE Asg Action id ',pre_gre_asg_act_id);
1838: END IF;
1831: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
1832:
1833: IF g_debug THEN
1834: pay_in_utils.trace('Assignment Action id ',p_run_asg_action_id);
1835: pay_in_utils.trace('Archive Asg Action id ',p_arc_asg_action_id);
1836: pay_in_utils.trace('GRE id ',p_gre_id);
1837: pay_in_utils.trace('Previous GRE Asg Action id ',pre_gre_asg_act_id);
1838: END IF;
1839:
1832:
1833: IF g_debug THEN
1834: pay_in_utils.trace('Assignment Action id ',p_run_asg_action_id);
1835: pay_in_utils.trace('Archive Asg Action id ',p_arc_asg_action_id);
1836: pay_in_utils.trace('GRE id ',p_gre_id);
1837: pay_in_utils.trace('Previous GRE Asg Action id ',pre_gre_asg_act_id);
1838: END IF;
1839:
1840: g_context_table.DELETE;
1833: IF g_debug THEN
1834: pay_in_utils.trace('Assignment Action id ',p_run_asg_action_id);
1835: pay_in_utils.trace('Archive Asg Action id ',p_arc_asg_action_id);
1836: pay_in_utils.trace('GRE id ',p_gre_id);
1837: pay_in_utils.trace('Previous GRE Asg Action id ',pre_gre_asg_act_id);
1838: END IF;
1839:
1840: g_context_table.DELETE;
1841: g_result_table.DELETE;
1863: g_context_table(16).source_text2 := 'Club Expenditure';
1864: g_context_table(17).source_text2 := 'Motor Car Perquisite';
1865: g_context_table(18).source_text2 := 'Lunch Perquisite';
1866:
1867: pay_in_utils.set_location(g_debug,l_procedure, 20);
1868:
1869: archive_balances(p_run_asg_action_id => p_run_asg_action_id
1870: ,pre_gre_asg_act_id => pre_gre_asg_act_id
1871: ,p_arc_asg_action_id => p_arc_asg_action_id
1881: ,g_result_table2 => g_result_table2
1882: ,g_result_table3 => g_result_table3
1883: ,g_balance_value_tab => g_balance_value_tab
1884: );
1885: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 30);
1886:
1887: END archive_perquisites;
1888: --------------------------------------------------------------------------
1889: -- --
2013: l_cess_td_ov_id NUMBER;
2014:
2015: BEGIN
2016: l_procedure := g_package ||'archive_eoy_salary';
2017: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
2018:
2019: IF g_debug THEN
2020: pay_in_utils.trace('Assignment Action id ',p_run_asg_action_id);
2021: pay_in_utils.trace('Archive Asg Action id ',p_arc_asg_action_id);
2016: l_procedure := g_package ||'archive_eoy_salary';
2017: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
2018:
2019: IF g_debug THEN
2020: pay_in_utils.trace('Assignment Action id ',p_run_asg_action_id);
2021: pay_in_utils.trace('Archive Asg Action id ',p_arc_asg_action_id);
2022: pay_in_utils.trace('GRE id ',p_gre_id);
2023: END IF;
2024:
2017: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
2018:
2019: IF g_debug THEN
2020: pay_in_utils.trace('Assignment Action id ',p_run_asg_action_id);
2021: pay_in_utils.trace('Archive Asg Action id ',p_arc_asg_action_id);
2022: pay_in_utils.trace('GRE id ',p_gre_id);
2023: END IF;
2024:
2025: i := 1;
2018:
2019: IF g_debug THEN
2020: pay_in_utils.trace('Assignment Action id ',p_run_asg_action_id);
2021: pay_in_utils.trace('Archive Asg Action id ',p_arc_asg_action_id);
2022: pay_in_utils.trace('GRE id ',p_gre_id);
2023: END IF;
2024:
2025: i := 1;
2026: g_bal_name_tab.DELETE;
2036: END LOOP;
2037:
2038: pay_balance_pkg.get_value(p_run_asg_action_id,g_balance_value_tab);
2039:
2040: pay_in_utils.set_location(g_debug,l_procedure, 20);
2041:
2042:
2043:
2044: pay_in_utils.trace('**************************************************','********************');
2040: pay_in_utils.set_location(g_debug,l_procedure, 20);
2041:
2042:
2043:
2044: pay_in_utils.trace('**************************************************','********************');
2045: FOR i IN 1..g_balance_value_tab.COUNT
2046: LOOP
2047: IF (g_balance_value_tab(i).balance_value <> 0)
2048: THEN
2057: ,p_object_version_number => l_ovn
2058: );
2059:
2060: IF g_debug THEN
2061: pay_in_utils.trace('SALARY Balance Name ',g_bal_name_tab(i).balance_name);
2062: pay_in_utils.trace('SALARY Balance Value ',g_balance_value_tab(i).balance_value);
2063: END IF;
2064:
2065: END IF;
2058: );
2059:
2060: IF g_debug THEN
2061: pay_in_utils.trace('SALARY Balance Name ',g_bal_name_tab(i).balance_name);
2062: pay_in_utils.trace('SALARY Balance Value ',g_balance_value_tab(i).balance_value);
2063: END IF;
2064:
2065: END IF;
2066: END LOOP;
2064:
2065: END IF;
2066: END LOOP;
2067:
2068: pay_in_utils.set_location(g_debug,l_procedure, 20);
2069:
2070: --Archiving balances having YTD Dimensions
2071: i := 1;
2072: FOR c_rec IN c_defined_bal_id
2077: END LOOP;
2078:
2079: pay_balance_pkg.get_value(p_run_asg_action_id,g_balance_value_tab1);
2080:
2081: pay_in_utils.set_location(g_debug,l_procedure, 30);
2082:
2083: FOR i IN 1..g_balance_value_tab1.COUNT
2084: LOOP
2085:
2097: ,p_action_information_id => l_action_info_id
2098: ,p_object_version_number => l_ovn
2099: );
2100: IF g_debug THEN
2101: pay_in_utils.trace('SALARY Balance Name ',g_bal_name_tab1(i).balance_name);
2102: pay_in_utils.trace('SALARY Balance Value ',g_balance_value_tab1(i).balance_value);
2103: END IF;
2104:
2105: END IF;
2098: ,p_object_version_number => l_ovn
2099: );
2100: IF g_debug THEN
2101: pay_in_utils.trace('SALARY Balance Name ',g_bal_name_tab1(i).balance_name);
2102: pay_in_utils.trace('SALARY Balance Value ',g_balance_value_tab1(i).balance_value);
2103: END IF;
2104:
2105: END IF;
2106: END LOOP;
2105: END IF;
2106: END LOOP;
2107:
2108:
2109: pay_in_utils.set_location(g_debug,l_procedure, 40);
2110: --Archiving balances having LE_PTD Dimensions
2111: i := 1;
2112: g_bal_name_tab1.DELETE;
2113: g_balance_value_tab1.DELETE;
2122: i := i + 1;
2123:
2124: END LOOP;
2125:
2126: pay_in_utils.set_location(g_debug,l_procedure, 50);
2127:
2128: pay_balance_pkg.get_value(p_assignment_action_id => p_run_asg_action_id
2129: ,p_defined_balance_lst => g_balance_value_tab1
2130: ,p_context_lst => g_context_table
2149: l_total_cess := l_total_cess + g_result_table(i).balance_value;
2150: END IF ;
2151:
2152: END LOOP;
2153: pay_in_utils.set_location(g_debug,l_procedure, 60);
2154:
2155: g_bal_name_tab1(g_result_table.COUNT + 1).balance_name := 'Income Tax Deduction';
2156: g_result_table(g_result_table.COUNT + 1).balance_value := l_in_tax_ded;
2157:
2170: ,p_action_information_id => l_action_info_id
2171: ,p_object_version_number => l_ovn
2172: );
2173: IF g_bal_name_tab1(i).balance_name='F16 Education Cess' THEN
2174: pay_in_utils.set_location(g_debug,l_procedure, 61);
2175: l_cess_action_info_id:=l_action_info_id;
2176: l_cess_ov_id:=l_ovn;
2177: END IF ;
2178: IF g_bal_name_tab1(i).balance_name='F16 Education Cess till Date' THEN
2175: l_cess_action_info_id:=l_action_info_id;
2176: l_cess_ov_id:=l_ovn;
2177: END IF ;
2178: IF g_bal_name_tab1(i).balance_name='F16 Education Cess till Date' THEN
2179: pay_in_utils.set_location(g_debug,l_procedure, 62);
2180: l_cess_td_action_info_id:=l_action_info_id;
2181: l_cess_td_ov_id:=l_ovn;
2182: END IF ;
2183:
2181: l_cess_td_ov_id:=l_ovn;
2182: END IF ;
2183:
2184: IF g_debug THEN
2185: pay_in_utils.set_location(g_debug,l_procedure, 63);
2186: pay_in_utils.trace('SALARY Balance Name ',g_bal_name_tab1(i).balance_name);
2187: pay_in_utils.trace('SALARY Balance Value ',g_result_table(i).balance_value);
2188: END IF;
2189:
2182: END IF ;
2183:
2184: IF g_debug THEN
2185: pay_in_utils.set_location(g_debug,l_procedure, 63);
2186: pay_in_utils.trace('SALARY Balance Name ',g_bal_name_tab1(i).balance_name);
2187: pay_in_utils.trace('SALARY Balance Value ',g_result_table(i).balance_value);
2188: END IF;
2189:
2190: END IF;
2183:
2184: IF g_debug THEN
2185: pay_in_utils.set_location(g_debug,l_procedure, 63);
2186: pay_in_utils.trace('SALARY Balance Name ',g_bal_name_tab1(i).balance_name);
2187: pay_in_utils.trace('SALARY Balance Value ',g_result_table(i).balance_value);
2188: END IF;
2189:
2190: END IF;
2191: END LOOP;
2189:
2190: END IF;
2191: END LOOP;
2192: IF l_total_cess <> 0 THEN
2193: pay_in_utils.set_location(g_debug,l_procedure, 64);
2194:
2195: IF l_cess_action_info_id IS NULL THEN
2196: pay_in_utils.set_location(g_debug,l_procedure, 65);
2197: pay_action_information_api.create_action_information
2192: IF l_total_cess <> 0 THEN
2193: pay_in_utils.set_location(g_debug,l_procedure, 64);
2194:
2195: IF l_cess_action_info_id IS NULL THEN
2196: pay_in_utils.set_location(g_debug,l_procedure, 65);
2197: pay_action_information_api.create_action_information
2198: (p_action_context_id => p_arc_asg_action_id
2199: ,p_action_context_type => 'AAP'
2200: ,p_action_information_category => 'IN_EOY_ASG_SAL'
2204: ,p_action_information_id => l_action_info_id
2205: ,p_object_version_number => l_ovn
2206: );
2207: ELSE
2208: pay_in_utils.set_location(g_debug,l_procedure, 66);
2209: pay_action_information_api.update_action_information
2210: (p_action_information_id => l_cess_action_info_id
2211: ,p_object_version_number => l_cess_ov_id
2212: ,p_action_information1 => 'F16 Education Cess'
2215: END IF;
2216: END IF ;
2217:
2218: IF l_total_cess_till_date <> 0 THEN
2219: pay_in_utils.set_location(g_debug,l_procedure, 67);
2220: IF l_cess_td_action_info_id IS NULL THEN
2221: pay_in_utils.set_location(g_debug,l_procedure, 68);
2222: pay_action_information_api.create_action_information
2223: (p_action_context_id => p_arc_asg_action_id
2217:
2218: IF l_total_cess_till_date <> 0 THEN
2219: pay_in_utils.set_location(g_debug,l_procedure, 67);
2220: IF l_cess_td_action_info_id IS NULL THEN
2221: pay_in_utils.set_location(g_debug,l_procedure, 68);
2222: pay_action_information_api.create_action_information
2223: (p_action_context_id => p_arc_asg_action_id
2224: ,p_action_context_type => 'AAP'
2225: ,p_action_information_category => 'IN_EOY_ASG_SAL'
2229: ,p_action_information_id => l_action_info_id
2230: ,p_object_version_number => l_ovn
2231: );
2232: ELSE
2233: pay_in_utils.set_location(g_debug,l_procedure, 69);
2234: pay_action_information_api.update_action_information
2235: (p_action_information_id => l_cess_td_action_info_id
2236: ,p_object_version_number => l_cess_td_ov_id
2237: ,p_action_information1 => 'F16 Education Cess till Date'
2242: l_cess_action_info_id:=0;
2243: l_cess_ov_id:=0;
2244: l_cess_td_action_info_id:=0;
2245: l_cess_td_ov_id:=0;
2246: pay_in_utils.trace('**************************************************','********************');
2247: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 70);
2248:
2249:
2250: END archive_eoy_salary;
2243: l_cess_ov_id:=0;
2244: l_cess_td_action_info_id:=0;
2245: l_cess_td_ov_id:=0;
2246: pay_in_utils.trace('**************************************************','********************');
2247: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 70);
2248:
2249:
2250: END archive_eoy_salary;
2251: --------------------------------------------------------------------------
2318:
2319: BEGIN
2320:
2321: l_procedure := g_package ||'archive_other_balances';
2322: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
2323:
2324: IF g_debug THEN
2325: pay_in_utils.trace('**************************************************','********************');
2326: pay_in_utils.trace('Assignment Action id ',p_run_asg_action_id);
2321: l_procedure := g_package ||'archive_other_balances';
2322: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
2323:
2324: IF g_debug THEN
2325: pay_in_utils.trace('**************************************************','********************');
2326: pay_in_utils.trace('Assignment Action id ',p_run_asg_action_id);
2327: pay_in_utils.trace('Archive Asg Action id ',p_arc_asg_action_id);
2328: pay_in_utils.trace('GRE id ',p_gre_id);
2329: pay_in_utils.trace('Previous GRE Asg Action id ',pre_gre_asg_act_id);
2322: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
2323:
2324: IF g_debug THEN
2325: pay_in_utils.trace('**************************************************','********************');
2326: pay_in_utils.trace('Assignment Action id ',p_run_asg_action_id);
2327: pay_in_utils.trace('Archive Asg Action id ',p_arc_asg_action_id);
2328: pay_in_utils.trace('GRE id ',p_gre_id);
2329: pay_in_utils.trace('Previous GRE Asg Action id ',pre_gre_asg_act_id);
2330: pay_in_utils.trace('Start Date ',p_start_date);
2323:
2324: IF g_debug THEN
2325: pay_in_utils.trace('**************************************************','********************');
2326: pay_in_utils.trace('Assignment Action id ',p_run_asg_action_id);
2327: pay_in_utils.trace('Archive Asg Action id ',p_arc_asg_action_id);
2328: pay_in_utils.trace('GRE id ',p_gre_id);
2329: pay_in_utils.trace('Previous GRE Asg Action id ',pre_gre_asg_act_id);
2330: pay_in_utils.trace('Start Date ',p_start_date);
2331: pay_in_utils.trace('End Date ',p_end_date);
2324: IF g_debug THEN
2325: pay_in_utils.trace('**************************************************','********************');
2326: pay_in_utils.trace('Assignment Action id ',p_run_asg_action_id);
2327: pay_in_utils.trace('Archive Asg Action id ',p_arc_asg_action_id);
2328: pay_in_utils.trace('GRE id ',p_gre_id);
2329: pay_in_utils.trace('Previous GRE Asg Action id ',pre_gre_asg_act_id);
2330: pay_in_utils.trace('Start Date ',p_start_date);
2331: pay_in_utils.trace('End Date ',p_end_date);
2332: pay_in_utils.trace('**************************************************','********************');
2325: pay_in_utils.trace('**************************************************','********************');
2326: pay_in_utils.trace('Assignment Action id ',p_run_asg_action_id);
2327: pay_in_utils.trace('Archive Asg Action id ',p_arc_asg_action_id);
2328: pay_in_utils.trace('GRE id ',p_gre_id);
2329: pay_in_utils.trace('Previous GRE Asg Action id ',pre_gre_asg_act_id);
2330: pay_in_utils.trace('Start Date ',p_start_date);
2331: pay_in_utils.trace('End Date ',p_end_date);
2332: pay_in_utils.trace('**************************************************','********************');
2333: END IF;
2326: pay_in_utils.trace('Assignment Action id ',p_run_asg_action_id);
2327: pay_in_utils.trace('Archive Asg Action id ',p_arc_asg_action_id);
2328: pay_in_utils.trace('GRE id ',p_gre_id);
2329: pay_in_utils.trace('Previous GRE Asg Action id ',pre_gre_asg_act_id);
2330: pay_in_utils.trace('Start Date ',p_start_date);
2331: pay_in_utils.trace('End Date ',p_end_date);
2332: pay_in_utils.trace('**************************************************','********************');
2333: END IF;
2334:
2327: pay_in_utils.trace('Archive Asg Action id ',p_arc_asg_action_id);
2328: pay_in_utils.trace('GRE id ',p_gre_id);
2329: pay_in_utils.trace('Previous GRE Asg Action id ',pre_gre_asg_act_id);
2330: pay_in_utils.trace('Start Date ',p_start_date);
2331: pay_in_utils.trace('End Date ',p_end_date);
2332: pay_in_utils.trace('**************************************************','********************');
2333: END IF;
2334:
2335: --Archiving the various Perquisite and Allowance records
2328: pay_in_utils.trace('GRE id ',p_gre_id);
2329: pay_in_utils.trace('Previous GRE Asg Action id ',pre_gre_asg_act_id);
2330: pay_in_utils.trace('Start Date ',p_start_date);
2331: pay_in_utils.trace('End Date ',p_end_date);
2332: pay_in_utils.trace('**************************************************','********************');
2333: END IF;
2334:
2335: --Archiving the various Perquisite and Allowance records
2336:
2345: g_bal_name_tab(i).balance_name := c_rec.balance_name;
2346: i := i + 1;
2347: END LOOP;
2348:
2349: pay_in_utils.set_location(g_debug,l_procedure, 20);
2350:
2351: l_balance_value_tab1 := g_balance_value_tab;
2352: l_balance_value_tab2 := g_balance_value_tab;
2353:
2357: THEN
2358: pay_balance_pkg.get_value(pre_gre_asg_act_id,l_balance_value_tab2);
2359: END IF;
2360:
2361: pay_in_utils.set_location(g_debug,l_procedure, 30);
2362: FOR i IN 1..g_balance_value_tab.COUNT
2363: LOOP
2364:
2365: IF (g_bal_name_tab(i).balance_name <> 'Monthly Furniture Cost')
2377: l_context := 'IN_EOY_ALLOW';
2378: ELSE
2379: l_context := 'IN_EOY_PERQ';
2380: END IF;
2381: pay_in_utils.set_location(g_debug,l_procedure, 40);
2382:
2383: pay_action_information_api.create_action_information
2384: (p_action_context_id => p_arc_asg_action_id
2385: ,p_action_context_type => 'AAP'
2391: ,p_object_version_number => l_ovn
2392: );
2393:
2394: IF g_debug THEN
2395: pay_in_utils.trace('**************************************************','********************');
2396: pay_in_utils.trace('OTHER Balance Name ', g_bal_name_tab(i).balance_name);
2397: pay_in_utils.trace('OTHER Balance Value ',g_balance_value_tab(i).balance_value);
2398: pay_in_utils.trace('**************************************************','********************');
2399: END IF;
2392: );
2393:
2394: IF g_debug THEN
2395: pay_in_utils.trace('**************************************************','********************');
2396: pay_in_utils.trace('OTHER Balance Name ', g_bal_name_tab(i).balance_name);
2397: pay_in_utils.trace('OTHER Balance Value ',g_balance_value_tab(i).balance_value);
2398: pay_in_utils.trace('**************************************************','********************');
2399: END IF;
2400:
2393:
2394: IF g_debug THEN
2395: pay_in_utils.trace('**************************************************','********************');
2396: pay_in_utils.trace('OTHER Balance Name ', g_bal_name_tab(i).balance_name);
2397: pay_in_utils.trace('OTHER Balance Value ',g_balance_value_tab(i).balance_value);
2398: pay_in_utils.trace('**************************************************','********************');
2399: END IF;
2400:
2401: END IF;
2394: IF g_debug THEN
2395: pay_in_utils.trace('**************************************************','********************');
2396: pay_in_utils.trace('OTHER Balance Name ', g_bal_name_tab(i).balance_name);
2397: pay_in_utils.trace('OTHER Balance Value ',g_balance_value_tab(i).balance_value);
2398: pay_in_utils.trace('**************************************************','********************');
2399: END IF;
2400:
2401: END IF;
2402: END LOOP;
2399: END IF;
2400:
2401: END IF;
2402: END LOOP;
2403: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 50);
2404:
2405:
2406: END archive_other_balances;
2407:
2589:
2590:
2591: BEGIN
2592: l_procedure := g_package ||'archive_org_data';
2593: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
2594:
2595: IF g_debug THEN
2596: pay_in_utils.trace('Payroll Action id ',p_arc_pay_action_id);
2597: pay_in_utils.trace('GRE id ',p_gre_id);
2592: l_procedure := g_package ||'archive_org_data';
2593: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
2594:
2595: IF g_debug THEN
2596: pay_in_utils.trace('Payroll Action id ',p_arc_pay_action_id);
2597: pay_in_utils.trace('GRE id ',p_gre_id);
2598: pay_in_utils.trace('End Date ',p_effective_end_date);
2599:
2600:
2593: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
2594:
2595: IF g_debug THEN
2596: pay_in_utils.trace('Payroll Action id ',p_arc_pay_action_id);
2597: pay_in_utils.trace('GRE id ',p_gre_id);
2598: pay_in_utils.trace('End Date ',p_effective_end_date);
2599:
2600:
2601: END IF;
2594:
2595: IF g_debug THEN
2596: pay_in_utils.trace('Payroll Action id ',p_arc_pay_action_id);
2597: pay_in_utils.trace('GRE id ',p_gre_id);
2598: pay_in_utils.trace('End Date ',p_effective_end_date);
2599:
2600:
2601: END IF;
2602:
2606: INTO l_tan,l_ward,l_emplr_type,l_reg_org_id,l_tan_ack_no,
2607: l_income_tax_org_id,l_org_name,l_location_id,l_dig_sign,l_image_form16;
2608: CLOSE c_org_inc_tax_df_details;
2609:
2610: pay_in_utils.set_location(g_debug,l_procedure, 20);
2611: IF g_debug THEN
2612: pay_in_utils.trace('l_dig_sign ',l_dig_sign);
2613: pay_in_utils.trace('Form 16 ',l_image_form16);
2614: END IF;
2608: CLOSE c_org_inc_tax_df_details;
2609:
2610: pay_in_utils.set_location(g_debug,l_procedure, 20);
2611: IF g_debug THEN
2612: pay_in_utils.trace('l_dig_sign ',l_dig_sign);
2613: pay_in_utils.trace('Form 16 ',l_image_form16);
2614: END IF;
2615:
2616: OPEN c_income_tax_org_details(l_income_tax_org_id);
2609:
2610: pay_in_utils.set_location(g_debug,l_procedure, 20);
2611: IF g_debug THEN
2612: pay_in_utils.trace('l_dig_sign ',l_dig_sign);
2613: pay_in_utils.trace('Form 16 ',l_image_form16);
2614: END IF;
2615:
2616: OPEN c_income_tax_org_details(l_income_tax_org_id);
2617: FETCH c_income_tax_org_details INTO l_itax_location_id;
2620: OPEN c_reg_org_details(l_reg_org_id);
2621: FETCH c_reg_org_details INTO l_pan,l_legal_name;
2622: CLOSE c_reg_org_details;
2623:
2624: pay_in_utils.set_location(g_debug,l_procedure, 30);
2625: OPEN c_representative_id;
2626: FETCH c_representative_id INTO l_rep_person_id,l_rep_name,l_rep_title;
2627: CLOSE c_representative_id;
2628:
2625: OPEN c_representative_id;
2626: FETCH c_representative_id INTO l_rep_person_id,l_rep_name,l_rep_title;
2627: CLOSE c_representative_id;
2628:
2629: pay_in_utils.set_location(g_debug,l_procedure, 40);
2630: OPEN c_pos(l_rep_person_id);
2631: FETCH c_pos INTO l_position, l_job;
2632: CLOSE c_pos;
2633:
2630: OPEN c_pos(l_rep_person_id);
2631: FETCH c_pos INTO l_position, l_job;
2632: CLOSE c_pos;
2633:
2634: pay_in_utils.set_location(g_debug,l_procedure, 50);
2635: OPEN c_father_name(l_rep_person_id);
2636: FETCH c_father_name INTO l_rep_father,l_rep_father_title;
2637: CLOSE c_father_name;
2638:
2635: OPEN c_father_name(l_rep_person_id);
2636: FETCH c_father_name INTO l_rep_father,l_rep_father_title;
2637: CLOSE c_father_name;
2638:
2639: pay_in_utils.set_location(g_debug,l_procedure, 60);
2640: OPEN c_rep_address(l_rep_person_id);
2641: FETCH c_rep_address INTO l_rep_location;
2642: CLOSE c_rep_address;
2643:
2640: OPEN c_rep_address(l_rep_person_id);
2641: FETCH c_rep_address INTO l_rep_location;
2642: CLOSE c_rep_address;
2643:
2644: pay_in_utils.set_location(g_debug,l_procedure, 70);
2645: OPEN c_rep_phone(l_rep_person_id);
2646: FETCH c_rep_phone INTO l_rep_phone_no,l_phone_type;
2647: CLOSE c_rep_phone;
2648:
2645: OPEN c_rep_phone(l_rep_person_id);
2646: FETCH c_rep_phone INTO l_rep_phone_no,l_phone_type;
2647: CLOSE c_rep_phone;
2648:
2649: pay_in_utils.set_location(g_debug,l_procedure, 80);
2650: OPEN c_rep_work_fax(l_rep_person_id);
2651: FETCH c_rep_work_fax INTO l_rep_work_fax;
2652: CLOSE c_rep_work_fax;
2653:
2650: OPEN c_rep_work_fax(l_rep_person_id);
2651: FETCH c_rep_work_fax INTO l_rep_work_fax;
2652: CLOSE c_rep_work_fax;
2653:
2654: pay_in_utils.set_location(g_debug,l_procedure, 90);
2655: pay_action_information_api.create_action_information
2656: (p_action_context_id => p_arc_pay_action_id
2657: ,p_action_context_type => 'PA'
2658: ,p_action_information_category => 'IN_EOY_ORG'
2683: ,p_object_version_number => l_ovn
2684: );
2685:
2686: IF g_debug THEN
2687: pay_in_utils.trace('l_rep_name ',l_rep_name);
2688: pay_in_utils.trace('l_position ',l_position);
2689: pay_in_utils.trace('l_job ',l_job);
2690: END IF;
2691: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 100);
2684: );
2685:
2686: IF g_debug THEN
2687: pay_in_utils.trace('l_rep_name ',l_rep_name);
2688: pay_in_utils.trace('l_position ',l_position);
2689: pay_in_utils.trace('l_job ',l_job);
2690: END IF;
2691: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 100);
2692:
2685:
2686: IF g_debug THEN
2687: pay_in_utils.trace('l_rep_name ',l_rep_name);
2688: pay_in_utils.trace('l_position ',l_position);
2689: pay_in_utils.trace('l_job ',l_job);
2690: END IF;
2691: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 100);
2692:
2693:
2687: pay_in_utils.trace('l_rep_name ',l_rep_name);
2688: pay_in_utils.trace('l_position ',l_position);
2689: pay_in_utils.trace('l_job ',l_job);
2690: END IF;
2691: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 100);
2692:
2693:
2694: END archive_org_data;
2695: --------------------------------------------------------------------------
2847: --
2848:
2849: g_debug := hr_utility.debug_enabled;
2850: l_procedure := g_package || 'archive_code';
2851: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
2852: --
2853: g_count := 1;
2854: g_asg_tab.DELETE;
2855:
2857:
2858: OPEN get_assignment_pact_id;
2859: FETCH get_assignment_pact_id INTO l_assignment_id ,l_arc_pay_action_id;
2860: CLOSE get_assignment_pact_id;
2861: pay_in_utils.set_location(g_debug,l_procedure, 20);
2862: --
2863: FOR c_rec IN c_gre_records
2864: LOOP
2865:
2883: g_count := g_count -1;
2884: END IF;
2885:
2886: IF g_debug THEN
2887: pay_in_utils.trace('GRE Count No ',g_count);
2888: pay_in_utils.trace('GRE id ',g_asg_tab(g_count).gre_id);
2889: pay_in_utils.trace('Start Date ',g_asg_tab(g_count).start_date);
2890: pay_in_utils.trace('End Date ',g_asg_tab(g_count).end_date );
2891: END IF;
2884: END IF;
2885:
2886: IF g_debug THEN
2887: pay_in_utils.trace('GRE Count No ',g_count);
2888: pay_in_utils.trace('GRE id ',g_asg_tab(g_count).gre_id);
2889: pay_in_utils.trace('Start Date ',g_asg_tab(g_count).start_date);
2890: pay_in_utils.trace('End Date ',g_asg_tab(g_count).end_date );
2891: END IF;
2892:
2885:
2886: IF g_debug THEN
2887: pay_in_utils.trace('GRE Count No ',g_count);
2888: pay_in_utils.trace('GRE id ',g_asg_tab(g_count).gre_id);
2889: pay_in_utils.trace('Start Date ',g_asg_tab(g_count).start_date);
2890: pay_in_utils.trace('End Date ',g_asg_tab(g_count).end_date );
2891: END IF;
2892:
2893: g_count := g_count + 1;
2886: IF g_debug THEN
2887: pay_in_utils.trace('GRE Count No ',g_count);
2888: pay_in_utils.trace('GRE id ',g_asg_tab(g_count).gre_id);
2889: pay_in_utils.trace('Start Date ',g_asg_tab(g_count).start_date);
2890: pay_in_utils.trace('End Date ',g_asg_tab(g_count).end_date );
2891: END IF;
2892:
2893: g_count := g_count + 1;
2894: END LOOP;
2893: g_count := g_count + 1;
2894: END LOOP;
2895: l_record_count := g_count-1;
2896:
2897: pay_in_utils.set_location(g_debug,l_procedure, 30);
2898:
2899: IF (g_employee_type = 'ALL')
2900: THEN
2901: l_end := g_count-1;
2925: l_end := g_count-1;
2926: l_start := 1;
2927: END IF;
2928: END IF;
2929: pay_in_utils.set_location(g_debug,l_procedure, 50);
2930:
2931: IF g_debug THEN
2932: pay_in_utils.trace('Start record ',l_start);
2933: pay_in_utils.trace('End Record ',l_end);
2928: END IF;
2929: pay_in_utils.set_location(g_debug,l_procedure, 50);
2930:
2931: IF g_debug THEN
2932: pay_in_utils.trace('Start record ',l_start);
2933: pay_in_utils.trace('End Record ',l_end);
2934: END IF;
2935:
2936: FOR i IN l_start..l_end
2929: pay_in_utils.set_location(g_debug,l_procedure, 50);
2930:
2931: IF g_debug THEN
2932: pay_in_utils.trace('Start record ',l_start);
2933: pay_in_utils.trace('End Record ',l_end);
2934: END IF;
2935:
2936: FOR i IN l_start..l_end
2937: LOOP
2943: );
2944: FETCH get_eoy_archival_details INTO l_run_asg_action_id;
2945: CLOSE get_eoy_archival_details;
2946:
2947: pay_in_utils.set_location(g_debug,l_procedure, 60);
2948:
2949: IF l_run_asg_action_id IS NOT NULL THEN
2950: pay_in_utils.set_location(g_debug,l_procedure, 70);
2951: OPEN c_get_date_earned(l_run_asg_action_id);
2946:
2947: pay_in_utils.set_location(g_debug,l_procedure, 60);
2948:
2949: IF l_run_asg_action_id IS NOT NULL THEN
2950: pay_in_utils.set_location(g_debug,l_procedure, 70);
2951: OPEN c_get_date_earned(l_run_asg_action_id);
2952: FETCH c_get_date_earned INTO l_run_date_earned;
2953: CLOSE c_get_date_earned;
2954:
2957: CLOSE get_prepayment_date;
2958:
2959:
2960:
2961: pay_in_utils.set_location(g_debug,l_procedure, 80);
2962:
2963: l_previous_gre_asg_action_id := NULL;
2964: IF (i > 1 AND i <> l_record_count)-- Neither the first nor the last record. Hence determine the diff
2965: THEN -- Taxable House Rent Allowance_ASG_YTD as on previous and current GRE.
2984: ELSIF (i = 1 AND l_record_count = 1)-- There exists only one record, hence take the Projected value
2985: THEN
2986: l_flag := FALSE;
2987: END IF;
2988: pay_in_utils.set_location(g_debug,l_procedure, 90);
2989:
2990: OPEN c_termination_check(l_assignment_id);
2991: FETCH c_termination_check INTO l_end_date;
2992: CLOSE c_termination_check;
2989:
2990: OPEN c_termination_check(l_assignment_id);
2991: FETCH c_termination_check INTO l_end_date;
2992: CLOSE c_termination_check;
2993: pay_in_utils.set_location(g_debug,l_procedure, 100);
2994:
2995: archive_person_data(p_run_asg_action_id => l_run_asg_action_id
2996: ,p_arc_asg_action_id => p_assignment_action_id
2997: ,p_arc_payroll_act_id => l_arc_pay_action_id
3001: ,p_payroll_run_date => fnd_date.date_to_canonical(l_run_date_earned)
3002: ,p_effective_start_date => g_asg_tab(i).start_date
3003: ,p_effective_end_date => LEAST(g_asg_tab(i).end_date,l_end_date)
3004: );
3005: pay_in_utils.set_location(g_debug,l_procedure, 110);
3006:
3007: archive_via_details(p_run_asg_action_id => l_run_asg_action_id
3008: ,p_arc_asg_action_id => p_assignment_action_id
3009: ,p_gre_id => g_asg_tab(i).gre_id
3009: ,p_gre_id => g_asg_tab(i).gre_id
3010: ,p_assignment_id => l_assignment_id
3011: ,p_payroll_date => l_run_date_earned
3012: );
3013: pay_in_utils.set_location(g_debug,l_procedure, 120);
3014:
3015: archive_allowances(p_run_asg_action_id => l_run_asg_action_id
3016: ,p_arc_asg_action_id => p_assignment_action_id
3017: ,p_gre_id => g_asg_tab(i).gre_id
3017: ,p_gre_id => g_asg_tab(i).gre_id
3018: ,pre_gre_asg_act_id => l_previous_gre_asg_action_id
3019: ,p_flag => l_flag
3020: );
3021: pay_in_utils.set_location(g_debug,l_procedure, 130);
3022:
3023: archive_perquisites(p_run_asg_action_id => l_run_asg_action_id
3024: ,p_arc_asg_action_id => p_assignment_action_id
3025: ,p_gre_id => g_asg_tab(i).gre_id
3024: ,p_arc_asg_action_id => p_assignment_action_id
3025: ,p_gre_id => g_asg_tab(i).gre_id
3026: ,pre_gre_asg_act_id => l_previous_gre_asg_action_id
3027: );
3028: pay_in_utils.set_location(g_debug,l_procedure, 140);
3029:
3030: archive_eoy_salary(p_run_asg_action_id => l_run_asg_action_id
3031: ,p_arc_asg_action_id => p_assignment_action_id
3032: ,p_gre_id => g_asg_tab(i).gre_id
3030: archive_eoy_salary(p_run_asg_action_id => l_run_asg_action_id
3031: ,p_arc_asg_action_id => p_assignment_action_id
3032: ,p_gre_id => g_asg_tab(i).gre_id
3033: );
3034: pay_in_utils.set_location(g_debug,l_procedure, 150);
3035:
3036: archive_other_balances(p_run_asg_action_id => l_run_asg_action_id
3037: ,p_arc_asg_action_id => p_assignment_action_id
3038: ,pre_gre_asg_act_id => l_previous_gre_asg_action_id
3039: ,p_gre_id => g_asg_tab(i).gre_id
3040: ,p_start_date => g_asg_tab(i).start_date
3041: ,p_end_date => g_asg_tab(i).end_date
3042: );
3043: pay_in_utils.set_location(g_debug,l_procedure, 160);
3044:
3045: OPEN c_pay_action_level_check(l_arc_pay_action_id,g_asg_tab(i).gre_id);
3046: FETCH c_pay_action_level_check INTO l_check;
3047: CLOSE c_pay_action_level_check;
3044:
3045: OPEN c_pay_action_level_check(l_arc_pay_action_id,g_asg_tab(i).gre_id);
3046: FETCH c_pay_action_level_check INTO l_check;
3047: CLOSE c_pay_action_level_check;
3048: pay_in_utils.set_location(g_debug,l_procedure, 170);
3049:
3050: IF l_check IS NULL
3051: THEN
3052: pay_in_utils.set_location(g_debug,l_procedure, 180);
3048: pay_in_utils.set_location(g_debug,l_procedure, 170);
3049:
3050: IF l_check IS NULL
3051: THEN
3052: pay_in_utils.set_location(g_debug,l_procedure, 180);
3053: archive_org_data(p_arc_pay_action_id => l_arc_pay_action_id
3054: ,p_gre_id => g_asg_tab(i).gre_id
3055: ,p_effective_end_date => g_system_date
3056: );
3057: END IF;
3058: END IF;
3059:
3060: END LOOP;
3061: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 20);
3062: --
3063: EXCEPTION
3064: WHEN OTHERS THEN
3065: IF get_eoy_archival_details%ISOPEN THEN
3064: WHEN OTHERS THEN
3065: IF get_eoy_archival_details%ISOPEN THEN
3066: CLOSE get_eoy_archival_details;
3067: END IF;
3068: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
3069: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 30);
3070: pay_in_utils.trace(l_message,l_procedure);
3071: RAISE;
3072: END archive_code;
3065: IF get_eoy_archival_details%ISOPEN THEN
3066: CLOSE get_eoy_archival_details;
3067: END IF;
3068: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
3069: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 30);
3070: pay_in_utils.trace(l_message,l_procedure);
3071: RAISE;
3072: END archive_code;
3073:
3066: CLOSE get_eoy_archival_details;
3067: END IF;
3068: l_message := pay_in_utils.get_pay_message('PER_IN_ORACLE_GENERIC_ERROR', 'FUNCTION:'||l_procedure, 'SQLERRMC:'||sqlerrm);
3069: pay_in_utils.set_location(g_debug,'Leaving : '||l_procedure, 30);
3070: pay_in_utils.trace(l_message,l_procedure);
3071: RAISE;
3072: END archive_code;
3073:
3074: END PAY_IN_EOY_ARCHIVE;