[Home] [Help]
121: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_date.BEGIN',
122: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_date(+)');
123: END IF;
124:
125: x_return_status := FND_API.G_RET_STS_SUCCESS;
126:
127: x_tax_date :=
128: NVL(ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.related_doc_date(p_trx_line_index),
129: NVL(ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.provnl_tax_determination_date(p_trx_line_index),
154: WHEN OTHERS THEN
155: x_tax_date := NULL;
156: x_tax_determine_date := NULL;
157: x_tax_point_date := NULL;
158: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
159:
160: IF (g_level_unexpected >= g_current_runtime_level ) THEN
161: FND_LOG.STRING(g_level_unexpected,
162: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_date',
313: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_applicable_regimes.BEGIN',
314: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_applicable_regimes(+)');
315: END IF;
316:
317: x_return_status := FND_API.G_RET_STS_SUCCESS;
318:
319: b_location_found := FALSE;
320: table_size := 2048;
321:
327: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_applicable_regimes',
328: 'Event Class does not contain Regime Template');
329: END IF;
330:
331: x_return_status := FND_API.G_RET_STS_ERROR; -- bug 4893261
332: RETURN;
333: END IF;
334:
335: -- Get information about all drivers correponding to the template code
364: p_tax_param_code => l_det_factor_code_tab(l_det_factor_tab_rownum),
365: x_tax_param_value => l_location_id,
366: x_return_status => x_return_status );
367:
368: IF NVL(x_return_status,FND_API.G_RET_STS_ERROR) <> FND_API.G_RET_STS_SUCCESS
369: THEN
370:
371: IF (g_level_statement >= g_current_runtime_level ) THEN
372: FND_LOG.STRING(g_level_statement,
405: x_geography_name => l_geography_name,
406: x_return_status => x_return_status);
407:
408:
409: IF NVL(x_return_status, FND_API.G_RET_STS_ERROR) <> FND_API.G_RET_STS_SUCCESS
410: THEN
411:
412: IF (g_level_statement >= g_current_runtime_level ) THEN
413: FND_LOG.STRING(g_level_statement,
465: -- l_country_tab := l_null_country_tab;
466: l_null_country_loc_id := l_location_id;
467: l_null_country_loc_type := l_location_type;
468: --EXIT;
469: /*x_return_status := FND_API.G_RET_STS_ERROR;
470:
471: FND_MESSAGE.SET_NAME ('ZX', 'ZX_NO_COUNTRY_CODE_FOUND');
472: FND_MESSAGE.SET_TOKEN('LOCATION_TYPE', l_location_type);
473:
501:
502: -- As a part of 6798559 fix
503: IF l_country_tab.count = 0 THEN
504:
505: x_return_status := FND_API.G_RET_STS_ERROR;
506:
507: FND_MESSAGE.SET_NAME ('ZX', 'ZX_NO_COUNTRY_CODE_FOUND');
508: FND_MESSAGE.SET_TOKEN('LOCATION_TYPE', l_null_country_loc_type);
509:
522: -- transaction line Memory Structure (IN parameter to this procedure)
523:
524: IF NOT b_location_found THEN
525: --Bug 5065057
526: /* x_return_status := FND_API.G_RET_STS_ERROR;
527: FND_MESSAGE.SET_NAME ('ZX', 'ZX_NO_LOCATIONS_FOUND');
528: FND_MESSAGE.SET_TOKEN('TEMPLATE_NAME', p_event_class_rec.det_factor_templ_code);
529: FND_MESSAGE.SET_TOKEN('LOCATIONS_LIST', l_location_list);
530:
539: RETURN;
540: END IF;
541:
542: -- If p_status is error then break form transaction line and return error.
543: -- IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
544: -- EXIT;
545: -- END IF;
546:
547: -- This loop will determine the Regimes corresponding to the different
559: l_tax_determine_date,
560: l_tax_point_date,
561: x_return_status);
562:
563: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
564: IF (g_level_error >= g_current_runtime_level ) THEN
565: FND_LOG.STRING(g_level_error,
566: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_applicable_regimes',
567: 'Incorrect return_status after calling ' ||
614: l_regime_rec.effective_from,
615: l_regime_rec.effective_to,
616: x_return_status );
617:
618: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
619: IF (g_level_error >= g_current_runtime_level ) THEN
620: FND_LOG.STRING(g_level_error,
621: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_applicable_regimes',
622: 'Incorrect return_status after calling ' ||
680: l_regime_rec.effective_from,
681: l_regime_rec.effective_to,
682: x_return_status );
683:
684: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
685: IF (g_level_error >= g_current_runtime_level ) THEN
686: FND_LOG.STRING(g_level_error,
687: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_applicable_regimes',
688: 'Incorrect return_status after calling ' ||
711: -- value for a transaction.
712: --
713: IF ((NVL(l_country_tab.COUNT, 0) > 0 OR NVL(l_geography_tab.count, 0) > 0) AND
714: NVL(ZX_GLOBAL_STRUCTURES_PKG.tax_regime_tbl.COUNT, 0) = 0) THEN
715: -- x_return_status := FND_API.G_RET_STS_ERROR;
716: IF (g_level_statement >= g_current_runtime_level ) THEN
717: FND_LOG.STRING(g_level_statement,
718: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_applicable_regimes',
719: 'No Applicable Regimes');
745: END IF;
746:
747: EXCEPTION
748: WHEN OTHERS THEN
749: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
750:
751: IF (g_level_unexpected >= g_current_runtime_level ) THEN
752: FND_LOG.STRING(g_level_unexpected,
753: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_applicable_regimes',
789: l_next_regime_num number;
790:
791: BEGIN
792:
793: x_return_status := FND_API.G_RET_STS_SUCCESS;
794:
795: -- insert the regime_id and the regime_precedence using the regime_id as the
796: -- subscript of the p_Tax_regime_tbl. Hence, when the same tax_regime_id is
797: -- passed multiple times, we overwrite the p_tax_regime_tbl(tax_regime_id) row
816: p_effective_to;
817:
818: EXCEPTION
819: WHEN OTHERS THEN
820: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
821:
822: IF (g_level_unexpected >= g_current_runtime_level ) THEN
823: FND_LOG.STRING(g_level_unexpected,
824: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.add_tax_regime',
877: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.is_tax_applicable',
878: 'l_applicability_rule_flag: '|| p_applicability_rule_flag);
879: END IF;
880:
881: x_return_status := FND_API.G_RET_STS_SUCCESS;
882:
883: l_tax_service_type_code := 'DET_APPLICABLE_TAXES';
884: l_result := FALSE;
885:
900: x_alphanumeric_result => x_applicability_result,
901: x_result_id => x_applicability_result_id,
902: x_return_status => x_return_status);
903:
904: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
905: IF (g_level_statement >= g_current_runtime_level ) THEN
906: FND_LOG.STRING(g_level_statement,
907: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.is_tax_applicable',
908: 'Incorrect return_status after calling ' ||
930: END IF;
931:
932: ELSE
933: l_result := FALSE;
934: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR; -- bug 4893261
935: IF (g_level_statement >= g_current_runtime_level ) THEN
936: FND_LOG.STRING(g_level_statement,
937: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.is_tax_applicable',
938: 'applicability_rule_flag = ' || p_applicability_rule_flag );
952: RETURN l_result;
953:
954: EXCEPTION
955: WHEN OTHERS THEN
956: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
957: IF (g_level_unexpected >= g_current_runtime_level ) THEN
958: FND_LOG.STRING(g_level_unexpected,
959: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.is_tax_applicable',
960: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
1006: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.is_direct_rate_applicable.BEGIN',
1007: 'ZX_TDS_APPLICABILITY_DETM_PKG.is_direct_rate_applicable(+)');
1008: END IF;
1009:
1010: x_return_status := FND_API.G_RET_STS_SUCCESS;
1011:
1012: l_tax_service_type_code := 'DET_DIRECT_RATE';
1013: l_result := FALSE;
1014:
1025: x_direct_rate_result_rec,
1026: x_return_status,
1027: l_error_buffer);
1028:
1029: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1030: IF (g_level_statement >= g_current_runtime_level ) THEN
1031: FND_LOG.STRING(g_level_statement,
1032: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.is_direct_rate_applicable',
1033: 'Incorrect return_status after calling ' ||
1072: RETURN l_result;
1073:
1074: EXCEPTION
1075: WHEN OTHERS THEN
1076: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1077: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1078: FND_LOG.STRING(g_level_unexpected,
1079: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.is_direct_rate_applicable',
1080: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
1241: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines.BEGIN',
1242: 'ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines(+)');
1243: END IF;
1244:
1245: x_return_status := FND_API.G_RET_STS_SUCCESS;
1246:
1247: -- Bug#5417753- determine tax_class value
1248: IF p_event_class_rec.prod_family_grp_code = 'O2C' THEN
1249: l_tax_class := 'OUTPUT';
1275: p_tax_id => tax_line_rec.tax_id,
1276: p_return_status => x_return_status,
1277: p_error_buffer => l_error_buffer);
1278:
1279: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1280: IF (g_level_statement >= g_current_runtime_level ) THEN
1281: FND_LOG.STRING(g_level_statement,
1282: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines',
1283: 'Incorrect return_status after calling ' ||
1387: p_tax_id => tax_line_rec.tax_id,
1388: p_return_status => x_return_status,
1389: p_error_buffer => l_error_buffer);
1390:
1391: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1392: IF (g_level_statement >= g_current_runtime_level ) THEN
1393: FND_LOG.STRING(g_level_statement,
1394: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines',
1395: 'Incorrect return_status after calling ' ||
1476: ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl(
1477: l_rownum).tax_determine_date,
1478: x_return_status => x_return_status);
1479:
1480: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1481: IF (g_level_statement >= g_current_runtime_level ) THEN
1482: FND_LOG.STRING(g_level_statement,
1483: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines',
1484: 'Incorrect return_status after calling ' ||
1538: p_tax_id => tax_line_rec.tax_id,
1539: p_return_status => x_return_status,
1540: p_error_buffer => l_error_buffer);
1541:
1542: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1543: IF (g_level_statement >= g_current_runtime_level ) THEN
1544: FND_LOG.STRING(g_level_statement,
1545: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines',
1546: 'Incorrect return_status after calling ' ||
1596: ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl(
1597: l_rownum).tax_determine_date,
1598: x_return_status => x_return_status);
1599:
1600: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1601: IF (g_level_statement >= g_current_runtime_level ) THEN
1602: FND_LOG.STRING(g_level_statement,
1603: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines',
1604: 'Incorrect return_status after calling ' ||
1641: p_tax_id => tax_line_rec.tax_id,
1642: p_return_status => x_return_status,
1643: p_error_buffer => l_error_buffer);
1644:
1645: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1646: IF (g_level_statement >= g_current_runtime_level ) THEN
1647: FND_LOG.STRING(g_level_statement,
1648: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines',
1649: 'Incorrect return_status after calling ' ||
1699: ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl(
1700: l_rownum).tax_determine_date,
1701: x_return_status => x_return_status);
1702:
1703: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1704: IF (g_level_statement >= g_current_runtime_level ) THEN
1705: FND_LOG.STRING(g_level_statement,
1706: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines',
1707: 'Incorrect return_status after calling ' ||
1744: p_tax_id => tax_line_rec.tax_id,
1745: p_return_status => x_return_status,
1746: p_error_buffer => l_error_buffer);
1747:
1748: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1749: IF (g_level_statement >= g_current_runtime_level ) THEN
1750: FND_LOG.STRING(g_level_statement,
1751: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines',
1752: 'Incorrect return_status after calling ' ||
1802: ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl(
1803: l_rownum).tax_determine_date,
1804: x_return_status => x_return_status);
1805:
1806: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1807: IF (g_level_statement >= g_current_runtime_level ) THEN
1808: FND_LOG.STRING(g_level_statement,
1809: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines',
1810: 'Incorrect return_status after calling ' ||
1874: p_reg_rule_flg => NULL,
1875: p_tax_determine_date => p_tax_determine_date,
1876: x_return_status => x_return_status);
1877:
1878: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1879: IF (g_level_statement >= g_current_runtime_level ) THEN
1880: FND_LOG.STRING(g_level_statement,
1881: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines',
1882: 'Incorrect return_status after calling ' ||
1900: l_tax_regime_rec,
1901: x_return_status,
1902: l_error_buffer);
1903:
1904: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1905: IF (g_level_statement >= g_current_runtime_level ) THEN
1906: FND_LOG.STRING(g_level_statement,
1907: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines',
1908: 'Incorrect return_status after calling ' ||
1930: l_tax_rec,
1931: x_return_status,
1932: l_error_buffer);
1933:
1934: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1935: IF (g_level_statement >= g_current_runtime_level ) THEN
1936: FND_LOG.STRING(g_level_statement,
1937: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines',
1938: 'Incorrect return_status after calling ' ||
1962: l_tax_jurisdiction_rec,
1963: x_return_status,
1964: l_error_buffer);
1965:
1966: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1967: IF (g_level_statement >= g_current_runtime_level ) THEN
1968: FND_LOG.STRING(g_level_statement,
1969: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines',
1970: 'Incorrect return_status after calling ' ||
1994: l_tax_status_rec,
1995: x_return_status,
1996: l_error_buffer);
1997:
1998: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1999: IF (g_level_statement >= g_current_runtime_level ) THEN
2000: FND_LOG.STRING(g_level_statement,
2001: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines',
2002: 'Incorrect return_status after calling ' ||
2027: l_tax_rate_rec,
2028: x_return_status,
2029: l_error_buffer);
2030:
2031: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2032: IF (g_level_statement >= g_current_runtime_level ) THEN
2033: FND_LOG.STRING(g_level_statement,
2034: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines',
2035: 'Incorrect return_status after calling ' ||
2140: p_reg_rule_flg => l_tax_rec.registration_type_rule_flag,
2141: p_tax_determine_date => p_tax_determine_date,
2142: x_return_status => x_return_status);
2143:
2144: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2145: IF (g_level_statement >= g_current_runtime_level ) THEN
2146: FND_LOG.STRING(g_level_statement,
2147: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines',
2148: 'Incorrect return_status after calling ' ||
2191: x_end_index,
2192: x_return_status,
2193: l_error_buffer );
2194:
2195: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2196: IF (g_level_statement >= g_current_runtime_level ) THEN
2197: FND_LOG.STRING(g_level_statement,
2198: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines',
2199: 'Incorrect RETURN_STATUS after calling '||
2215: END IF;
2216:
2217: EXCEPTION
2218: WHEN OTHERS THEN
2219: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2220:
2221: IF (g_level_unexpected >= g_current_runtime_level ) THEN
2222: FND_LOG.STRING(g_level_unexpected,
2223: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines',
2487: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_applicable_taxes.BEGIN',
2488: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_applicable_taxes(+)');
2489: END IF;
2490:
2491: x_return_status := FND_API.G_RET_STS_SUCCESS;
2492:
2493: l_tax_applicable := FALSE;
2494:
2495: IF p_event_class_rec.prod_family_grp_code = 'O2C' THEN
2639: x_begin_index,
2640: x_end_index,
2641: x_return_status);
2642:
2643: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2644: IF (g_level_statement >= g_current_runtime_level ) THEN
2645: FND_LOG.STRING(g_level_statement,
2646: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_applicable_taxes',
2647: 'Incorrect return_status after calling ' ||
2674: x_direct_rate_result_rec => l_direct_rate_result_rec,
2675: x_direct_rate_result_id => l_direct_rate_result_id,
2676: x_return_status => x_return_status);
2677:
2678: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2679: IF (g_level_statement >= g_current_runtime_level ) THEN
2680: FND_LOG.STRING(g_level_statement,
2681: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_applicable_taxes',
2682: 'Incorrect return_status after calling ' ||
2779: x_place_of_supply_type_code => l_place_of_supply_type_code,
2780: x_place_of_supply_result_id => l_place_of_supply_result_id,
2781: x_return_status => x_return_status);
2782:
2783: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2784: IF (g_level_statement >= g_current_runtime_level ) THEN
2785: FND_LOG.STRING(g_level_statement,
2786: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_applicable_taxes',
2787: 'Incorrect return_status after calling ' ||
2794: IF NVL(l_tax_rec.has_other_jurisdictions_flag, 'N') = 'N' AND
2795: NVL(l_tax_rec.record_type_code, 'USER_DEFINED') = 'MIGRATED'
2796: THEN
2797:
2798: x_return_status := FND_API.G_RET_STS_SUCCESS;
2799: IF (g_level_statement >= g_current_runtime_level ) THEN
2800: FND_LOG.STRING(g_level_statement,
2801: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_applicable_taxes',
2802: 'For migrated taxes, if the has_other_jurisdictions_flag on ' ||
2926: x_applicability_result => l_applicability_result,
2927: x_applicability_result_id => l_applicability_result_id,
2928: x_return_status => x_return_status);
2929:
2930: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2931: IF (g_level_statement >= g_current_runtime_level ) THEN
2932: FND_LOG.STRING(g_level_statement,
2933: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_applicable_taxes',
2934: 'Incorrect return_status after calling ' ||
2970: l_tax_jurisdiction_id,
2971: l_tax_jurisdiction_code,
2972: x_return_status);
2973:
2974: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2975: IF (g_level_statement >= g_current_runtime_level ) THEN
2976: FND_LOG.STRING(g_level_statement,
2977: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_applicable_taxes',
2978: 'Incorrect return_status after calling ' ||
3125: l_tax_status_rec,
3126: x_return_status,
3127: l_error_buffer);
3128:
3129: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3130: IF (g_level_error >= g_current_runtime_level ) THEN
3131: FND_LOG.STRING(g_level_error,
3132: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_applicable_taxes',
3133: 'Incorrect return_status after calling '||
3180: p_reg_rule_flg => l_tax_rec.registration_type_rule_flag,
3181: p_tax_determine_date => p_tax_determine_date,
3182: x_return_status => x_return_status);
3183:
3184: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3185: IF (g_level_statement >= g_current_runtime_level ) THEN
3186: FND_LOG.STRING(g_level_statement,
3187: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_applicable_taxes',
3188: 'Incorrect return_status after calling ' ||
3408: x_end_index,
3409: x_return_status,
3410: l_error_buffer );
3411:
3412: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3413: IF (g_level_statement >= g_current_runtime_level ) THEN
3414: FND_LOG.STRING(g_level_statement,
3415: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_applicable_taxes',
3416: 'Incorrect RETURN_STATUS after calling '||
3439: IF (get_all_taxes_for_regime_cur%ISOPEN) THEN
3440: CLOSE get_all_taxes_for_regime_cur;
3441: END IF;
3442:
3443: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3444:
3445: IF (g_level_unexpected >= g_current_runtime_level ) THEN
3446: FND_LOG.STRING(g_level_unexpected,
3447: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_applicable_taxes',
3511: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_det_tax_lines_from_applied.BEGIN',
3512: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_det_tax_lines_from_applied(+)'|| 'p_trx_line_index = ' || to_char(p_trx_line_index));
3513: END IF;
3514:
3515: x_return_status := FND_API.G_RET_STS_SUCCESS;
3516:
3517: -- initialize l_new_row_num
3518: --
3519: l_new_row_num := NVL(ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl.LAST, 0);
3531: p_tax_id => tax_line_rec.tax_id,
3532: p_return_status => x_return_status,
3533: p_error_buffer => l_error_buffer);
3534:
3535: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3536: IF (g_level_statement >= g_current_runtime_level ) THEN
3537: FND_LOG.STRING(g_level_statement,
3538: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_det_tax_lines_from_applied',
3539: 'Incorrect return_status after calling ' ||
3620: l_status_rec,
3621: x_return_status,
3622: l_error_buffer);
3623:
3624: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3625: IF (g_level_error >= g_current_runtime_level ) THEN
3626: FND_LOG.STRING(g_level_error,
3627: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_det_tax_lines_from_applied',
3628: 'Incorrect return_status after calling ' ||
3733: tax_line_rec.ledger_id,
3734: ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl(
3735: l_new_row_num).prd_total_tax_amt_funcl_curr);
3736:
3737: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3738: IF (g_level_statement >= g_current_runtime_level ) THEN
3739: FND_LOG.STRING(g_level_statement,
3740: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_det_tax_lines_from_applied',
3741: 'Incorrect return_status after calling ' ||
3964: x_end_index,
3965: x_return_status,
3966: l_error_buffer);
3967:
3968: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3969: IF (g_level_statement >= g_current_runtime_level ) THEN
3970: FND_LOG.STRING(g_level_statement,
3971: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_det_tax_lines_from_applied',
3972: 'Incorrect return_status after calling ' ||
3989: END IF;
3990:
3991: EXCEPTION
3992: WHEN OTHERS THEN
3993: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3994:
3995: IF (g_level_unexpected >= g_current_runtime_level ) THEN
3996: FND_LOG.STRING(g_level_unexpected,
3997: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_det_tax_lines_from_applied',
4090: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_det_tax_lines_from_adjust.BEGIN',
4091: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_det_tax_lines_from_adjust(+)'|| 'trx_line_index = ' || to_char(p_trx_line_index));
4092: END IF;
4093:
4094: x_return_status := FND_API.G_RET_STS_SUCCESS;
4095:
4096: l_new_row_num := NVL(ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl.LAST, 0);
4097: l_begin_index := l_new_row_num + 1;
4098:
4105: p_tax_id => tax_line_rec.tax_id,
4106: p_return_status => x_return_status,
4107: p_error_buffer => l_error_buffer);
4108:
4109: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4110: IF (g_level_statement >= g_current_runtime_level ) THEN
4111: FND_LOG.STRING(g_level_statement,
4112: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_det_tax_lines_from_adjust',
4113: 'Incorrect return_status after calling ' ||
4612: x_end_index,
4613: x_return_status ,
4614: l_error_buffer );
4615:
4616: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4617: IF (g_level_statement >= g_current_runtime_level ) THEN
4618: FND_LOG.STRING(g_level_statement,
4619: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_det_tax_lines_from_adjust',
4620: 'Incorrect return_status after calling ' ||
4638: END IF;
4639:
4640: EXCEPTION
4641: WHEN OTHERS THEN
4642: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4643:
4644: IF (g_level_unexpected >= g_current_runtime_level ) THEN
4645: FND_LOG.STRING(g_level_unexpected,
4646: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_det_tax_lines_from_adjust',
4717: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_place_of_supply(+)');
4718:
4719: END IF;
4720:
4721: x_return_status := FND_API.G_RET_STS_SUCCESS;
4722:
4723: l_tax_service_type_code := 'DET_PLACE_OF_SUPPLY';
4724:
4725: IF (g_level_statement >= g_current_runtime_level ) THEN
4740: x_alphanumeric_result => x_place_of_supply_type_code,
4741: x_result_id => x_place_of_supply_result_id,
4742: x_return_status => x_return_status);
4743:
4744: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4745: IF (g_level_statement >= g_current_runtime_level ) THEN
4746: FND_LOG.STRING(g_level_statement,
4747: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_place_of_supply',
4748: 'Incorrect return_status after calling ' ||
4767:
4768: ELSE
4769: x_place_of_supply_type_code := p_def_place_of_supply_type_cd;
4770: x_place_of_supply_result_id := NULL;
4771: x_return_status := FND_API.G_RET_STS_SUCCESS;
4772: END IF;
4773:
4774: IF (x_place_of_supply_type_code IS NULL) THEN
4775:
4772: END IF;
4773:
4774: IF (x_place_of_supply_type_code IS NULL) THEN
4775:
4776: x_return_status := FND_API.G_RET_STS_ERROR;
4777:
4778: FND_MESSAGE.SET_NAME('ZX','ZX_POS_NOT_FOUND');
4779: FND_MESSAGE.SET_TOKEN('TAX',p_tax);
4780: --FND_MSG_PUB.Add;
4807: l_tax_param_code := get_pos_parameter_name(
4808: l_pos_type,
4809: x_return_status);
4810:
4811: IF NVL(x_return_status, FND_API.G_RET_STS_ERROR) <> FND_API.G_RET_STS_SUCCESS
4812: THEN
4813: -- TCM procedure called in get_pos_parameter_name will set the error msg
4814: -- here we just need to populate the context information.
4815:
4842: p_tax_param_code => l_tax_param_code,
4843: x_tax_param_value => l_location_id,
4844: x_return_status => x_return_status );
4845:
4846: IF NVL(x_return_status, FND_API.G_RET_STS_ERROR) <> FND_API.G_RET_STS_SUCCESS
4847: THEN
4848: IF (g_level_statement >= g_current_runtime_level ) THEN
4849: FND_LOG.STRING(g_level_statement,
4850: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_place_of_supply',
4869: l_tax_param_code := get_pos_parameter_name(
4870: l_pos_type,
4871: x_return_status);
4872:
4873: IF NVL(x_return_status, FND_API.G_RET_STS_ERROR) <> FND_API.G_RET_STS_SUCCESS
4874: THEN
4875: -- TCM procedure called in get_pos_parameter_name will set the error msg
4876: -- here we just need to populate the context information.
4877:
4904: p_tax_param_code => l_tax_param_code,
4905: x_tax_param_value => l_location_id,
4906: x_return_status => x_return_status );
4907:
4908: IF NVL(x_return_status, FND_API.G_RET_STS_ERROR) <> FND_API.G_RET_STS_SUCCESS
4909: THEN
4910: IF (g_level_statement >= g_current_runtime_level ) THEN
4911: FND_LOG.STRING(g_level_statement,
4912: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_place_of_supply',
4937: x_tax_jurisdiction_rec => x_jurisdiction_rec,
4938: x_jurisdictions_found => x_jurisdictions_found,
4939: x_return_status => x_return_status);
4940:
4941: IF NVL(x_return_status, FND_API.G_RET_STS_ERROR) <> FND_API.G_RET_STS_SUCCESS
4942: THEN
4943: -- populate the trx line context info if jurisdiction API return error
4944: -- jurisdiction API should have populated the error message name and text.
4945:
5006: EXCEPTION
5007: WHEN OTHERS THEN
5008: x_place_of_supply_type_code := NULL;
5009: x_place_of_supply_result_id := NULL;
5010: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5011:
5012: IF (g_level_unexpected >= g_current_runtime_level ) THEN
5013: FND_LOG.STRING(g_level_unexpected,
5014: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_place_of_supply',
5048: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_pos_parameter_name.BEGIN',
5049: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_pos_parameter_name(+)'|| 'pos_type = ' || p_pos_type);
5050: END IF;
5051:
5052: x_return_status := FND_API.G_RET_STS_SUCCESS;
5053:
5054: -- x_return_status retured from TCM procedure will be handled in the
5055: -- calling procedure
5056: IF (p_pos_type = 'SHIP_TO') THEN
5206: END IF;
5207:
5208: EXCEPTION
5209: WHEN OTHERS THEN
5210: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5211: IF (g_level_unexpected >= g_current_runtime_level ) THEN
5212: FND_LOG.STRING(g_level_unexpected,
5213: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_pos_parameter_name',
5214: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
5270: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_registration_info.BEGIN',
5271: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_registration_info(+)');
5272: END IF;
5273:
5274: x_return_status := FND_API.G_RET_STS_SUCCESS;
5275: -- get l_reg_party_prof_id
5276: --
5277: ZX_TDS_RULE_BASE_DETM_PVT.get_tsrm_num_value(
5278: p_structure_name,
5281: l_reg_party_prof_id,
5282: x_return_status,
5283: l_error_buffer);
5284:
5285: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5286: IF (g_level_error >= g_current_runtime_level ) THEN
5287: FND_LOG.STRING(g_level_error,
5288: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_registration_info',
5289: 'Incorrect return_status after calling ' ||
5318: l_hq_estb_ptp_id,
5319: x_return_status,
5320: l_error_buffer);
5321:
5322: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5323: IF (g_level_error >= g_current_runtime_level ) THEN
5324: FND_LOG.STRING(g_level_error,
5325: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_registration_info',
5326: 'Incorrect return_status after calling ' ||
5334: FND_LOG.STRING(g_level_error,
5335: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_registration_info.END',
5336: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_registration_info(-)');
5337: END IF;
5338: x_return_status := FND_API.G_RET_STS_SUCCESS;
5339: RETURN;
5340: END IF;
5341:
5342: l_parent_ptp_id := l_hq_estb_ptp_id;
5358: l_account_site_id,
5359: x_return_status,
5360: l_error_buffer);
5361:
5362: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5363: IF (g_level_error >= g_current_runtime_level ) THEN
5364: FND_LOG.STRING(g_level_error,
5365: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_registration_info',
5366: 'Incorrect return_status after calling ' ||
5387: l_account_id,
5388: x_return_status,
5389: l_error_buffer);
5390:
5391: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5392: IF (g_level_error >= g_current_runtime_level ) THEN
5393: FND_LOG.STRING(g_level_error,
5394: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_registration_info',
5395: 'Incorrect return_status after calling ' ||
5421: l_error_buffer);
5422:
5423: END IF;
5424:
5425: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5426: IF (g_level_error >= g_current_runtime_level ) THEN
5427: FND_LOG.STRING(g_level_error,
5428: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_registration_info',
5429: 'Incorrect return_status after calling ' ||
5458: l_site_ptp_id,
5459: x_return_status,
5460: l_error_buffer);
5461:
5462: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5463: IF (g_level_error >= g_current_runtime_level ) THEN
5464: FND_LOG.STRING(g_level_error,
5465: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_registration_info',
5466: 'Incorrect return_status after calling ' ||
5495: l_tax_rec,
5496: x_return_status,
5497: l_error_buffer);
5498:
5499: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
5500: l_has_other_jurisdictions_flag := l_tax_rec.has_other_jurisdictions_flag;
5501: END IF;
5502:
5503: IF l_has_other_jurisdictions_flag = 'N' THEN
5536: p_zx_registration_rec => l_registration_rec,
5537: p_ret_record_level => l_ret_record_level,
5538: p_return_status => x_return_status);
5539:
5540: IF NVL(x_return_status, FND_API.G_RET_STS_ERROR) <> FND_API.G_RET_STS_SUCCESS
5541: THEN
5542: IF (g_level_statement >= g_current_runtime_level ) THEN
5543: FND_LOG.STRING(g_level_statement,
5544: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_registration_info',
5546: END IF;
5547: -- Bug 4939819 - Skip registration processing if PTP setupis not found
5548: IF l_parent_ptp_id IS NULL THEN
5549: -- Parent PTP is NULL. Continuing...
5550: x_return_status := FND_API.G_RET_STS_SUCCESS;
5551: END IF;
5552:
5553: ELSE
5554: x_registration_rec := l_registration_rec;
5571: END IF;
5572:
5573: EXCEPTION
5574: WHEN OTHERS THEN
5575: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5576:
5577: IF (g_level_unexpected >= g_current_runtime_level ) THEN
5578: FND_LOG.STRING(g_level_unexpected,
5579: 'ZX.PLSQL.ZX_TDS_RULE_BASE_DETM_PVT.get_tax_registration_info',
5668: x_alphanumeric_result => l_reg_party_type,
5669: x_result_id => x_tax_registration_result_id,
5670: x_return_status => x_return_status);
5671:
5672: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5673: IF (g_level_statement >= g_current_runtime_level ) THEN
5674: FND_LOG.STRING(g_level_statement,
5675: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_registration',
5676: 'Incorrect return_status after calling ' ||
5724: x_registration_rec => l_registration_rec,
5725: x_return_status => x_return_status
5726: );
5727:
5728: IF(NVL(x_return_status, FND_API.G_RET_STS_ERROR) <> FND_API.G_RET_STS_SUCCESS
5729: OR l_registration_rec.registration_id IS NULL)
5730: THEN
5731:
5732: IF l_reg_party_type = 'SHIP_TO_BILL_TO'
5748: x_registration_rec => l_registration_rec,
5749: x_return_status => x_return_status
5750: );
5751:
5752: IF(NVL(x_return_status, FND_API.G_RET_STS_ERROR) <> FND_API.G_RET_STS_SUCCESS
5753: OR l_registration_rec.registration_id IS NULL)
5754: THEN
5755:
5756: IF (g_level_statement >= g_current_runtime_level ) THEN
5764: x_registration_party_type := 'SHIP_TO_BILL_TO';
5765: x_registration_number := NULL;
5766: x_self_assessment_flg := 'N';
5767: x_tax_inclusion_flag := NULL;
5768: x_return_status := FND_API.G_RET_STS_SUCCESS;
5769:
5770: ELSE -- Registration record found for BILL_TO registration party type
5771: x_registration_party_type := 'SHIP_TO_BILL_TO';
5772: x_registration_number := l_registration_rec.registration_number;
5778: ELSE
5779: x_registration_number := NULL;
5780: x_self_assessment_flg := 'N';
5781: x_tax_inclusion_flag := NULL;
5782: x_return_status := FND_API.G_RET_STS_SUCCESS;
5783: END IF;
5784:
5785: ELSE -- Registration record found
5786: x_registration_number := l_registration_rec.registration_number;
5842: p_rounding_rule_code => ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_rule,
5843: p_return_status => x_return_status,
5844: p_error_buffer => l_error_buffer);
5845:
5846: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5847:
5848: x_return_status := FND_API.G_RET_STS_SUCCESS;
5849: END IF;
5850:
5844: p_error_buffer => l_error_buffer);
5845:
5846: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5847:
5848: x_return_status := FND_API.G_RET_STS_SUCCESS;
5849: END IF;
5850:
5851: IF ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_rule IS NOT NULL THEN
5852: x_rounding_rule_code := ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_rule;
5889: 'RETURN_STATUS = ' || x_return_status);
5890: END IF;
5891: x_tax_registration_result_id := NULL;
5892:
5893: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5894:
5895: IF (g_level_unexpected >= g_current_runtime_level ) THEN
5896: FND_LOG.STRING(g_level_unexpected,
5897: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_registration',
5938: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_legal_entity_registration.BEGIN',
5939: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_legal_entity_registration(+)');
5940: END IF;
5941:
5942: x_return_status := FND_API.G_RET_STS_SUCCESS;
5943: i := p_tax_line_index;
5944:
5945: l_tax_id := ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl(i).tax_id;
5946: l_hq_estb_ptp_id :=
6010: p_zx_registration_rec => l_registration_rec,
6011: p_ret_record_level => l_ret_record_level,
6012: p_return_status => x_return_status);
6013:
6014: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
6015: ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl(i).hq_estb_reg_number :=
6016: l_registration_rec.registration_number;
6017: ELSE
6018:
6016: l_registration_rec.registration_number;
6017: ELSE
6018:
6019: -- Bug 3511428: In case the TCM API returns no value, or with exception, reset
6020: -- x_return_status to FND_API.G_RET_STS_SUCCESS and continue processing ...
6021: -- processing.
6022: --
6023: x_return_status := FND_API.G_RET_STS_SUCCESS;
6024:
6019: -- Bug 3511428: In case the TCM API returns no value, or with exception, reset
6020: -- x_return_status to FND_API.G_RET_STS_SUCCESS and continue processing ...
6021: -- processing.
6022: --
6023: x_return_status := FND_API.G_RET_STS_SUCCESS;
6024:
6025: IF (g_level_statement >= g_current_runtime_level ) THEN
6026: FND_LOG.STRING(g_level_statement,
6027: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_legal_entity_registration',
6039: END IF;
6040:
6041: EXCEPTION
6042: WHEN OTHERS THEN
6043: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6044:
6045: IF (g_level_unexpected >= g_current_runtime_level ) THEN
6046: FND_LOG.STRING(g_level_unexpected,
6047: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_legal_entity_registration',
6090: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.rule_base_pos_detm.BEGIN',
6091: 'ZX_TDS_APPLICABILITY_DETM_PKG.rule_base_pos_detm(+)');
6092: END IF;
6093:
6094: x_return_status := FND_API.G_RET_STS_SUCCESS;
6095:
6096: ZX_TDS_RULE_BASE_DETM_PVT.rule_base_process(
6097: p_tax_service_type_code,
6098: 'TRX_LINE_DIST_TBL',
6106: l_tax_result_rec,
6107: x_return_status,
6108: l_error_buffer);
6109:
6110: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6111: IF (g_level_statement >= g_current_runtime_level ) THEN
6112: FND_LOG.STRING(g_level_statement,
6113: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.rule_base_pos_detm',
6114: 'Incorrect return_status after calling ' ||
6145: EXCEPTION
6146: WHEN OTHERS THEN
6147: x_alphanumeric_result := NULL;
6148: x_result_id := NULL;
6149: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6150:
6151: IF (g_level_unexpected >= g_current_runtime_level ) THEN
6152: FND_LOG.STRING(g_level_unexpected,
6153: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.rule_base_pos_detm',
6185: l_self_assessed_flag zx_lines.self_assessed_flag%TYPE;
6186:
6187: BEGIN
6188:
6189: x_return_status := FND_API.G_RET_STS_SUCCESS;
6190:
6191: IF (g_level_procedure >= g_current_runtime_level ) THEN
6192: FND_LOG.STRING(g_level_procedure,
6193: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.populate_registration_info.BEGIN',
6244: => ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl(
6245: p_rownum).registration_party_type,
6246: x_return_status => x_return_status);
6247:
6248: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6249: IF (g_level_statement >= g_current_runtime_level ) THEN
6250: FND_LOG.STRING(g_level_statement,
6251: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.populate_registration_info',
6252: 'Incorrect return_status after calling ' ||
6282: p_trx_line_index => p_trx_line_index,
6283: p_tax_line_index => p_rownum,
6284: x_return_status => x_return_status,
6285: x_error_buffer => l_error_buffer);
6286: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6287: IF (g_level_statement >= g_current_runtime_level ) THEN
6288: FND_LOG.STRING(g_level_statement,
6289: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.populate_registration_info.END',
6290: 'ZX_TDS_APPLICABILITY_DETM_PKG.populate_registration_info(-)');
6295:
6296: EXCEPTION
6297: WHEN OTHERS THEN
6298:
6299: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6300:
6301: IF (g_level_unexpected >= g_current_runtime_level ) THEN
6302: FND_LOG.STRING(g_level_unexpected,
6303: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.populate_registration_info',
6455: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_from_account(+)');
6456:
6457: END IF;
6458:
6459: x_return_status := FND_API.G_RET_STS_SUCCESS;
6460:
6461: -- Bug#5417753- determine tax_class value
6462: IF p_event_class_rec.prod_family_grp_code = 'O2C' THEN
6463: l_tax_class := 'OUTPUT';
6482: 'l_chart_of_accounts_id = ' || to_char(l_chart_of_accounts_id));
6483: END IF;
6484:
6485: IF l_chart_of_accounts_id IS NULL THEN
6486: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR; -- bug 4893261
6487: IF g_level_statement >= g_current_runtime_level THEN
6488: FND_LOG.STRING(g_level_statement,
6489: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_from_account',
6490: 'chart_of_accounts_id is NULL.');
6507: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_from_account',
6508: 'Getting tax code using code combination ID.'|| to_char(l_account_ccid));
6509: END IF;
6510:
6511: -- call fnd api to get the column name for natural account
6512: --
6513: l_boolean_result := fnd_flex_apis.get_segment_column (
6514: 101,
6515: 'GL#',
6592: l_begin_index,
6593: l_end_index,
6594: x_return_status);
6595:
6596: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6597: IF (g_level_statement >= g_current_runtime_level ) THEN
6598: FND_LOG.STRING(g_level_statement,
6599: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_from_account',
6600: 'Incorrect return_status after calling ' ||
6743: l_tax_regime_rec,
6744: x_return_status,
6745: l_error_buffer);
6746:
6747: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6748: IF (g_level_statement >= g_current_runtime_level ) THEN
6749: FND_LOG.STRING(g_level_statement,
6750: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_from_account',
6751: 'Incorrect return_status after calling ' ||
6773: l_tax_status_rec,
6774: x_return_status,
6775: l_error_buffer);
6776:
6777: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6778: IF (g_level_statement >= g_current_runtime_level ) THEN
6779: FND_LOG.STRING(g_level_statement,
6780: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_from_account',
6781: 'Incorrect return_status after calling ' ||
6806: l_tax_rate_rec,
6807: x_return_status,
6808: l_error_buffer);
6809:
6810: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6811: IF (g_level_statement >= g_current_runtime_level ) THEN
6812: FND_LOG.STRING(g_level_statement,
6813: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_from_account',
6814: 'Incorrect return_status after calling ' ||
6920: p_reg_rule_flg => l_tax_rec.registration_type_rule_flag,
6921: p_tax_determine_date => p_tax_determine_date,
6922: x_return_status => x_return_status);
6923:
6924: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6925: IF (g_level_statement >= g_current_runtime_level ) THEN
6926: FND_LOG.STRING(g_level_statement,
6927: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_from_account',
6928: 'Incorrect return_status after calling ' ||
6974: l_end_index_from_acct,
6975: x_return_status,
6976: l_error_buffer );
6977:
6978: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6979: IF (g_level_statement >= g_current_runtime_level ) THEN
6980: FND_LOG.STRING(g_level_statement,
6981: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_from_account',
6982: 'Incorrect return_status after calling ' ||
6999: END IF;
7000:
7001: EXCEPTION
7002: WHEN OTHERS THEN
7003: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7004: IF (g_level_unexpected >= g_current_runtime_level ) THEN
7005: FND_LOG.STRING(g_level_unexpected,
7006: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_from_account',
7007: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
7140: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_taxes_for_intercomp_trx.BEGIN',
7141: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_taxes_for_intercomp_trx(+)');
7142: END IF;
7143:
7144: x_return_status := FND_API.G_RET_STS_SUCCESS;
7145:
7146: -- Bug#5417753- determine tax_class value
7147: IF p_event_class_rec.prod_family_grp_code = 'O2C' THEN
7148: l_tax_class := 'OUTPUT';
7172: l_tax_status_code,l_record_type_code, l_offset_tax_rate_code, l_tax_jurisdiction_code;
7173:
7174: IF is_tax_migrated_in_ar_csr%NOTFOUND THEN
7175:
7176: x_return_status := FND_API.G_RET_STS_ERROR;
7177: l_error_buffer := 'No Tax Rate Found in AR for the specified Tax Rate Id';
7178: IF (g_level_statement >= g_current_runtime_level ) THEN
7179: FND_LOG.STRING(g_level_statement,
7180: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_taxes_for_intercomp_trx',
7207: l_tax_regime_rec,
7208: x_return_status,
7209: l_error_buffer);
7210:
7211: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7212: l_is_valid := FALSE;
7213: IF (g_level_statement >= g_current_runtime_level ) THEN
7214: FND_LOG.STRING(g_level_statement,
7215: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_taxes_for_intercomp_trx',
7241: l_tax_rec,
7242: x_return_status,
7243: l_error_buffer);
7244:
7245: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7246: l_is_valid := FALSE;
7247: IF (g_level_statement >= g_current_runtime_level ) THEN
7248: FND_LOG.STRING(g_level_statement,
7249: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_taxes_for_intercomp_trx',
7259: /*IF tax_line_rec.tax_amt <> 0 THEN
7260: RETURN;
7261: END IF;*/
7262:
7263: ELSE -- x_return_status = FND_API.G_RET_STS_SUCCESS
7264:
7265: ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl(
7266: l_rownum).tax_id := l_tax_rec.tax_id;
7267:
7288: l_tax_jurisdiction_rec,
7289: x_return_status,
7290: l_error_buffer);
7291:
7292: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7293: l_is_valid := FALSE;
7294: IF (g_level_statement >= g_current_runtime_level ) THEN
7295: FND_LOG.STRING(g_level_statement,
7296: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines',
7326: l_tax_status_rec,
7327: x_return_status,
7328: l_error_buffer);
7329:
7330: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7331: l_is_valid := FALSE;
7332: IF (g_level_statement >= g_current_runtime_level ) THEN
7333: FND_LOG.STRING(g_level_statement,
7334: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_taxes_for_intercomp_trx',
7365: l_tax_rate_rec,
7366: x_return_status,
7367: l_error_buffer);
7368:
7369: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7370: l_is_valid := FALSE;
7371: IF (g_level_statement >= g_current_runtime_level ) THEN
7372: FND_LOG.STRING(g_level_statement,
7373: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_taxes_for_intercomp_trx',
7390:
7391: IF l_tax_rate_rec.percentage_rate <> tax_line_rec.tax_rate AND --bug 5010575
7392: l_tax_rate_rec.allow_adhoc_tax_rate_flag = 'N'THEN
7393:
7394: x_return_status := FND_API.G_RET_STS_ERROR;
7395: l_error_buffer := 'Tax Rate Code is not adhoc';
7396:
7397: IF (g_level_statement >= g_current_runtime_level ) THEN
7398: FND_LOG.STRING(g_level_statement,
7419: --
7420: IF l_tax_rate_rec.percentage_rate <> 0 AND -- bug 5010575
7421: p_event_class_rec.allow_offset_tax_calc_flag = 'N'
7422: THEN
7423: x_return_status := FND_API.G_RET_STS_ERROR;
7424: l_error_buffer := 'Need to create Offset Tax. But offset tax is not allowed';
7425:
7426: IF g_level_statement >= g_current_runtime_level THEN
7427: FND_LOG.STRING(g_level_statement,
7472: l_rownum := l_rownum - 1;
7473:
7474: -- set the return status back to SUCCESS
7475: --
7476: x_return_status := FND_API.G_RET_STS_SUCCESS;
7477:
7478: IF g_level_statement >= g_current_runtime_level THEN
7479: FND_LOG.STRING(g_level_statement,
7480: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_taxes_for_intercomp_trx',
7540:
7541: -- Matching tax rate code is not defined in AP or other product,
7542: -- raise error
7543: --
7544: x_return_status := FND_API.G_RET_STS_ERROR;
7545: l_error_buffer := 'tax_amt <> 0. Tax Rate Code is not adhoc';
7546: IF (g_level_statement >= g_current_runtime_level ) THEN
7547: FND_LOG.STRING(g_level_statement,
7548: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_taxes_for_intercomp_trx',
7567: l_tax_regime_rec,
7568: x_return_status,
7569: l_error_buffer);
7570:
7571: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7572: IF (g_level_statement >= g_current_runtime_level ) THEN
7573: FND_LOG.STRING(g_level_statement,
7574: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_taxes_for_intercomp_trx',
7575: 'Incorrect return_status after calling ' ||
7598: l_tax_rec,
7599: x_return_status,
7600: l_error_buffer);
7601:
7602: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7603: IF (g_level_statement >= g_current_runtime_level ) THEN
7604: FND_LOG.STRING(g_level_statement,
7605: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_taxes_for_intercomp_trx',
7606: 'Incorrect return_status after calling ' ||
7639: l_tax_jurisdiction_rec,
7640: x_return_status,
7641: l_error_buffer);
7642:
7643: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7644: IF (g_level_statement >= g_current_runtime_level ) THEN
7645: FND_LOG.STRING(g_level_statement,
7646: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines',
7647: 'Incorrect return_status after calling ' ||
7672: l_tax_status_rec,
7673: x_return_status,
7674: l_error_buffer);
7675:
7676: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7677: IF (g_level_statement >= g_current_runtime_level ) THEN
7678: FND_LOG.STRING(g_level_statement,
7679: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_taxes_for_intercomp_trx',
7680: 'Incorrect return_status after calling ' ||
7711: l_tax_rate_rec,
7712: x_return_status,
7713: l_error_buffer);
7714:
7715: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7716: IF (g_level_statement >= g_current_runtime_level ) THEN
7717: FND_LOG.STRING(g_level_statement,
7718: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_taxes_for_intercomp_trx',
7719: 'Incorrect return_status after calling ' ||
7731: IF l_tax_rate_rec.percentage_rate <> tax_line_rec.tax_rate AND -- Bug 5010575
7732: l_tax_rate_rec.allow_adhoc_tax_rate_flag = 'N'
7733: THEN
7734:
7735: x_return_status := FND_API.G_RET_STS_ERROR;
7736: l_error_buffer := 'Tax Rate Code is not adhoc';
7737: IF (g_level_statement >= g_current_runtime_level ) THEN
7738: FND_LOG.STRING(g_level_statement,
7739: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_taxes_for_intercomp_trx',
7770: --
7771: IF l_tax_rate_rec.percentage_rate <> 0 -- Bug 5010575
7772: AND p_event_class_rec.allow_offset_tax_calc_flag = 'N'
7773: THEN
7774: x_return_status := FND_API.G_RET_STS_ERROR;
7775: l_error_buffer := 'Need to create Offset Tax. But offset tax is not allowed';
7776:
7777: IF g_level_statement >= g_current_runtime_level THEN
7778: FND_LOG.STRING(g_level_statement,
7826: p_reg_rule_flg => l_tax_rec.registration_type_rule_flag,
7827: p_tax_determine_date => p_tax_determine_date,
7828: x_return_status => x_return_status);
7829:
7830: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7831: IF (g_level_statement >= g_current_runtime_level ) THEN
7832: FND_LOG.STRING(g_level_statement,
7833: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_taxes_for_intercomp_trx',
7834: 'Incorrect return_status after calling ' ||
7856: x_end_index,
7857: x_return_status,
7858: l_error_buffer );
7859:
7860: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7861: IF (g_level_statement >= g_current_runtime_level ) THEN
7862: FND_LOG.STRING(g_level_statement,
7863: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_taxes_for_intercomp_trx',
7864: 'Incorrect RETURN_STATUS after calling '||
7880: END IF;
7881:
7882: EXCEPTION
7883: WHEN OTHERS THEN
7884: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7885: IF (g_level_unexpected >= g_current_runtime_level ) THEN
7886: FND_LOG.STRING(g_level_unexpected,
7887: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_taxes_for_intercomp_trx',
7888: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
8167: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_process_results.BEGIN',
8168: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_process_results(+)');
8169: END IF;
8170:
8171: x_return_status := FND_API.G_RET_STS_SUCCESS;
8172:
8173: l_tax_classification_code :=
8174: NVL(ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.INPUT_TAX_CLASSIFICATION_CODE(p_trx_line_index),
8175: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.OUTPUT_TAX_CLASSIFICATION_CODE(p_trx_line_index));
8268:
8269: FOR i IN 1.. NVL(l_action_rec_tbl.last,0) LOOP
8270:
8271: IF UPPER(l_action_rec_tbl(i).action_code) in ('ERROR_MESSAGE','SYSTEM_ERROR') then
8272: x_return_status := FND_API.G_RET_STS_ERROR;
8273: app_exception.raise_exception;
8274: ELSIF UPPER(l_action_rec_tbl(i).action_code) = 'DO_NOT_USE_THIS_TAX_GROUP' then
8275: l_cec_result := FALSE;
8276: ELSIF UPPER(l_action_rec_tbl(i).action_code) = 'USE_THIS_TAX_GROUP' then
8332: x_begin_index,
8333: l_end_index,
8334: x_return_status);
8335:
8336: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8337: IF (g_level_statement >= g_current_runtime_level ) THEN
8338: FND_LOG.STRING(g_level_statement,
8339: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_process_results',
8340: 'Incorrect return_status after calling ' ||
8414: 'action code ' ||
8415: l_action_rec_tbl(i).action_code);
8416: END IF;
8417: if upper(l_action_rec_tbl(i).action_code) in ('ERROR_MESSAGE','SYSTEM_ERROR') then
8418: x_return_status := FND_API.G_RET_STS_ERROR;
8419: IF (g_level_error >= g_current_runtime_level ) THEN
8420: FND_LOG.STRING(g_level_error,
8421: 'ZX.PLSQL.ZX_TDS_RULE_BASE_DETM_PVT.get_result',
8422: 'Action_code is ERROR_MESSAGE,SYSTEM_ERROR');
8485: If select_tax_status_rate_code%NOTFOUND then
8486: --A record does not exist with that tax rate code for the given tax.
8487: --Raise error;
8488:
8489: p_return_status := FND_API.G_RET_STS_ERROR;
8490: p_error_buffer := SUBSTR(SQLERRM, 1, 80);
8491: IF (g_level_error >= g_current_runtime_level ) THEN
8492: FND_LOG.STRING(g_level_error,
8493: 'ZX.PLSQL.ZX_TDS_RULE_BASE_DETM_PVT.get_result',
8692: x_place_of_supply_type_code => l_place_of_supply_type_code,
8693: x_place_of_supply_result_id => l_place_of_supply_result_id,
8694: x_return_status => x_return_status);
8695:
8696: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8697: IF (g_level_statement >= g_current_runtime_level ) THEN
8698: FND_LOG.STRING(g_level_statement,
8699: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_process_results',
8700: 'Incorrect return_status after calling ' ||
8706: --
8707: IF NVL(l_tax_rec.has_other_jurisdictions_flag, 'N') = 'N' AND
8708: NVL(l_tax_rec.record_type_code, 'USER_DEFINED') = 'MIGRATED'
8709: THEN
8710: x_return_status := FND_API.G_RET_STS_SUCCESS;
8711: IF (g_level_statement >= g_current_runtime_level ) THEN
8712: FND_LOG.STRING(g_level_statement,
8713: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_process_results',
8714: 'For migrated taxes, if the has_other_jurisdictions_flag on ' ||
8821: x_applicability_result => l_applicability_result,
8822: x_applicability_result_id => l_applicability_result_id,
8823: x_return_status => x_return_status);
8824:
8825: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8826: IF (g_level_statement >= g_current_runtime_level ) THEN
8827: FND_LOG.STRING(g_level_statement,
8828: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_applicable_taxes',
8829: 'Incorrect return_status after calling ' ||
8844: /* --bug 5385188
8845: -- Since Direct Rate is applicable, POS is not mandatory. So ignore
8846: -- the errors raised from get_place_of_supply
8847:
8848: x_return_status := FND_API.G_RET_STS_SUCCESS;
8849: */
8850:
8851: IF l_tax_applicable THEN
8852: -- build the new detail tax lines ONLY AFTER the tax is evaluated to be applicable.
8861: l_tax_regime_rec,
8862: x_return_status,
8863: l_error_buffer);
8864:
8865: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8866: IF (g_level_statement >= g_current_runtime_level ) THEN
8867: FND_LOG.STRING(g_level_statement,
8868: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_process_results',
8869: 'Incorrect return_status after calling ' ||
8913: l_tax_status_rec,
8914: x_return_status,
8915: l_error_buffer);
8916:
8917: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8918: IF (g_level_statement >= g_current_runtime_level ) THEN
8919: FND_LOG.STRING(g_level_statement,
8920: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_process_results',
8921: 'Incorrect return_status after calling ' ||
8959: l_tax_rate_rec,
8960: x_return_status,
8961: l_error_buffer);
8962:
8963: IF x_return_status = FND_API.G_RET_STS_SUCCESS AND
8964: l_tax_rate_rec.tax_rate_id is not NULL and
8965: l_tax_rate_rec.tax_jurisdiction_code = l_jurisdiction_rec_tbl(i).tax_jurisdiction_code
8966: THEN
8967: -- A matching rate record is found. use this record for processing
8987: l_error_buffer);
8988: END IF;
8989:
8990:
8991: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8992: IF (g_level_statement >= g_current_runtime_level ) THEN
8993: FND_LOG.STRING(g_level_statement,
8994: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_process_results',
8995: 'Incorrect return_status after calling ' ||
9026: l_tax_jurisdiction_id,
9027: l_tax_jurisdiction_code,
9028: x_return_status);
9029:
9030: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9031: IF (g_level_statement >= g_current_runtime_level ) THEN
9032: FND_LOG.STRING(g_level_statement,
9033: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_process_results',
9034: 'Incorrect return_status after calling ' ||
9172: p_reg_rule_flg => l_tax_rec.registration_type_rule_flag,
9173: p_tax_determine_date => p_tax_determine_date,
9174: x_return_status => x_return_status);
9175:
9176: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9177: IF (g_level_statement >= g_current_runtime_level ) THEN
9178: FND_LOG.STRING(g_level_statement,
9179: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_process_results',
9180: 'Incorrect return_status after calling ' ||
9275: l_tax_regime_rec.geography_id,
9276: l_tax_regime_rec.effective_from,
9277: l_tax_regime_rec.effective_to,
9278: x_return_status );
9279: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9280: IF (g_level_error >= g_current_runtime_level ) THEN
9281: FND_LOG.STRING(g_level_error,
9282: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_applicable_regimes',
9283: 'Incorrect return_status after calling ' ||
9338: x_end_index,
9339: x_return_status,
9340: l_error_buffer );
9341:
9342: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9343: IF (g_level_statement >= g_current_runtime_level ) THEN
9344: FND_LOG.STRING(g_level_statement,
9345: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_process_results',
9346: 'Incorrect RETURN_STATUS after calling '||
9365:
9366:
9367: EXCEPTION
9368: WHEN OTHERS THEN
9369: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9370: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
9371: IF (g_level_unexpected >= g_current_runtime_level ) THEN
9372: FND_LOG.STRING(g_level_unexpected,
9373: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_process_results',
9488: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.handle_update_scenarios.BEGIN',
9489: 'ZX_TDS_APPLICABILITY_DETM_PKG.handle_update_scenarios(+)');
9490: END IF;
9491:
9492: x_return_status := FND_API.G_RET_STS_SUCCESS;
9493:
9494: -- Bug#5417753- determine tax_class value
9495: IF p_event_class_rec.prod_family_grp_code = 'O2C' THEN
9496: l_tax_class := 'OUTPUT';
9643: l_tax_status_rec,
9644: x_return_status,
9645: l_error_buffer);
9646:
9647: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9648: IF (g_level_error >= g_current_runtime_level ) THEN
9649: FND_LOG.STRING(g_level_error,
9650: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.handle_update_scenarios',
9651: 'Incorrect return_status after calling '||
9694: l_tax_status_rec,
9695: x_return_status,
9696: l_error_buffer);
9697:
9698: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9699: IF (g_level_error >= g_current_runtime_level ) THEN
9700: FND_LOG.STRING(g_level_error,
9701: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.handle_update_scenarios',
9702: 'Incorrect return_status after calling '||
9729: l_tax_rate_rec,
9730: x_return_status,
9731: l_error_buffer);
9732:
9733: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9734: IF (g_level_error >= g_current_runtime_level ) THEN
9735: FND_LOG.STRING(g_level_error,
9736: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.handle_update_scenarios',
9737: 'Incorrect return_status after calling '||
9781: l_tax_status_rec,
9782: x_return_status,
9783: l_error_buffer);
9784:
9785: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9786: IF (g_level_error >= g_current_runtime_level ) THEN
9787: FND_LOG.STRING(g_level_error,
9788: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.handle_update_scenarios',
9789: 'Incorrect return_status after calling '||
9816: l_tax_rate_rec,
9817: x_return_status,
9818: l_error_buffer);
9819:
9820: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9821: IF (g_level_error >= g_current_runtime_level ) THEN
9822: FND_LOG.STRING(g_level_error,
9823: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.handle_update_scenarios',
9824: 'Incorrect return_status after calling '||
9890: l_tax_status_rec,
9891: x_return_status,
9892: l_error_buffer);
9893:
9894: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9895: IF (g_level_error >= g_current_runtime_level ) THEN
9896: FND_LOG.STRING(g_level_error,
9897: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.handle_update_scenarios',
9898: 'Incorrect return_status after calling '||
9925: l_tax_rate_rec,
9926: x_return_status,
9927: l_error_buffer);
9928:
9929: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9930: IF (g_level_error >= g_current_runtime_level ) THEN
9931: FND_LOG.STRING(g_level_error,
9932: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.handle_update_scenarios',
9933: 'Incorrect return_status after calling '||
10010:
10011: EXCEPTION
10012: WHEN OTHERS THEN
10013: CLOSE get_key_columns_cur;
10014: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10015: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
10016: IF (g_level_unexpected >= g_current_runtime_level ) THEN
10017: FND_LOG.STRING(g_level_unexpected,
10018: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.handle_update_scenarios',
10092: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.enforce_tax_from_ref_doc.BEGIN',
10093: 'ZX_TDS_APPLICABILITY_DETM_PKG.enforce_tax_from_ref_doc(+)');
10094: END IF;
10095:
10096: x_return_status := FND_API.G_RET_STS_SUCCESS;
10097:
10098: FOR i IN NVL(p_begin_index, 1) .. NVL(p_end_index, 0) LOOP
10099:
10100: OPEN enforce_rate_code_from_ref_doc(
10134: l_tax_status_rec,
10135: x_return_status,
10136: l_error_buffer);
10137:
10138: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10139: IF (g_level_statement >= g_current_runtime_level ) THEN
10140: FND_LOG.STRING(g_level_statement,
10141: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.enforce_tax_from_ref_doc',
10142: 'Incorrect return_status after calling ' ||
10175: END IF;
10176:
10177: EXCEPTION
10178: WHEN NO_DATA_FOUND THEN
10179: x_return_status := FND_API.G_RET_STS_ERROR;
10180: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
10181: IF (g_level_error >= g_current_runtime_level ) THEN
10182: FND_LOG.STRING(g_level_error,
10183: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.enforce_tax_from_ref_doc',
10187: 'ZX_TDS_APPLICABILITY_DETM_PKG.enforce_tax_from_ref_doc(-)');
10188: END IF;
10189:
10190: WHEN OTHERS THEN
10191: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10192: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
10193: IF (g_level_unexpected >= g_current_runtime_level ) THEN
10194: FND_LOG.STRING(g_level_unexpected,
10195: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.enforce_tax_from_ref_doc',