1725: --
1726:
1727: IF l_tax_prof_name = 'SHIP_TO_PARTY_TAX_PROF_ID' THEN
1728: l_tax_prof_id :=
1729: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ship_to_party_tax_prof_id(p_trx_line_index);
1730: l_parent_ptp_id := l_tax_prof_id;
1731: l_site_ptp_id := NULL;
1732: ELSIF l_tax_prof_name = 'SHIP_FROM_PARTY_TAX_PROF_ID' THEN
1733: l_tax_prof_id :=
1730: l_parent_ptp_id := l_tax_prof_id;
1731: l_site_ptp_id := NULL;
1732: ELSIF l_tax_prof_name = 'SHIP_FROM_PARTY_TAX_PROF_ID' THEN
1733: l_tax_prof_id :=
1734: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ship_from_party_tax_prof_id(p_trx_line_index);
1735: l_parent_ptp_id := l_tax_prof_id;
1736: l_site_ptp_id := NULL;
1737: ELSIF l_tax_prof_name = 'BILL_TO_PARTY_TAX_PROF_ID' THEN
1738: l_tax_prof_id :=
1735: l_parent_ptp_id := l_tax_prof_id;
1736: l_site_ptp_id := NULL;
1737: ELSIF l_tax_prof_name = 'BILL_TO_PARTY_TAX_PROF_ID' THEN
1738: l_tax_prof_id :=
1739: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.bill_to_party_tax_prof_id(p_trx_line_index);
1740: l_parent_ptp_id := l_tax_prof_id;
1741: l_site_ptp_id := NULL;
1742: ELSIF l_tax_prof_name = 'BILL_FROM_PARTY_TAX_PROF_ID' THEN
1743: l_tax_prof_id :=
1740: l_parent_ptp_id := l_tax_prof_id;
1741: l_site_ptp_id := NULL;
1742: ELSIF l_tax_prof_name = 'BILL_FROM_PARTY_TAX_PROF_ID' THEN
1743: l_tax_prof_id :=
1744: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.bill_from_party_tax_prof_id(p_trx_line_index);
1745: l_parent_ptp_id := l_tax_prof_id;
1746: l_site_ptp_id := NULL;
1747: ELSIF l_tax_prof_name = 'SHIP_TO_SITE_TAX_PROF_ID' THEN
1748: l_tax_prof_id :=
1745: l_parent_ptp_id := l_tax_prof_id;
1746: l_site_ptp_id := NULL;
1747: ELSIF l_tax_prof_name = 'SHIP_TO_SITE_TAX_PROF_ID' THEN
1748: l_tax_prof_id :=
1749: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ship_to_site_tax_prof_id(p_trx_line_index);
1750: l_parent_ptp_id :=
1751: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ship_to_party_tax_prof_id(p_trx_line_index);
1752: l_site_ptp_id := l_tax_prof_id;
1753: ELSIF l_tax_prof_name = 'SHIP_FROM_SITE_TAX_PROF_ID' THEN
1747: ELSIF l_tax_prof_name = 'SHIP_TO_SITE_TAX_PROF_ID' THEN
1748: l_tax_prof_id :=
1749: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ship_to_site_tax_prof_id(p_trx_line_index);
1750: l_parent_ptp_id :=
1751: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ship_to_party_tax_prof_id(p_trx_line_index);
1752: l_site_ptp_id := l_tax_prof_id;
1753: ELSIF l_tax_prof_name = 'SHIP_FROM_SITE_TAX_PROF_ID' THEN
1754: l_tax_prof_id :=
1755: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ship_from_site_tax_prof_id(p_trx_line_index);
1751: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ship_to_party_tax_prof_id(p_trx_line_index);
1752: l_site_ptp_id := l_tax_prof_id;
1753: ELSIF l_tax_prof_name = 'SHIP_FROM_SITE_TAX_PROF_ID' THEN
1754: l_tax_prof_id :=
1755: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ship_from_site_tax_prof_id(p_trx_line_index);
1756: l_parent_ptp_id :=
1757: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ship_from_party_tax_prof_id(p_trx_line_index);
1758: l_site_ptp_id := l_tax_prof_id;
1759: ELSIF l_tax_prof_name = 'BILL_TO_SITE_TAX_PROF_ID' THEN
1753: ELSIF l_tax_prof_name = 'SHIP_FROM_SITE_TAX_PROF_ID' THEN
1754: l_tax_prof_id :=
1755: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ship_from_site_tax_prof_id(p_trx_line_index);
1756: l_parent_ptp_id :=
1757: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ship_from_party_tax_prof_id(p_trx_line_index);
1758: l_site_ptp_id := l_tax_prof_id;
1759: ELSIF l_tax_prof_name = 'BILL_TO_SITE_TAX_PROF_ID' THEN
1760: l_tax_prof_id :=
1761: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.bill_to_site_tax_prof_id(p_trx_line_index);
1757: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ship_from_party_tax_prof_id(p_trx_line_index);
1758: l_site_ptp_id := l_tax_prof_id;
1759: ELSIF l_tax_prof_name = 'BILL_TO_SITE_TAX_PROF_ID' THEN
1760: l_tax_prof_id :=
1761: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.bill_to_site_tax_prof_id(p_trx_line_index);
1762: l_parent_ptp_id :=
1763: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.bill_to_party_tax_prof_id(p_trx_line_index);
1764: l_site_ptp_id := l_tax_prof_id;
1765: ELSIF l_tax_prof_name = 'BILL_FROM_SITE_TAX_PROF_ID' THEN
1759: ELSIF l_tax_prof_name = 'BILL_TO_SITE_TAX_PROF_ID' THEN
1760: l_tax_prof_id :=
1761: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.bill_to_site_tax_prof_id(p_trx_line_index);
1762: l_parent_ptp_id :=
1763: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.bill_to_party_tax_prof_id(p_trx_line_index);
1764: l_site_ptp_id := l_tax_prof_id;
1765: ELSIF l_tax_prof_name = 'BILL_FROM_SITE_TAX_PROF_ID' THEN
1766: l_tax_prof_id :=
1767: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.bill_from_site_tax_prof_id(p_trx_line_index);
1763: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.bill_to_party_tax_prof_id(p_trx_line_index);
1764: l_site_ptp_id := l_tax_prof_id;
1765: ELSIF l_tax_prof_name = 'BILL_FROM_SITE_TAX_PROF_ID' THEN
1766: l_tax_prof_id :=
1767: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.bill_from_site_tax_prof_id(p_trx_line_index);
1768: l_parent_ptp_id :=
1769: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.bill_from_party_tax_prof_id(p_trx_line_index);
1770: l_site_ptp_id := l_tax_prof_id;
1771: END IF;
1765: ELSIF l_tax_prof_name = 'BILL_FROM_SITE_TAX_PROF_ID' THEN
1766: l_tax_prof_id :=
1767: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.bill_from_site_tax_prof_id(p_trx_line_index);
1768: l_parent_ptp_id :=
1769: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.bill_from_party_tax_prof_id(p_trx_line_index);
1770: l_site_ptp_id := l_tax_prof_id;
1771: END IF;
1772:
1773: IF (g_level_statement >= g_current_runtime_level ) THEN
1784: --
1785: IF SUBSTR(p_Party_Type_Code, 1, 4) = 'SHIP' THEN
1786:
1787: l_account_id :=
1788: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ship_third_pty_acct_id(p_trx_line_index);
1789: l_account_site_id :=
1790: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ship_third_pty_acct_site_id(p_trx_line_index);
1791: l_site_use_id :=
1792: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ship_to_cust_acct_site_use_id(p_trx_line_index);
1786:
1787: l_account_id :=
1788: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ship_third_pty_acct_id(p_trx_line_index);
1789: l_account_site_id :=
1790: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ship_third_pty_acct_site_id(p_trx_line_index);
1791: l_site_use_id :=
1792: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ship_to_cust_acct_site_use_id(p_trx_line_index);
1793:
1794: ELSIF SUBSTR(p_Party_Type_Code, 1, 4) = 'BILL' THEN
1788: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ship_third_pty_acct_id(p_trx_line_index);
1789: l_account_site_id :=
1790: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ship_third_pty_acct_site_id(p_trx_line_index);
1791: l_site_use_id :=
1792: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ship_to_cust_acct_site_use_id(p_trx_line_index);
1793:
1794: ELSIF SUBSTR(p_Party_Type_Code, 1, 4) = 'BILL' THEN
1795:
1796: l_account_id :=
1793:
1794: ELSIF SUBSTR(p_Party_Type_Code, 1, 4) = 'BILL' THEN
1795:
1796: l_account_id :=
1797: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.bill_third_pty_acct_id(p_trx_line_index);
1798: l_account_site_id :=
1799: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.bill_third_pty_acct_site_id(p_trx_line_index);
1800: l_site_use_id :=
1801: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.bill_to_cust_acct_site_use_id(p_trx_line_index);
1795:
1796: l_account_id :=
1797: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.bill_third_pty_acct_id(p_trx_line_index);
1798: l_account_site_id :=
1799: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.bill_third_pty_acct_site_id(p_trx_line_index);
1800: l_site_use_id :=
1801: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.bill_to_cust_acct_site_use_id(p_trx_line_index);
1802:
1803: ELSE
1797: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.bill_third_pty_acct_id(p_trx_line_index);
1798: l_account_site_id :=
1799: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.bill_third_pty_acct_site_id(p_trx_line_index);
1800: l_site_use_id :=
1801: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.bill_to_cust_acct_site_use_id(p_trx_line_index);
1802:
1803: ELSE
1804: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1805: p_error_buffer := 'Invalid Rounding Level Hierarchy';
2381: CLOSE get_lines_det_factors ;
2382:
2383: ELSE --PLS --Bug 5103375
2384:
2385: FOR i IN ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.application_id.FIRST ..
2386: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.application_id.LAST
2387: LOOP
2388:
2389: IF p_event_class_rec.application_id =
2382:
2383: ELSE --PLS --Bug 5103375
2384:
2385: FOR i IN ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.application_id.FIRST ..
2386: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.application_id.LAST
2387: LOOP
2388:
2389: IF p_event_class_rec.application_id =
2390: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.application_id(i) AND
2386: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.application_id.LAST
2387: LOOP
2388:
2389: IF p_event_class_rec.application_id =
2390: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.application_id(i) AND
2391: p_event_class_rec.entity_code =
2392: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.entity_code(i) AND
2393: p_event_class_rec.event_class_code =
2394: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.event_class_code(i) AND
2388:
2389: IF p_event_class_rec.application_id =
2390: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.application_id(i) AND
2391: p_event_class_rec.entity_code =
2392: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.entity_code(i) AND
2393: p_event_class_rec.event_class_code =
2394: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.event_class_code(i) AND
2395: p_event_class_rec.trx_id =
2396: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.trx_id(i)
2390: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.application_id(i) AND
2391: p_event_class_rec.entity_code =
2392: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.entity_code(i) AND
2393: p_event_class_rec.event_class_code =
2394: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.event_class_code(i) AND
2395: p_event_class_rec.trx_id =
2396: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.trx_id(i)
2397: THEN
2398:
2392: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.entity_code(i) AND
2393: p_event_class_rec.event_class_code =
2394: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.event_class_code(i) AND
2395: p_event_class_rec.trx_id =
2396: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.trx_id(i)
2397: THEN
2398:
2399: l_ship_third_pty_acct_id :=
2400: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ship_third_pty_acct_id(i);
2396: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.trx_id(i)
2397: THEN
2398:
2399: l_ship_third_pty_acct_id :=
2400: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ship_third_pty_acct_id(i);
2401: l_bill_third_pty_acct_id :=
2402: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.bill_third_pty_acct_id(i);
2403: l_ship_third_pty_acct_site_id :=
2404: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ship_third_pty_acct_site_id(i);
2398:
2399: l_ship_third_pty_acct_id :=
2400: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ship_third_pty_acct_id(i);
2401: l_bill_third_pty_acct_id :=
2402: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.bill_third_pty_acct_id(i);
2403: l_ship_third_pty_acct_site_id :=
2404: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ship_third_pty_acct_site_id(i);
2405: l_bill_third_pty_acct_site_id :=
2406: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.bill_third_pty_acct_site_id(i);
2400: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ship_third_pty_acct_id(i);
2401: l_bill_third_pty_acct_id :=
2402: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.bill_third_pty_acct_id(i);
2403: l_ship_third_pty_acct_site_id :=
2404: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ship_third_pty_acct_site_id(i);
2405: l_bill_third_pty_acct_site_id :=
2406: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.bill_third_pty_acct_site_id(i);
2407: l_ship_to_cust_acct_st_use_id :=
2408: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ship_to_cust_acct_site_use_id(i);
2402: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.bill_third_pty_acct_id(i);
2403: l_ship_third_pty_acct_site_id :=
2404: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ship_third_pty_acct_site_id(i);
2405: l_bill_third_pty_acct_site_id :=
2406: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.bill_third_pty_acct_site_id(i);
2407: l_ship_to_cust_acct_st_use_id :=
2408: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ship_to_cust_acct_site_use_id(i);
2409: l_bill_to_cust_acct_st_use_id :=
2410: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.bill_to_cust_acct_site_use_id(i);
2404: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ship_third_pty_acct_site_id(i);
2405: l_bill_third_pty_acct_site_id :=
2406: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.bill_third_pty_acct_site_id(i);
2407: l_ship_to_cust_acct_st_use_id :=
2408: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ship_to_cust_acct_site_use_id(i);
2409: l_bill_to_cust_acct_st_use_id :=
2410: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.bill_to_cust_acct_site_use_id(i);
2411:
2412: ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_date(
2406: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.bill_third_pty_acct_site_id(i);
2407: l_ship_to_cust_acct_st_use_id :=
2408: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.ship_to_cust_acct_site_use_id(i);
2409: l_bill_to_cust_acct_st_use_id :=
2410: ZX_GLOBAL_STRUCTURES_PKG.trx_line_dist_tbl.bill_to_cust_acct_site_use_id(i);
2411:
2412: ZX_TDS_APPLICABILITY_DETM_PKG.get_tax_date(
2413: i,
2414: l_tax_date,
3717: p_error_buffer OUT NOCOPY VARCHAR2
3718: )
3719: IS
3720:
3721: l_zx_proudct_options_rec ZX_GLOBAL_STRUCTURES_PKG.zx_product_options_rec_type;
3722: l_min_acct_unit ZX_LINES.MINIMUM_ACCOUNTABLE_UNIT%TYPE;
3723: l_precision ZX_LINES.PRECISION%TYPE;
3724:
3725: BEGIN
3759: END IF;
3760:
3761: -- Code for taking precision from application tax option
3762: --
3763: ZX_GLOBAL_STRUCTURES_PKG.get_product_options_info
3764: (p_application_id => p_application_id,
3765: p_org_id => p_internal_organization_id,
3766: p_event_class_mapping_id => p_event_class_mapping_id,
3767: x_product_options_rec => l_zx_proudct_options_rec,
8047: p_rounding_level_code := NULL;
8048: p_rounding_rule_code := NULL;
8049:
8050:
8051: IF ZX_GLOBAL_STRUCTURES_PKG.g_supp_site_info_tbl.exists(p_account_site_id) THEN
8052:
8053: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
8054: FND_LOG.STRING(G_LEVEL_STATEMENT,'ZX_TDS_TAX_ROUNDING_PKG.Get_Supplier_Site',
8055: 'Vendor site record found in cache for vendor site id:'||to_char(p_account_site_id));
8054: FND_LOG.STRING(G_LEVEL_STATEMENT,'ZX_TDS_TAX_ROUNDING_PKG.Get_Supplier_Site',
8055: 'Vendor site record found in cache for vendor site id:'||to_char(p_account_site_id));
8056: END IF;
8057:
8058: p_rounding_rule_code := ZX_GLOBAL_STRUCTURES_PKG.g_supp_site_info_tbl(p_account_site_id).TAX_ROUNDING_RULE;
8059: P_rounding_level_code := ZX_GLOBAL_STRUCTURES_PKG.g_supp_site_info_tbl(p_account_site_id).TAX_ROUNDING_LEVEL;
8060: ZX_TDS_CALC_SERVICES_PUB_PKG.g_process_for_appl_flg := ZX_GLOBAL_STRUCTURES_PKG.g_supp_site_info_tbl(p_account_site_id).Auto_Tax_Calc_Flag;
8061: ZX_TDS_CALC_SERVICES_PUB_PKG.g_tax_inclusive_flg := ZX_GLOBAL_STRUCTURES_PKG.g_supp_site_info_tbl(p_account_site_id).amount_includes_tax_flag;
8062:
8055: 'Vendor site record found in cache for vendor site id:'||to_char(p_account_site_id));
8056: END IF;
8057:
8058: p_rounding_rule_code := ZX_GLOBAL_STRUCTURES_PKG.g_supp_site_info_tbl(p_account_site_id).TAX_ROUNDING_RULE;
8059: P_rounding_level_code := ZX_GLOBAL_STRUCTURES_PKG.g_supp_site_info_tbl(p_account_site_id).TAX_ROUNDING_LEVEL;
8060: ZX_TDS_CALC_SERVICES_PUB_PKG.g_process_for_appl_flg := ZX_GLOBAL_STRUCTURES_PKG.g_supp_site_info_tbl(p_account_site_id).Auto_Tax_Calc_Flag;
8061: ZX_TDS_CALC_SERVICES_PUB_PKG.g_tax_inclusive_flg := ZX_GLOBAL_STRUCTURES_PKG.g_supp_site_info_tbl(p_account_site_id).amount_includes_tax_flag;
8062:
8063: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
8056: END IF;
8057:
8058: p_rounding_rule_code := ZX_GLOBAL_STRUCTURES_PKG.g_supp_site_info_tbl(p_account_site_id).TAX_ROUNDING_RULE;
8059: P_rounding_level_code := ZX_GLOBAL_STRUCTURES_PKG.g_supp_site_info_tbl(p_account_site_id).TAX_ROUNDING_LEVEL;
8060: ZX_TDS_CALC_SERVICES_PUB_PKG.g_process_for_appl_flg := ZX_GLOBAL_STRUCTURES_PKG.g_supp_site_info_tbl(p_account_site_id).Auto_Tax_Calc_Flag;
8061: ZX_TDS_CALC_SERVICES_PUB_PKG.g_tax_inclusive_flg := ZX_GLOBAL_STRUCTURES_PKG.g_supp_site_info_tbl(p_account_site_id).amount_includes_tax_flag;
8062:
8063: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
8064: FND_LOG.STRING(G_LEVEL_STATEMENT,'ZX_TDS_TAX_ROUNDING_PKG.Get_Supplier_Site',
8057:
8058: p_rounding_rule_code := ZX_GLOBAL_STRUCTURES_PKG.g_supp_site_info_tbl(p_account_site_id).TAX_ROUNDING_RULE;
8059: P_rounding_level_code := ZX_GLOBAL_STRUCTURES_PKG.g_supp_site_info_tbl(p_account_site_id).TAX_ROUNDING_LEVEL;
8060: ZX_TDS_CALC_SERVICES_PUB_PKG.g_process_for_appl_flg := ZX_GLOBAL_STRUCTURES_PKG.g_supp_site_info_tbl(p_account_site_id).Auto_Tax_Calc_Flag;
8061: ZX_TDS_CALC_SERVICES_PUB_PKG.g_tax_inclusive_flg := ZX_GLOBAL_STRUCTURES_PKG.g_supp_site_info_tbl(p_account_site_id).amount_includes_tax_flag;
8062:
8063: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
8064: FND_LOG.STRING(G_LEVEL_STATEMENT,'ZX_TDS_TAX_ROUNDING_PKG.Get_Supplier_Site',
8065: 'ZX_TDS_CALC_SERVICES_PUB_PKG.g_process_for_appl_flg '|| ZX_TDS_CALC_SERVICES_PUB_PKG.g_process_for_appl_flg );
8086: 'Inclusive tax flag ' || l_amount_includes_tax_flag);
8087: END IF;
8088:
8089:
8090: ZX_GLOBAL_STRUCTURES_PKG.g_supp_site_info_tbl(p_account_site_id).TAX_ROUNDING_RULE :=
8091: l_ap_tax_rounding_rule;
8092: ZX_GLOBAL_STRUCTURES_PKG.g_supp_site_info_tbl(p_account_site_id).Auto_Tax_Calc_Flag :=
8093: l_auto_tax_calc_flag;
8094: ZX_GLOBAL_STRUCTURES_PKG.g_supp_site_info_tbl(p_account_site_id).VAT_CODE := l_vat_code;
8088:
8089:
8090: ZX_GLOBAL_STRUCTURES_PKG.g_supp_site_info_tbl(p_account_site_id).TAX_ROUNDING_RULE :=
8091: l_ap_tax_rounding_rule;
8092: ZX_GLOBAL_STRUCTURES_PKG.g_supp_site_info_tbl(p_account_site_id).Auto_Tax_Calc_Flag :=
8093: l_auto_tax_calc_flag;
8094: ZX_GLOBAL_STRUCTURES_PKG.g_supp_site_info_tbl(p_account_site_id).VAT_CODE := l_vat_code;
8095: ZX_GLOBAL_STRUCTURES_PKG.g_supp_site_info_tbl(p_account_site_id).TAX_ROUNDING_LEVEL :=
8096: l_tax_rounding_level;
8090: ZX_GLOBAL_STRUCTURES_PKG.g_supp_site_info_tbl(p_account_site_id).TAX_ROUNDING_RULE :=
8091: l_ap_tax_rounding_rule;
8092: ZX_GLOBAL_STRUCTURES_PKG.g_supp_site_info_tbl(p_account_site_id).Auto_Tax_Calc_Flag :=
8093: l_auto_tax_calc_flag;
8094: ZX_GLOBAL_STRUCTURES_PKG.g_supp_site_info_tbl(p_account_site_id).VAT_CODE := l_vat_code;
8095: ZX_GLOBAL_STRUCTURES_PKG.g_supp_site_info_tbl(p_account_site_id).TAX_ROUNDING_LEVEL :=
8096: l_tax_rounding_level;
8097: ZX_GLOBAL_STRUCTURES_PKG.g_supp_site_info_tbl(p_account_site_id).VAT_REGISTRATION_NUM :=
8098: l_vat_registration_num;
8091: l_ap_tax_rounding_rule;
8092: ZX_GLOBAL_STRUCTURES_PKG.g_supp_site_info_tbl(p_account_site_id).Auto_Tax_Calc_Flag :=
8093: l_auto_tax_calc_flag;
8094: ZX_GLOBAL_STRUCTURES_PKG.g_supp_site_info_tbl(p_account_site_id).VAT_CODE := l_vat_code;
8095: ZX_GLOBAL_STRUCTURES_PKG.g_supp_site_info_tbl(p_account_site_id).TAX_ROUNDING_LEVEL :=
8096: l_tax_rounding_level;
8097: ZX_GLOBAL_STRUCTURES_PKG.g_supp_site_info_tbl(p_account_site_id).VAT_REGISTRATION_NUM :=
8098: l_vat_registration_num;
8099: ZX_GLOBAL_STRUCTURES_PKG.g_supp_site_info_tbl(p_account_site_id).AMOUNT_INCLUDES_TAX_FLAG :=
8093: l_auto_tax_calc_flag;
8094: ZX_GLOBAL_STRUCTURES_PKG.g_supp_site_info_tbl(p_account_site_id).VAT_CODE := l_vat_code;
8095: ZX_GLOBAL_STRUCTURES_PKG.g_supp_site_info_tbl(p_account_site_id).TAX_ROUNDING_LEVEL :=
8096: l_tax_rounding_level;
8097: ZX_GLOBAL_STRUCTURES_PKG.g_supp_site_info_tbl(p_account_site_id).VAT_REGISTRATION_NUM :=
8098: l_vat_registration_num;
8099: ZX_GLOBAL_STRUCTURES_PKG.g_supp_site_info_tbl(p_account_site_id).AMOUNT_INCLUDES_TAX_FLAG :=
8100: l_amount_includes_tax_flag;
8101: ZX_TDS_CALC_SERVICES_PUB_PKG.g_process_for_appl_flg := l_auto_tax_calc_flag;
8095: ZX_GLOBAL_STRUCTURES_PKG.g_supp_site_info_tbl(p_account_site_id).TAX_ROUNDING_LEVEL :=
8096: l_tax_rounding_level;
8097: ZX_GLOBAL_STRUCTURES_PKG.g_supp_site_info_tbl(p_account_site_id).VAT_REGISTRATION_NUM :=
8098: l_vat_registration_num;
8099: ZX_GLOBAL_STRUCTURES_PKG.g_supp_site_info_tbl(p_account_site_id).AMOUNT_INCLUDES_TAX_FLAG :=
8100: l_amount_includes_tax_flag;
8101: ZX_TDS_CALC_SERVICES_PUB_PKG.g_process_for_appl_flg := l_auto_tax_calc_flag;
8102: ZX_TDS_CALC_SERVICES_PUB_PKG.g_tax_inclusive_flg := l_amount_includes_tax_flag;
8103:
8192: p_return_status := FND_API.G_RET_STS_SUCCESS;
8193: p_rounding_level_code := NULL;
8194: p_rounding_rule_code := NULL;
8195:
8196: IF ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl.exists(p_site_use_id) then
8197: p_Rounding_Rule_Code:=
8198: ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl(p_site_use_id).tax_rounding_rule;
8199:
8200: IF ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl(p_site_use_id).tax_header_level_flag = 'Y' THEN
8194: p_rounding_rule_code := NULL;
8195:
8196: IF ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl.exists(p_site_use_id) then
8197: p_Rounding_Rule_Code:=
8198: ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl(p_site_use_id).tax_rounding_rule;
8199:
8200: IF ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl(p_site_use_id).tax_header_level_flag = 'Y' THEN
8201: p_rounding_level_code := 'HEADER';
8202: ELSIF ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl(p_site_use_id).tax_header_level_flag = 'N' THEN
8196: IF ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl.exists(p_site_use_id) then
8197: p_Rounding_Rule_Code:=
8198: ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl(p_site_use_id).tax_rounding_rule;
8199:
8200: IF ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl(p_site_use_id).tax_header_level_flag = 'Y' THEN
8201: p_rounding_level_code := 'HEADER';
8202: ELSIF ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl(p_site_use_id).tax_header_level_flag = 'N' THEN
8203: p_rounding_level_code := 'LINE';
8204: END IF;
8198: ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl(p_site_use_id).tax_rounding_rule;
8199:
8200: IF ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl(p_site_use_id).tax_header_level_flag = 'Y' THEN
8201: p_rounding_level_code := 'HEADER';
8202: ELSIF ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl(p_site_use_id).tax_header_level_flag = 'N' THEN
8203: p_rounding_level_code := 'LINE';
8204: END IF;
8205:
8206: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
8222:
8223: CLOSE c_site_uses;
8224:
8225: -- Populate the cache
8226: ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl(p_site_use_id).site_use_id := p_site_use_id;
8227: ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl(p_site_use_id).tax_rounding_rule:= l_tax_rounding_rule;
8228: ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl(p_site_use_id).tax_header_level_flag := l_tax_header_level_flag;
8229: ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl(p_site_use_id).tax_code := l_tax_code;
8230: ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl(p_site_use_id).Tax_Classification:= l_Tax_Classification;
8223: CLOSE c_site_uses;
8224:
8225: -- Populate the cache
8226: ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl(p_site_use_id).site_use_id := p_site_use_id;
8227: ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl(p_site_use_id).tax_rounding_rule:= l_tax_rounding_rule;
8228: ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl(p_site_use_id).tax_header_level_flag := l_tax_header_level_flag;
8229: ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl(p_site_use_id).tax_code := l_tax_code;
8230: ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl(p_site_use_id).Tax_Classification:= l_Tax_Classification;
8231: ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl(p_site_use_id).tax_reference := l_tax_reference;
8224:
8225: -- Populate the cache
8226: ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl(p_site_use_id).site_use_id := p_site_use_id;
8227: ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl(p_site_use_id).tax_rounding_rule:= l_tax_rounding_rule;
8228: ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl(p_site_use_id).tax_header_level_flag := l_tax_header_level_flag;
8229: ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl(p_site_use_id).tax_code := l_tax_code;
8230: ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl(p_site_use_id).Tax_Classification:= l_Tax_Classification;
8231: ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl(p_site_use_id).tax_reference := l_tax_reference;
8232:
8225: -- Populate the cache
8226: ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl(p_site_use_id).site_use_id := p_site_use_id;
8227: ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl(p_site_use_id).tax_rounding_rule:= l_tax_rounding_rule;
8228: ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl(p_site_use_id).tax_header_level_flag := l_tax_header_level_flag;
8229: ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl(p_site_use_id).tax_code := l_tax_code;
8230: ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl(p_site_use_id).Tax_Classification:= l_Tax_Classification;
8231: ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl(p_site_use_id).tax_reference := l_tax_reference;
8232:
8233: p_Rounding_Rule_Code:= l_tax_rounding_rule;
8226: ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl(p_site_use_id).site_use_id := p_site_use_id;
8227: ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl(p_site_use_id).tax_rounding_rule:= l_tax_rounding_rule;
8228: ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl(p_site_use_id).tax_header_level_flag := l_tax_header_level_flag;
8229: ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl(p_site_use_id).tax_code := l_tax_code;
8230: ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl(p_site_use_id).Tax_Classification:= l_Tax_Classification;
8231: ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl(p_site_use_id).tax_reference := l_tax_reference;
8232:
8233: p_Rounding_Rule_Code:= l_tax_rounding_rule;
8234:
8227: ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl(p_site_use_id).tax_rounding_rule:= l_tax_rounding_rule;
8228: ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl(p_site_use_id).tax_header_level_flag := l_tax_header_level_flag;
8229: ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl(p_site_use_id).tax_code := l_tax_code;
8230: ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl(p_site_use_id).Tax_Classification:= l_Tax_Classification;
8231: ZX_GLOBAL_STRUCTURES_PKG.g_cust_site_use_info_tbl(p_site_use_id).tax_reference := l_tax_reference;
8232:
8233: p_Rounding_Rule_Code:= l_tax_rounding_rule;
8234:
8235: IF l_tax_header_level_flag = 'Y' THEN
8304: p_return_status := FND_API.G_RET_STS_SUCCESS;
8305: p_rounding_level_code := NULL;
8306: p_rounding_rule_code := NULL;
8307:
8308: IF ZX_GLOBAL_STRUCTURES_PKG.g_cust_acct_info_tbl.exists(p_account_id) THEN
8309: p_Rounding_Rule_Code:=
8310: ZX_GLOBAL_STRUCTURES_PKG.g_cust_acct_info_tbl(p_account_id).tax_rounding_rule;
8311:
8312: IF ZX_GLOBAL_STRUCTURES_PKG.g_cust_acct_info_tbl(p_account_id).tax_header_level_flag = 'Y' THEN
8306: p_rounding_rule_code := NULL;
8307:
8308: IF ZX_GLOBAL_STRUCTURES_PKG.g_cust_acct_info_tbl.exists(p_account_id) THEN
8309: p_Rounding_Rule_Code:=
8310: ZX_GLOBAL_STRUCTURES_PKG.g_cust_acct_info_tbl(p_account_id).tax_rounding_rule;
8311:
8312: IF ZX_GLOBAL_STRUCTURES_PKG.g_cust_acct_info_tbl(p_account_id).tax_header_level_flag = 'Y' THEN
8313: p_rounding_level_code := 'HEADER';
8314: ELSIF ZX_GLOBAL_STRUCTURES_PKG.g_cust_acct_info_tbl(p_account_id).tax_header_level_flag = 'N' THEN
8308: IF ZX_GLOBAL_STRUCTURES_PKG.g_cust_acct_info_tbl.exists(p_account_id) THEN
8309: p_Rounding_Rule_Code:=
8310: ZX_GLOBAL_STRUCTURES_PKG.g_cust_acct_info_tbl(p_account_id).tax_rounding_rule;
8311:
8312: IF ZX_GLOBAL_STRUCTURES_PKG.g_cust_acct_info_tbl(p_account_id).tax_header_level_flag = 'Y' THEN
8313: p_rounding_level_code := 'HEADER';
8314: ELSIF ZX_GLOBAL_STRUCTURES_PKG.g_cust_acct_info_tbl(p_account_id).tax_header_level_flag = 'N' THEN
8315: p_rounding_level_code := 'LINE';
8316: END IF;
8310: ZX_GLOBAL_STRUCTURES_PKG.g_cust_acct_info_tbl(p_account_id).tax_rounding_rule;
8311:
8312: IF ZX_GLOBAL_STRUCTURES_PKG.g_cust_acct_info_tbl(p_account_id).tax_header_level_flag = 'Y' THEN
8313: p_rounding_level_code := 'HEADER';
8314: ELSIF ZX_GLOBAL_STRUCTURES_PKG.g_cust_acct_info_tbl(p_account_id).tax_header_level_flag = 'N' THEN
8315: p_rounding_level_code := 'LINE';
8316: END IF;
8317:
8318: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
8337: p_rounding_level_code := 'LINE';
8338: END IF;
8339:
8340:
8341: ZX_GLOBAL_STRUCTURES_PKG.g_cust_acct_info_tbl(p_account_id).CUST_ACCOUNT_ID := p_account_id;
8342: ZX_GLOBAL_STRUCTURES_PKG.g_cust_acct_info_tbl(p_account_id).TAX_CODE := l_tax_code;
8343: ZX_GLOBAL_STRUCTURES_PKG.g_cust_acct_info_tbl(p_account_id).TAX_ROUNDING_RULE := l_tax_rounding_rule;
8344: ZX_GLOBAL_STRUCTURES_PKG.g_cust_acct_info_tbl(p_account_id).TAX_HEADER_LEVEL_FLAG := l_tax_header_level_flag;
8345:
8338: END IF;
8339:
8340:
8341: ZX_GLOBAL_STRUCTURES_PKG.g_cust_acct_info_tbl(p_account_id).CUST_ACCOUNT_ID := p_account_id;
8342: ZX_GLOBAL_STRUCTURES_PKG.g_cust_acct_info_tbl(p_account_id).TAX_CODE := l_tax_code;
8343: ZX_GLOBAL_STRUCTURES_PKG.g_cust_acct_info_tbl(p_account_id).TAX_ROUNDING_RULE := l_tax_rounding_rule;
8344: ZX_GLOBAL_STRUCTURES_PKG.g_cust_acct_info_tbl(p_account_id).TAX_HEADER_LEVEL_FLAG := l_tax_header_level_flag;
8345:
8346: END IF;
8339:
8340:
8341: ZX_GLOBAL_STRUCTURES_PKG.g_cust_acct_info_tbl(p_account_id).CUST_ACCOUNT_ID := p_account_id;
8342: ZX_GLOBAL_STRUCTURES_PKG.g_cust_acct_info_tbl(p_account_id).TAX_CODE := l_tax_code;
8343: ZX_GLOBAL_STRUCTURES_PKG.g_cust_acct_info_tbl(p_account_id).TAX_ROUNDING_RULE := l_tax_rounding_rule;
8344: ZX_GLOBAL_STRUCTURES_PKG.g_cust_acct_info_tbl(p_account_id).TAX_HEADER_LEVEL_FLAG := l_tax_header_level_flag;
8345:
8346: END IF;
8347:
8340:
8341: ZX_GLOBAL_STRUCTURES_PKG.g_cust_acct_info_tbl(p_account_id).CUST_ACCOUNT_ID := p_account_id;
8342: ZX_GLOBAL_STRUCTURES_PKG.g_cust_acct_info_tbl(p_account_id).TAX_CODE := l_tax_code;
8343: ZX_GLOBAL_STRUCTURES_PKG.g_cust_acct_info_tbl(p_account_id).TAX_ROUNDING_RULE := l_tax_rounding_rule;
8344: ZX_GLOBAL_STRUCTURES_PKG.g_cust_acct_info_tbl(p_account_id).TAX_HEADER_LEVEL_FLAG := l_tax_header_level_flag;
8345:
8346: END IF;
8347:
8348:
8404: X_RETURN_STATUS => p_return_status);
8405:
8406: IF L_TBL_INDEX is not null then
8407: p_rounding_level_code :=
8408: ZX_GLOBAL_STRUCTURES_PKG.G_PARTY_TAX_PROF_INFO_TBL(p_party_tax_profile_id).rounding_level_code;
8409: p_rounding_rule_code :=
8410: ZX_GLOBAL_STRUCTURES_PKG.G_PARTY_TAX_PROF_INFO_TBL(p_party_tax_profile_id).rounding_rule_code;
8411: ELSE
8412:
8406: IF L_TBL_INDEX is not null then
8407: p_rounding_level_code :=
8408: ZX_GLOBAL_STRUCTURES_PKG.G_PARTY_TAX_PROF_INFO_TBL(p_party_tax_profile_id).rounding_level_code;
8409: p_rounding_rule_code :=
8410: ZX_GLOBAL_STRUCTURES_PKG.G_PARTY_TAX_PROF_INFO_TBL(p_party_tax_profile_id).rounding_rule_code;
8411: ELSE
8412:
8413: IF (g_level_procedure >= g_current_runtime_level ) THEN
8414: FND_LOG.STRING(g_level_procedure,