61: l_log_level NUMBER := fte_freight_pricing_util.G_DBG;
62: l_api_name VARCHAR2(50) := 'convert_amount';
63: l_conversion_type VARCHAR2(30);
64: BEGIN
65: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
66: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
67: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,l_api_name);
68:
69: fte_freight_pricing_util.print_msg(l_log_level,'p_from_currency= '||p_from_currency);
91: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level, l_api_name);
92:
93: EXCEPTION
94: WHEN others THEN
95: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
96: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
97: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
98: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
99:
107: l_log_level NUMBER := fte_freight_pricing_util.G_DBG;
108: l_api_name VARCHAR2(50) := 'print_rates_tab';
109: i NUMBER;
110: BEGIN
111: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
112: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
113: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,l_api_name);
114:
115: fte_freight_pricing_util.print_msg(fte_freight_pricing_util.G_DBG,'-----------BEGIN Source Line Rates Tab -------------');
177: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level, l_api_name);
178:
179: EXCEPTION
180: WHEN others THEN
181: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
182: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
183: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
184: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
185:
192: l_log_level NUMBER := fte_freight_pricing_util.G_DBG;
193: l_api_name VARCHAR2(50) := 'print_matched_services';
194: i NUMBER;
195: BEGIN
196: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
197:
198: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
199: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,l_api_name);
200:
228: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
229:
230: EXCEPTION
231: WHEN others THEN
232: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
233: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
234: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
235: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
236: END print_matched_services;
242: l_log_level NUMBER := fte_freight_pricing_util.G_DBG;
243: l_api_name VARCHAR2(50) := 'print_source_line_tab';
244: i NUMBER;
245: BEGIN
246: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
247:
248: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
249: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,l_api_name);
250:
323: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
324:
325: EXCEPTION
326: WHEN others THEN
327: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
328: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
329: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
330: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
331: END print_source_line_tab;
337: l_log_level NUMBER := fte_freight_pricing_util.G_DBG;
338: l_api_name VARCHAR2(50) := 'print_source_header_tab';
339: i NUMBER;
340: BEGIN
341: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
342:
343: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
344: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,l_api_name);
345:
404: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
405:
406: EXCEPTION
407: WHEN others THEN
408: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
409: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
410: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
411: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
412:
441:
442: l_charge_tab rate_tab_type;
443: l_rate_tab rate_tab_type;
444: BEGIN
445: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
446:
447: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
448: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,l_api_name);
449:
463: p_to_currency =>l_target_currency,
464: x_to_amount =>l_converted_amount,
465: x_return_status => l_return_status);
466:
467: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
468: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'currency_conversion_failed');
469: raise FND_API.G_EXC_ERROR;
470: END IF;
471:
571: p_to_currency =>l_target_currency,
572: x_to_amount =>l_converted_amount,
573: x_return_status => l_return_status);
574:
575: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
576: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'currency_conversion_failed');
577: raise FND_API.G_EXC_ERROR;
578: END IF;
579:
610: p_to_currency =>l_target_currency,
611: x_to_amount =>l_converted_amount,
612: x_return_status => l_return_status);
613:
614: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
615: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'currency_conversion_failed');
616: raise FND_API.G_EXC_ERROR;
617: END IF;
618:
685: p_to_currency =>l_target_currency,
686: x_to_amount =>l_converted_amount,
687: x_return_status => l_return_status);
688:
689: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
690: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'currency_conversion_failed');
691: raise FND_API.G_EXC_ERROR;
692: END IF;
693:
718: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
719:
720: EXCEPTION
721: WHEN FND_API.G_EXC_ERROR THEN
722: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
723: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'FND_API.G_EXC_ERROR');
724: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
725: WHEN others THEN
726: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
722: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
723: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'FND_API.G_EXC_ERROR');
724: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
725: WHEN others THEN
726: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
727: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
728: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
729: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
730: END populate_rate;
761:
762: l_charge_tab rate_tab_type;
763: l_rate_tab rate_tab_type;
764: BEGIN
765: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
766:
767: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
768: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,l_api_name);
769:
897: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
898:
899: EXCEPTION
900: WHEN FND_API.G_EXC_ERROR THEN
901: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
902: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'FND_API.G_EXC_ERROR');
903: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
904: WHEN others THEN
905: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
901: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
902: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'FND_API.G_EXC_ERROR');
903: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
904: WHEN others THEN
905: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
906: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
907: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
908: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
909: END populate_rate_2;
918: l_return_status VARCHAR2(1);
919: i NUMBER;
920: idx NUMBER;
921: BEGIN
922: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
923:
924: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
925: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,l_api_name);
926:
1008: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
1009:
1010: EXCEPTION
1011: WHEN others THEN
1012: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1013: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
1014: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
1015: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
1016: END populate_shipment;
1044: l_mode_of_transport wsh_carrier_services.mode_of_transport%type;
1045: l_service_level wsh_carrier_services.service_level%type;
1046:
1047: BEGIN
1048: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1049:
1050: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
1051: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,l_api_name);
1052:
1159: x_schedule_results => l_schedules_tab,
1160: x_return_message => l_msg_data,
1161: x_return_status => l_return_status);
1162:
1163: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) and
1164: (l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
1165: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'search_lane_failed');
1166: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,l_msg_data);
1167: raise FND_API.G_EXC_ERROR;
1160: x_return_message => l_msg_data,
1161: x_return_status => l_return_status);
1162:
1163: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) and
1164: (l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
1165: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'search_lane_failed');
1166: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,l_msg_data);
1167: raise FND_API.G_EXC_ERROR;
1168: END IF;
1402: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
1403:
1404: EXCEPTION
1405: WHEN FND_API.G_EXC_ERROR THEN
1406: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1407: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'FND_API.G_EXC_ERROR');
1408: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
1409: WHEN others THEN
1410: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1406: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1407: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'FND_API.G_EXC_ERROR');
1408: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
1409: WHEN others THEN
1410: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1411: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
1412: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
1413: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
1414:
1436:
1437: BEGIN
1438:
1439:
1440: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1441:
1442: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
1443: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,l_api_name);
1444:
1501:
1502:
1503:
1504: WHEN others THEN
1505: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1506: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
1507: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
1508: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
1509:
1534:
1535: BEGIN
1536:
1537:
1538: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1539:
1540: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
1541: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,l_api_name);
1542:
1558: p_sort_type=>NULL,
1559: x_sorted_index=>l_sorted_index,
1560: x_return_status=>l_return_status);
1561:
1562: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
1563: THEN
1564: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
1565: THEN
1566: raise FTE_FREIGHT_PRICING_UTIL.g_sort_fail;
1560: x_return_status=>l_return_status);
1561:
1562: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
1563: THEN
1564: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
1565: THEN
1566: raise FTE_FREIGHT_PRICING_UTIL.g_sort_fail;
1567: END IF;
1568: END IF;
1584:
1585: EXCEPTION
1586:
1587: WHEN FTE_FREIGHT_PRICING_UTIL.g_sort_fail THEN
1588: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1589: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_sort_fail');
1590: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
1591:
1592:
1590: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
1591:
1592:
1593: WHEN others THEN
1594: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1595: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
1596: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
1597: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
1598:
1642: x_source_header_rates_tab=>x_source_header_rates_tab,
1643: x_source_line_rates_tab=>x_source_line_rates_tab,
1644: x_return_status=>l_return_status);
1645:
1646: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
1647: THEN
1648: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
1649: THEN
1650: raise FTE_FREIGHT_PRICING_UTIL.g_tl_om_rating_fail;
1644: x_return_status=>l_return_status);
1645:
1646: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
1647: THEN
1648: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
1649: THEN
1650: raise FTE_FREIGHT_PRICING_UTIL.g_tl_om_rating_fail;
1651: END IF;
1652: END IF;
1655:
1656: EXCEPTION
1657:
1658: WHEN FTE_FREIGHT_PRICING_UTIL.g_tl_om_rating_fail THEN
1659: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1660: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_tl_om_rating_fail');
1661: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
1662:
1663:
1661: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
1662:
1663:
1664: WHEN others THEN
1665: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1666: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
1667: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
1668: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
1669:
1697:
1698:
1699: BEGIN
1700:
1701: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1702:
1703: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
1704: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,l_api_name);
1705:
1711: FOR i in p_source_header_tab.FIRST..p_source_header_tab.LAST LOOP
1712:
1713: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'i = '||i);
1714: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'consolidation_id = '||p_source_header_tab(i).consolidation_id);
1715: p_source_header_tab(i).status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1716:
1717: Search_Services(
1718: p_source_header_rec => p_source_header_tab(i),
1719: p_ignore_TL=>'N',
1719: p_ignore_TL=>'N',
1720: x_matched_services => l_matched_services,
1721: x_return_status => l_return_status);
1722:
1723: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) and
1724: (l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
1725:
1726: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'search_services failed');
1727: p_source_header_tab(i).status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1720: x_matched_services => l_matched_services,
1721: x_return_status => l_return_status);
1722:
1723: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) and
1724: (l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
1725:
1726: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'search_services failed');
1727: p_source_header_tab(i).status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1728: FND_MESSAGE.SET_NAME('FTE', 'FTE_PRC_SEARCH_SERVICES_FAIL');
1723: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) and
1724: (l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
1725:
1726: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'search_services failed');
1727: p_source_header_tab(i).status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1728: FND_MESSAGE.SET_NAME('FTE', 'FTE_PRC_SEARCH_SERVICES_FAIL');
1729: p_source_header_tab(i).message_data := FND_MESSAGE.GET;
1730: l_fail_group_count := l_fail_group_count + 1;
1731:
1738: IF (l_matched_services.COUNT < 1) THEN
1739:
1740: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'no services found');
1741: -- no services found
1742: p_source_header_tab(i).status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1743: FND_MESSAGE.SET_NAME('FTE', 'FTE_PRC_NO_SERVICES_FOUND');
1744: p_source_header_tab(i).message_data := FND_MESSAGE.GET;
1745: l_fail_group_count := l_fail_group_count + 1;
1746:
1754: print_matched_services(
1755: p_matched_services => l_matched_services,
1756: x_return_status => l_return_status);
1757:
1758: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1759: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'print_failed');
1760: raise FND_API.G_EXC_ERROR;
1761: END IF;
1762:
1765: p_source_header_rec => p_source_header_tab(i),
1766: p_source_line_tab => p_source_line_tab,
1767: x_return_status => l_return_status);
1768:
1769: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
1770:
1771: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'populate_shipment_failed');
1772: raise FND_API.G_EXC_ERROR;
1773:
1811: x_return_status => l_return_status,
1812: x_msg_count => l_msg_count,
1813: x_msg_data => l_msg_data );
1814:
1815: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS and
1816: l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
1817: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'shipment_rating failed');
1818: ELSIF l_lane_rate is null or l_lane_rate_uom is null THEN
1819: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'l_lane_rate null');
1812: x_msg_count => l_msg_count,
1813: x_msg_data => l_msg_data );
1814:
1815: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS and
1816: l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
1817: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'shipment_rating failed');
1818: ELSIF l_lane_rate is null or l_lane_rate_uom is null THEN
1819: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'l_lane_rate null');
1820: ELSIF l_lane_fct_price is null THEN
1836: x_source_line_rates_tab => x_source_line_rates_tab,
1837: x_source_header_rates_tab => x_source_header_rates_tab,
1838: x_return_status => l_return_status);
1839:
1840: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
1841:
1842: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'populate_rate_failed');
1843: raise FND_API.G_EXC_ERROR;
1844:
1851: p_source_header_rates_tab => x_source_header_rates_tab,
1852: x_return_status => l_return_status
1853: );
1854:
1855: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
1856:
1857: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'print_failed');
1858: raise FND_API.G_EXC_ERROR;
1859:
1874: x_source_header_rates_tab=>x_source_header_rates_tab,
1875: x_source_line_rates_tab=>x_source_line_rates_tab,
1876: x_return_status=>l_return_status);
1877:
1878: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
1879: THEN
1880: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
1881: THEN
1882: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'OM_TL_Rate failed');
1876: x_return_status=>l_return_status);
1877:
1878: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
1879: THEN
1880: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
1881: THEN
1882: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'OM_TL_Rate failed');
1883: raise FND_API.G_EXC_ERROR;
1884: END IF;
1896: p_LCSS_flag=>'N',
1897: x_source_header_rates_tab=>x_source_header_rates_tab,
1898: x_source_line_rates_tab=>x_source_line_rates_tab,
1899: x_return_status=>l_return_status);
1900: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
1901: THEN
1902: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
1903: THEN
1904: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'Sort_Source_Rates failed');
1898: x_source_line_rates_tab=>x_source_line_rates_tab,
1899: x_return_status=>l_return_status);
1900: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
1901: THEN
1902: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
1903: THEN
1904: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'Sort_Source_Rates failed');
1905: raise FND_API.G_EXC_ERROR;
1906: END IF;
1910:
1911: IF (l_all_lane_failed) THEN
1912:
1913: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'no rates found');
1914: p_source_header_tab(i).status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1915: FND_MESSAGE.SET_NAME('FTE', 'FTE_PRC_NO_RATES_FOUND');
1916: p_source_header_tab(i).message_data := FND_MESSAGE.GET;
1917: l_fail_group_count := l_fail_group_count + 1;
1918:
1931: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'l_group_count='||l_group_count);
1932: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'l_fail_group_count='||l_fail_group_count);
1933:
1934: IF (l_fail_group_count = l_group_count) THEN
1935: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1936: ELSIF (l_fail_group_count = 0) THEN
1937: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1938: ELSE
1939: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1933:
1934: IF (l_fail_group_count = l_group_count) THEN
1935: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1936: ELSIF (l_fail_group_count = 0) THEN
1937: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1938: ELSE
1939: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1940: FND_MESSAGE.SET_NAME('FTE','FTE_PRC_LOG_FILE_NAME');
1941: FND_MESSAGE.SET_TOKEN('LOGFILE',FTE_FREIGHT_PRICING_UTIL.get_log_file_name());
1935: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1936: ELSIF (l_fail_group_count = 0) THEN
1937: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1938: ELSE
1939: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1940: FND_MESSAGE.SET_NAME('FTE','FTE_PRC_LOG_FILE_NAME');
1941: FND_MESSAGE.SET_TOKEN('LOGFILE',FTE_FREIGHT_PRICING_UTIL.get_log_file_name());
1942: FND_MSG_PUB.ADD;
1943: FND_MESSAGE.SET_NAME('FTE','FTE_PRC_RATE_MUL_OMDEL_SUC_W');
1948: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
1949:
1950: EXCEPTION
1951: WHEN FND_API.G_EXC_ERROR THEN
1952: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1953: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'FND_API.G_EXC_ERROR');
1954: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
1955: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1956: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1952: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1953: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'FND_API.G_EXC_ERROR');
1954: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
1955: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1956: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1957: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
1958: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'FND_API.G_EXC_UNEXPECTED_ERROR');
1959: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
1960: WHEN others THEN
1957: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
1958: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'FND_API.G_EXC_UNEXPECTED_ERROR');
1959: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
1960: WHEN others THEN
1961: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1962: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
1963: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
1964: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
1965: END Get_Services;
2012: -- seach services for each group
2013: -- call mode specific rating api
2014: -- process and merge output
2015:
2016: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2017:
2018: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
2019: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,l_api_name);
2020:
2030: l_destination_id := null;
2031:
2032: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'i = '||i);
2033: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'consolidation_id = '||p_source_header_tab(i).consolidation_id);
2034: p_source_header_tab(i).status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2035:
2036: Search_Services(
2037: p_source_header_rec => p_source_header_tab(i),
2038: p_ignore_TL => 'N',
2039: p_filter_shipmethod => 'N',
2040: x_matched_services => l_matched_services,
2041: x_return_status => l_return_status);
2042:
2043: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) and
2044: (l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
2045:
2046: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'search_services failed');
2047: p_source_header_tab(i).status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2040: x_matched_services => l_matched_services,
2041: x_return_status => l_return_status);
2042:
2043: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) and
2044: (l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
2045:
2046: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'search_services failed');
2047: p_source_header_tab(i).status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2048: FND_MESSAGE.SET_NAME('FTE', 'FTE_PRC_SEARCH_SERVICES_FAIL');
2043: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) and
2044: (l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
2045:
2046: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'search_services failed');
2047: p_source_header_tab(i).status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2048: FND_MESSAGE.SET_NAME('FTE', 'FTE_PRC_SEARCH_SERVICES_FAIL');
2049: p_source_header_tab(i).message_data := FND_MESSAGE.GET;
2050: l_fail_group_count := l_fail_group_count + 1;
2051:
2058: IF (l_matched_services.COUNT < 1) THEN
2059:
2060: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'no services found');
2061: -- no services found
2062: p_source_header_tab(i).status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2063: FND_MESSAGE.SET_NAME('FTE', 'FTE_PRC_NO_SERVICES_FOUND');
2064: p_source_header_tab(i).message_data := FND_MESSAGE.GET;
2065: l_fail_group_count := l_fail_group_count + 1;
2066:
2074: print_matched_services(
2075: p_matched_services => l_matched_services,
2076: x_return_status => l_return_status);
2077:
2078: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2079: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'print_failed');
2080: raise FND_API.G_EXC_ERROR;
2081: END IF;
2082: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'>>>1');
2132: x_schedule_rows=>l_schedule_out_rows,
2133: x_ref_rows=>l_ref_rows,
2134: x_return_status=>l_return_status);
2135:
2136: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
2137: THEN
2138: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
2139: THEN
2140: raise FTE_FREIGHT_PRICING_UTIL.g_tl_veh_for_lane_sched_fail;
2134: x_return_status=>l_return_status);
2135:
2136: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
2137: THEN
2138: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
2139: THEN
2140: raise FTE_FREIGHT_PRICING_UTIL.g_tl_veh_for_lane_sched_fail;
2141: END IF;
2142: END IF;
2164: --Bug 6625274 Passing Origin and Destination id to TL_FREIGHT_ESTIMATE procedure
2165: p_origin_id => l_origin_id,
2166: p_destination_id => l_destination_id);
2167:
2168: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS AND
2169: l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING AND
2170: l_tl_base_rows.COUNT = 0 THEN
2171: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'tl_freight_estimate failed');
2172: ELSE
2165: p_origin_id => l_origin_id,
2166: p_destination_id => l_destination_id);
2167:
2168: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS AND
2169: l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING AND
2170: l_tl_base_rows.COUNT = 0 THEN
2171: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'tl_freight_estimate failed');
2172: ELSE
2173: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'tl_freight_estimate success');
2264: p_source_header_rec => p_source_header_tab(i),
2265: p_source_line_tab => p_source_line_tab,
2266: x_return_status => l_return_status);
2267:
2268: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2269:
2270: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'populate_shipment_failed');
2271: raise FND_API.G_EXC_ERROR;
2272:
2291: x_return_status => l_return_status,
2292: x_msg_count => l_msg_count,
2293: x_msg_data => l_msg_data );
2294:
2295: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS and
2296: l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
2297: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'shipment_rating failed');
2298: ELSIF l_lane_rate is null or l_lane_rate_uom is null THEN
2299: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'l_lane_rate null');
2292: x_msg_count => l_msg_count,
2293: x_msg_data => l_msg_data );
2294:
2295: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS and
2296: l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
2297: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'shipment_rating failed');
2298: ELSIF l_lane_rate is null or l_lane_rate_uom is null THEN
2299: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'l_lane_rate null');
2300: ELSIF l_lane_fct_price is null THEN
2316: x_source_line_rates_tab => x_source_line_rates_tab,
2317: x_source_header_rates_tab => x_source_header_rates_tab,
2318: x_return_status => l_return_status);
2319:
2320: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2321:
2322: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'populate_rate_failed');
2323: raise FND_API.G_EXC_ERROR;
2324:
2331: p_source_header_rates_tab => x_source_header_rates_tab,
2332: x_return_status => l_return_status
2333: );
2334:
2335: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2336:
2337: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'print_failed');
2338: raise FND_API.G_EXC_ERROR;
2339:
2345:
2346: IF (l_all_lane_failed) THEN
2347:
2348: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'no rates found');
2349: p_source_header_tab(i).status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2350: FND_MESSAGE.SET_NAME('FTE', 'FTE_PRC_NO_RATES_FOUND');
2351: p_source_header_tab(i).message_data := FND_MESSAGE.GET;
2352: l_fail_group_count := l_fail_group_count + 1;
2353:
2368: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'l_group_count='||l_group_count);
2369: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'l_fail_group_count='||l_fail_group_count);
2370:
2371: -- IF (l_fail_group_count = l_group_count) THEN
2372: -- x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2373: -- ELSIF (l_fail_group_count = 0) THEN
2374: IF (l_fail_group_count = 0) THEN
2375: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2376: ELSE
2371: -- IF (l_fail_group_count = l_group_count) THEN
2372: -- x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2373: -- ELSIF (l_fail_group_count = 0) THEN
2374: IF (l_fail_group_count = 0) THEN
2375: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2376: ELSE
2377: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2378: FND_MESSAGE.SET_NAME('FTE','FTE_PRC_LOG_FILE_NAME');
2379: FND_MESSAGE.SET_TOKEN('LOGFILE',FTE_FREIGHT_PRICING_UTIL.get_log_file_name());
2373: -- ELSIF (l_fail_group_count = 0) THEN
2374: IF (l_fail_group_count = 0) THEN
2375: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2376: ELSE
2377: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2378: FND_MESSAGE.SET_NAME('FTE','FTE_PRC_LOG_FILE_NAME');
2379: FND_MESSAGE.SET_TOKEN('LOGFILE',FTE_FREIGHT_PRICING_UTIL.get_log_file_name());
2380: FND_MSG_PUB.ADD;
2381: FND_MESSAGE.SET_NAME('FTE','FTE_PRC_RATE_MUL_OMDEL_SUC_W');
2386: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
2387:
2388: EXCEPTION
2389: WHEN FND_API.G_EXC_ERROR THEN
2390: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2391: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'FND_API.G_EXC_ERROR');
2392: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
2393: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2394: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2390: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2391: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'FND_API.G_EXC_ERROR');
2392: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
2393: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2394: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2395: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
2396: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'FND_API.G_EXC_UNEXPECTED_ERROR');
2397: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
2398: WHEN others THEN
2395: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
2396: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'FND_API.G_EXC_UNEXPECTED_ERROR');
2397: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
2398: WHEN others THEN
2399: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2400: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
2401: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
2402: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
2403: END Get_FTE_Estimate_Rates;
2479: THEN
2480: FND_MSG_PUB.initialize;
2481: END IF;
2482:
2483: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2484:
2485: FTE_FREIGHT_PRICING_UTIL.initialize_logging( x_return_status => l_return_status );
2486:
2487: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) and
2483: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2484:
2485: FTE_FREIGHT_PRICING_UTIL.initialize_logging( x_return_status => l_return_status );
2486:
2487: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) and
2488: (l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
2489: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'init_log_failed');
2490: raise FND_API.G_EXC_ERROR;
2491: ELSE
2484:
2485: FTE_FREIGHT_PRICING_UTIL.initialize_logging( x_return_status => l_return_status );
2486:
2487: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) and
2488: (l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
2489: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'init_log_failed');
2490: raise FND_API.G_EXC_ERROR;
2491: ELSE
2492: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'Initialize Logging successful ');
2527: print_source_line_tab(
2528: p_source_line_tab => p_source_line_tab,
2529: x_return_status => l_return_status);
2530:
2531: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2532: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'print_failed');
2533: raise FND_API.G_EXC_ERROR;
2534: END IF;
2535:
2536: print_source_header_tab(
2537: p_source_header_tab => p_source_header_tab,
2538: x_return_status => l_return_status);
2539:
2540: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2541: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'print_failed');
2542: raise FND_API.G_EXC_ERROR;
2543: END IF;
2544:
2568: x_source_line_rates_tab => x_source_line_rates_tab,
2569: x_source_header_rates_tab => x_source_header_rates_tab,
2570: x_return_status => l_return_status);
2571:
2572: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS)
2573: and (l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
2574:
2575: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'get_services_failed');
2576: raise FND_API.G_EXC_ERROR;
2569: x_source_header_rates_tab => x_source_header_rates_tab,
2570: x_return_status => l_return_status);
2571:
2572: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS)
2573: and (l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
2574:
2575: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'get_services_failed');
2576: raise FND_API.G_EXC_ERROR;
2577: ELSE
2601: x_source_line_rates_tab => x_source_line_rates_tab,
2602: x_source_header_rates_tab => x_source_header_rates_tab,
2603: x_return_status => l_return_status);
2604:
2605: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS)
2606: and (l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
2607: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
2608: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2609: ELSE
2602: x_source_header_rates_tab => x_source_header_rates_tab,
2603: x_return_status => l_return_status);
2604:
2605: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS)
2606: and (l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
2607: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
2608: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2609: ELSE
2610: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'Get_FTE_Estimate_Rates failed');
2603: x_return_status => l_return_status);
2604:
2605: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS)
2606: and (l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
2607: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
2608: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2609: ELSE
2610: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'Get_FTE_Estimate_Rates failed');
2611: raise FND_API.G_EXC_ERROR;
2629:
2630: FOR i in p_source_header_tab.FIRST..p_source_header_tab.LAST LOOP
2631:
2632: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'consolidation_id = '||p_source_header_tab(i).consolidation_id);
2633: p_source_header_tab(i).status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2634:
2635: Search_Services(
2636: p_source_header_rec => p_source_header_tab(i),
2637: p_ignore_TL=>'N',
2637: p_ignore_TL=>'N',
2638: x_matched_services => l_matched_services,
2639: x_return_status => l_return_status);
2640:
2641: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) and
2642: (l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
2643:
2644: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'search_services failed');
2645: p_source_header_tab(i).status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2638: x_matched_services => l_matched_services,
2639: x_return_status => l_return_status);
2640:
2641: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) and
2642: (l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
2643:
2644: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'search_services failed');
2645: p_source_header_tab(i).status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2646: FND_MESSAGE.SET_NAME('FTE', 'FTE_PRC_SEARCH_SERVICES_FAIL');
2641: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) and
2642: (l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
2643:
2644: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'search_services failed');
2645: p_source_header_tab(i).status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2646: FND_MESSAGE.SET_NAME('FTE', 'FTE_PRC_SEARCH_SERVICES_FAIL');
2647: p_source_header_tab(i).message_data := FND_MESSAGE.GET;
2648: l_fail_group_count := l_fail_group_count + 1;
2649:
2656: IF (l_matched_services.COUNT < 1) THEN
2657:
2658: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'no services found');
2659: -- no services found
2660: p_source_header_tab(i).status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2661: l_fail_group_count := l_fail_group_count + 1;
2662:
2663: FND_MESSAGE.SET_NAME('FTE','FTE_PRC_RATE_OMDEL_FL');
2664: FND_MESSAGE.SET_TOKEN('CONSOLIDATION_ID',p_source_header_tab(i).consolidation_id);
2670: print_matched_services(
2671: p_matched_services => l_matched_services,
2672: x_return_status => l_return_status);
2673:
2674: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2675: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'print_failed');
2676: raise FND_API.G_EXC_ERROR;
2677: END IF;
2678:
2681: p_source_header_rec => p_source_header_tab(i),
2682: p_source_line_tab => p_source_line_tab,
2683: x_return_status => l_return_status);
2684:
2685: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2686:
2687: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'populate_shipment_failed');
2688: raise FND_API.G_EXC_ERROR;
2689:
2723: x_return_status => l_return_status,
2724: x_msg_count => l_msg_count,
2725: x_msg_data => l_msg_data );
2726:
2727: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) and
2728: (l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
2729:
2730: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'shipment_rating failed');
2731:
2724: x_msg_count => l_msg_count,
2725: x_msg_data => l_msg_data );
2726:
2727: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) and
2728: (l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
2729:
2730: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'shipment_rating failed');
2731:
2732: ELSE -- rating successful
2755: p_to_currency =>l_lowest_lane_rate_uom,
2756: x_to_amount =>l_converted_amount,
2757: x_return_status => l_return_status);
2758:
2759: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2760: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'currency_conversion_failed');
2761: raise FND_API.G_EXC_ERROR;
2762: END IF;
2763:
2794: x_source_header_rates_tab=>l_tl_source_header_rates_tab,
2795: x_source_line_rates_tab=>l_tl_source_line_rates_tab,
2796: x_return_status=>l_return_status);
2797:
2798: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
2799: THEN
2800: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
2801: THEN
2802: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'OM_TL_Rate failed');
2796: x_return_status=>l_return_status);
2797:
2798: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
2799: THEN
2800: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
2801: THEN
2802: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'OM_TL_Rate failed');
2803: raise FND_API.G_EXC_ERROR;
2804: END IF;
2816:
2817: IF (l_all_lane_failed) THEN
2818:
2819: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'no rates found');
2820: p_source_header_tab(i).status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2821: FND_MESSAGE.SET_NAME('FTE', 'FTE_PRC_NO_RATES_FOUND');
2822: p_source_header_tab(i).message_data := FND_MESSAGE.GET;
2823: l_fail_group_count := l_fail_group_count + 1;
2824:
2851: x_source_line_rates_tab => x_source_line_rates_tab,
2852: x_source_header_rates_tab => x_source_header_rates_tab,
2853: x_return_status => l_return_status);
2854:
2855: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2856:
2857: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'populate_rate_failed');
2858: raise FND_API.G_EXC_ERROR;
2859:
2866: x_source_header_rates_tab=>x_source_header_rates_tab,
2867: x_source_line_rates_tab=>x_source_line_rates_tab,
2868: x_return_status=>l_return_status);
2869:
2870: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2871:
2872: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'Append_Rates');
2873: raise FND_API.G_EXC_ERROR;
2874:
2883: p_source_line_rates_tab => x_source_line_rates_tab,
2884: p_source_header_rates_tab => x_source_header_rates_tab,
2885: x_return_status => l_return_status);
2886:
2887: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2888:
2889: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'print_failed');
2890: raise FND_API.G_EXC_ERROR;
2891:
2902: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'l_group_count='||l_group_count);
2903: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'l_fail_group_count='||l_fail_group_count);
2904:
2905: IF (l_fail_group_count = l_group_count) THEN
2906: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2907: FND_MESSAGE.SET_NAME('FTE','FTE_PRC_LOG_FILE_NAME');
2908: FND_MESSAGE.SET_TOKEN('LOGFILE',FTE_FREIGHT_PRICING_UTIL.get_log_file_name());
2909: FND_MSG_PUB.ADD;
2910: FND_MESSAGE.SET_NAME('FTE','FTE_PRC_RATE_MUL_OMDEL_FL');
2909: FND_MSG_PUB.ADD;
2910: FND_MESSAGE.SET_NAME('FTE','FTE_PRC_RATE_MUL_OMDEL_FL');
2911: FND_MSG_PUB.ADD;
2912: ELSIF (l_fail_group_count = 0) THEN
2913: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2914: -- Standard check of p_commit.
2915: --
2916: IF FND_API.To_Boolean( p_commit )
2917: THEN
2917: THEN
2918: COMMIT WORK;
2919: END IF;
2920: ELSE
2921: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2922: FND_MESSAGE.SET_NAME('FTE','FTE_PRC_LOG_FILE_NAME');
2923: FND_MESSAGE.SET_TOKEN('LOGFILE',FTE_FREIGHT_PRICING_UTIL.get_log_file_name());
2924: FND_MSG_PUB.ADD;
2925: FND_MESSAGE.SET_NAME('FTE','FTE_PRC_RATE_MUL_OMDEL_SUC_W');
2942: p_source_header_rates_tab => x_source_header_rates_tab,
2943: x_return_status => l_return_status
2944: );
2945:
2946: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2947:
2948: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'print_failed');
2949: raise FND_API.G_EXC_ERROR;
2950:
2953: print_source_header_tab(
2954: p_source_header_tab => p_source_header_tab,
2955: x_return_status => l_return_status);
2956:
2957: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2958: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'print_failed');
2959: raise FND_API.G_EXC_ERROR;
2960: END IF;
2961:
2982: FND_MSG_PUB.ADD;
2983: FND_MESSAGE.SET_NAME('FTE','FTE_PRC_RATE_MUL_OMDEL_FL');
2984: FND_MSG_PUB.ADD;
2985: ROLLBACK TO GET_FREIGHT_COSTS;
2986: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2987: FND_MSG_PUB.Count_And_Get
2988: (
2989: p_count => x_msg_count,
2990: p_data => x_msg_data,
2998: FND_MESSAGE.SET_TOKEN('LOGFILE',FTE_FREIGHT_PRICING_UTIL.get_log_file_name());
2999: FND_MSG_PUB.ADD;
3000: FND_MESSAGE.SET_NAME('FTE','FTE_PRC_RATE_MUL_OMDEL_FL');
3001: FND_MSG_PUB.ADD;
3002: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3003: FND_MSG_PUB.Count_And_Get
3004: (
3005: p_count => x_msg_count,
3006: p_data => x_msg_data,
3017: FND_MSG_PUB.ADD;
3018: FND_MESSAGE.SET_NAME('FTE','FTE_PRC_RATE_MUL_OMDEL_FL');
3019: FND_MSG_PUB.ADD;
3020: ROLLBACK TO GET_FREIGHT_COSTS;
3021: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3022: FND_MSG_PUB.Count_And_Get
3023: (
3024: p_count => x_msg_count,
3025: p_data => x_msg_data,