[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_UNEXP_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 ' ||
1425: p_tax_id => tax_line_rec.tax_id,
1426: p_return_status => x_return_status,
1427: p_error_buffer => l_error_buffer);
1428:
1429: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1430: IF (g_level_statement >= g_current_runtime_level ) THEN
1431: FND_LOG.STRING(g_level_statement,
1432: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines',
1433: 'Incorrect return_status after calling ' ||
1514: ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl(
1515: l_rownum).tax_determine_date,
1516: x_return_status => x_return_status);
1517:
1518: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1519: IF (g_level_statement >= g_current_runtime_level ) THEN
1520: FND_LOG.STRING(g_level_statement,
1521: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines',
1522: 'Incorrect return_status after calling ' ||
1576: p_tax_id => tax_line_rec.tax_id,
1577: p_return_status => x_return_status,
1578: p_error_buffer => l_error_buffer);
1579:
1580: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1581: IF (g_level_statement >= g_current_runtime_level ) THEN
1582: FND_LOG.STRING(g_level_statement,
1583: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines',
1584: 'Incorrect return_status after calling ' ||
1634: ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl(
1635: l_rownum).tax_determine_date,
1636: x_return_status => x_return_status);
1637:
1638: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1639: IF (g_level_statement >= g_current_runtime_level ) THEN
1640: FND_LOG.STRING(g_level_statement,
1641: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines',
1642: 'Incorrect return_status after calling ' ||
1679: p_tax_id => tax_line_rec.tax_id,
1680: p_return_status => x_return_status,
1681: p_error_buffer => l_error_buffer);
1682:
1683: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1684: IF (g_level_statement >= g_current_runtime_level ) THEN
1685: FND_LOG.STRING(g_level_statement,
1686: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines',
1687: 'Incorrect return_status after calling ' ||
1737: ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl(
1738: l_rownum).tax_determine_date,
1739: x_return_status => x_return_status);
1740:
1741: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1742: IF (g_level_statement >= g_current_runtime_level ) THEN
1743: FND_LOG.STRING(g_level_statement,
1744: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines',
1745: 'Incorrect return_status after calling ' ||
1782: p_tax_id => tax_line_rec.tax_id,
1783: p_return_status => x_return_status,
1784: p_error_buffer => l_error_buffer);
1785:
1786: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1787: IF (g_level_statement >= g_current_runtime_level ) THEN
1788: FND_LOG.STRING(g_level_statement,
1789: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines',
1790: 'Incorrect return_status after calling ' ||
1840: ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl(
1841: l_rownum).tax_determine_date,
1842: x_return_status => x_return_status);
1843:
1844: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1845: IF (g_level_statement >= g_current_runtime_level ) THEN
1846: FND_LOG.STRING(g_level_statement,
1847: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines',
1848: 'Incorrect return_status after calling ' ||
1925: p_reg_rule_flg => NULL,
1926: p_tax_determine_date => p_tax_determine_date,
1927: x_return_status => x_return_status);
1928:
1929: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1930: IF (g_level_statement >= g_current_runtime_level ) THEN
1931: FND_LOG.STRING(g_level_statement,
1932: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines',
1933: 'Incorrect return_status after calling ' ||
1951: l_tax_regime_rec,
1952: x_return_status,
1953: l_error_buffer);
1954:
1955: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1956: IF (g_level_statement >= g_current_runtime_level ) THEN
1957: FND_LOG.STRING(g_level_statement,
1958: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines',
1959: 'Incorrect return_status after calling ' ||
1981: l_tax_rec,
1982: x_return_status,
1983: l_error_buffer);
1984:
1985: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1986: IF (g_level_statement >= g_current_runtime_level ) THEN
1987: FND_LOG.STRING(g_level_statement,
1988: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines',
1989: 'Incorrect return_status after calling ' ||
2013: l_tax_jurisdiction_rec,
2014: x_return_status,
2015: l_error_buffer);
2016:
2017: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2018: IF (g_level_statement >= g_current_runtime_level ) THEN
2019: FND_LOG.STRING(g_level_statement,
2020: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines',
2021: 'Incorrect return_status after calling ' ||
2045: l_tax_status_rec,
2046: x_return_status,
2047: l_error_buffer);
2048:
2049: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2050: IF (g_level_statement >= g_current_runtime_level ) THEN
2051: FND_LOG.STRING(g_level_statement,
2052: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines',
2053: 'Incorrect return_status after calling ' ||
2078: l_tax_rate_rec,
2079: x_return_status,
2080: l_error_buffer);
2081:
2082: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2083: IF (g_level_statement >= g_current_runtime_level ) THEN
2084: FND_LOG.STRING(g_level_statement,
2085: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines',
2086: 'Incorrect return_status after calling ' ||
2198: p_reg_rule_flg => l_tax_rec.registration_type_rule_flag,
2199: p_tax_determine_date => p_tax_determine_date,
2200: x_return_status => x_return_status);
2201:
2202: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2203: IF (g_level_statement >= g_current_runtime_level ) THEN
2204: FND_LOG.STRING(g_level_statement,
2205: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines',
2206: 'Incorrect return_status after calling ' ||
2249: x_end_index,
2250: x_return_status,
2251: l_error_buffer );
2252:
2253: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2254: IF (g_level_statement >= g_current_runtime_level ) THEN
2255: FND_LOG.STRING(g_level_statement,
2256: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines',
2257: 'Incorrect RETURN_STATUS after calling '||
2273: END IF;
2274:
2275: EXCEPTION
2276: WHEN OTHERS THEN
2277: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2278:
2279: IF (g_level_unexpected >= g_current_runtime_level ) THEN
2280: FND_LOG.STRING(g_level_unexpected,
2281: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines',
2557: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_applicable_taxes.BEGIN',
2558: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_applicable_taxes(+)');
2559: END IF;
2560:
2561: x_return_status := FND_API.G_RET_STS_SUCCESS;
2562:
2563: l_tax_applicable := FALSE;
2564:
2565: IF p_event_class_rec.prod_family_grp_code = 'O2C' THEN
2710: x_begin_index,
2711: x_end_index,
2712: x_return_status);
2713:
2714: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2715: IF (g_level_statement >= g_current_runtime_level ) THEN
2716: FND_LOG.STRING(g_level_statement,
2717: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_applicable_taxes',
2718: 'Incorrect return_status after calling ' ||
2752: x_direct_rate_result_rec => l_direct_rate_result_rec,
2753: x_direct_rate_result_id => l_direct_rate_result_id,
2754: x_return_status => x_return_status);
2755:
2756: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2757: IF (g_level_statement >= g_current_runtime_level ) THEN
2758: FND_LOG.STRING(g_level_statement,
2759: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_applicable_taxes',
2760: 'Incorrect return_status after calling ' ||
2859: x_place_of_supply_type_code => l_place_of_supply_type_code,
2860: x_place_of_supply_result_id => l_place_of_supply_result_id,
2861: x_return_status => x_return_status);
2862:
2863: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2864: IF (g_level_statement >= g_current_runtime_level ) THEN
2865: FND_LOG.STRING(g_level_statement,
2866: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_applicable_taxes',
2867: 'Incorrect return_status after calling ' ||
2874: IF NVL(l_tax_rec.has_other_jurisdictions_flag, 'N') = 'N' AND
2875: NVL(l_tax_rec.record_type_code, 'USER_DEFINED') = 'MIGRATED'
2876: THEN
2877:
2878: x_return_status := FND_API.G_RET_STS_SUCCESS;
2879: IF (g_level_statement >= g_current_runtime_level ) THEN
2880: FND_LOG.STRING(g_level_statement,
2881: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_applicable_taxes',
2882: 'For migrated taxes, if the has_other_jurisdictions_flag on ' ||
3007: x_applicability_result => l_applicability_result,
3008: x_applicability_result_id => l_applicability_result_id,
3009: x_return_status => x_return_status);
3010:
3011: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3012: IF (g_level_statement >= g_current_runtime_level ) THEN
3013: FND_LOG.STRING(g_level_statement,
3014: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_applicable_taxes',
3015: 'Incorrect return_status after calling ' ||
3082: l_tax_jurisdiction_id,
3083: l_tax_jurisdiction_code,
3084: x_return_status);
3085:
3086: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3087: IF (g_level_statement >= g_current_runtime_level ) THEN
3088: FND_LOG.STRING(g_level_statement,
3089: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_applicable_taxes',
3090: 'Incorrect return_status after calling ' ||
3275: l_tax_status_rec,
3276: x_return_status,
3277: l_error_buffer);
3278:
3279: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3280: IF (g_level_error >= g_current_runtime_level ) THEN
3281: FND_LOG.STRING(g_level_error,
3282: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_applicable_taxes',
3283: 'Incorrect return_status after calling '||
3330: p_reg_rule_flg => l_tax_rec.registration_type_rule_flag,
3331: p_tax_determine_date => p_tax_determine_date,
3332: x_return_status => x_return_status);
3333:
3334: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3335: IF (g_level_statement >= g_current_runtime_level ) THEN
3336: FND_LOG.STRING(g_level_statement,
3337: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_applicable_taxes',
3338: 'Incorrect return_status after calling ' ||
3559: x_end_index,
3560: x_return_status,
3561: l_error_buffer );
3562:
3563: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3564: IF (g_level_statement >= g_current_runtime_level ) THEN
3565: FND_LOG.STRING(g_level_statement,
3566: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_applicable_taxes',
3567: 'Incorrect RETURN_STATUS after calling '||
3590: IF (get_all_taxes_for_regime_cur%ISOPEN) THEN
3591: CLOSE get_all_taxes_for_regime_cur;
3592: END IF;
3593:
3594: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3595:
3596: IF (g_level_unexpected >= g_current_runtime_level ) THEN
3597: FND_LOG.STRING(g_level_unexpected,
3598: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_applicable_taxes',
3668: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_det_tax_lines_from_applied.BEGIN',
3669: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_det_tax_lines_from_applied(+)'|| 'p_trx_line_index = ' || to_char(p_trx_line_index));
3670: END IF;
3671:
3672: x_return_status := FND_API.G_RET_STS_SUCCESS;
3673:
3674: -- initialize l_new_row_num
3675: --
3676: l_new_row_num := NVL(ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl.LAST, 0);
3688: p_tax_id => tax_line_rec.tax_id,
3689: p_return_status => x_return_status,
3690: p_error_buffer => l_error_buffer);
3691:
3692: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3693: IF (g_level_statement >= g_current_runtime_level ) THEN
3694: FND_LOG.STRING(g_level_statement,
3695: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_det_tax_lines_from_applied',
3696: 'Incorrect return_status after calling ' ||
3791: l_status_rec,
3792: x_return_status,
3793: l_error_buffer);
3794:
3795: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3796: IF (g_level_error >= g_current_runtime_level ) THEN
3797: FND_LOG.STRING(g_level_error,
3798: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_det_tax_lines_from_applied',
3799: 'Incorrect return_status after calling ' ||
3895: tax_line_rec.ledger_id,
3896: ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl(
3897: l_new_row_num).prd_total_tax_amt_funcl_curr);
3898:
3899: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3900: IF (g_level_statement >= g_current_runtime_level ) THEN
3901: FND_LOG.STRING(g_level_statement,
3902: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_det_tax_lines_from_applied',
3903: 'Incorrect return_status after calling ' ||
4284: x_end_index,
4285: x_return_status,
4286: l_error_buffer);
4287:
4288: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4289: IF (g_level_statement >= g_current_runtime_level ) THEN
4290: FND_LOG.STRING(g_level_statement,
4291: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_det_tax_lines_from_applied',
4292: 'Incorrect return_status after calling ' ||
4309: END IF;
4310:
4311: EXCEPTION
4312: WHEN OTHERS THEN
4313: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4314:
4315: IF (g_level_unexpected >= g_current_runtime_level ) THEN
4316: FND_LOG.STRING(g_level_unexpected,
4317: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_det_tax_lines_from_applied',
4413: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_det_tax_lines_from_adjust.BEGIN',
4414: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_det_tax_lines_from_adjust(+)'|| 'trx_line_index = ' || to_char(p_trx_line_index));
4415: END IF;
4416:
4417: x_return_status := FND_API.G_RET_STS_SUCCESS;
4418:
4419: l_new_row_num := NVL(ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl.LAST, 0);
4420: l_begin_index := l_new_row_num + 1;
4421:
4428: p_tax_id => tax_line_rec.tax_id,
4429: p_return_status => x_return_status,
4430: p_error_buffer => l_error_buffer);
4431:
4432: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4433: IF (g_level_statement >= g_current_runtime_level ) THEN
4434: FND_LOG.STRING(g_level_statement,
4435: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_det_tax_lines_from_adjust',
4436: 'Incorrect return_status after calling ' ||
5110: x_end_index,
5111: x_return_status ,
5112: l_error_buffer );
5113:
5114: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5115: IF (g_level_statement >= g_current_runtime_level ) THEN
5116: FND_LOG.STRING(g_level_statement,
5117: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_det_tax_lines_from_adjust',
5118: 'Incorrect return_status after calling ' ||
5136: END IF;
5137:
5138: EXCEPTION
5139: WHEN OTHERS THEN
5140: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5141:
5142: IF (g_level_unexpected >= g_current_runtime_level ) THEN
5143: FND_LOG.STRING(g_level_unexpected,
5144: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_det_tax_lines_from_adjust',
5215: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_place_of_supply(+)');
5216:
5217: END IF;
5218:
5219: x_return_status := FND_API.G_RET_STS_SUCCESS;
5220:
5221: l_tax_service_type_code := 'DET_PLACE_OF_SUPPLY';
5222:
5223: IF (g_level_statement >= g_current_runtime_level ) THEN
5238: x_alphanumeric_result => x_place_of_supply_type_code,
5239: x_result_id => x_place_of_supply_result_id,
5240: x_return_status => x_return_status);
5241:
5242: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5243: IF (g_level_statement >= g_current_runtime_level ) THEN
5244: FND_LOG.STRING(g_level_statement,
5245: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_place_of_supply',
5246: 'Incorrect return_status after calling ' ||
5265:
5266: ELSE
5267: x_place_of_supply_type_code := p_def_place_of_supply_type_cd;
5268: x_place_of_supply_result_id := NULL;
5269: x_return_status := FND_API.G_RET_STS_SUCCESS;
5270: END IF;
5271:
5272: IF (x_place_of_supply_type_code IS NULL) THEN
5273:
5270: END IF;
5271:
5272: IF (x_place_of_supply_type_code IS NULL) THEN
5273:
5274: x_return_status := FND_API.G_RET_STS_ERROR;
5275:
5276: FND_MESSAGE.SET_NAME('ZX','ZX_POS_NOT_FOUND');
5277: FND_MESSAGE.SET_TOKEN('TAX',p_tax);
5278: --FND_MSG_PUB.Add;
5305: l_tax_param_code := get_pos_parameter_name(
5306: l_pos_type,
5307: x_return_status);
5308:
5309: IF NVL(x_return_status, FND_API.G_RET_STS_ERROR) <> FND_API.G_RET_STS_SUCCESS
5310: THEN
5311: -- TCM procedure called in get_pos_parameter_name will set the error msg
5312: -- here we just need to populate the context information.
5313:
5340: p_tax_param_code => l_tax_param_code,
5341: x_tax_param_value => l_location_id,
5342: x_return_status => x_return_status );
5343:
5344: IF NVL(x_return_status, FND_API.G_RET_STS_ERROR) <> FND_API.G_RET_STS_SUCCESS
5345: THEN
5346: IF (g_level_statement >= g_current_runtime_level ) THEN
5347: FND_LOG.STRING(g_level_statement,
5348: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_place_of_supply',
5367: l_tax_param_code := get_pos_parameter_name(
5368: l_pos_type,
5369: x_return_status);
5370:
5371: IF NVL(x_return_status, FND_API.G_RET_STS_ERROR) <> FND_API.G_RET_STS_SUCCESS
5372: THEN
5373: -- TCM procedure called in get_pos_parameter_name will set the error msg
5374: -- here we just need to populate the context information.
5375:
5402: p_tax_param_code => l_tax_param_code,
5403: x_tax_param_value => l_location_id,
5404: x_return_status => x_return_status );
5405:
5406: IF NVL(x_return_status, FND_API.G_RET_STS_ERROR) <> FND_API.G_RET_STS_SUCCESS
5407: THEN
5408: IF (g_level_statement >= g_current_runtime_level ) THEN
5409: FND_LOG.STRING(g_level_statement,
5410: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_place_of_supply',
5435: x_tax_jurisdiction_rec => x_jurisdiction_rec,
5436: x_jurisdictions_found => x_jurisdictions_found,
5437: x_return_status => x_return_status);
5438:
5439: IF NVL(x_return_status, FND_API.G_RET_STS_ERROR) <> FND_API.G_RET_STS_SUCCESS
5440: THEN
5441: -- populate the trx line context info if jurisdiction API return error
5442: -- jurisdiction API should have populated the error message name and text.
5443:
5504: EXCEPTION
5505: WHEN OTHERS THEN
5506: x_place_of_supply_type_code := NULL;
5507: x_place_of_supply_result_id := NULL;
5508: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5509:
5510: IF (g_level_unexpected >= g_current_runtime_level ) THEN
5511: FND_LOG.STRING(g_level_unexpected,
5512: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_place_of_supply',
5546: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_pos_parameter_name.BEGIN',
5547: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_pos_parameter_name(+)'|| 'pos_type = ' || p_pos_type);
5548: END IF;
5549:
5550: x_return_status := FND_API.G_RET_STS_SUCCESS;
5551:
5552: -- x_return_status retured from TCM procedure will be handled in the
5553: -- calling procedure
5554: IF (p_pos_type = 'SHIP_TO') THEN
5704: END IF;
5705:
5706: EXCEPTION
5707: WHEN OTHERS THEN
5708: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5709: IF (g_level_unexpected >= g_current_runtime_level ) THEN
5710: FND_LOG.STRING(g_level_unexpected,
5711: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_pos_parameter_name',
5712: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
5768: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_registration_info.BEGIN',
5769: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_registration_info(+)');
5770: END IF;
5771:
5772: x_return_status := FND_API.G_RET_STS_SUCCESS;
5773: -- get l_reg_party_prof_id
5774: --
5775: ZX_TDS_RULE_BASE_DETM_PVT.get_tsrm_num_value(
5776: p_structure_name,
5779: l_reg_party_prof_id,
5780: x_return_status,
5781: l_error_buffer);
5782:
5783: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5784: IF (g_level_error >= g_current_runtime_level ) THEN
5785: FND_LOG.STRING(g_level_error,
5786: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_registration_info',
5787: 'Incorrect return_status after calling ' ||
5816: l_hq_estb_ptp_id,
5817: x_return_status,
5818: l_error_buffer);
5819:
5820: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5821: IF (g_level_error >= g_current_runtime_level ) THEN
5822: FND_LOG.STRING(g_level_error,
5823: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_registration_info',
5824: 'Incorrect return_status after calling ' ||
5832: FND_LOG.STRING(g_level_error,
5833: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_registration_info.END',
5834: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_registration_info(-)');
5835: END IF;
5836: x_return_status := FND_API.G_RET_STS_SUCCESS;
5837: RETURN;
5838: END IF;
5839:
5840: l_parent_ptp_id := l_hq_estb_ptp_id;
5856: l_account_site_id,
5857: x_return_status,
5858: l_error_buffer);
5859:
5860: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5861: IF (g_level_error >= g_current_runtime_level ) THEN
5862: FND_LOG.STRING(g_level_error,
5863: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_registration_info',
5864: 'Incorrect return_status after calling ' ||
5885: l_account_id,
5886: x_return_status,
5887: l_error_buffer);
5888:
5889: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5890: IF (g_level_error >= g_current_runtime_level ) THEN
5891: FND_LOG.STRING(g_level_error,
5892: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_registration_info',
5893: 'Incorrect return_status after calling ' ||
5919: l_error_buffer);
5920:
5921: END IF;
5922:
5923: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5924: IF (g_level_error >= g_current_runtime_level ) THEN
5925: FND_LOG.STRING(g_level_error,
5926: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_registration_info',
5927: 'Incorrect return_status after calling ' ||
5956: l_site_ptp_id,
5957: x_return_status,
5958: l_error_buffer);
5959:
5960: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5961: IF (g_level_error >= g_current_runtime_level ) THEN
5962: FND_LOG.STRING(g_level_error,
5963: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_registration_info',
5964: 'Incorrect return_status after calling ' ||
5992: l_tax_rec,
5993: x_return_status,
5994: l_error_buffer);
5995:
5996: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
5997: l_has_other_jurisdictions_flag := l_tax_rec.has_other_jurisdictions_flag;
5998: END IF;
5999:
6000: IF l_has_other_jurisdictions_flag = 'N' THEN
6034: p_zx_registration_rec => l_registration_rec,
6035: p_ret_record_level => l_ret_record_level,
6036: p_return_status => x_return_status);
6037:
6038: IF NVL(x_return_status, FND_API.G_RET_STS_ERROR) <> FND_API.G_RET_STS_SUCCESS
6039: THEN
6040: IF (g_level_statement >= g_current_runtime_level ) THEN
6041: FND_LOG.STRING(g_level_statement,
6042: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_registration_info',
6044: END IF;
6045: -- Bug 4939819 - Skip registration processing if PTP setupis not found
6046: IF l_parent_ptp_id IS NULL THEN
6047: -- Parent PTP is NULL. Continuing...
6048: x_return_status := FND_API.G_RET_STS_SUCCESS;
6049: END IF;
6050:
6051: ELSE
6052: x_registration_rec := l_registration_rec;
6069: END IF;
6070:
6071: EXCEPTION
6072: WHEN OTHERS THEN
6073: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6074:
6075: IF (g_level_unexpected >= g_current_runtime_level ) THEN
6076: FND_LOG.STRING(g_level_unexpected,
6077: 'ZX.PLSQL.ZX_TDS_RULE_BASE_DETM_PVT.get_tax_registration_info',
6166: x_alphanumeric_result => l_reg_party_type,
6167: x_result_id => x_tax_registration_result_id,
6168: x_return_status => x_return_status);
6169:
6170: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6171: IF (g_level_statement >= g_current_runtime_level ) THEN
6172: FND_LOG.STRING(g_level_statement,
6173: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_registration',
6174: 'Incorrect return_status after calling ' ||
6222: x_registration_rec => l_registration_rec,
6223: x_return_status => x_return_status
6224: );
6225:
6226: IF(NVL(x_return_status, FND_API.G_RET_STS_ERROR) <> FND_API.G_RET_STS_SUCCESS
6227: OR l_registration_rec.registration_id IS NULL)
6228: THEN
6229:
6230: IF l_reg_party_type = 'SHIP_TO_BILL_TO'
6246: x_registration_rec => l_registration_rec,
6247: x_return_status => x_return_status
6248: );
6249:
6250: IF(NVL(x_return_status, FND_API.G_RET_STS_ERROR) <> FND_API.G_RET_STS_SUCCESS
6251: OR l_registration_rec.registration_id IS NULL)
6252: THEN
6253:
6254: IF (g_level_statement >= g_current_runtime_level ) THEN
6262: x_registration_party_type := 'SHIP_TO_BILL_TO';
6263: x_registration_number := NULL;
6264: x_self_assessment_flg := 'N';
6265: x_tax_inclusion_flag := NULL;
6266: x_return_status := FND_API.G_RET_STS_SUCCESS;
6267:
6268: ELSE -- Registration record found for BILL_TO registration party type
6269: x_registration_party_type := 'SHIP_TO_BILL_TO';
6270: x_registration_number := l_registration_rec.registration_number;
6276: ELSE
6277: x_registration_number := NULL;
6278: x_self_assessment_flg := 'N';
6279: x_tax_inclusion_flag := NULL;
6280: x_return_status := FND_API.G_RET_STS_SUCCESS;
6281: END IF;
6282:
6283: ELSE -- Registration record found
6284: x_registration_number := l_registration_rec.registration_number;
6340: p_rounding_rule_code => ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_rule,
6341: p_return_status => x_return_status,
6342: p_error_buffer => l_error_buffer);
6343:
6344: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6345:
6346: x_return_status := FND_API.G_RET_STS_SUCCESS;
6347: END IF;
6348:
6342: p_error_buffer => l_error_buffer);
6343:
6344: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6345:
6346: x_return_status := FND_API.G_RET_STS_SUCCESS;
6347: END IF;
6348:
6349: IF ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_rule IS NOT NULL THEN
6350: x_rounding_rule_code := ZX_TDS_CALC_SERVICES_PUB_PKG.g_rounding_rule;
6387: 'RETURN_STATUS = ' || x_return_status);
6388: END IF;
6389: x_tax_registration_result_id := NULL;
6390:
6391: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6392:
6393: IF (g_level_unexpected >= g_current_runtime_level ) THEN
6394: FND_LOG.STRING(g_level_unexpected,
6395: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_registration',
6436: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_legal_entity_registration.BEGIN',
6437: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_legal_entity_registration(+)');
6438: END IF;
6439:
6440: x_return_status := FND_API.G_RET_STS_SUCCESS;
6441: i := p_tax_line_index;
6442:
6443: l_tax_id := ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl(i).tax_id;
6444: l_hq_estb_ptp_id :=
6508: p_zx_registration_rec => l_registration_rec,
6509: p_ret_record_level => l_ret_record_level,
6510: p_return_status => x_return_status);
6511:
6512: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
6513: ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl(i).hq_estb_reg_number :=
6514: l_registration_rec.registration_number;
6515: ELSE
6516:
6514: l_registration_rec.registration_number;
6515: ELSE
6516:
6517: -- Bug 3511428: In case the TCM API returns no value, or with exception, reset
6518: -- x_return_status to FND_API.G_RET_STS_SUCCESS and continue processing ...
6519: -- processing.
6520: --
6521: x_return_status := FND_API.G_RET_STS_SUCCESS;
6522:
6517: -- Bug 3511428: In case the TCM API returns no value, or with exception, reset
6518: -- x_return_status to FND_API.G_RET_STS_SUCCESS and continue processing ...
6519: -- processing.
6520: --
6521: x_return_status := FND_API.G_RET_STS_SUCCESS;
6522:
6523: IF (g_level_statement >= g_current_runtime_level ) THEN
6524: FND_LOG.STRING(g_level_statement,
6525: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_legal_entity_registration',
6537: END IF;
6538:
6539: EXCEPTION
6540: WHEN OTHERS THEN
6541: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6542:
6543: IF (g_level_unexpected >= g_current_runtime_level ) THEN
6544: FND_LOG.STRING(g_level_unexpected,
6545: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_legal_entity_registration',
6588: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.rule_base_pos_detm.BEGIN',
6589: 'ZX_TDS_APPLICABILITY_DETM_PKG.rule_base_pos_detm(+)');
6590: END IF;
6591:
6592: x_return_status := FND_API.G_RET_STS_SUCCESS;
6593:
6594: ZX_TDS_RULE_BASE_DETM_PVT.rule_base_process(
6595: p_tax_service_type_code,
6596: 'TRX_LINE_DIST_TBL',
6604: l_tax_result_rec,
6605: x_return_status,
6606: l_error_buffer);
6607:
6608: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6609: IF (g_level_statement >= g_current_runtime_level ) THEN
6610: FND_LOG.STRING(g_level_statement,
6611: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.rule_base_pos_detm',
6612: 'Incorrect return_status after calling ' ||
6643: EXCEPTION
6644: WHEN OTHERS THEN
6645: x_alphanumeric_result := NULL;
6646: x_result_id := NULL;
6647: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6648:
6649: IF (g_level_unexpected >= g_current_runtime_level ) THEN
6650: FND_LOG.STRING(g_level_unexpected,
6651: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.rule_base_pos_detm',
6682: l_jurisdiction_code zx_jurisdictions_b.tax_jurisdiction_code%TYPE;
6683: l_self_assessed_flag zx_lines.self_assessed_flag%TYPE;
6684: BEGIN
6685:
6686: x_return_status := FND_API.G_RET_STS_SUCCESS;
6687:
6688: IF (g_level_procedure >= g_current_runtime_level ) THEN
6689: FND_LOG.STRING(g_level_procedure,
6690: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.populate_registration_info.BEGIN',
6743: p_rownum).registration_party_type,
6744: x_return_status => x_return_status);
6745:
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.populate_registration_info',
6751: 'Incorrect return_status after calling ' ||
6784: p_trx_line_index => p_trx_line_index,
6785: p_tax_line_index => p_rownum,
6786: x_return_status => x_return_status,
6787: x_error_buffer => l_error_buffer);
6788: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6789: IF (g_level_statement >= g_current_runtime_level ) THEN
6790: FND_LOG.STRING(g_level_statement,
6791: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.populate_registration_info.END',
6792: 'ZX_TDS_APPLICABILITY_DETM_PKG.populate_registration_info(-)');
6797:
6798: EXCEPTION
6799: WHEN OTHERS THEN
6800:
6801: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6802:
6803: IF (g_level_unexpected >= g_current_runtime_level ) THEN
6804: FND_LOG.STRING(g_level_unexpected,
6805: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.populate_registration_info',
6958: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_from_account(+)');
6959:
6960: END IF;
6961:
6962: x_return_status := FND_API.G_RET_STS_SUCCESS;
6963:
6964: -- Bug#5417753- determine tax_class value
6965: IF p_event_class_rec.prod_family_grp_code = 'O2C' THEN
6966: l_tax_class := 'OUTPUT';
6985: 'l_chart_of_accounts_id = ' || to_char(l_chart_of_accounts_id));
6986: END IF;
6987:
6988: IF l_chart_of_accounts_id IS NULL THEN
6989: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR; -- bug 4893261
6990: IF g_level_statement >= g_current_runtime_level THEN
6991: FND_LOG.STRING(g_level_statement,
6992: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_from_account',
6993: 'chart_of_accounts_id is NULL.');
7010: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_from_account',
7011: 'Getting tax code using code combination ID.'|| to_char(l_account_ccid));
7012: END IF;
7013:
7014: -- call fnd api to get the column name for natural account
7015: --
7016: l_boolean_result := fnd_flex_apis.get_segment_column (
7017: 101,
7018: 'GL#',
7098: l_begin_index,
7099: l_end_index,
7100: x_return_status);
7101:
7102: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7103: IF (g_level_statement >= g_current_runtime_level ) THEN
7104: FND_LOG.STRING(g_level_statement,
7105: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_from_account',
7106: 'Incorrect return_status after calling ' ||
7285: l_tax_regime_rec,
7286: x_return_status,
7287: l_error_buffer);
7288:
7289: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7290: IF (g_level_statement >= g_current_runtime_level ) THEN
7291: FND_LOG.STRING(g_level_statement,
7292: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_from_account',
7293: 'Incorrect return_status after calling ' ||
7315: l_tax_status_rec,
7316: x_return_status,
7317: l_error_buffer);
7318:
7319: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7320: IF (g_level_statement >= g_current_runtime_level ) THEN
7321: FND_LOG.STRING(g_level_statement,
7322: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_from_account',
7323: 'Incorrect return_status after calling ' ||
7348: l_tax_rate_rec,
7349: x_return_status,
7350: l_error_buffer);
7351:
7352: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7353: IF (g_level_statement >= g_current_runtime_level ) THEN
7354: FND_LOG.STRING(g_level_statement,
7355: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_from_account',
7356: 'Incorrect return_status after calling ' ||
7462: p_reg_rule_flg => l_tax_rec.registration_type_rule_flag,
7463: p_tax_determine_date => p_tax_determine_date,
7464: x_return_status => x_return_status);
7465:
7466: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7467: IF (g_level_statement >= g_current_runtime_level ) THEN
7468: FND_LOG.STRING(g_level_statement,
7469: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_from_account',
7470: 'Incorrect return_status after calling ' ||
7516: l_end_index_from_acct,
7517: x_return_status,
7518: l_error_buffer );
7519:
7520: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7521: IF (g_level_statement >= g_current_runtime_level ) THEN
7522: FND_LOG.STRING(g_level_statement,
7523: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_from_account',
7524: 'Incorrect return_status after calling ' ||
7541: END IF;
7542:
7543: EXCEPTION
7544: WHEN OTHERS THEN
7545: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7546: IF (g_level_unexpected >= g_current_runtime_level ) THEN
7547: FND_LOG.STRING(g_level_unexpected,
7548: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_from_account',
7549: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
7684: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_taxes_for_intercomp_trx.BEGIN',
7685: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_taxes_for_intercomp_trx(+)');
7686: END IF;
7687:
7688: x_return_status := FND_API.G_RET_STS_SUCCESS;
7689:
7690: -- Bug#5417753- determine tax_class value
7691: IF p_event_class_rec.prod_family_grp_code = 'O2C' THEN
7692: l_tax_class := 'OUTPUT';
7723: l_tax_status_code,l_record_type_code, l_offset_tax_rate_code, l_tax_jurisdiction_code;
7724:
7725: IF is_tax_migrated_in_ar_csr%NOTFOUND THEN
7726:
7727: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7728: l_error_buffer := 'No Tax Rate Found in AR for the specified Tax Rate Id';
7729: IF (g_level_statement >= g_current_runtime_level ) THEN
7730: FND_LOG.STRING(g_level_statement,
7731: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_taxes_for_intercomp_trx',
7758: l_tax_regime_rec,
7759: x_return_status,
7760: l_error_buffer);
7761:
7762: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7763: l_is_valid := FALSE;
7764: IF (g_level_statement >= g_current_runtime_level ) THEN
7765: FND_LOG.STRING(g_level_statement,
7766: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_taxes_for_intercomp_trx',
7792: l_tax_rec,
7793: x_return_status,
7794: l_error_buffer);
7795:
7796: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7797: l_is_valid := FALSE;
7798: IF (g_level_statement >= g_current_runtime_level ) THEN
7799: FND_LOG.STRING(g_level_statement,
7800: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_taxes_for_intercomp_trx',
7810: /*IF tax_line_rec.tax_amt <> 0 THEN
7811: RETURN;
7812: END IF;*/
7813:
7814: ELSE -- x_return_status = FND_API.G_RET_STS_SUCCESS
7815:
7816: ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl(
7817: l_rownum).tax_id := l_tax_rec.tax_id;
7818: ZX_TDS_CALC_SERVICES_PUB_PKG.g_detail_tax_lines_tbl(
7841: l_tax_jurisdiction_rec,
7842: x_return_status,
7843: l_error_buffer);
7844:
7845: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7846: l_is_valid := FALSE;
7847: IF (g_level_statement >= g_current_runtime_level ) THEN
7848: FND_LOG.STRING(g_level_statement,
7849: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines',
7879: l_tax_status_rec,
7880: x_return_status,
7881: l_error_buffer);
7882:
7883: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7884: l_is_valid := FALSE;
7885: IF (g_level_statement >= g_current_runtime_level ) THEN
7886: FND_LOG.STRING(g_level_statement,
7887: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_taxes_for_intercomp_trx',
7918: l_tax_rate_rec,
7919: x_return_status,
7920: l_error_buffer);
7921:
7922: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7923: l_is_valid := FALSE;
7924: IF (g_level_statement >= g_current_runtime_level ) THEN
7925: FND_LOG.STRING(g_level_statement,
7926: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_taxes_for_intercomp_trx',
7943:
7944: IF l_tax_rate_rec.percentage_rate <> tax_line_rec.tax_rate AND --bug 5010575
7945: l_tax_rate_rec.allow_adhoc_tax_rate_flag = 'N'THEN
7946:
7947: x_return_status := FND_API.G_RET_STS_ERROR;
7948: l_error_buffer := 'Tax Rate Code is not adhoc';
7949:
7950: FND_MESSAGE.SET_NAME('ZX','ZX_INTER_COMP_RATE');
7951:
7981: --
7982: IF l_tax_rate_rec.percentage_rate <> 0 AND -- bug 5010575
7983: p_event_class_rec.allow_offset_tax_calc_flag = 'N'
7984: THEN
7985: x_return_status := FND_API.G_RET_STS_ERROR;
7986: l_error_buffer := 'Need to create Offset Tax. But offset tax is not allowed';
7987:
7988: IF g_level_statement >= g_current_runtime_level THEN
7989: FND_LOG.STRING(g_level_statement,
8055:
8056:
8057: -- set the return status back to SUCCESS
8058: --
8059: x_return_status := FND_API.G_RET_STS_SUCCESS;
8060:
8061: IF g_level_statement >= g_current_runtime_level THEN
8062: FND_LOG.STRING(g_level_statement,
8063: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_taxes_for_intercomp_trx',
8123:
8124: -- Matching tax rate code is not defined in AP or other product,
8125: -- raise error
8126: --
8127: x_return_status := FND_API.G_RET_STS_ERROR;
8128: l_error_buffer := 'tax_amt <> 0. Tax Rate Code is not adhoc';
8129: IF (g_level_statement >= g_current_runtime_level ) THEN
8130: FND_LOG.STRING(g_level_statement,
8131: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_taxes_for_intercomp_trx',
8150: l_tax_regime_rec,
8151: x_return_status,
8152: l_error_buffer);
8153:
8154: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8155: IF (g_level_statement >= g_current_runtime_level ) THEN
8156: FND_LOG.STRING(g_level_statement,
8157: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_taxes_for_intercomp_trx',
8158: 'Incorrect return_status after calling ' ||
8183: l_tax_rec,
8184: x_return_status,
8185: l_error_buffer);
8186:
8187: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8188: IF (g_level_statement >= g_current_runtime_level ) THEN
8189: FND_LOG.STRING(g_level_statement,
8190: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_taxes_for_intercomp_trx',
8191: 'Incorrect return_status after calling ' ||
8228: l_tax_jurisdiction_rec,
8229: x_return_status,
8230: l_error_buffer);
8231:
8232: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8233: IF (g_level_statement >= g_current_runtime_level ) THEN
8234: FND_LOG.STRING(g_level_statement,
8235: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.fetch_tax_lines',
8236: 'Incorrect return_status after calling ' ||
8269: l_tax_status_rec,
8270: x_return_status,
8271: l_error_buffer);
8272:
8273: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8274: IF (g_level_statement >= g_current_runtime_level ) THEN
8275: FND_LOG.STRING(g_level_statement,
8276: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_taxes_for_intercomp_trx',
8277: 'Incorrect return_status after calling ' ||
8306: l_tax_rate_rec,
8307: x_return_status,
8308: l_error_buffer);
8309:
8310: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8311: IF (g_level_statement >= g_current_runtime_level ) THEN
8312: FND_LOG.STRING(g_level_statement,
8313: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_taxes_for_intercomp_trx',
8314: 'Incorrect return_status after calling ' ||
8335: IF l_tax_rate_rec.percentage_rate <> tax_line_rec.tax_rate AND -- Bug 5010575
8336: l_tax_rate_rec.allow_adhoc_tax_rate_flag = 'N'
8337: THEN
8338:
8339: x_return_status := FND_API.G_RET_STS_ERROR;
8340: l_error_buffer := 'Tax Rate Code is not adhoc';
8341: IF (g_level_statement >= g_current_runtime_level ) THEN
8342: FND_LOG.STRING(g_level_statement,
8343: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_taxes_for_intercomp_trx',
8378:
8379: IF l_tax_rate_rec.percentage_rate <> 0 THEN -- Bug 5010575
8380: IF p_event_class_rec.allow_offset_tax_calc_flag = 'N'
8381: THEN
8382: x_return_status := FND_API.G_RET_STS_ERROR;
8383: l_error_buffer := 'Need to create Offset Tax. But offset tax is not allowed or populated at rate level';
8384:
8385: IF g_level_statement >= g_current_runtime_level THEN
8386: FND_LOG.STRING(g_level_statement,
8447: p_reg_rule_flg => l_tax_rec.registration_type_rule_flag,
8448: p_tax_determine_date => p_tax_determine_date,
8449: x_return_status => x_return_status);
8450:
8451: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8452: IF (g_level_statement >= g_current_runtime_level ) THEN
8453: FND_LOG.STRING(g_level_statement,
8454: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_taxes_for_intercomp_trx',
8455: 'Incorrect return_status after calling ' ||
8493: x_end_index,
8494: x_return_status,
8495: l_error_buffer );
8496:
8497: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8498: IF (g_level_statement >= g_current_runtime_level ) THEN
8499: FND_LOG.STRING(g_level_statement,
8500: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_taxes_for_intercomp_trx',
8501: 'Incorrect RETURN_STATUS after calling '||
8517: END IF;
8518:
8519: EXCEPTION
8520: WHEN OTHERS THEN
8521: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8522: IF (g_level_unexpected >= g_current_runtime_level ) THEN
8523: FND_LOG.STRING(g_level_unexpected,
8524: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_taxes_for_intercomp_trx',
8525: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
8835: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_process_results.BEGIN',
8836: 'ZX_TDS_APPLICABILITY_DETM_PKG.get_process_results(+)');
8837: END IF;
8838:
8839: x_return_status := FND_API.G_RET_STS_SUCCESS;
8840:
8841: l_tax_classification_code :=
8842: NVL(ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.INPUT_TAX_CLASSIFICATION_CODE(p_trx_line_index),
8843: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.OUTPUT_TAX_CLASSIFICATION_CODE(p_trx_line_index));
8936:
8937: FOR i IN 1.. NVL(l_action_rec_tbl.last,0) LOOP
8938:
8939: IF UPPER(l_action_rec_tbl(i).action_code) in ('ERROR_MESSAGE','SYSTEM_ERROR') then
8940: x_return_status := FND_API.G_RET_STS_ERROR;
8941: app_exception.raise_exception;
8942: ELSIF UPPER(l_action_rec_tbl(i).action_code) = 'DO_NOT_USE_THIS_TAX_GROUP' then
8943: l_cec_result := FALSE;
8944: ELSIF UPPER(l_action_rec_tbl(i).action_code) = 'USE_THIS_TAX_GROUP' then
9001: x_begin_index,
9002: l_end_index,
9003: x_return_status);
9004:
9005: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9006: IF (g_level_statement >= g_current_runtime_level ) THEN
9007: FND_LOG.STRING(g_level_statement,
9008: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_process_results',
9009: 'Incorrect return_status after calling ' ||
9078: 'action code ' ||
9079: l_action_rec_tbl(i).action_code);
9080: END IF;
9081: if upper(l_action_rec_tbl(i).action_code) in ('ERROR_MESSAGE','SYSTEM_ERROR') then
9082: x_return_status := FND_API.G_RET_STS_ERROR;
9083: IF (g_level_error >= g_current_runtime_level ) THEN
9084: FND_LOG.STRING(g_level_error,
9085: 'ZX.PLSQL.ZX_TDS_RULE_BASE_DETM_PVT.get_result',
9086: 'Action_code is ERROR_MESSAGE,SYSTEM_ERROR');
9149: If select_tax_status_rate_code%NOTFOUND then
9150: --A record does not exist with that tax rate code for the given tax.
9151: --Raise error;
9152:
9153: p_return_status := FND_API.G_RET_STS_ERROR;
9154: p_error_buffer := SUBSTR(SQLERRM, 1, 80);
9155: IF (g_level_error >= g_current_runtime_level ) THEN
9156: FND_LOG.STRING(g_level_error,
9157: 'ZX.PLSQL.ZX_TDS_RULE_BASE_DETM_PVT.get_result',
9364: x_place_of_supply_type_code => l_place_of_supply_type_code,
9365: x_place_of_supply_result_id => l_place_of_supply_result_id,
9366: x_return_status => x_return_status);
9367:
9368: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9369: IF (g_level_statement >= g_current_runtime_level ) THEN
9370: FND_LOG.STRING(g_level_statement,
9371: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_process_results',
9372: 'Incorrect return_status after calling ' ||
9378: --
9379: IF NVL(l_tax_rec.has_other_jurisdictions_flag, 'N') = 'N' AND
9380: NVL(l_tax_rec.record_type_code, 'USER_DEFINED') = 'MIGRATED'
9381: THEN
9382: x_return_status := FND_API.G_RET_STS_SUCCESS;
9383: IF (g_level_statement >= g_current_runtime_level ) THEN
9384: FND_LOG.STRING(g_level_statement,
9385: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_process_results',
9386: 'For migrated taxes, if the has_other_jurisdictions_flag on ' ||
9493: x_applicability_result => l_applicability_result,
9494: x_applicability_result_id => l_applicability_result_id,
9495: x_return_status => x_return_status);
9496:
9497: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9498: IF (g_level_statement >= g_current_runtime_level ) THEN
9499: FND_LOG.STRING(g_level_statement,
9500: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_process_results',
9501: 'Incorrect return_status after calling ' ||
9516: /* --bug 5385188
9517: -- Since Direct Rate is applicable, POS is not mandatory. So ignore
9518: -- the errors raised from get_place_of_supply
9519:
9520: x_return_status := FND_API.G_RET_STS_SUCCESS;
9521: */
9522:
9523: IF l_tax_applicable THEN
9524: IF (l_tax_index IS NOT NULL AND -- Added for bug 10184087
9570: l_tax_regime_rec,
9571: x_return_status,
9572: l_error_buffer);
9573:
9574: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9575: IF (g_level_statement >= g_current_runtime_level ) THEN
9576: FND_LOG.STRING(g_level_statement,
9577: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_process_results',
9578: 'Incorrect return_status after calling ' ||
9622: l_tax_status_rec,
9623: x_return_status,
9624: l_error_buffer);
9625:
9626: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9627: IF (g_level_statement >= g_current_runtime_level ) THEN
9628: FND_LOG.STRING(g_level_statement,
9629: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_process_results',
9630: 'Incorrect return_status after calling ' ||
9668: l_tax_rate_rec,
9669: x_return_status,
9670: l_error_buffer);
9671:
9672: IF x_return_status = FND_API.G_RET_STS_SUCCESS AND
9673: l_tax_rate_rec.tax_rate_id is not NULL and
9674: l_tax_rate_rec.tax_jurisdiction_code = l_jurisdiction_rec_tbl(i).tax_jurisdiction_code
9675: THEN
9676: -- A matching rate record is found. use this record for processing
9696: l_error_buffer);
9697: END IF;
9698:
9699:
9700: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9701: IF (g_level_statement >= g_current_runtime_level ) THEN
9702: FND_LOG.STRING(g_level_statement,
9703: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_process_results',
9704: 'Incorrect return_status after calling ' ||
9735: l_tax_jurisdiction_id,
9736: l_tax_jurisdiction_code,
9737: x_return_status);
9738:
9739: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9740: IF (g_level_statement >= g_current_runtime_level ) THEN
9741: FND_LOG.STRING(g_level_statement,
9742: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_process_results',
9743: 'Incorrect return_status after calling ' ||
9905: p_reg_rule_flg => l_tax_rec.registration_type_rule_flag,
9906: p_tax_determine_date => p_tax_determine_date,
9907: x_return_status => x_return_status);
9908:
9909: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9910: IF (g_level_statement >= g_current_runtime_level ) THEN
9911: FND_LOG.STRING(g_level_statement,
9912: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_process_results',
9913: 'Incorrect return_status after calling ' ||
10017: l_tax_regime_rec.geography_id,
10018: l_tax_regime_rec.effective_from,
10019: l_tax_regime_rec.effective_to,
10020: x_return_status );
10021: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10022: IF (g_level_error >= g_current_runtime_level ) THEN
10023: FND_LOG.STRING(g_level_error,
10024: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_process_results',
10025: 'Incorrect return_status after calling ' ||
10081: x_end_index,
10082: x_return_status,
10083: l_error_buffer );
10084:
10085: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10086: IF (g_level_statement >= g_current_runtime_level ) THEN
10087: FND_LOG.STRING(g_level_statement,
10088: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_process_results',
10089: 'Incorrect RETURN_STATUS after calling '||
10108:
10109:
10110: EXCEPTION
10111: WHEN OTHERS THEN
10112: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10113: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
10114: IF (g_level_unexpected >= g_current_runtime_level ) THEN
10115: FND_LOG.STRING(g_level_unexpected,
10116: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.get_process_results',
10231: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.handle_update_scenarios.BEGIN',
10232: 'ZX_TDS_APPLICABILITY_DETM_PKG.handle_update_scenarios(+)');
10233: END IF;
10234:
10235: x_return_status := FND_API.G_RET_STS_SUCCESS;
10236:
10237: -- Bug#5417753- determine tax_class value
10238: IF p_event_class_rec.prod_family_grp_code = 'O2C' THEN
10239: l_tax_class := 'OUTPUT';
10399: l_tax_status_rec,
10400: x_return_status,
10401: l_error_buffer);
10402:
10403: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10404: IF (g_level_error >= g_current_runtime_level ) THEN
10405: FND_LOG.STRING(g_level_error,
10406: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.handle_update_scenarios',
10407: 'Incorrect return_status after calling '||
10450: l_tax_status_rec,
10451: x_return_status,
10452: l_error_buffer);
10453:
10454: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10455: IF (g_level_error >= g_current_runtime_level ) THEN
10456: FND_LOG.STRING(g_level_error,
10457: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.handle_update_scenarios',
10458: 'Incorrect return_status after calling '||
10485: l_tax_rate_rec,
10486: x_return_status,
10487: l_error_buffer);
10488:
10489: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10490: IF (g_level_error >= g_current_runtime_level ) THEN
10491: FND_LOG.STRING(g_level_error,
10492: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.handle_update_scenarios',
10493: 'Incorrect return_status after calling '||
10537: l_tax_status_rec,
10538: x_return_status,
10539: l_error_buffer);
10540:
10541: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10542: IF (g_level_error >= g_current_runtime_level ) THEN
10543: FND_LOG.STRING(g_level_error,
10544: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.handle_update_scenarios',
10545: 'Incorrect return_status after calling '||
10572: l_tax_rate_rec,
10573: x_return_status,
10574: l_error_buffer);
10575:
10576: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10577: IF (g_level_error >= g_current_runtime_level ) THEN
10578: FND_LOG.STRING(g_level_error,
10579: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.handle_update_scenarios',
10580: 'Incorrect return_status after calling '||
10656: l_tax_status_rec,
10657: x_return_status,
10658: l_error_buffer);
10659:
10660: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10661: IF (g_level_error >= g_current_runtime_level ) THEN
10662: FND_LOG.STRING(g_level_error,
10663: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.handle_update_scenarios',
10664: 'Incorrect return_status after calling '||
10691: l_tax_rate_rec,
10692: x_return_status,
10693: l_error_buffer);
10694:
10695: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10696: IF (g_level_error >= g_current_runtime_level ) THEN
10697: FND_LOG.STRING(g_level_error,
10698: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.handle_update_scenarios',
10699: 'Incorrect return_status after calling '||
10776:
10777: EXCEPTION
10778: WHEN OTHERS THEN
10779: CLOSE get_key_columns_cur;
10780: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10781: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
10782: IF (g_level_unexpected >= g_current_runtime_level ) THEN
10783: FND_LOG.STRING(g_level_unexpected,
10784: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.handle_update_scenarios',
10858: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.enforce_tax_from_ref_doc.BEGIN',
10859: 'ZX_TDS_APPLICABILITY_DETM_PKG.enforce_tax_from_ref_doc(+)');
10860: END IF;
10861:
10862: x_return_status := FND_API.G_RET_STS_SUCCESS;
10863:
10864: FOR i IN NVL(p_begin_index, 1) .. NVL(p_end_index, 0) LOOP
10865:
10866: IF g_level_statement >= g_current_runtime_level THEN
10929: l_tax_status_rec,
10930: x_return_status,
10931: l_error_buffer);
10932:
10933: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
10934: IF (g_level_statement >= g_current_runtime_level ) THEN
10935: FND_LOG.STRING(g_level_statement,
10936: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.enforce_tax_from_ref_doc',
10937: 'Incorrect return_status after calling ' ||
10970: END IF;
10971:
10972: EXCEPTION
10973: WHEN NO_DATA_FOUND THEN
10974: x_return_status := FND_API.G_RET_STS_ERROR;
10975: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
10976: IF (g_level_error >= g_current_runtime_level ) THEN
10977: FND_LOG.STRING(g_level_error,
10978: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.enforce_tax_from_ref_doc',
10982: 'ZX_TDS_APPLICABILITY_DETM_PKG.enforce_tax_from_ref_doc(-)');
10983: END IF;
10984:
10985: WHEN OTHERS THEN
10986: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10987: l_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
10988: IF (g_level_unexpected >= g_current_runtime_level ) THEN
10989: FND_LOG.STRING(g_level_unexpected,
10990: 'ZX.PLSQL.ZX_TDS_APPLICABILITY_DETM_PKG.enforce_tax_from_ref_doc',