420:
421: BEGIN
422:
423: -- Initializing API return status to Success, please do not change this
424: x_return_status := FND_API.G_RET_STS_SUCCESS;
425:
426: -- p_line_tab contains the Order Line_id(s) from oe_order_lines_all table
427: -- This can be used to derive the corresponding line level information
428:
826: l_debug_on BOOLEAN;
827:
828: l_length NUMBER;
829:
830: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
831: l_msg_count NUMBER := 0;
832: l_msg_data VARCHAR2(2000) := NULL;
833: l_internet_proxy VARCHAR2(1000) := NULL;
834: l_carrier_api_url VARCHAR2(500) := NULL;
953: END IF;
954:
955: l_internet_proxy := wsh_u_util.get_proxy
956: ( p_api_version => 1.0
957: , p_init_msg_list => FND_API.G_TRUE
958: , x_return_status => l_return_status
959: , x_msg_count => l_msg_count
960: , x_msg_data => l_msg_data);
961:
964: WSH_DEBUG_SV.log(l_module_name,'l_internet_proxy '||l_internet_proxy);
965: WSH_DEBUG_SV.log(l_module_name,'l_return_status '||l_return_status);
966: END IF;
967:
968: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
969: THEN
970: RAISE wsh_u_proxy;
971: END IF;
972:
1153: WSH_DEBUG_SV.log(l_module_name,'Exception while fetching the Address Validation error message :'||sqlerrm);
1154: END IF;
1155: l_errmsg_txt := 'Exception while fetching the Address Validation error message';
1156: END;
1157: x_return_status := FND_API.G_RET_STS_ERROR;
1158: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_E');
1159: FND_MESSAGE.SET_TOKEN('MSG_TEXT',l_errmsg_txt);
1160: WSH_UTIL_CORE.Add_Message(FND_API.G_RET_STS_ERROR);
1161: END IF;
1156: END;
1157: x_return_status := FND_API.G_RET_STS_ERROR;
1158: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_E');
1159: FND_MESSAGE.SET_TOKEN('MSG_TEXT',l_errmsg_txt);
1160: WSH_UTIL_CORE.Add_Message(FND_API.G_RET_STS_ERROR);
1161: END IF;
1162:
1163:
1164:
1161: END IF;
1162:
1163:
1164:
1165: IF x_return_status = FND_API.G_RET_STS_ERROR
1166: THEN
1167: RAISE wsh_u_host_failed;
1168: END IF;
1169:
1171: */--Commenting the comment UPS WS Integeration code End
1172: EXCEPTION
1173: WHEN WSH_U_PROXY THEN
1174: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_PROXY');
1175: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
1176: x_return_status := FND_API.G_RET_STS_ERROR;
1177: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
1178: IF x_msg_count > 1 THEN
1179: x_msg_data := l_msg_summary || l_msg_details;
1172: EXCEPTION
1173: WHEN WSH_U_PROXY THEN
1174: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_PROXY');
1175: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
1176: x_return_status := FND_API.G_RET_STS_ERROR;
1177: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
1178: IF x_msg_count > 1 THEN
1179: x_msg_data := l_msg_summary || l_msg_details;
1180: ELSE
1185: WSH_DEBUG_SV.pop(l_module_name,'exception:wsh_u_proxy');
1186: END IF;
1187: WHEN WSH_U_CSP THEN
1188: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_CSP');
1189: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
1190: x_return_status := FND_API.G_RET_STS_ERROR;
1191: wsh_util_core.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
1192: IF x_msg_count > 1 THEN
1193: x_msg_data := l_msg_summary || l_msg_details;
1186: END IF;
1187: WHEN WSH_U_CSP THEN
1188: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_CSP');
1189: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
1190: x_return_status := FND_API.G_RET_STS_ERROR;
1191: wsh_util_core.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
1192: IF x_msg_count > 1 THEN
1193: x_msg_data := l_msg_summary || l_msg_details;
1194: ELSE
1199: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_U_CSP');
1200: END IF;
1201: WHEN WSH_U_HOST_FAILED THEN
1202: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_HOST_FAILED');
1203: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
1204: x_return_status := FND_API.G_RET_STS_ERROR;
1205: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
1206: IF x_msg_count > 1 then
1207: x_msg_data := l_msg_summary || l_msg_details;
1200: END IF;
1201: WHEN WSH_U_HOST_FAILED THEN
1202: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_HOST_FAILED');
1203: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
1204: x_return_status := FND_API.G_RET_STS_ERROR;
1205: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
1206: IF x_msg_count > 1 then
1207: x_msg_data := l_msg_summary || l_msg_details;
1208: ELSE
1219: END IF;
1220:
1221: WHEN WSH_U_CITYORZIP THEN
1222: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_CITYORZIP');
1223: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
1224: x_return_status := FND_API.G_RET_STS_ERROR;
1225: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, l_msg_count);
1226: IF l_msg_count > 1 THEN
1227: x_msg_data := l_msg_summary || l_msg_details;
1220:
1221: WHEN WSH_U_CITYORZIP THEN
1222: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_CITYORZIP');
1223: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
1224: x_return_status := FND_API.G_RET_STS_ERROR;
1225: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, l_msg_count);
1226: IF l_msg_count > 1 THEN
1227: x_msg_data := l_msg_summary || l_msg_details;
1228: ELSE
1234: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_U_CITYORZIP');
1235: END IF;
1236: --
1237: WHEN OTHERS THEN
1238: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1239: IF sqlcode ='-12543' THEN
1240: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_TNS');
1241: FND_MESSAGE.SET_TOKEN('MSG_TEXT','TNS:destination host unreachable');
1242: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
1238: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1239: IF sqlcode ='-12543' THEN
1240: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_TNS');
1241: FND_MESSAGE.SET_TOKEN('MSG_TEXT','TNS:destination host unreachable');
1242: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
1243: x_return_status := FND_API.G_RET_STS_ERROR;
1244: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
1245: IF x_msg_count > 1 THEN
1246: x_msg_data := l_msg_summary || l_msg_details;
1239: IF sqlcode ='-12543' THEN
1240: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_TNS');
1241: FND_MESSAGE.SET_TOKEN('MSG_TEXT','TNS:destination host unreachable');
1242: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
1243: x_return_status := FND_API.G_RET_STS_ERROR;
1244: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
1245: IF x_msg_count > 1 THEN
1246: x_msg_data := l_msg_summary || l_msg_details;
1247: ELSE
1254: ELSIF sqlcode ='-29106'
1255: THEN
1256: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_WALLET_PASSWD');
1257: FND_MESSAGE.SET_TOKEN('MSG_TEXT','Please check oracle wallet password');
1258: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
1259: x_return_status := FND_API.G_RET_STS_ERROR;
1260: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
1261: IF x_msg_count > 1 THEN
1262: x_msg_data := l_msg_summary || l_msg_details;
1255: THEN
1256: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_WALLET_PASSWD');
1257: FND_MESSAGE.SET_TOKEN('MSG_TEXT','Please check oracle wallet password');
1258: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
1259: x_return_status := FND_API.G_RET_STS_ERROR;
1260: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
1261: IF x_msg_count > 1 THEN
1262: x_msg_data := l_msg_summary || l_msg_details;
1263: ELSE
1270: ELSIF sqlcode ='-28759'
1271: THEN
1272: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_WALLET_PATH');
1273: FND_MESSAGE.SET_TOKEN('MSG_TEXT','Please check oracle wallet path or its privileges');
1274: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
1275: x_return_status := FND_API.G_RET_STS_ERROR;
1276: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
1277: IF x_msg_count > 1 THEN
1278: x_msg_data := l_msg_summary || l_msg_details;
1271: THEN
1272: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_WALLET_PATH');
1273: FND_MESSAGE.SET_TOKEN('MSG_TEXT','Please check oracle wallet path or its privileges');
1274: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
1275: x_return_status := FND_API.G_RET_STS_ERROR;
1276: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
1277: IF x_msg_count > 1 THEN
1278: x_msg_data := l_msg_summary || l_msg_details;
1279: ELSE
1323: l_my_proxy BOOLEAN;
1324: l_debug_on BOOLEAN;
1325:
1326: l_length NUMBER;
1327: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
1328: l_msg_count NUMBER := 0;
1329: l_msg_data VARCHAR2(2000) := NULL;
1330: l_internet_proxy VARCHAR2(1000) := NULL;
1331: l_carrier_api_url VARCHAR2(500) := NULL;
1726: END IF;
1727:
1728: l_internet_proxy := wsh_u_util.get_proxy
1729: ( p_api_version => 1.0
1730: , p_init_msg_list => FND_API.G_TRUE
1731: , x_return_status => l_return_status
1732: , x_msg_count => l_msg_count
1733: , x_msg_data => l_msg_data);
1734:
1737: WSH_DEBUG_SV.log(l_module_name,'l_internet_proxy '||l_internet_proxy);
1738: WSH_DEBUG_SV.log(l_module_name,'l_return_status '||l_return_status);
1739: END IF;
1740:
1741: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
1742: THEN
1743: RAISE wsh_u_proxy;
1744: END IF;
1745:
1935: WSH_DEBUG_SV.log(l_module_name,'Exception while fetching the Rate and Services error message :'||sqlerrm);
1936: END IF;
1937: l_errmsg_txt := 'Exception while fetching the Rate and Services error message';
1938: END;
1939: x_return_status := FND_API.G_RET_STS_ERROR;
1940: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_E');
1941: FND_MESSAGE.SET_TOKEN('MSG_TEXT',l_errmsg_txt);
1942: WSH_UTIL_CORE.Add_Message(FND_API.G_RET_STS_ERROR);
1943:
1938: END;
1939: x_return_status := FND_API.G_RET_STS_ERROR;
1940: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_E');
1941: FND_MESSAGE.SET_TOKEN('MSG_TEXT',l_errmsg_txt);
1942: WSH_UTIL_CORE.Add_Message(FND_API.G_RET_STS_ERROR);
1943:
1944: x_output(l_index).PackageActualWeight := NULL;
1945: x_output(l_index).ProductCharge := NULL;
1946: x_output(l_index).AccessorySurcharge := NULL;
1948:
1949: END IF;
1950:
1951:
1952: IF x_return_status = FND_API.G_RET_STS_ERROR
1953: THEN
1954: RAISE wsh_u_host_failed;
1955: END IF;
1956:
1959: -- End of the comment UPS WS Integeration code
1960: EXCEPTION
1961: WHEN WSH_U_PROXY THEN
1962: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_PROXY');
1963: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
1964: x_return_status := FND_API.G_RET_STS_ERROR;
1965: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
1966: IF x_msg_count > 1 THEN
1967: x_msg_data := l_msg_summary || l_msg_details;
1960: EXCEPTION
1961: WHEN WSH_U_PROXY THEN
1962: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_PROXY');
1963: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
1964: x_return_status := FND_API.G_RET_STS_ERROR;
1965: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
1966: IF x_msg_count > 1 THEN
1967: x_msg_data := l_msg_summary || l_msg_details;
1968: ELSE
1973: WSH_DEBUG_SV.pop(l_module_name,'exception:wsh_u_proxy');
1974: END IF;
1975: WHEN WSH_U_SRVLEVCODE THEN
1976: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_SRVLEVCODE');
1977: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
1978: x_return_status := FND_API.G_RET_STS_ERROR;
1979: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
1980: IF x_msg_count > 1 THEN
1981: x_msg_data := l_msg_summary || l_msg_details;
1974: END IF;
1975: WHEN WSH_U_SRVLEVCODE THEN
1976: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_SRVLEVCODE');
1977: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
1978: x_return_status := FND_API.G_RET_STS_ERROR;
1979: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
1980: IF x_msg_count > 1 THEN
1981: x_msg_data := l_msg_summary || l_msg_details;
1982: ELSE
1989: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_U_SRVLEVCODE');
1990: END IF;
1991: WHEN WSH_U_PKGACTWT THEN
1992: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_PKGACTWT');
1993: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
1994: x_return_status := FND_API.G_RET_STS_ERROR;
1995: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
1996: IF x_msg_count > 1 then
1997: x_msg_data := l_msg_summary || l_msg_details;
1990: END IF;
1991: WHEN WSH_U_PKGACTWT THEN
1992: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_PKGACTWT');
1993: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
1994: x_return_status := FND_API.G_RET_STS_ERROR;
1995: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
1996: IF x_msg_count > 1 then
1997: x_msg_data := l_msg_summary || l_msg_details;
1998: ELSE
2005: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_U_PKGACTWT');
2006: END IF;
2007: WHEN WSH_U_SPOSTALCODE THEN
2008: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_SPOSTALCODE');
2009: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
2010: x_return_status := FND_API.G_RET_STS_ERROR;
2011: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
2012: IF x_msg_count > 1 THEN
2013: x_msg_data := l_msg_summary || l_msg_details;
2006: END IF;
2007: WHEN WSH_U_SPOSTALCODE THEN
2008: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_SPOSTALCODE');
2009: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
2010: x_return_status := FND_API.G_RET_STS_ERROR;
2011: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
2012: IF x_msg_count > 1 THEN
2013: x_msg_data := l_msg_summary || l_msg_details;
2014: ELSE
2022: END IF;
2023: --
2024: WHEN WSH_U_CPOSTALCODE THEN
2025: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_CPOSTALCODE');
2026: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
2027: x_return_status := FND_API.G_RET_STS_ERROR;
2028: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
2029: IF x_msg_count > 1 THEN
2030: x_msg_data := l_msg_summary || l_msg_details;
2023: --
2024: WHEN WSH_U_CPOSTALCODE THEN
2025: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_CPOSTALCODE');
2026: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
2027: x_return_status := FND_API.G_RET_STS_ERROR;
2028: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
2029: IF x_msg_count > 1 THEN
2030: x_msg_data := l_msg_summary || l_msg_details;
2031: ELSE
2039: END IF;
2040: --
2041: WHEN WSH_U_CCOUNTRY THEN
2042: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_CCOUNTRY');
2043: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
2044: x_return_status := FND_API.G_RET_STS_ERROR;
2045: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
2046: IF x_msg_count > 1 THEN
2047: x_msg_data := l_msg_summary || l_msg_details;
2040: --
2041: WHEN WSH_U_CCOUNTRY THEN
2042: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_CCOUNTRY');
2043: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
2044: x_return_status := FND_API.G_RET_STS_ERROR;
2045: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
2046: IF x_msg_count > 1 THEN
2047: x_msg_data := l_msg_summary || l_msg_details;
2048: ELSE
2056: END IF;
2057:
2058: WHEN WSH_U_RATECHART THEN
2059: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_RATECHART');
2060: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
2061: x_return_status := FND_API.G_RET_STS_ERROR;
2062: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
2063: if x_msg_count > 1 then
2064: x_msg_data := l_msg_summary || l_msg_details;
2057:
2058: WHEN WSH_U_RATECHART THEN
2059: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_RATECHART');
2060: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
2061: x_return_status := FND_API.G_RET_STS_ERROR;
2062: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
2063: if x_msg_count > 1 then
2064: x_msg_data := l_msg_summary || l_msg_details;
2065: else
2072: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_U_RATECHART');
2073: END IF;
2074: WHEN WSH_U_HOST_FAILED THEN
2075: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_HOST_FAILED');
2076: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
2077: x_return_status := FND_API.G_RET_STS_ERROR;
2078: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
2079: IF x_msg_count > 1 then
2080: x_msg_data := l_msg_summary || l_msg_details;
2073: END IF;
2074: WHEN WSH_U_HOST_FAILED THEN
2075: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_HOST_FAILED');
2076: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
2077: x_return_status := FND_API.G_RET_STS_ERROR;
2078: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
2079: IF x_msg_count > 1 then
2080: x_msg_data := l_msg_summary || l_msg_details;
2081: ELSE
2091: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_U_HOST_FAILED');
2092: END IF;
2093:
2094: WHEN OTHERS THEN
2095: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2096: IF sqlcode ='-12543' THEN
2097: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_TNS');
2098: FND_MESSAGE.SET_TOKEN('MSG_TEXT','TNS:destination host unreachable');
2099: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
2095: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2096: IF sqlcode ='-12543' THEN
2097: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_TNS');
2098: FND_MESSAGE.SET_TOKEN('MSG_TEXT','TNS:destination host unreachable');
2099: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
2100: x_return_status := FND_API.G_RET_STS_ERROR;
2101: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
2102: IF x_msg_count > 1 THEN
2103: x_msg_data := l_msg_summary || l_msg_details;
2096: IF sqlcode ='-12543' THEN
2097: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_TNS');
2098: FND_MESSAGE.SET_TOKEN('MSG_TEXT','TNS:destination host unreachable');
2099: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
2100: x_return_status := FND_API.G_RET_STS_ERROR;
2101: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
2102: IF x_msg_count > 1 THEN
2103: x_msg_data := l_msg_summary || l_msg_details;
2104: ELSE
2111: ELSIF sqlcode ='-29106'
2112: THEN
2113: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_WALLET_PASSWD');
2114: FND_MESSAGE.SET_TOKEN('MSG_TEXT','Please check oracle wallet password');
2115: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
2116: x_return_status := FND_API.G_RET_STS_ERROR;
2117: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
2118: IF x_msg_count > 1 THEN
2119: x_msg_data := l_msg_summary || l_msg_details;
2112: THEN
2113: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_WALLET_PASSWD');
2114: FND_MESSAGE.SET_TOKEN('MSG_TEXT','Please check oracle wallet password');
2115: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
2116: x_return_status := FND_API.G_RET_STS_ERROR;
2117: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
2118: IF x_msg_count > 1 THEN
2119: x_msg_data := l_msg_summary || l_msg_details;
2120: ELSE
2127: ELSIF sqlcode ='-28759'
2128: THEN
2129: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_WALLET_PATH');
2130: FND_MESSAGE.SET_TOKEN('MSG_TEXT','Please check oracle wallet path or its privileges');
2131: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
2132: x_return_status := FND_API.G_RET_STS_ERROR;
2133: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
2134: IF x_msg_count > 1 THEN
2135: x_msg_data := l_msg_summary || l_msg_details;
2128: THEN
2129: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_WALLET_PATH');
2130: FND_MESSAGE.SET_TOKEN('MSG_TEXT','Please check oracle wallet path or its privileges');
2131: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
2132: x_return_status := FND_API.G_RET_STS_ERROR;
2133: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
2134: IF x_msg_count > 1 THEN
2135: x_msg_data := l_msg_summary || l_msg_details;
2136: ELSE
2182: l_my_proxy BOOLEAN;
2183: l_debug_on BOOLEAN;
2184:
2185: l_length NUMBER;
2186: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
2187: l_msg_count NUMBER := 0;
2188: l_msg_data VARCHAR2(2000) := NULL;
2189: l_internet_proxy VARCHAR2(1000) := NULL;
2190: l_carrier_api_url VARCHAR2(500) := NULL;
2262: IF l_debug_on THEN
2263: WSH_DEBUG_SV.log(l_module_name,'No Rows Fetched for the given Delivery Detail Id');
2264: END IF;
2265: RAISE wsh_u_no_trk;
2266: --x_return_status := FND_API.G_RET_STS_ERROR;
2267: --RETURN;
2268: END IF;
2269: CLOSE trk_xml_cur;
2270:
2286: END IF;
2287:
2288: l_internet_proxy := wsh_u_util.get_proxy
2289: ( p_api_version => 1.0
2290: , p_init_msg_list => FND_API.G_TRUE
2291: , x_return_status => l_return_status
2292: , x_msg_count => l_msg_count
2293: , x_msg_data => l_msg_data);
2294:
2297: WSH_DEBUG_SV.log(l_module_name,'l_internet_proxy '||l_internet_proxy);
2298: WSH_DEBUG_SV.log(l_module_name,'l_return_status '||l_return_status);
2299: END IF;
2300:
2301: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
2302: THEN
2303: RAISE wsh_u_proxy;
2304: END IF;
2305:
2528: END IF;
2529: l_errmsg_txt := 'Exception while fetching the tracking error message';
2530: END;
2531:
2532: x_return_status := FND_API.G_RET_STS_ERROR;
2533: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_E');
2534: FND_MESSAGE.SET_TOKEN('MSG_TEXT',l_errmsg_txt);
2535: WSH_UTIL_CORE.Add_Message(FND_API.G_RET_STS_ERROR);
2536:
2531:
2532: x_return_status := FND_API.G_RET_STS_ERROR;
2533: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_E');
2534: FND_MESSAGE.SET_TOKEN('MSG_TEXT',l_errmsg_txt);
2535: WSH_UTIL_CORE.Add_Message(FND_API.G_RET_STS_ERROR);
2536:
2537: END IF;
2538: IF l_debug_on THEN
2539: WSH_DEBUG_SV.log(l_module_name,'Count x_activity_detail:'||x_activity_detail.count);
2540: WSH_DEBUG_SV.log(l_module_name,'Count x_pkg_detail_segment:'||x_pkg_detail_segment.count);
2541: WSH_DEBUG_SV.log(l_module_name,'Count x_track_address:'||x_track_address.count);
2542: END IF;
2543:
2544: IF x_return_status = FND_API.G_RET_STS_ERROR
2545: THEN
2546: RAISE wsh_u_host_failed;
2547: END IF;
2548: x_return_status := l_return_status ;
2549: EXCEPTION
2550: WHEN WSH_U_PROXY THEN
2551: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_PROXY');
2552: FND_MESSAGE.SET_TOKEN('MSG_TEXT','Could not find proxy settings');
2553: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
2554: x_return_status := FND_API.G_RET_STS_ERROR;
2555: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
2556: IF x_msg_count > 1 THEN
2557: x_msg_data := l_msg_summary || l_msg_details;
2550: WHEN WSH_U_PROXY THEN
2551: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_PROXY');
2552: FND_MESSAGE.SET_TOKEN('MSG_TEXT','Could not find proxy settings');
2553: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
2554: x_return_status := FND_API.G_RET_STS_ERROR;
2555: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
2556: IF x_msg_count > 1 THEN
2557: x_msg_data := l_msg_summary || l_msg_details;
2558: ELSE
2563: WSH_DEBUG_SV.pop(l_module_name,'exception:wsh_u_proxy');
2564: END IF;
2565: WHEN WSH_U_HOST_FAILED THEN
2566: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_HOST_FAILED');
2567: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
2568: x_return_status := FND_API.G_RET_STS_ERROR;
2569: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
2570: IF x_msg_count > 1 then
2571: x_msg_data := l_msg_summary || l_msg_details;
2564: END IF;
2565: WHEN WSH_U_HOST_FAILED THEN
2566: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_HOST_FAILED');
2567: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
2568: x_return_status := FND_API.G_RET_STS_ERROR;
2569: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
2570: IF x_msg_count > 1 then
2571: x_msg_data := l_msg_summary || l_msg_details;
2572: ELSE
2583: END IF;
2584: WHEN WSH_U_NO_TRK THEN
2585: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_NO_TRK');
2586: FND_MESSAGE.SET_TOKEN('MSG_TEXT','Invalid Tracking Number');
2587: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
2588: x_return_status := FND_API.G_RET_STS_ERROR;
2589: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
2590: IF x_msg_count > 1 then
2591: x_msg_data := l_msg_summary || l_msg_details;
2584: WHEN WSH_U_NO_TRK THEN
2585: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_NO_TRK');
2586: FND_MESSAGE.SET_TOKEN('MSG_TEXT','Invalid Tracking Number');
2587: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
2588: x_return_status := FND_API.G_RET_STS_ERROR;
2589: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
2590: IF x_msg_count > 1 then
2591: x_msg_data := l_msg_summary || l_msg_details;
2592: ELSE
2601: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_U_NO_TRK exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2602: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_U_NO_TRK');
2603: END IF; --
2604: WHEN OTHERS THEN
2605: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2606: IF sqlcode ='-12543' THEN
2607: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_TNS');
2608: FND_MESSAGE.SET_TOKEN('MSG_TEXT','TNS:destination host unreachable');
2609: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
2605: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2606: IF sqlcode ='-12543' THEN
2607: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_TNS');
2608: FND_MESSAGE.SET_TOKEN('MSG_TEXT','TNS:destination host unreachable');
2609: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
2610: x_return_status := FND_API.G_RET_STS_ERROR;
2611: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
2612: IF x_msg_count > 1 THEN
2613: x_msg_data := l_msg_summary || l_msg_details;
2606: IF sqlcode ='-12543' THEN
2607: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_TNS');
2608: FND_MESSAGE.SET_TOKEN('MSG_TEXT','TNS:destination host unreachable');
2609: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
2610: x_return_status := FND_API.G_RET_STS_ERROR;
2611: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
2612: IF x_msg_count > 1 THEN
2613: x_msg_data := l_msg_summary || l_msg_details;
2614: ELSE
2621: ELSIF sqlcode ='-29106'
2622: THEN
2623: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_WALLET_PASSWD');
2624: FND_MESSAGE.SET_TOKEN('MSG_TEXT','Please check oracle wallet password');
2625: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
2626: x_return_status := FND_API.G_RET_STS_ERROR;
2627: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
2628: IF x_msg_count > 1 THEN
2629: x_msg_data := l_msg_summary || l_msg_details;
2622: THEN
2623: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_WALLET_PASSWD');
2624: FND_MESSAGE.SET_TOKEN('MSG_TEXT','Please check oracle wallet password');
2625: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
2626: x_return_status := FND_API.G_RET_STS_ERROR;
2627: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
2628: IF x_msg_count > 1 THEN
2629: x_msg_data := l_msg_summary || l_msg_details;
2630: ELSE
2637: ELSIF sqlcode ='-28759'
2638: THEN
2639: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_WALLET_PATH');
2640: FND_MESSAGE.SET_TOKEN('MSG_TEXT','Please check oracle wallet path or its privileges');
2641: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
2642: x_return_status := FND_API.G_RET_STS_ERROR;
2643: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
2644: IF x_msg_count > 1 THEN
2645: x_msg_data := l_msg_summary || l_msg_details;
2638: THEN
2639: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_WALLET_PATH');
2640: FND_MESSAGE.SET_TOKEN('MSG_TEXT','Please check oracle wallet path or its privileges');
2641: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
2642: x_return_status := FND_API.G_RET_STS_ERROR;
2643: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
2644: IF x_msg_count > 1 THEN
2645: x_msg_data := l_msg_summary || l_msg_details;
2646: ELSE
2655: END IF;
2656:
2657: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_UNEXPECTED ERROR');
2658: FND_MESSAGE.SET_TOKEN('MSG_TEXT',substr(sqlerrm,1,50));
2659: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2660: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
2661: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2662: THEN
2663: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, 'trk_shipment_services');
2656:
2657: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_UNEXPECTED ERROR');
2658: FND_MESSAGE.SET_TOKEN('MSG_TEXT',substr(sqlerrm,1,50));
2659: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2660: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
2661: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2662: THEN
2663: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, 'trk_shipment_services');
2664: END IF;
2700: l_my_proxy BOOLEAN;
2701: l_debug_on BOOLEAN;
2702:
2703: l_length NUMBER;
2704: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
2705: l_msg_count NUMBER := 0;
2706: l_msg_data VARCHAR2(2000) := NULL;
2707: l_internet_proxy VARCHAR2(1000) := NULL;
2708: l_carrier_api_url VARCHAR2(500) := NULL;
2791: THEN
2792: IF l_debug_on THEN
2793: WSH_DEBUG_SV.log(l_module_name,'No Rows Fetched for the given Delivery Detail Id');
2794: END IF;
2795: x_return_status := FND_API.G_RET_STS_ERROR;
2796: RETURN;
2797: END IF;
2798: CLOSE tnt_xml_cur;
2799: l_carrier_api_url := 'https://onlinetools.ups.com/webservices/TimeInTransit'; --UPS Prod URL
2815: END IF;
2816:
2817: l_internet_proxy := wsh_u_util.get_proxy
2818: ( p_api_version => 1.0
2819: , p_init_msg_list => FND_API.G_TRUE
2820: , x_return_status => l_return_status
2821: , x_msg_count => l_msg_count
2822: , x_msg_data => l_msg_data);
2823:
2826: WSH_DEBUG_SV.log(l_module_name,'l_internet_proxy '||l_internet_proxy);
2827: WSH_DEBUG_SV.log(l_module_name,'l_return_status '||l_return_status);
2828: END IF;
2829:
2830: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
2831: THEN
2832: RAISE WSH_U_PROXY;
2833: END IF;
2834:
3005: WSH_DEBUG_SV.log(l_module_name,'Exception while fetching the time in Transit error message :'||sqlerrm);
3006: END IF;
3007: l_errmsg_txt := 'Exception while fetching the Time In Transit error message';
3008: END;
3009: x_return_status := FND_API.G_RET_STS_ERROR;
3010: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_E');
3011: FND_MESSAGE.SET_TOKEN('MSG_TEXT',l_errmsg_txt);
3012: WSH_UTIL_CORE.Add_Message(FND_API.G_RET_STS_ERROR);
3013:
3008: END;
3009: x_return_status := FND_API.G_RET_STS_ERROR;
3010: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_E');
3011: FND_MESSAGE.SET_TOKEN('MSG_TEXT',l_errmsg_txt);
3012: WSH_UTIL_CORE.Add_Message(FND_API.G_RET_STS_ERROR);
3013:
3014: END IF;
3015:
3016: IF l_debug_on THEN
3020: WSH_DEBUG_SV.log(l_module_name,'OriginCity returned from UPS is '||x_TimeInTransit_out.OriginCity);
3021: WSH_DEBUG_SV.log(l_module_name,'Destination City returned from UPS is '||x_TimeInTransit_out.DestinationCity);
3022: END IF;
3023:
3024: IF x_return_status = FND_API.G_RET_STS_ERROR
3025: THEN
3026: RAISE wsh_u_host_failed;
3027: END IF;
3028: x_return_status := l_return_status ;
3031: EXCEPTION
3032: WHEN WSH_U_PROXY THEN
3033: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_PROXY');
3034: FND_MESSAGE.SET_TOKEN('MSG_TEXT','Could not find proxy settings');
3035: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
3036: x_return_status := FND_API.G_RET_STS_ERROR;
3037: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
3038: IF x_msg_count > 1 THEN
3039: x_msg_data := l_msg_summary || l_msg_details;
3032: WHEN WSH_U_PROXY THEN
3033: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_PROXY');
3034: FND_MESSAGE.SET_TOKEN('MSG_TEXT','Could not find proxy settings');
3035: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
3036: x_return_status := FND_API.G_RET_STS_ERROR;
3037: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
3038: IF x_msg_count > 1 THEN
3039: x_msg_data := l_msg_summary || l_msg_details;
3040: ELSE
3045: WSH_DEBUG_SV.pop(l_module_name,'exception:wsh_u_proxy');
3046: END IF;
3047: WHEN WSH_U_HOST_FAILED THEN
3048: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_HOST_FAILED');
3049: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
3050: x_return_status := FND_API.G_RET_STS_ERROR;
3051: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
3052: IF x_msg_count > 1 then
3053: x_msg_data := l_msg_summary || l_msg_details;
3046: END IF;
3047: WHEN WSH_U_HOST_FAILED THEN
3048: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_HOST_FAILED');
3049: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
3050: x_return_status := FND_API.G_RET_STS_ERROR;
3051: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
3052: IF x_msg_count > 1 then
3053: x_msg_data := l_msg_summary || l_msg_details;
3054: ELSE
3063: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_U_HOST_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3064: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_U_HOST_FAILED');
3065: END IF;
3066: WHEN OTHERS THEN
3067: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3068: IF sqlcode ='-12543' THEN
3069: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_TNS');
3070: FND_MESSAGE.SET_TOKEN('MSG_TEXT','TNS:destination host unreachable');
3071: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
3067: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3068: IF sqlcode ='-12543' THEN
3069: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_TNS');
3070: FND_MESSAGE.SET_TOKEN('MSG_TEXT','TNS:destination host unreachable');
3071: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
3072: x_return_status := FND_API.G_RET_STS_ERROR;
3073: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
3074: IF x_msg_count > 1 THEN
3075: x_msg_data := l_msg_summary || l_msg_details;
3068: IF sqlcode ='-12543' THEN
3069: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_TNS');
3070: FND_MESSAGE.SET_TOKEN('MSG_TEXT','TNS:destination host unreachable');
3071: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
3072: x_return_status := FND_API.G_RET_STS_ERROR;
3073: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
3074: IF x_msg_count > 1 THEN
3075: x_msg_data := l_msg_summary || l_msg_details;
3076: ELSE
3083: ELSIF sqlcode ='-29106'
3084: THEN
3085: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_WALLET_PASSWD');
3086: FND_MESSAGE.SET_TOKEN('MSG_TEXT','Please check oracle wallet password');
3087: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
3088: x_return_status := FND_API.G_RET_STS_ERROR;
3089: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
3090: IF x_msg_count > 1 THEN
3091: x_msg_data := l_msg_summary || l_msg_details;
3084: THEN
3085: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_WALLET_PASSWD');
3086: FND_MESSAGE.SET_TOKEN('MSG_TEXT','Please check oracle wallet password');
3087: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
3088: x_return_status := FND_API.G_RET_STS_ERROR;
3089: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
3090: IF x_msg_count > 1 THEN
3091: x_msg_data := l_msg_summary || l_msg_details;
3092: ELSE
3099: ELSIF sqlcode ='-28759'
3100: THEN
3101: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_WALLET_PATH');
3102: FND_MESSAGE.SET_TOKEN('MSG_TEXT','Please check oracle wallet path or its privileges');
3103: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
3104: x_return_status := FND_API.G_RET_STS_ERROR;
3105: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
3106: IF x_msg_count > 1 THEN
3107: x_msg_data := l_msg_summary || l_msg_details;
3100: THEN
3101: FND_MESSAGE.SET_NAME('WSH', 'WSH_U_WALLET_PATH');
3102: FND_MESSAGE.SET_TOKEN('MSG_TEXT','Please check oracle wallet path or its privileges');
3103: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR,l_module_name);
3104: x_return_status := FND_API.G_RET_STS_ERROR;
3105: WSH_UTIL_CORE.get_messages( 'Y', l_msg_summary, l_msg_details, x_msg_count);
3106: IF x_msg_count > 1 THEN
3107: x_msg_data := l_msg_summary || l_msg_details;
3108: ELSE