[Home] [Help]
63: -- Initialize API return status to success.
64:
65: x_return_status := FND_API.G_RET_STS_SUCCESS;
66:
67: l_party_type_tbl_idx := dbms_utility.get_hash_value(p_party_type, 1, 8192);
68:
69: IF (ZX_GLOBAL_STRUCTURES_PKG.ZX_PARTY_TYPES_CACHE.exists(l_party_type_tbl_idx)) THEN
70: x_loc_tbl := ZX_GLOBAL_STRUCTURES_PKG.ZX_PARTY_TYPES_CACHE(l_party_type_tbl_idx).LOCATION_SOURCE_TABLE;
71:
78: ELSE
79: FOR c_party_type_rec IN c_get_party_type_info
80: LOOP
81:
82: l_idx := dbms_utility.get_hash_value(c_party_type_rec.party_type_code, 1, 8192);
83:
84: ZX_GLOBAL_STRUCTURES_PKG.ZX_PARTY_TYPES_CACHE(l_idx).PARTY_TYPE_CODE
85: := c_party_type_rec.PARTY_TYPE_CODE;
86: ZX_GLOBAL_STRUCTURES_PKG.ZX_PARTY_TYPES_CACHE(l_idx).PARTY_SOURCE_TABLE
668: l_loc_country_code := l_location_info_rec.country_code;
669:
670: END IF;
671:
672: l_geography_type_index := dbms_utility.get_hash_value(p_zone_type, 1, 8192);
673:
674: --bug8251315
675: IF ZX_GLOBAL_STRUCTURES_PKG.g_geography_type_info_tbl.exists(l_geography_type_index)
676: AND ZX_GLOBAL_STRUCTURES_PKG.g_geography_type_info_tbl(l_geography_type_index).zone_type = p_zone_type THEN
710: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
711: END IF;
712:
713: -- check if geo name reference information is there in cache
714: l_tbl_index := dbms_utility.get_hash_value(
715: TO_CHAR(p_location_id),
716: 1,
717: 8192);
718:
1087: END IF;
1088: IF l_country_regime_flag = 'N' or l_same_regime_loc_country = 'Y' THEN
1089:
1090: BEGIN
1091: l_tbl_index := dbms_utility.get_hash_value(
1092: p_tax_regime_code||p_tax||'1',
1093: 1,
1094: 8192);
1095:
1161: ORDER BY 3 desc;
1162:
1163: For i in nvl(l_geography_type.FIRST,0)..nvl(l_geography_type.LAST,-1) LOOP
1164:
1165: l_tbl_index := dbms_utility.get_hash_value(
1166: p_tax_regime_code||p_tax||to_char(i),
1167: 1,
1168: 8192);
1169: g_geography_use_info_tbl(l_tbl_index).tax_id := l_tax_id;
1186:
1187: -- populate the l_inner_city_jurisdiction_flag value
1188: i := 1; -- counter for geography_type_num
1189: WHILE TRUE LOOP
1190: l_tbl_index := dbms_utility.get_hash_value(
1191: p_tax_regime_code||p_tax||to_char(i),
1192: 1,
1193: 8192);
1194: IF NOT g_geography_use_info_tbl.EXISTS(l_tbl_index) then
1277: i := 1; -- counter for geography_type_num
1278:
1279: WHILE TRUE LOOP
1280:
1281: l_tbl_index := dbms_utility.get_hash_value(
1282: p_tax_regime_code||p_tax||to_char(i),
1283: 1,
1284: 8192);
1285:
1520:
1521: -- Find geography id from gnr table
1522: -- ---------------------------------
1523:
1524: l_tbl_index := dbms_utility.get_hash_value(
1525: to_char(p_location_id)||p_geography_type,
1526: 1,
1527: 8192);
1528:
1685: p_location_type||'|'||
1686: to_char(p_location_id)||'|'||
1687: p_geography_type;
1688:
1689: TABLEIDX := dbms_utility.get_hash_value(hash_string,1,TABLE_SIZE);
1690:
1691: IF (ZX_GLOBAL_STRUCTURES_PKG.location_hash_tbl.EXISTS(TABLEIDX)) THEN
1692: loc_info_idx := ZX_GLOBAL_STRUCTURES_PKG.location_hash_tbl(TABLEIDX);
1693: x_geography_value := ZX_GLOBAL_STRUCTURES_PKG.location_info_tbl.geography_value(loc_info_idx);
1793: location_type_tbl(i)||'|'||
1794: to_char(location_id_tbl(i))||'|'||
1795: g_geography_type_tbl(idx1);
1796:
1797: TABLEIDX := dbms_utility.get_hash_value(hash_string,1,TABLE_SIZE);
1798:
1799: ZX_GLOBAL_STRUCTURES_PKG.location_hash_tbl(TABLEIDX) := k;
1800:
1801:
1923: location_type_tbl(i)||'|'||
1924: to_char(location_id_tbl(i))||'|'||
1925: g_geography_type_tbl(idx1);
1926:
1927: TABLEIDX := dbms_utility.get_hash_value(hash_string,1,TABLE_SIZE);
1928:
1929: ZX_GLOBAL_STRUCTURES_PKG.location_hash_tbl(TABLEIDX) := k;
1930:
1931: -- Logging Infra: Statement level: "B" means "B"reak point