95:
96: BEGIN
97: g_debug := hr_utility.debug_enabled;
98: l_procedure := g_package||'init_form12ba_code';
99: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
100:
101: g_perq_record(1).perq_value1 := 0;
102: g_perq_record(1).perq_value2 := 0;
103:
154:
155: g_perq_record(19).perq_value1 := 0;
156: g_perq_record(19).perq_value2 := 0;
157:
158: pay_in_utils.set_location(g_debug,'LEAVING: '||l_procedure,20);
159:
160: END init_form12ba_code;
161:
162: --------------------------------------------------------------------------
191: --
192: BEGIN
193: g_debug := hr_utility.debug_enabled;
194: l_procedure := g_package ||'get_max_context_id';
195: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
196:
197:
198: IF g_debug THEN
199: pay_in_utils.trace('**************************************************','********************');
195: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
196:
197:
198: IF g_debug THEN
199: pay_in_utils.trace('**************************************************','********************');
200: pay_in_utils.trace('p_gre_id',to_char(p_gre_id));
201: pay_in_utils.trace('p_assessment_year',to_char(p_assessment_year));
202: pay_in_utils.trace('**************************************************','********************');
203: END IF;
196:
197:
198: IF g_debug THEN
199: pay_in_utils.trace('**************************************************','********************');
200: pay_in_utils.trace('p_gre_id',to_char(p_gre_id));
201: pay_in_utils.trace('p_assessment_year',to_char(p_assessment_year));
202: pay_in_utils.trace('**************************************************','********************');
203: END IF;
204:
197:
198: IF g_debug THEN
199: pay_in_utils.trace('**************************************************','********************');
200: pay_in_utils.trace('p_gre_id',to_char(p_gre_id));
201: pay_in_utils.trace('p_assessment_year',to_char(p_assessment_year));
202: pay_in_utils.trace('**************************************************','********************');
203: END IF;
204:
205: OPEN csr_max_action_context_id;
198: IF g_debug THEN
199: pay_in_utils.trace('**************************************************','********************');
200: pay_in_utils.trace('p_gre_id',to_char(p_gre_id));
201: pay_in_utils.trace('p_assessment_year',to_char(p_assessment_year));
202: pay_in_utils.trace('**************************************************','********************');
203: END IF;
204:
205: OPEN csr_max_action_context_id;
206: FETCH csr_max_action_context_id INTO l_action_context_id;
206: FETCH csr_max_action_context_id INTO l_action_context_id;
207: CLOSE csr_max_action_context_id;
208:
209: IF g_debug THEN
210: pay_in_utils.trace('l_action_context_id',l_action_context_id);
211: END IF;
212: pay_in_utils.set_location(g_debug,'LEAVING: '||l_procedure,20);
213: RETURN l_action_context_id;
214:
208:
209: IF g_debug THEN
210: pay_in_utils.trace('l_action_context_id',l_action_context_id);
211: END IF;
212: pay_in_utils.set_location(g_debug,'LEAVING: '||l_procedure,20);
213: RETURN l_action_context_id;
214:
215: END get_max_context_id;
216:
261:
262: BEGIN
263: g_debug := hr_utility.debug_enabled;
264: l_procedure := g_package ||'get_location_details';
265: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
266:
267:
268: IF g_debug THEN
269: pay_in_utils.trace('**************************************************','********************');
265: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
266:
267:
268: IF g_debug THEN
269: pay_in_utils.trace('**************************************************','********************');
270: pay_in_utils.trace('p_location_id',to_char(p_location_id));
271: pay_in_utils.trace('p_concatenate',p_concatenate);
272: pay_in_utils.trace('p_field', p_field);
273: pay_in_utils.trace('**************************************************','********************');
266:
267:
268: IF g_debug THEN
269: pay_in_utils.trace('**************************************************','********************');
270: pay_in_utils.trace('p_location_id',to_char(p_location_id));
271: pay_in_utils.trace('p_concatenate',p_concatenate);
272: pay_in_utils.trace('p_field', p_field);
273: pay_in_utils.trace('**************************************************','********************');
274: END IF;
267:
268: IF g_debug THEN
269: pay_in_utils.trace('**************************************************','********************');
270: pay_in_utils.trace('p_location_id',to_char(p_location_id));
271: pay_in_utils.trace('p_concatenate',p_concatenate);
272: pay_in_utils.trace('p_field', p_field);
273: pay_in_utils.trace('**************************************************','********************');
274: END IF;
275:
268: IF g_debug THEN
269: pay_in_utils.trace('**************************************************','********************');
270: pay_in_utils.trace('p_location_id',to_char(p_location_id));
271: pay_in_utils.trace('p_concatenate',p_concatenate);
272: pay_in_utils.trace('p_field', p_field);
273: pay_in_utils.trace('**************************************************','********************');
274: END IF;
275:
276: OPEN csr_get_location_details;
269: pay_in_utils.trace('**************************************************','********************');
270: pay_in_utils.trace('p_location_id',to_char(p_location_id));
271: pay_in_utils.trace('p_concatenate',p_concatenate);
272: pay_in_utils.trace('p_field', p_field);
273: pay_in_utils.trace('**************************************************','********************');
274: END IF;
275:
276: OPEN csr_get_location_details;
277: FETCH csr_get_location_details
321: l_details :=RTRIM(l_details,fnd_global.local_chr(10));
322: l_details :=RTRIM(l_details,',');
323:
324: IF g_debug THEN
325: pay_in_utils.trace('l_details', l_details );
326: END IF;
327:
328: pay_in_utils.set_location(g_debug,'LEAVING: '||l_procedure,20);
329:
324: IF g_debug THEN
325: pay_in_utils.trace('l_details', l_details );
326: END IF;
327:
328: pay_in_utils.set_location(g_debug,'LEAVING: '||l_procedure,20);
329:
330: RETURN l_details;
331:
332: END get_location_details;
376:
377: BEGIN
378: g_debug := hr_utility.debug_enabled;
379: l_procedure := g_package ||'get_location_details';
380: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
381:
382: IF g_debug THEN
383: pay_in_utils.trace('**************************************************','********************');
384: pay_in_utils.trace('p_address_id ',p_address_id );
379: l_procedure := g_package ||'get_location_details';
380: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
381:
382: IF g_debug THEN
383: pay_in_utils.trace('**************************************************','********************');
384: pay_in_utils.trace('p_address_id ',p_address_id );
385: pay_in_utils.trace('p_concatenate',p_concatenate);
386: pay_in_utils.trace('p_field' ,p_field );
387: pay_in_utils.trace('**************************************************','********************');
380: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
381:
382: IF g_debug THEN
383: pay_in_utils.trace('**************************************************','********************');
384: pay_in_utils.trace('p_address_id ',p_address_id );
385: pay_in_utils.trace('p_concatenate',p_concatenate);
386: pay_in_utils.trace('p_field' ,p_field );
387: pay_in_utils.trace('**************************************************','********************');
388: END IF;
381:
382: IF g_debug THEN
383: pay_in_utils.trace('**************************************************','********************');
384: pay_in_utils.trace('p_address_id ',p_address_id );
385: pay_in_utils.trace('p_concatenate',p_concatenate);
386: pay_in_utils.trace('p_field' ,p_field );
387: pay_in_utils.trace('**************************************************','********************');
388: END IF;
389:
382: IF g_debug THEN
383: pay_in_utils.trace('**************************************************','********************');
384: pay_in_utils.trace('p_address_id ',p_address_id );
385: pay_in_utils.trace('p_concatenate',p_concatenate);
386: pay_in_utils.trace('p_field' ,p_field );
387: pay_in_utils.trace('**************************************************','********************');
388: END IF;
389:
390: OPEN csr_get_address_details;
383: pay_in_utils.trace('**************************************************','********************');
384: pay_in_utils.trace('p_address_id ',p_address_id );
385: pay_in_utils.trace('p_concatenate',p_concatenate);
386: pay_in_utils.trace('p_field' ,p_field );
387: pay_in_utils.trace('**************************************************','********************');
388: END IF;
389:
390: OPEN csr_get_address_details;
391: FETCH csr_get_address_details
433:
434:
435:
436: IF g_debug THEN
437: pay_in_utils.trace('l_details',l_details);
438: END IF;
439:
440: pay_in_utils.set_location(g_debug,'LEAVING: '||l_procedure,20);
441: RETURN l_details;
436: IF g_debug THEN
437: pay_in_utils.trace('l_details',l_details);
438: END IF;
439:
440: pay_in_utils.set_location(g_debug,'LEAVING: '||l_procedure,20);
441: RETURN l_details;
442:
443: END get_address_details;
444:
461:
462: BEGIN
463: g_debug := hr_utility.debug_enabled;
464: l_procedure := g_package ||'write_tag';
465: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
466:
467: IF g_debug THEN
468: pay_in_utils.trace('**************************************************','********************');
469: pay_in_utils.trace('p_tag_name ',p_tag_name );
464: l_procedure := g_package ||'write_tag';
465: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
466:
467: IF g_debug THEN
468: pay_in_utils.trace('**************************************************','********************');
469: pay_in_utils.trace('p_tag_name ',p_tag_name );
470: pay_in_utils.trace('p_tag_value',p_tag_value);
471: pay_in_utils.trace('**************************************************','********************');
472: END IF;
465: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
466:
467: IF g_debug THEN
468: pay_in_utils.trace('**************************************************','********************');
469: pay_in_utils.trace('p_tag_name ',p_tag_name );
470: pay_in_utils.trace('p_tag_value',p_tag_value);
471: pay_in_utils.trace('**************************************************','********************');
472: END IF;
473:
466:
467: IF g_debug THEN
468: pay_in_utils.trace('**************************************************','********************');
469: pay_in_utils.trace('p_tag_name ',p_tag_name );
470: pay_in_utils.trace('p_tag_value',p_tag_value);
471: pay_in_utils.trace('**************************************************','********************');
472: END IF;
473:
474: l_tag := pay_in_xml_utils.getTag( p_tag_name => p_tag_name
467: IF g_debug THEN
468: pay_in_utils.trace('**************************************************','********************');
469: pay_in_utils.trace('p_tag_name ',p_tag_name );
470: pay_in_utils.trace('p_tag_value',p_tag_value);
471: pay_in_utils.trace('**************************************************','********************');
472: END IF;
473:
474: l_tag := pay_in_xml_utils.getTag( p_tag_name => p_tag_name
475: , p_tag_value => p_tag_value
475: , p_tag_value => p_tag_value
476: );
477:
478: dbms_lob.writeAppend(g_tmp_clob,length(l_tag),l_tag);
479: pay_in_utils.set_location(g_debug,'LEAVING: '||l_procedure,20);
480: END write_tag;
481:
482: --------------------------------------------------------------------------
483: -- --
560: l_total_quarter number;
561: BEGIN
562: i := 1;
563: IF g_debug THEN
564: pay_in_utils.trace('p_tax_unit_id ',to_char(p_tax_unit_id ));
565: pay_in_utils.trace('p_assignment_id ',p_assignment_id);
566: pay_in_utils.trace('p_qtr_start ',p_qtr_start);
567: pay_in_utils.trace('p_qtr_end ',p_qtr_end);
568: END IF;
561: BEGIN
562: i := 1;
563: IF g_debug THEN
564: pay_in_utils.trace('p_tax_unit_id ',to_char(p_tax_unit_id ));
565: pay_in_utils.trace('p_assignment_id ',p_assignment_id);
566: pay_in_utils.trace('p_qtr_start ',p_qtr_start);
567: pay_in_utils.trace('p_qtr_end ',p_qtr_end);
568: END IF;
569:
562: i := 1;
563: IF g_debug THEN
564: pay_in_utils.trace('p_tax_unit_id ',to_char(p_tax_unit_id ));
565: pay_in_utils.trace('p_assignment_id ',p_assignment_id);
566: pay_in_utils.trace('p_qtr_start ',p_qtr_start);
567: pay_in_utils.trace('p_qtr_end ',p_qtr_end);
568: END IF;
569:
570: g_bal_name_tab.DELETE;
563: IF g_debug THEN
564: pay_in_utils.trace('p_tax_unit_id ',to_char(p_tax_unit_id ));
565: pay_in_utils.trace('p_assignment_id ',p_assignment_id);
566: pay_in_utils.trace('p_qtr_start ',p_qtr_start);
567: pay_in_utils.trace('p_qtr_end ',p_qtr_end);
568: END IF;
569:
570: g_bal_name_tab.DELETE;
571: g_balance_value_tab.DELETE;
718:
719: BEGIN
720: g_debug := hr_utility.debug_enabled;
721: l_procedure := g_package ||'build_gre_xml';
722: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
723:
724:
725: g_Bank_Details_tbl.DELETE;
726: g_qtr_action_id_details.DELETE;
726: g_qtr_action_id_details.DELETE;
727:
728:
729: IF g_debug THEN
730: pay_in_utils.trace('p_gre_id ',to_char(p_gre_id ));
731: pay_in_utils.trace('p_designation ',p_designation);
732: END IF;
733:
734: l_action_context_id := get_max_context_id(p_gre_id,g_assessment_year);
727:
728:
729: IF g_debug THEN
730: pay_in_utils.trace('p_gre_id ',to_char(p_gre_id ));
731: pay_in_utils.trace('p_designation ',p_designation);
732: END IF;
733:
734: l_action_context_id := get_max_context_id(p_gre_id,g_assessment_year);
735: g_er_type_flag := 0;
790: g_qtr_action_id_details(qtr_index).Nature := i.Nature;
791: g_qtr_action_id_details(qtr_index).OrgID := i.OrgID;
792: g_qtr_action_id_details(qtr_index).ActionID := i.ActionID;
793: END LOOP;
794: pay_in_utils.set_location(g_debug,'At: '||l_procedure,14);
795: pay_in_utils.set_location(g_debug,'LEAVING: '||l_procedure,20);
796:
797: EXCEPTION
798:
791: g_qtr_action_id_details(qtr_index).OrgID := i.OrgID;
792: g_qtr_action_id_details(qtr_index).ActionID := i.ActionID;
793: END LOOP;
794: pay_in_utils.set_location(g_debug,'At: '||l_procedure,14);
795: pay_in_utils.set_location(g_debug,'LEAVING: '||l_procedure,20);
796:
797: EXCEPTION
798:
799: WHEN OTHERS THEN
796:
797: EXCEPTION
798:
799: WHEN OTHERS THEN
800: pay_in_utils.set_location(g_debug,'Error in : '||l_procedure,30);
801: RAISE;
802:
803: END build_gre_xml;
804:
904:
905: BEGIN
906: g_debug := hr_utility.debug_enabled;
907: l_procedure := g_package ||'build_employee_xml';
908: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
909:
910:
911: IF g_debug THEN
912: pay_in_utils.trace('**************************************************','********************');
908: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
909:
910:
911: IF g_debug THEN
912: pay_in_utils.trace('**************************************************','********************');
913: pay_in_utils.trace('p_action_context_id ',p_action_context_id );
914: pay_in_utils.trace('p_source_id ',p_source_id );
915: pay_in_utils.trace('p_designation ',p_designation );
916: pay_in_utils.trace('**************************************************','********************');
909:
910:
911: IF g_debug THEN
912: pay_in_utils.trace('**************************************************','********************');
913: pay_in_utils.trace('p_action_context_id ',p_action_context_id );
914: pay_in_utils.trace('p_source_id ',p_source_id );
915: pay_in_utils.trace('p_designation ',p_designation );
916: pay_in_utils.trace('**************************************************','********************');
917: END IF;
910:
911: IF g_debug THEN
912: pay_in_utils.trace('**************************************************','********************');
913: pay_in_utils.trace('p_action_context_id ',p_action_context_id );
914: pay_in_utils.trace('p_source_id ',p_source_id );
915: pay_in_utils.trace('p_designation ',p_designation );
916: pay_in_utils.trace('**************************************************','********************');
917: END IF;
918:
911: IF g_debug THEN
912: pay_in_utils.trace('**************************************************','********************');
913: pay_in_utils.trace('p_action_context_id ',p_action_context_id );
914: pay_in_utils.trace('p_source_id ',p_source_id );
915: pay_in_utils.trace('p_designation ',p_designation );
916: pay_in_utils.trace('**************************************************','********************');
917: END IF;
918:
919:
912: pay_in_utils.trace('**************************************************','********************');
913: pay_in_utils.trace('p_action_context_id ',p_action_context_id );
914: pay_in_utils.trace('p_source_id ',p_source_id );
915: pay_in_utils.trace('p_designation ',p_designation );
916: pay_in_utils.trace('**************************************************','********************');
917: END IF;
918:
919:
920: FOR i IN csr_get_person_data
960: p_flag := 0;
961: END IF;
962:
963: IF g_debug THEN
964: pay_in_utils.trace('**************************************************','********************');
965: pay_in_utils.trace('p_rem_pay_period ',to_char(p_rem_pay_period ));
966: pay_in_utils.trace('p_flag ',to_char(p_flag ));
967: pay_in_utils.trace('**************************************************','********************');
968: END IF;
961: END IF;
962:
963: IF g_debug THEN
964: pay_in_utils.trace('**************************************************','********************');
965: pay_in_utils.trace('p_rem_pay_period ',to_char(p_rem_pay_period ));
966: pay_in_utils.trace('p_flag ',to_char(p_flag ));
967: pay_in_utils.trace('**************************************************','********************');
968: END IF;
969:
962:
963: IF g_debug THEN
964: pay_in_utils.trace('**************************************************','********************');
965: pay_in_utils.trace('p_rem_pay_period ',to_char(p_rem_pay_period ));
966: pay_in_utils.trace('p_flag ',to_char(p_flag ));
967: pay_in_utils.trace('**************************************************','********************');
968: END IF;
969:
970: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,20);
963: IF g_debug THEN
964: pay_in_utils.trace('**************************************************','********************');
965: pay_in_utils.trace('p_rem_pay_period ',to_char(p_rem_pay_period ));
966: pay_in_utils.trace('p_flag ',to_char(p_flag ));
967: pay_in_utils.trace('**************************************************','********************');
968: END IF;
969:
970: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,20);
971:
966: pay_in_utils.trace('p_flag ',to_char(p_flag ));
967: pay_in_utils.trace('**************************************************','********************');
968: END IF;
969:
970: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,20);
971:
972:
973: EXCEPTION
974: --
972:
973: EXCEPTION
974: --
975: WHEN OTHERS THEN
976: pay_in_utils.set_location(g_debug,'Error in: '||l_procedure,30);
977: RAISE;
978: END build_employee_xml;
979:
980: --------------------------------------------------------------------------
1319:
1320: BEGIN
1321: g_debug := hr_utility.debug_enabled;
1322: l_procedure := g_package ||'build_form16_xml';
1323: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
1324:
1325:
1326: IF g_debug THEN
1327: pay_in_utils.trace('**************************************************','********************');
1323: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
1324:
1325:
1326: IF g_debug THEN
1327: pay_in_utils.trace('**************************************************','********************');
1328: pay_in_utils.trace('p_action_context_id ',p_action_context_id );
1329: pay_in_utils.trace('p_source_id ',p_source_id );
1330: pay_in_utils.trace('p_rem_pay_period ',to_char(p_rem_pay_period));
1331: pay_in_utils.trace('p_flag ',to_char(p_flag));
1324:
1325:
1326: IF g_debug THEN
1327: pay_in_utils.trace('**************************************************','********************');
1328: pay_in_utils.trace('p_action_context_id ',p_action_context_id );
1329: pay_in_utils.trace('p_source_id ',p_source_id );
1330: pay_in_utils.trace('p_rem_pay_period ',to_char(p_rem_pay_period));
1331: pay_in_utils.trace('p_flag ',to_char(p_flag));
1332: pay_in_utils.trace('**************************************************','********************');
1325:
1326: IF g_debug THEN
1327: pay_in_utils.trace('**************************************************','********************');
1328: pay_in_utils.trace('p_action_context_id ',p_action_context_id );
1329: pay_in_utils.trace('p_source_id ',p_source_id );
1330: pay_in_utils.trace('p_rem_pay_period ',to_char(p_rem_pay_period));
1331: pay_in_utils.trace('p_flag ',to_char(p_flag));
1332: pay_in_utils.trace('**************************************************','********************');
1333: END IF;
1326: IF g_debug THEN
1327: pay_in_utils.trace('**************************************************','********************');
1328: pay_in_utils.trace('p_action_context_id ',p_action_context_id );
1329: pay_in_utils.trace('p_source_id ',p_source_id );
1330: pay_in_utils.trace('p_rem_pay_period ',to_char(p_rem_pay_period));
1331: pay_in_utils.trace('p_flag ',to_char(p_flag));
1332: pay_in_utils.trace('**************************************************','********************');
1333: END IF;
1334:
1327: pay_in_utils.trace('**************************************************','********************');
1328: pay_in_utils.trace('p_action_context_id ',p_action_context_id );
1329: pay_in_utils.trace('p_source_id ',p_source_id );
1330: pay_in_utils.trace('p_rem_pay_period ',to_char(p_rem_pay_period));
1331: pay_in_utils.trace('p_flag ',to_char(p_flag));
1332: pay_in_utils.trace('**************************************************','********************');
1333: END IF;
1334:
1335: l_flag_for_12ba :=0;
1328: pay_in_utils.trace('p_action_context_id ',p_action_context_id );
1329: pay_in_utils.trace('p_source_id ',p_source_id );
1330: pay_in_utils.trace('p_rem_pay_period ',to_char(p_rem_pay_period));
1331: pay_in_utils.trace('p_flag ',to_char(p_flag));
1332: pay_in_utils.trace('**************************************************','********************');
1333: END IF;
1334:
1335: l_flag_for_12ba :=0;
1336: l_flag_rep_gen := -1;
1834: write_tag('EE_INCOME',pay_us_employee_payslip_web.get_format_value(g_business_group_id,g_salary_record(10).Value - g_salary_record(2).Value));
1835: write_tag('C_16AA_FLAG',p_flag_for_16aa );
1836: write_tag('C_12BA_FLAG',l_flag_for_12ba );
1837:
1838: l_tax_in_words := pay_in_utils.number_to_words(g_salary_record(20).Value);
1839: write_tag('TOTAL',l_tax_in_words );
1840:
1841: SELECT nvl(pps.actual_termination_date,paa.effective_end_Date)
1842: INTO l_asg_end_date
1969:
1970: END IF;
1971: /* Challan End */
1972: IF g_debug THEN
1973: pay_in_utils.trace('p_flag_for_16aa ', p_flag_for_16aa );
1974: END IF;
1975: pay_in_utils.set_location(g_debug,'LEAVING: '||l_procedure,20);
1976: END build_form16_xml;
1977:
1971: /* Challan End */
1972: IF g_debug THEN
1973: pay_in_utils.trace('p_flag_for_16aa ', p_flag_for_16aa );
1974: END IF;
1975: pay_in_utils.set_location(g_debug,'LEAVING: '||l_procedure,20);
1976: END build_form16_xml;
1977:
1978: --------------------------------------------------------------------------
1979: -- --
2048:
2049: BEGIN
2050: g_debug := hr_utility.debug_enabled;
2051: l_procedure := g_package ||'build_form12ba_xml';
2052: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
2053:
2054:
2055: IF g_debug THEN
2056: pay_in_utils.trace('**************************************************','********************');
2052: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
2053:
2054:
2055: IF g_debug THEN
2056: pay_in_utils.trace('**************************************************','********************');
2057: pay_in_utils.trace('p_action_context_id ', p_action_context_id );
2058: pay_in_utils.trace('p_source_id ', p_source_id );
2059: pay_in_utils.trace('**************************************************','********************');
2060: END IF;
2053:
2054:
2055: IF g_debug THEN
2056: pay_in_utils.trace('**************************************************','********************');
2057: pay_in_utils.trace('p_action_context_id ', p_action_context_id );
2058: pay_in_utils.trace('p_source_id ', p_source_id );
2059: pay_in_utils.trace('**************************************************','********************');
2060: END IF;
2061:
2054:
2055: IF g_debug THEN
2056: pay_in_utils.trace('**************************************************','********************');
2057: pay_in_utils.trace('p_action_context_id ', p_action_context_id );
2058: pay_in_utils.trace('p_source_id ', p_source_id );
2059: pay_in_utils.trace('**************************************************','********************');
2060: END IF;
2061:
2062: FOR j in csr_get_perq_values
2055: IF g_debug THEN
2056: pay_in_utils.trace('**************************************************','********************');
2057: pay_in_utils.trace('p_action_context_id ', p_action_context_id );
2058: pay_in_utils.trace('p_source_id ', p_source_id );
2059: pay_in_utils.trace('**************************************************','********************');
2060: END IF;
2061:
2062: FOR j in csr_get_perq_values
2063: LOOP
2115: )
2116: );
2117:
2118: END LOOP;
2119: pay_in_utils.set_location(g_debug,'LEAVING: '||l_procedure,20);
2120:
2121: END build_form12ba_xml;
2122:
2123: --------------------------------------------------------------------------
2140:
2141: BEGIN
2142: g_debug := hr_utility.debug_enabled;
2143: l_procedure := g_package ||'build_form12ba_xml';
2144: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
2145:
2146:
2147: IF g_debug THEN
2148: pay_in_utils.trace('p_business_group_id ', to_char(p_business_group_id) );
2144: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
2145:
2146:
2147: IF g_debug THEN
2148: pay_in_utils.trace('p_business_group_id ', to_char(p_business_group_id) );
2149: END IF;
2150:
2151: p_template := 'PYINEOYR';
2152: g_chunk_size := 10;
2152: g_chunk_size := 10;
2153: g_business_group_id := p_business_group_id;
2154:
2155: IF g_debug THEN
2156: pay_in_utils.trace('p_template ', p_template);
2157: END IF;
2158: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,20);
2159: EXCEPTION
2160:
2154:
2155: IF g_debug THEN
2156: pay_in_utils.trace('p_template ', p_template);
2157: END IF;
2158: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,20);
2159: EXCEPTION
2160:
2161: WHEN OTHERS THEN
2162: pay_in_utils.set_location(g_debug,'Error in : '||l_procedure,20);
2158: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,20);
2159: EXCEPTION
2160:
2161: WHEN OTHERS THEN
2162: pay_in_utils.set_location(g_debug,'Error in : '||l_procedure,20);
2163: RAISE;
2164:
2165: END get_template;
2166:
2182:
2183: BEGIN
2184: g_debug := hr_utility.debug_enabled;
2185: l_procedure := g_package ||'fetch_xml';
2186: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
2187:
2188: -- If Clobs exists return next clob else exit NULL
2189: hr_utility.trace('Clob Count : ' || g_clob_cnt);
2190: hr_utility.trace('Clob Fetch Count : ' || g_fetch_clob_cnt);
2194: ELSE
2195: p_clob := null;
2196: END IF;
2197:
2198: pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,20);
2199:
2200: END fetch_xml;
2201:
2202: --------------------------------------------------------------------------
2230:
2231: BEGIN
2232: g_debug := hr_utility.debug_enabled;
2233: l_procedure := g_package ||'get_gre_details';
2234: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
2235:
2236: IF g_debug THEN
2237: pay_in_utils.trace('p_gre_id ',to_char(p_gre_id ));
2238: END IF;
2233: l_procedure := g_package ||'get_gre_details';
2234: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
2235:
2236: IF g_debug THEN
2237: pay_in_utils.trace('p_gre_id ',to_char(p_gre_id ));
2238: END IF;
2239:
2240: l_action_context_id := get_max_context_id(p_gre_id,g_assessment_year);
2241:
2246:
2247: EXCEPTION
2248:
2249: WHEN OTHERS THEN
2250: pay_in_utils.set_location(g_debug,'Error in : '||l_procedure,20);
2251: RAISE;
2252:
2253: END get_image_details;
2254: --------------------------------------------------------------------------
2379: begin
2380:
2381: g_debug := hr_utility.debug_enabled;
2382: l_procedure := g_package ||'load_xml';
2383: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
2384:
2385:
2386: IF g_debug THEN
2387: pay_in_utils.trace('**************************************************','********************');
2383: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
2384:
2385:
2386: IF g_debug THEN
2387: pay_in_utils.trace('**************************************************','********************');
2388: pay_in_utils.trace('Business Group ID',to_char(p_business_group_id ));
2389: pay_in_utils.trace('Assessment Year ',p_assessment_year );
2390: pay_in_utils.trace('GRE Organization ',p_gre_organization );
2391: pay_in_utils.trace('Employee Type ',p_employee_type );
2384:
2385:
2386: IF g_debug THEN
2387: pay_in_utils.trace('**************************************************','********************');
2388: pay_in_utils.trace('Business Group ID',to_char(p_business_group_id ));
2389: pay_in_utils.trace('Assessment Year ',p_assessment_year );
2390: pay_in_utils.trace('GRE Organization ',p_gre_organization );
2391: pay_in_utils.trace('Employee Type ',p_employee_type );
2392: pay_in_utils.trace('Employee Number ',p_employee_number );
2385:
2386: IF g_debug THEN
2387: pay_in_utils.trace('**************************************************','********************');
2388: pay_in_utils.trace('Business Group ID',to_char(p_business_group_id ));
2389: pay_in_utils.trace('Assessment Year ',p_assessment_year );
2390: pay_in_utils.trace('GRE Organization ',p_gre_organization );
2391: pay_in_utils.trace('Employee Type ',p_employee_type );
2392: pay_in_utils.trace('Employee Number ',p_employee_number );
2393: pay_in_utils.trace('Designation ',p_designation );
2386: IF g_debug THEN
2387: pay_in_utils.trace('**************************************************','********************');
2388: pay_in_utils.trace('Business Group ID',to_char(p_business_group_id ));
2389: pay_in_utils.trace('Assessment Year ',p_assessment_year );
2390: pay_in_utils.trace('GRE Organization ',p_gre_organization );
2391: pay_in_utils.trace('Employee Type ',p_employee_type );
2392: pay_in_utils.trace('Employee Number ',p_employee_number );
2393: pay_in_utils.trace('Designation ',p_designation );
2394: pay_in_utils.trace('**************************************************','********************');
2387: pay_in_utils.trace('**************************************************','********************');
2388: pay_in_utils.trace('Business Group ID',to_char(p_business_group_id ));
2389: pay_in_utils.trace('Assessment Year ',p_assessment_year );
2390: pay_in_utils.trace('GRE Organization ',p_gre_organization );
2391: pay_in_utils.trace('Employee Type ',p_employee_type );
2392: pay_in_utils.trace('Employee Number ',p_employee_number );
2393: pay_in_utils.trace('Designation ',p_designation );
2394: pay_in_utils.trace('**************************************************','********************');
2395: END IF;
2388: pay_in_utils.trace('Business Group ID',to_char(p_business_group_id ));
2389: pay_in_utils.trace('Assessment Year ',p_assessment_year );
2390: pay_in_utils.trace('GRE Organization ',p_gre_organization );
2391: pay_in_utils.trace('Employee Type ',p_employee_type );
2392: pay_in_utils.trace('Employee Number ',p_employee_number );
2393: pay_in_utils.trace('Designation ',p_designation );
2394: pay_in_utils.trace('**************************************************','********************');
2395: END IF;
2396:
2389: pay_in_utils.trace('Assessment Year ',p_assessment_year );
2390: pay_in_utils.trace('GRE Organization ',p_gre_organization );
2391: pay_in_utils.trace('Employee Type ',p_employee_type );
2392: pay_in_utils.trace('Employee Number ',p_employee_number );
2393: pay_in_utils.trace('Designation ',p_designation );
2394: pay_in_utils.trace('**************************************************','********************');
2395: END IF;
2396:
2397: l_emp_count := 0;
2390: pay_in_utils.trace('GRE Organization ',p_gre_organization );
2391: pay_in_utils.trace('Employee Type ',p_employee_type );
2392: pay_in_utils.trace('Employee Number ',p_employee_number );
2393: pay_in_utils.trace('Designation ',p_designation );
2394: pay_in_utils.trace('**************************************************','********************');
2395: END IF;
2396:
2397: l_emp_count := 0;
2398: g_assessment_year := p_assessment_year;
2491: /* The following calls builds the XML related to form16, form 16aa and 12ba
2492: required to generate the report
2493: */
2494:
2495: pay_in_utils.set_location(g_debug,'INDIA F16: Building XML for Employee',70);
2496: build_employee_xml(l_action_context_id,l_source_id,p_designation,p_rem_pay_period,p_flag);
2497: pay_in_utils.set_location(g_debug,'Building XML for Form 16/16AA',80);
2498: build_form16_xml(l_action_context_id,l_source_id,p_rem_pay_period,p_flag,l_flag_for_16aa);
2499: IF (l_flag_for_16aa = -1) THEN
2493: */
2494:
2495: pay_in_utils.set_location(g_debug,'INDIA F16: Building XML for Employee',70);
2496: build_employee_xml(l_action_context_id,l_source_id,p_designation,p_rem_pay_period,p_flag);
2497: pay_in_utils.set_location(g_debug,'Building XML for Form 16/16AA',80);
2498: build_form16_xml(l_action_context_id,l_source_id,p_rem_pay_period,p_flag,l_flag_for_16aa);
2499: IF (l_flag_for_16aa = -1) THEN
2500: l_emp_count := l_emp_count - 1;
2501: ELSE
2498: build_form16_xml(l_action_context_id,l_source_id,p_rem_pay_period,p_flag,l_flag_for_16aa);
2499: IF (l_flag_for_16aa = -1) THEN
2500: l_emp_count := l_emp_count - 1;
2501: ELSE
2502: pay_in_utils.set_location(g_debug,'Building XML for Form 12BA',90);
2503: init_form12ba_code;
2504: build_form12ba_xml(l_action_context_id,l_source_id);
2505: get_image_details(l_gre_id);
2506: l_open_tag := '
2530: p_clob_cnt := g_clob_cnt;
2531: ELSE
2532: p_clob_cnt := g_clob_cnt;
2533: END IF;
2534: pay_in_utils.set_location(g_debug,'LEAVING: '||l_procedure,100);
2535: END load_xml;
2536:
2537:
2538: PROCEDURE load_xml_burst (p_business_group_id IN NUMBER
2637: begin
2638:
2639: g_debug := hr_utility.debug_enabled;
2640: l_procedure := g_package ||'load_xml_burst';
2641: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
2642:
2643:
2644: IF g_debug THEN
2645: pay_in_utils.trace('**************************************************','********************');
2641: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
2642:
2643:
2644: IF g_debug THEN
2645: pay_in_utils.trace('**************************************************','********************');
2646: pay_in_utils.trace('Business Group ID',to_char(p_business_group_id ));
2647: pay_in_utils.trace('Assessment Year ',p_assessment_year );
2648: pay_in_utils.trace('GRE Organization ',p_gre_organization );
2649: pay_in_utils.trace('Employee Type ',p_employee_type );
2642:
2643:
2644: IF g_debug THEN
2645: pay_in_utils.trace('**************************************************','********************');
2646: pay_in_utils.trace('Business Group ID',to_char(p_business_group_id ));
2647: pay_in_utils.trace('Assessment Year ',p_assessment_year );
2648: pay_in_utils.trace('GRE Organization ',p_gre_organization );
2649: pay_in_utils.trace('Employee Type ',p_employee_type );
2650: pay_in_utils.trace('Employee Number ',p_employee_number );
2643:
2644: IF g_debug THEN
2645: pay_in_utils.trace('**************************************************','********************');
2646: pay_in_utils.trace('Business Group ID',to_char(p_business_group_id ));
2647: pay_in_utils.trace('Assessment Year ',p_assessment_year );
2648: pay_in_utils.trace('GRE Organization ',p_gre_organization );
2649: pay_in_utils.trace('Employee Type ',p_employee_type );
2650: pay_in_utils.trace('Employee Number ',p_employee_number );
2651: pay_in_utils.trace('Report Type ',p_report_type ); /*XML = Form16, XML2= Form12B */
2644: IF g_debug THEN
2645: pay_in_utils.trace('**************************************************','********************');
2646: pay_in_utils.trace('Business Group ID',to_char(p_business_group_id ));
2647: pay_in_utils.trace('Assessment Year ',p_assessment_year );
2648: pay_in_utils.trace('GRE Organization ',p_gre_organization );
2649: pay_in_utils.trace('Employee Type ',p_employee_type );
2650: pay_in_utils.trace('Employee Number ',p_employee_number );
2651: pay_in_utils.trace('Report Type ',p_report_type ); /*XML = Form16, XML2= Form12B */
2652: pay_in_utils.trace('Designation ',p_designation ); /*POS = Position,JOB= Job */
2645: pay_in_utils.trace('**************************************************','********************');
2646: pay_in_utils.trace('Business Group ID',to_char(p_business_group_id ));
2647: pay_in_utils.trace('Assessment Year ',p_assessment_year );
2648: pay_in_utils.trace('GRE Organization ',p_gre_organization );
2649: pay_in_utils.trace('Employee Type ',p_employee_type );
2650: pay_in_utils.trace('Employee Number ',p_employee_number );
2651: pay_in_utils.trace('Report Type ',p_report_type ); /*XML = Form16, XML2= Form12B */
2652: pay_in_utils.trace('Designation ',p_designation ); /*POS = Position,JOB= Job */
2653: pay_in_utils.trace('**************************************************','********************');
2646: pay_in_utils.trace('Business Group ID',to_char(p_business_group_id ));
2647: pay_in_utils.trace('Assessment Year ',p_assessment_year );
2648: pay_in_utils.trace('GRE Organization ',p_gre_organization );
2649: pay_in_utils.trace('Employee Type ',p_employee_type );
2650: pay_in_utils.trace('Employee Number ',p_employee_number );
2651: pay_in_utils.trace('Report Type ',p_report_type ); /*XML = Form16, XML2= Form12B */
2652: pay_in_utils.trace('Designation ',p_designation ); /*POS = Position,JOB= Job */
2653: pay_in_utils.trace('**************************************************','********************');
2654: END IF;
2647: pay_in_utils.trace('Assessment Year ',p_assessment_year );
2648: pay_in_utils.trace('GRE Organization ',p_gre_organization );
2649: pay_in_utils.trace('Employee Type ',p_employee_type );
2650: pay_in_utils.trace('Employee Number ',p_employee_number );
2651: pay_in_utils.trace('Report Type ',p_report_type ); /*XML = Form16, XML2= Form12B */
2652: pay_in_utils.trace('Designation ',p_designation ); /*POS = Position,JOB= Job */
2653: pay_in_utils.trace('**************************************************','********************');
2654: END IF;
2655:
2648: pay_in_utils.trace('GRE Organization ',p_gre_organization );
2649: pay_in_utils.trace('Employee Type ',p_employee_type );
2650: pay_in_utils.trace('Employee Number ',p_employee_number );
2651: pay_in_utils.trace('Report Type ',p_report_type ); /*XML = Form16, XML2= Form12B */
2652: pay_in_utils.trace('Designation ',p_designation ); /*POS = Position,JOB= Job */
2653: pay_in_utils.trace('**************************************************','********************');
2654: END IF;
2655:
2656: l_emp_count := 0;
2649: pay_in_utils.trace('Employee Type ',p_employee_type );
2650: pay_in_utils.trace('Employee Number ',p_employee_number );
2651: pay_in_utils.trace('Report Type ',p_report_type ); /*XML = Form16, XML2= Form12B */
2652: pay_in_utils.trace('Designation ',p_designation ); /*POS = Position,JOB= Job */
2653: pay_in_utils.trace('**************************************************','********************');
2654: END IF;
2655:
2656: l_emp_count := 0;
2657: g_assessment_year := p_assessment_year;
2659: g_tax_end_date := fnd_date.string_to_date(('31/03/'|| SUBSTR(g_assessment_year,1,4)),'DD/MM/YYYY');
2660: g_tax_start_date := ADD_MONTHS(g_tax_end_date,-12) +1;
2661:
2662:
2663: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,20);
2664: OPEN csr_global_value('IN_SECTION_80CCE_LIMIT');
2665: FETCH csr_global_value INTO g_80cce_limit;
2666: CLOSE csr_global_value;
2667:
2664: OPEN csr_global_value('IN_SECTION_80CCE_LIMIT');
2665: FETCH csr_global_value INTO g_80cce_limit;
2666: CLOSE csr_global_value;
2667:
2668: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,30);
2669: FOR gre_record IN csr_fetch_gre(p_gre_organization)
2670: LOOP
2671: l_gre_id := gre_record.orgid;
2672: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,40);
2668: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,30);
2669: FOR gre_record IN csr_fetch_gre(p_gre_organization)
2670: LOOP
2671: l_gre_id := gre_record.orgid;
2672: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,40);
2673: pay_in_utils.set_location(g_debug,'l_gre_id: '||l_gre_id,45);
2674: IF l_emp_count <>0 THEN
2675: l_open_tag := '';
2676: dbms_lob.writeAppend(g_tmp_clob,length(l_open_tag),l_open_tag);
2669: FOR gre_record IN csr_fetch_gre(p_gre_organization)
2670: LOOP
2671: l_gre_id := gre_record.orgid;
2672: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,40);
2673: pay_in_utils.set_location(g_debug,'l_gre_id: '||l_gre_id,45);
2674: IF l_emp_count <>0 THEN
2675: l_open_tag := '';
2676: dbms_lob.writeAppend(g_tmp_clob,length(l_open_tag),l_open_tag);
2677: l_open_tag := '
2679: build_gre_xml(l_gre_id,p_designation);
2680: END IF;
2681: FOR emp_record IN csr_fetch_employees(l_gre_id)
2682: LOOP
2683: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,50);
2684: l_action_context_id := emp_record.action_context_id;
2685: l_start_date := emp_record.start_date;
2686: l_emp_number := emp_record.employee_number;
2687: OPEN csr_emp_source_id(l_start_date,l_emp_number,l_gre_id,l_action_context_id);
2725: END IF;
2726: l_emp_count := l_emp_count + 1;
2727: l_open_tag := '
2728: dbms_lob.writeAppend(g_tmp_clob,length(l_open_tag),l_open_tag);
2729: pay_in_utils.set_location(g_debug,'INDIA F16: Building XML for Employee',70);
2730: build_employee_xml(l_action_context_id,l_source_id,p_designation,p_rem_pay_period,p_flag);
2731: pay_in_utils.set_location(g_debug,'Building XML for Form 16/16AA',80);
2732: build_form16_xml(l_action_context_id,l_source_id,p_rem_pay_period,p_flag,l_flag_for_16aa);
2733: IF (l_flag_for_16aa = -1) THEN
2727: l_open_tag := '
2728: dbms_lob.writeAppend(g_tmp_clob,length(l_open_tag),l_open_tag);
2729: pay_in_utils.set_location(g_debug,'INDIA F16: Building XML for Employee',70);
2730: build_employee_xml(l_action_context_id,l_source_id,p_designation,p_rem_pay_period,p_flag);
2731: pay_in_utils.set_location(g_debug,'Building XML for Form 16/16AA',80);
2732: build_form16_xml(l_action_context_id,l_source_id,p_rem_pay_period,p_flag,l_flag_for_16aa);
2733: IF (l_flag_for_16aa = -1) THEN
2734: l_emp_count := l_emp_count - 1;
2735: ELSE
2732: build_form16_xml(l_action_context_id,l_source_id,p_rem_pay_period,p_flag,l_flag_for_16aa);
2733: IF (l_flag_for_16aa = -1) THEN
2734: l_emp_count := l_emp_count - 1;
2735: ELSE
2736: pay_in_utils.set_location(g_debug,'Building XML for Form 12BA',90);
2737: init_form12ba_code;
2738: build_form12ba_xml(l_action_context_id,l_source_id);
2739: get_image_details(l_gre_id);
2740: IF (p_report_type = 'XML') THEN ---------- Mail Form16
2776: END IF;
2777: CLOSE csr_emp_source_id;
2778: END LOOP;
2779: END LOOP;
2780: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,60);
2781: IF l_emp_count <> 0 THEN
2782: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,70);
2783: l_open_tag := '';
2784: dbms_lob.writeAppend(g_tmp_clob,length(l_open_tag),l_open_tag);
2778: END LOOP;
2779: END LOOP;
2780: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,60);
2781: IF l_emp_count <> 0 THEN
2782: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,70);
2783: l_open_tag := '';
2784: dbms_lob.writeAppend(g_tmp_clob,length(l_open_tag),l_open_tag);
2785: dbms_lob.close(g_tmp_clob);
2786: p_xml :=g_tmp_clob;
2784: dbms_lob.writeAppend(g_tmp_clob,length(l_open_tag),l_open_tag);
2785: dbms_lob.close(g_tmp_clob);
2786: p_xml :=g_tmp_clob;
2787: ELSE
2788: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,80);
2789: p_xml :=g_tmp_clob;
2790: END IF;
2791: fnd_file.put_line(fnd_file.log,dbms_lob.substr(g_tmp_clob));
2792: pay_in_utils.set_location(g_debug,'LEAVING: '||l_procedure,100);
2788: pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,80);
2789: p_xml :=g_tmp_clob;
2790: END IF;
2791: fnd_file.put_line(fnd_file.log,dbms_lob.substr(g_tmp_clob));
2792: pay_in_utils.set_location(g_debug,'LEAVING: '||l_procedure,100);
2793: END load_xml_burst;
2794:
2795:
2796: