[Home] [Help]
326:
327: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
328:
329: BEGIN
330: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
331: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
332: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'MDC_Get_child_fraction','start');
333:
334:
404: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'MDC_Get_child_fraction');
405:
406: EXCEPTION
407: WHEN FTE_FREIGHT_PRICING_UTIL.g_tl_weight_uom_conv_fail THEN
408: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
409: FTE_FREIGHT_PRICING_UTIL.set_exception('MDC_Get_child_fraction',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_tl_weight_uom_conv_fail');
410: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'MDC_Get_child_fraction');
411: WHEN others THEN
412: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
408: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
409: FTE_FREIGHT_PRICING_UTIL.set_exception('MDC_Get_child_fraction',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_tl_weight_uom_conv_fail');
410: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'MDC_Get_child_fraction');
411: WHEN others THEN
412: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
413: FTE_FREIGHT_PRICING_UTIL.set_exception('MDC_Get_child_fraction',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
414: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
415: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'MDC_Get_child_fraction');
416:
426: i NUMBER;
427: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
428:
429: BEGIN
430: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
431: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
432: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'MDC_Get_LPN_Cost_rec','start');
433:
434: i:=p_freight_cost_main_tab.FIRST;
463:
464: EXCEPTION
465:
466: WHEN others THEN
467: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
468: FTE_FREIGHT_PRICING_UTIL.set_exception('MDC_Get_LPN_Cost_rec',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
469: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
470: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'MDC_Get_LPN_Cost_rec');
471:
502: l_return_status VARCHAR2(1);
503: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
504:
505: BEGIN
506: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
507: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
508: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'MDC_Alloc_From_consol_LPN','start');
509:
510:
516: p_freight_cost_temp_tab=>x_freight_cost_temp_price,
517: x_ref=>l_price_ref,
518: x_return_status=>l_return_status);
519:
520: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
521: THEN
522: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
523: THEN
524: raise FTE_FREIGHT_PRICING_UTIL.g_MDC_Get_LPN_cost_rec_fail;
518: x_return_status=>l_return_status);
519:
520: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
521: THEN
522: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
523: THEN
524: raise FTE_FREIGHT_PRICING_UTIL.g_MDC_Get_LPN_cost_rec_fail;
525: END IF;
526: END IF;
531: p_consol_LPN_children=>p_consol_LPN_children,--Indexed by child detail id, value of parent consol detail id
532: x_fraction=>l_fractions,
533: x_return_status=>l_return_status);
534:
535: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
536: THEN
537: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
538: THEN
539: raise FTE_FREIGHT_PRICING_UTIL.g_MDC_get_chld_fract_fail;
533: x_return_status=>l_return_status);
534:
535: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
536: THEN
537: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
538: THEN
539: raise FTE_FREIGHT_PRICING_UTIL.g_MDC_get_chld_fract_fail;
540: END IF;
541: END IF;
703: p_charge_subtype_code => 'SUMMARY',
704: x_freight_cost_type_id => l_freight_cost_type_id,
705: x_return_status => l_return_status);
706:
707: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
708: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
709: raise FTE_FREIGHT_PRICING_UTIL.g_get_fc_type_failed;
710: END IF;
711: ELSE
704: x_freight_cost_type_id => l_freight_cost_type_id,
705: x_return_status => l_return_status);
706:
707: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
708: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
709: raise FTE_FREIGHT_PRICING_UTIL.g_get_fc_type_failed;
710: END IF;
711: ELSE
712: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_INF,'fc type id : '||l_freight_cost_type_id);
777:
778: EXCEPTION
779:
780: WHEN FTE_FREIGHT_PRICING_UTIL.g_MDC_Get_LPN_cost_rec_fail THEN
781: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
782: FTE_FREIGHT_PRICING_UTIL.set_exception('MDC_Alloc_From_consol_LPN',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_MDC_Get_LPN_cost_rec_fail');
783: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'MDC_Alloc_From_consol_LPN');
784:
785:
783: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'MDC_Alloc_From_consol_LPN');
784:
785:
786: WHEN FTE_FREIGHT_PRICING_UTIL.g_MDC_get_chld_fract_fail THEN
787: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
788: FTE_FREIGHT_PRICING_UTIL.set_exception('MDC_Alloc_From_consol_LPN',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_MDC_get_chld_fract_fail');
789: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'MDC_Alloc_From_consol_LPN');
790:
791:
789: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'MDC_Alloc_From_consol_LPN');
790:
791:
792: WHEN FTE_FREIGHT_PRICING_UTIL.g_get_fc_type_failed THEN
793: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
794: FTE_FREIGHT_PRICING_UTIL.set_exception('MDC_Alloc_From_consol_LPN',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_get_fc_type_failed');
795: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'MDC_Alloc_From_consol_LPN');
796: WHEN others THEN
797: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
793: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
794: FTE_FREIGHT_PRICING_UTIL.set_exception('MDC_Alloc_From_consol_LPN',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_get_fc_type_failed');
795: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'MDC_Alloc_From_consol_LPN');
796: WHEN others THEN
797: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
798: FTE_FREIGHT_PRICING_UTIL.set_exception('MDC_Alloc_From_consol_LPN',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
799: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
800: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'MDC_Alloc_From_consol_LPN');
801:
821: l_index NUMBER;
822: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
823:
824: BEGIN
825: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
826: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
827: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'Create_Parent_Dleg_Summaries','start');
828:
829:
966: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Create_Parent_Dleg_Summaries');
967:
968: EXCEPTION
969: WHEN others THEN
970: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
971: FTE_FREIGHT_PRICING_UTIL.set_exception('Create_Parent_Dleg_Summaries',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
972: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
973: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Create_Parent_Dleg_Summaries');
974:
994: l_return_status VARCHAR2(1);
995: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
996:
997: BEGIN
998: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
999: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
1000: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'Create_Child_Dleg_Summaries','start');
1001:
1002:
1082: p_charge_subtype_code => 'SUMMARY',
1083: x_freight_cost_type_id => l_freight_cost_type_id,
1084: x_return_status => l_return_status);
1085:
1086: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
1087: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
1088: raise FTE_FREIGHT_PRICING_UTIL.g_get_fc_type_failed;
1089: END IF;
1090: ELSE
1083: x_freight_cost_type_id => l_freight_cost_type_id,
1084: x_return_status => l_return_status);
1085:
1086: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
1087: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
1088: raise FTE_FREIGHT_PRICING_UTIL.g_get_fc_type_failed;
1089: END IF;
1090: ELSE
1091: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_INF,'fc type id : '||l_freight_cost_type_id);
1167: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Create_Child_Dleg_Summaries');
1168:
1169: EXCEPTION
1170: WHEN FTE_FREIGHT_PRICING_UTIL.g_get_fc_type_failed THEN
1171: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1172: FTE_FREIGHT_PRICING_UTIL.set_exception('Create_Child_Dleg_Summaries',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_get_fc_type_failed');
1173: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Create_Child_Dleg_Summaries');
1174: WHEN others THEN
1175: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1171: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1172: FTE_FREIGHT_PRICING_UTIL.set_exception('Create_Child_Dleg_Summaries',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_get_fc_type_failed');
1173: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Create_Child_Dleg_Summaries');
1174: WHEN others THEN
1175: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1176: FTE_FREIGHT_PRICING_UTIL.set_exception('Create_Child_Dleg_Summaries',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
1177: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
1178: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Create_Child_Dleg_Summaries');
1179:
1189: i NUMBER;
1190: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
1191:
1192: BEGIN
1193: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1194: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
1195: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'Populate_Dleg_Id','start');
1196:
1197:
1213: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Populate_Dleg_Id');
1214:
1215: EXCEPTION
1216: WHEN others THEN
1217: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1218: FTE_FREIGHT_PRICING_UTIL.set_exception('Populate_Dleg_Id',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
1219: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
1220: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Populate_Dleg_Id');
1221:
1241:
1242: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
1243:
1244: BEGIN
1245: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1246: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
1247: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'Create_LPN_Summary','start');
1248:
1249:
1306: p_charge_subtype_code => 'SUMMARY',
1307: x_freight_cost_type_id => l_freight_cost_type_id,
1308: x_return_status => l_return_status);
1309:
1310: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
1311: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
1312: raise FTE_FREIGHT_PRICING_UTIL.g_get_fc_type_failed;
1313: END IF;
1314: ELSE
1307: x_freight_cost_type_id => l_freight_cost_type_id,
1308: x_return_status => l_return_status);
1309:
1310: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
1311: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
1312: raise FTE_FREIGHT_PRICING_UTIL.g_get_fc_type_failed;
1313: END IF;
1314: ELSE
1315: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_INF,'fc type id : '||l_freight_cost_type_id);
1370: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Create_LPN_Summary');
1371:
1372: EXCEPTION
1373: WHEN FTE_FREIGHT_PRICING_UTIL.g_get_fc_type_failed THEN
1374: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1375: FTE_FREIGHT_PRICING_UTIL.set_exception('Create_LPN_Summary',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_get_fc_type_failed');
1376: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Create_LPN_Summary');
1377: WHEN others THEN
1378: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1374: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1375: FTE_FREIGHT_PRICING_UTIL.set_exception('Create_LPN_Summary',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_get_fc_type_failed');
1376: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Create_LPN_Summary');
1377: WHEN others THEN
1378: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1379: FTE_FREIGHT_PRICING_UTIL.set_exception('Create_LPN_Summary',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
1380: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
1381: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Create_LPN_Summary');
1382:
1408:
1409: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
1410:
1411: BEGIN
1412: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1413: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
1414: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'MDC_Check_Rated','start');
1415:
1416:
1552: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'MDC_Check_Rated');
1553:
1554: EXCEPTION
1555: WHEN others THEN
1556: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1557: FTE_FREIGHT_PRICING_UTIL.set_exception('MDC_Check_Rated',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
1558: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
1559: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'MDC_Check_Rated');
1560:
1589:
1590: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
1591:
1592: BEGIN
1593: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1594: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
1595: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'Handle_MDC','start');
1596:
1597:
1671: p_delivery_to_dleg=>l_delivery_to_dleg,
1672: x_freight_cost_temp=>x_freight_cost_temp_price,
1673: x_return_status=>l_return_status);
1674:
1675: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
1676: THEN
1677: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
1678: THEN
1679: raise FTE_FREIGHT_PRICING_UTIL.g_MDC_populate_dleg_id;
1673: x_return_status=>l_return_status);
1674:
1675: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
1676: THEN
1677: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
1678: THEN
1679: raise FTE_FREIGHT_PRICING_UTIL.g_MDC_populate_dleg_id;
1680: END IF;
1681: END IF;
1686: p_delivery_to_dleg=>l_delivery_to_dleg,
1687: x_freight_cost_temp=>x_freight_cost_temp_charge,
1688: x_return_status=>l_return_status);
1689:
1690: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
1691: THEN
1692: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
1693: THEN
1694: raise FTE_FREIGHT_PRICING_UTIL.g_MDC_populate_dleg_id;
1688: x_return_status=>l_return_status);
1689:
1690: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
1691: THEN
1692: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
1693: THEN
1694: raise FTE_FREIGHT_PRICING_UTIL.g_MDC_populate_dleg_id;
1695: END IF;
1696: END IF;
1711: x_child_dlegs_rated=>l_child_dlegs_rated,
1712: x_parent_dlegs_rated=>l_parent_dlegs_rated,
1713: x_return_status=>l_return_status);
1714:
1715: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
1716: THEN
1717: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
1718: THEN
1719: raise FTE_FREIGHT_PRICING_UTIL.g_MDC_check_rated;
1713: x_return_status=>l_return_status);
1714:
1715: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
1716: THEN
1717: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
1718: THEN
1719: raise FTE_FREIGHT_PRICING_UTIL.g_MDC_check_rated;
1720: END IF;
1721: END IF;
1737: x_freight_cost_main_charge=>x_freight_cost_main_charge,
1738: x_freight_cost_temp_charge=>x_freight_cost_temp_charge,
1739: x_return_status=>l_return_status);
1740:
1741: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
1742: THEN
1743: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
1744: THEN
1745: raise FTE_FREIGHT_PRICING_UTIL.g_MDC_alloc_from_consol_LPN;
1739: x_return_status=>l_return_status);
1740:
1741: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
1742: THEN
1743: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
1744: THEN
1745: raise FTE_FREIGHT_PRICING_UTIL.g_MDC_alloc_from_consol_LPN;
1746: END IF;
1747: END IF;
1759: x_freight_cost_main_charge=>x_freight_cost_main_charge,
1760: x_freight_cost_temp_charge=>x_freight_cost_temp_charge,
1761: x_return_status=>l_return_status);
1762:
1763: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
1764: THEN
1765: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
1766: THEN
1767: raise FTE_FREIGHT_PRICING_UTIL.g_MDC_cre_LPN_summ;
1761: x_return_status=>l_return_status);
1762:
1763: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
1764: THEN
1765: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
1766: THEN
1767: raise FTE_FREIGHT_PRICING_UTIL.g_MDC_cre_LPN_summ;
1768: END IF;
1769: END IF;
1788: x_freight_cost_temp_price=>x_freight_cost_temp_price,
1789: x_fc_main_update_rows=>x_fc_main_update_rows,
1790: x_return_status=>l_return_status);
1791:
1792: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
1793: THEN
1794: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
1795: THEN
1796: raise FTE_FREIGHT_PRICING_UTIL.g_MDC_cre_child_dleg_summ;
1790: x_return_status=>l_return_status);
1791:
1792: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
1793: THEN
1794: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
1795: THEN
1796: raise FTE_FREIGHT_PRICING_UTIL.g_MDC_cre_child_dleg_summ;
1797: END IF;
1798: END IF;
1816: x_freight_cost_main_price=>x_fc_main_update_rows,
1817: x_freight_cost_temp_price=>x_freight_cost_temp_price,
1818: x_return_status=>l_return_status);
1819:
1820: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
1821: THEN
1822: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
1823: THEN
1824: raise FTE_FREIGHT_PRICING_UTIL.g_MDC_cre_parent_dleg_summ;
1818: x_return_status=>l_return_status);
1819:
1820: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
1821: THEN
1822: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
1823: THEN
1824: raise FTE_FREIGHT_PRICING_UTIL.g_MDC_cre_parent_dleg_summ;
1825: END IF;
1826: END IF;
1841: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Handle_MDC');
1842:
1843: EXCEPTION
1844: WHEN FTE_FREIGHT_PRICING_UTIL.g_MDC_populate_dleg_id THEN
1845: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1846: FTE_FREIGHT_PRICING_UTIL.set_exception('Handle_MDC',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_MDC_populate_dleg_id');
1847: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Handle_MDC');
1848:
1849: WHEN FTE_FREIGHT_PRICING_UTIL.g_MDC_check_rated THEN
1846: FTE_FREIGHT_PRICING_UTIL.set_exception('Handle_MDC',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_MDC_populate_dleg_id');
1847: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Handle_MDC');
1848:
1849: WHEN FTE_FREIGHT_PRICING_UTIL.g_MDC_check_rated THEN
1850: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1851: FTE_FREIGHT_PRICING_UTIL.set_exception('Handle_MDC',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_MDC_check_rated');
1852: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Handle_MDC');
1853:
1854: WHEN FTE_FREIGHT_PRICING_UTIL.g_MDC_alloc_from_consol_LPN THEN
1851: FTE_FREIGHT_PRICING_UTIL.set_exception('Handle_MDC',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_MDC_check_rated');
1852: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Handle_MDC');
1853:
1854: WHEN FTE_FREIGHT_PRICING_UTIL.g_MDC_alloc_from_consol_LPN THEN
1855: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1856: FTE_FREIGHT_PRICING_UTIL.set_exception('Handle_MDC',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_MDC_alloc_from_consol_LPN');
1857: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Handle_MDC');
1858:
1859: WHEN FTE_FREIGHT_PRICING_UTIL.g_MDC_cre_LPN_summ THEN
1856: FTE_FREIGHT_PRICING_UTIL.set_exception('Handle_MDC',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_MDC_alloc_from_consol_LPN');
1857: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Handle_MDC');
1858:
1859: WHEN FTE_FREIGHT_PRICING_UTIL.g_MDC_cre_LPN_summ THEN
1860: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1861: FTE_FREIGHT_PRICING_UTIL.set_exception('Handle_MDC',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_MDC_cre_LPN_summ');
1862: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Handle_MDC');
1863:
1864: WHEN FTE_FREIGHT_PRICING_UTIL.g_MDC_cre_parent_dleg_summ THEN
1861: FTE_FREIGHT_PRICING_UTIL.set_exception('Handle_MDC',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_MDC_cre_LPN_summ');
1862: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Handle_MDC');
1863:
1864: WHEN FTE_FREIGHT_PRICING_UTIL.g_MDC_cre_parent_dleg_summ THEN
1865: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1866: FTE_FREIGHT_PRICING_UTIL.set_exception('Handle_MDC',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_MDC_cre_parent_dleg_summ');
1867: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Handle_MDC');
1868:
1869: WHEN FTE_FREIGHT_PRICING_UTIL.g_MDC_cre_child_dleg_summ THEN
1866: FTE_FREIGHT_PRICING_UTIL.set_exception('Handle_MDC',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_MDC_cre_parent_dleg_summ');
1867: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Handle_MDC');
1868:
1869: WHEN FTE_FREIGHT_PRICING_UTIL.g_MDC_cre_child_dleg_summ THEN
1870: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1871: FTE_FREIGHT_PRICING_UTIL.set_exception('Handle_MDC',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_MDC_cre_child_dleg_summ');
1872: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Handle_MDC');
1873:
1874: WHEN others THEN
1871: FTE_FREIGHT_PRICING_UTIL.set_exception('Handle_MDC',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_MDC_cre_child_dleg_summ');
1872: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Handle_MDC');
1873:
1874: WHEN others THEN
1875: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1876: FTE_FREIGHT_PRICING_UTIL.set_exception('Handle_MDC',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
1877: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
1878: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Handle_MDC');
1879:
1954: RETURN l_category_id;
1955:
1956: EXCEPTION
1957: WHEN others THEN
1958: --x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1959: FTE_FREIGHT_PRICING_UTIL.set_exception('get_default_category',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
1960: --FTE_FREIGHT_PRICING_UTIL.print_debug('Unexpected Error : '||SQLCODE||' : '||SQLERRM);
1961: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
1962: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'get_default_category');
1994: l_api_name CONSTANT VARCHAR2(30) := 'VALIDATE_DELIVERY';
1995:
1996: BEGIN
1997:
1998: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1999:
2000: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
2001: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,l_api_name,'start');
2002:
2022: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
2023:
2024: EXCEPTION
2025: WHEN others THEN
2026: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2027: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
2028: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
2029: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
2030:
2112: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'FND_API.G_EXC_ERROR');
2113: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
2114: --
2115: WHEN OTHERS THEN
2116: WSH_UTIL_CORE.DEFAULT_HANDLER(G_PKG_NAME||'.'||l_api_name);
2117: x_return_code := G_RC_ERROR;
2118: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
2119: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
2120: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
2215: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'FND_API.G_EXC_ERROR');
2216: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
2217: --
2218: WHEN OTHERS THEN
2219: WSH_UTIL_CORE.DEFAULT_HANDLER(G_PKG_NAME||'.'||l_api_name);
2220: x_return_code := G_RC_ERROR;
2221: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
2222: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
2223: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
2237: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
2238:
2239: BEGIN
2240:
2241: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2242:
2243: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
2244: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'Create_Freight_Cost_Temp','start');
2245:
2361:
2362: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Create_Freight_Cost_Temp');
2363: EXCEPTION
2364: WHEN others THEN
2365: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2366: FTE_FREIGHT_PRICING_UTIL.set_exception('Create_Freight_Cost_Temp',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
2367: --FTE_FREIGHT_PRICING_UTIL.print_debug('Unexpected Error : '||SQLCODE||' : '||SQLERRM);
2368: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
2369: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Create_Freight_Cost_Temp');
2411: l_basis_meaning VARCHAR2(30);
2412:
2413: BEGIN
2414:
2415: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2416: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
2417: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'get_rolledup_amount','start');
2418: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'Container : '||p_container_id);
2419:
2565: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'get_rolledup_amount');
2566:
2567: EXCEPTION
2568: WHEN others THEN
2569: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2570: FTE_FREIGHT_PRICING_UTIL.set_exception('get_rolledup_amount',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
2571: --FTE_FREIGHT_PRICING_UTIL.print_debug('Unexpected Error : '||SQLCODE||' : '||SQLERRM);
2572: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
2573: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'get_rolledup_amount');
2601: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
2602:
2603: BEGIN
2604:
2605: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2606: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
2607: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'get_fc_type_id','start');
2608:
2609: IF p_charge_subtype_code IS NOT NULL THEN
2631: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'get_fc_type_id');
2632:
2633: EXCEPTION
2634: WHEN FTE_FREIGHT_PRICING_UTIL.g_invalid_fc_type THEN
2635: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2636: FTE_FREIGHT_PRICING_UTIL.set_exception('get_fc_type_id',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_invalid_fc_type');
2637: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'get_fc_type_id');
2638: WHEN others THEN
2639: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2635: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2636: FTE_FREIGHT_PRICING_UTIL.set_exception('get_fc_type_id',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_invalid_fc_type');
2637: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'get_fc_type_id');
2638: WHEN others THEN
2639: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2640: FTE_FREIGHT_PRICING_UTIL.set_exception('get_fc_type_id',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
2641: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
2642: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'get_fc_type_id');
2643:
2689: l_discount_total NUMBER:=0;
2690: l_discount_cont NUMBER:=0;
2691: l_container_quantity NUMBER:=0;
2692: l_return_status VARCHAR2(1);
2693: --l_container_summary WSH_UTIL_CORE.id_tab_type;
2694: l_container_summary container_sum_tab_type;
2695: l_main_price_index NUMBER:=x_freight_cost_main_price.COUNT;
2696: l_main_charge_index NUMBER:=x_freight_cost_main_charge.COUNT;
2697: l_temp_price_index NUMBER:=x_freight_cost_temp_price.COUNT;
2709: l_billed_weight NUMBER;
2710:
2711: BEGIN
2712:
2713: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2714: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
2715: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'prepare_fc_records','start');
2716:
2717: l_fte_total_amount := 0;
2854: x_freight_cost_temp_charge => x_freight_cost_temp_charge,
2855: x_quantity => l_category_sum, -- Returns in input uom
2856: x_return_status => l_return_status);
2857:
2858: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2859: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
2860: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Charge get_rolled_up');
2861: raise FTE_FREIGHT_PRICING_UTIL.g_proration_failed;
2862: END IF;
2855: x_quantity => l_category_sum, -- Returns in input uom
2856: x_return_status => l_return_status);
2857:
2858: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2859: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
2860: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Charge get_rolled_up');
2861: raise FTE_FREIGHT_PRICING_UTIL.g_proration_failed;
2862: END IF;
2863: ELSE
2934: x_freight_cost_temp_charge => x_freight_cost_temp_charge,
2935: x_quantity => l_basis_sum, -- Returns in input uom
2936: x_return_status => l_return_status);
2937:
2938: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2939: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
2940: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Charge get_rolled_up');
2941: raise FTE_FREIGHT_PRICING_UTIL.g_proration_failed;
2942: END IF;
2935: x_quantity => l_basis_sum, -- Returns in input uom
2936: x_return_status => l_return_status);
2937:
2938: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2939: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
2940: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Charge get_rolled_up');
2941: raise FTE_FREIGHT_PRICING_UTIL.g_proration_failed;
2942: END IF;
2943: ELSE
3072: x_freight_cost_type_id => l_freight_cost_type_id,
3073: x_return_status => l_return_status);
3074: END IF;
3075:
3076: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
3077: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
3078: raise FTE_FREIGHT_PRICING_UTIL.g_get_fc_type_failed;
3079: END IF;
3080: ELSE
3073: x_return_status => l_return_status);
3074: END IF;
3075:
3076: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
3077: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
3078: raise FTE_FREIGHT_PRICING_UTIL.g_get_fc_type_failed;
3079: END IF;
3080: ELSE
3081: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_INF,'fc type id : '||l_freight_cost_type_id);
3281: x_return_status => l_return_status);
3282:
3283: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_INF,' l_category_sum ='||l_category_sum);
3284:
3285: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
3286: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
3287: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Price get_rolled_up');
3288: raise FTE_FREIGHT_PRICING_UTIL.g_proration_failed;
3289: END IF;
3282:
3283: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_INF,' l_category_sum ='||l_category_sum);
3284:
3285: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
3286: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
3287: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Price get_rolled_up');
3288: raise FTE_FREIGHT_PRICING_UTIL.g_proration_failed;
3289: END IF;
3290: ELSE
3355: x_return_status => l_return_status);
3356:
3357: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_INF,' l_basis_sum ='||l_basis_sum);
3358:
3359: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
3360: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
3361: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Price get_rolled_up');
3362: raise FTE_FREIGHT_PRICING_UTIL.g_proration_failed;
3363: END IF;
3356:
3357: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_INF,' l_basis_sum ='||l_basis_sum);
3358:
3359: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
3360: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
3361: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Price get_rolled_up');
3362: raise FTE_FREIGHT_PRICING_UTIL.g_proration_failed;
3363: END IF;
3364: ELSE
3486: p_charge_subtype_code => 'PRICE',
3487: x_freight_cost_type_id => l_freight_cost_type_id,
3488: x_return_status => l_return_status);
3489:
3490: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
3491: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
3492: raise FTE_FREIGHT_PRICING_UTIL.g_get_fc_type_failed;
3493: END IF;
3494: ELSE
3487: x_freight_cost_type_id => l_freight_cost_type_id,
3488: x_return_status => l_return_status);
3489:
3490: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
3491: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
3492: raise FTE_FREIGHT_PRICING_UTIL.g_get_fc_type_failed;
3493: END IF;
3494: ELSE
3495: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_INF,'fc type id : '||l_freight_cost_type_id);
3623: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'prepare_fc_records');
3624:
3625: EXCEPTION
3626: WHEN FTE_FREIGHT_PRICING_UTIL.g_proration_failed THEN
3627: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3628: FTE_FREIGHT_PRICING_UTIL.set_exception('prepare_fc_records',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_proration_failed');
3629: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'prepare_fc_records failed ');
3630: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'prepare_fc_records');
3631: WHEN FTE_FREIGHT_PRICING_UTIL.g_get_fc_type_failed THEN
3628: FTE_FREIGHT_PRICING_UTIL.set_exception('prepare_fc_records',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_proration_failed');
3629: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'prepare_fc_records failed ');
3630: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'prepare_fc_records');
3631: WHEN FTE_FREIGHT_PRICING_UTIL.g_get_fc_type_failed THEN
3632: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3633: FTE_FREIGHT_PRICING_UTIL.set_exception('prepare_fc_records',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_get_fc_type_failed');
3634: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'prepare_fc_records');
3635: WHEN others THEN
3636: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3632: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3633: FTE_FREIGHT_PRICING_UTIL.set_exception('prepare_fc_records',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_get_fc_type_failed');
3634: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'prepare_fc_records');
3635: WHEN others THEN
3636: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3637: FTE_FREIGHT_PRICING_UTIL.set_exception('prepare_fc_records',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
3638: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
3639: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'prepare_fc_records');
3640: END prepare_fc_records;
3659: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_INF;
3660:
3661: BEGIN
3662:
3663: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3664: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
3665: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'resolve_pricing_objective','start');
3666:
3667: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_INF,'QP Output line row count : '||x_qp_output_line_rows.COUNT);
3712: x_qp_output_line_rows => x_qp_output_line_rows ,
3713: x_qp_output_detail_rows => x_qp_output_line_details,
3714: x_return_status => l_return_status);
3715:
3716: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
3717: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
3718: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Highest current higher delete_lines ');
3719: raise FTE_FREIGHT_PRICING_UTIL.g_delete_qpline_failed;
3720: END IF;
3713: x_qp_output_detail_rows => x_qp_output_line_details,
3714: x_return_status => l_return_status);
3715:
3716: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
3717: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
3718: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Highest current higher delete_lines ');
3719: raise FTE_FREIGHT_PRICING_UTIL.g_delete_qpline_failed;
3720: END IF;
3721: ELSE
3734: x_qp_output_line_rows => x_qp_output_line_rows ,
3735: x_qp_output_detail_rows => x_qp_output_line_details,
3736: x_return_status => l_return_status);
3737:
3738: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
3739: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
3740: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Highest current not higher delete_lines');
3741: raise FTE_FREIGHT_PRICING_UTIL.g_delete_qpline_failed;
3742: END IF;
3735: x_qp_output_detail_rows => x_qp_output_line_details,
3736: x_return_status => l_return_status);
3737:
3738: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
3739: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
3740: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Highest current not higher delete_lines');
3741: raise FTE_FREIGHT_PRICING_UTIL.g_delete_qpline_failed;
3742: END IF;
3743: ELSE
3761: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'resolve_pricing_objective');
3762:
3763: EXCEPTION
3764: WHEN FTE_FREIGHT_PRICING_UTIL.g_delete_qpline_failed THEN
3765: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3766: FTE_FREIGHT_PRICING_UTIL.set_exception('resolve_pricing_objective',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_delete_qpline_failed');
3767: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'delete_qpline_failed failed ');
3768: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'resolve_pricing_objective');
3769: WHEN others THEN
3766: FTE_FREIGHT_PRICING_UTIL.set_exception('resolve_pricing_objective',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_delete_qpline_failed');
3767: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'delete_qpline_failed failed ');
3768: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'resolve_pricing_objective');
3769: WHEN others THEN
3770: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3771: FTE_FREIGHT_PRICING_UTIL.set_exception('resolve_pricing_objective',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
3772: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
3773: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'resolve_pricing_objective');
3774:
3802:
3803: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
3804:
3805: BEGIN
3806: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3807: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
3808: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'add_other_container_summary','start');
3809:
3810: IF p_save_flag = 'M' THEN
3974: p_charge_subtype_code => 'SUMMARY',
3975: x_freight_cost_type_id => l_freight_cost_type_id,
3976: x_return_status => l_return_status);
3977:
3978: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
3979: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
3980: raise FTE_FREIGHT_PRICING_UTIL.g_get_fc_type_failed;
3981: END IF;
3982: ELSE
3975: x_freight_cost_type_id => l_freight_cost_type_id,
3976: x_return_status => l_return_status);
3977:
3978: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
3979: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
3980: raise FTE_FREIGHT_PRICING_UTIL.g_get_fc_type_failed;
3981: END IF;
3982: ELSE
3983: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_INF,'fc type id : '||l_freight_cost_type_id);
4076: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'add_other_container_summary');
4077:
4078: EXCEPTION
4079: WHEN FTE_FREIGHT_PRICING_UTIL.g_get_fc_type_failed THEN
4080: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4081: FTE_FREIGHT_PRICING_UTIL.set_exception('add_other_container_summary',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_get_fc_type_failed');
4082: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'add_other_container_summary');
4083: WHEN others THEN
4084: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4080: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4081: FTE_FREIGHT_PRICING_UTIL.set_exception('add_other_container_summary',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_get_fc_type_failed');
4082: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'add_other_container_summary');
4083: WHEN others THEN
4084: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4085: FTE_FREIGHT_PRICING_UTIL.set_exception('add_other_container_summary',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
4086: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
4087: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'add_other_container_summary');
4088: END add_other_container_summary;
4155:
4156:
4157: BEGIN
4158:
4159: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4160: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
4161: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'process_qp_output','start');
4162:
4163: -- This API will result in one qp output line per instance
4209: x_freight_cost_main_charge => x_freight_cost_main_charge,
4210: x_freight_cost_temp_charge => x_freight_cost_temp_charge,
4211: x_return_status => l_return_status);
4212:
4213: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
4214: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
4215: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Loose Item ');
4216: raise FTE_FREIGHT_PRICING_UTIL.g_prepare_fc_rec_failed;
4217: END IF;
4210: x_freight_cost_temp_charge => x_freight_cost_temp_charge,
4211: x_return_status => l_return_status);
4212:
4213: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
4214: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
4215: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Loose Item ');
4216: raise FTE_FREIGHT_PRICING_UTIL.g_prepare_fc_rec_failed;
4217: END IF;
4218: ELSE
4269: x_freight_cost_main_charge => x_freight_cost_main_charge,
4270: x_freight_cost_temp_charge => x_freight_cost_temp_charge,
4271: x_return_status => l_return_status);
4272:
4273: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
4274: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
4275: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Container '||p_pattern_rows(k).content_id);
4276: raise FTE_FREIGHT_PRICING_UTIL.g_prepare_fc_rec_failed;
4277: END IF;
4270: x_freight_cost_temp_charge => x_freight_cost_temp_charge,
4271: x_return_status => l_return_status);
4272:
4273: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
4274: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
4275: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Container '||p_pattern_rows(k).content_id);
4276: raise FTE_FREIGHT_PRICING_UTIL.g_prepare_fc_rec_failed;
4277: END IF;
4278: ELSE
4304: p_charge_subtype_code => 'SUMMARY',
4305: x_freight_cost_type_id => l_freight_cost_type_id,
4306: x_return_status => l_return_status);
4307:
4308: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
4309: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
4310: raise FTE_FREIGHT_PRICING_UTIL.g_get_fc_type_failed;
4311: END IF;
4312: ELSE
4305: x_freight_cost_type_id => l_freight_cost_type_id,
4306: x_return_status => l_return_status);
4307:
4308: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
4309: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
4310: raise FTE_FREIGHT_PRICING_UTIL.g_get_fc_type_failed;
4311: END IF;
4312: ELSE
4313: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_INF,'fc type id : '||l_freight_cost_type_id);
4386: x_freight_cost_main_price => x_freight_cost_main_price,
4387: x_freight_cost_temp_price => x_freight_cost_temp_price,
4388: x_return_status => l_return_status);
4389:
4390: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
4391: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
4392: raise FTE_FREIGHT_PRICING_UTIL.g_other_cont_summ_failed;
4393: END IF;
4394: ELSE
4387: x_freight_cost_temp_price => x_freight_cost_temp_price,
4388: x_return_status => l_return_status);
4389:
4390: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
4391: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
4392: raise FTE_FREIGHT_PRICING_UTIL.g_other_cont_summ_failed;
4393: END IF;
4394: ELSE
4395: IF p_save_flag = 'M' THEN
4512: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'process_qp_output');
4513:
4514: EXCEPTION
4515: WHEN FTE_FREIGHT_PRICING_UTIL.g_prepare_fc_rec_failed THEN
4516: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4517: FTE_FREIGHT_PRICING_UTIL.set_exception('process_qp_output',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_prepare_fc_rec_failed');
4518: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'prepare_fc_rec failed ');
4519: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'process_qp_output');
4520: WHEN FTE_FREIGHT_PRICING_UTIL.g_other_cont_summ_failed THEN
4517: FTE_FREIGHT_PRICING_UTIL.set_exception('process_qp_output',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_prepare_fc_rec_failed');
4518: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'prepare_fc_rec failed ');
4519: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'process_qp_output');
4520: WHEN FTE_FREIGHT_PRICING_UTIL.g_other_cont_summ_failed THEN
4521: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4522: FTE_FREIGHT_PRICING_UTIL.set_exception('process_qp_output',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_other_cont_summ_failed');
4523: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'other_cont_sum failed ');
4524: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'process_qp_output');
4525: WHEN FTE_FREIGHT_PRICING_UTIL.g_get_fc_type_failed THEN
4522: FTE_FREIGHT_PRICING_UTIL.set_exception('process_qp_output',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_other_cont_summ_failed');
4523: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'other_cont_sum failed ');
4524: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'process_qp_output');
4525: WHEN FTE_FREIGHT_PRICING_UTIL.g_get_fc_type_failed THEN
4526: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4527: FTE_FREIGHT_PRICING_UTIL.set_exception('process_qp_output',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_get_fc_type_failed');
4528: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'process_qp_output');
4529: WHEN FTE_FREIGHT_PRICING_UTIL.g_dleg_sum_not_created THEN
4530: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4526: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4527: FTE_FREIGHT_PRICING_UTIL.set_exception('process_qp_output',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_get_fc_type_failed');
4528: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'process_qp_output');
4529: WHEN FTE_FREIGHT_PRICING_UTIL.g_dleg_sum_not_created THEN
4530: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4531: FTE_FREIGHT_PRICING_UTIL.set_exception('process_qp_output',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_dleg_sum_not_created');
4532: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Delivery summary not created ');
4533: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'process_qp_output');
4534: WHEN others THEN
4531: FTE_FREIGHT_PRICING_UTIL.set_exception('process_qp_output',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_dleg_sum_not_created');
4532: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Delivery summary not created ');
4533: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'process_qp_output');
4534: WHEN others THEN
4535: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4536: FTE_FREIGHT_PRICING_UTIL.set_exception('process_qp_output',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
4537: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
4538: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'process_qp_output');
4539:
4549: i NUMBER:=0;
4550:
4551: BEGIN
4552:
4553: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4554:
4555: IF p_first_level_rows.COUNT > 0 THEN
4556: FTE_FREIGHT_PRICING_UTIL.print_tag(p_msg => '
4557: i := p_first_level_rows.FIRST;
4580: END IF;
4581:
4582: EXCEPTION
4583: WHEN others THEN
4584: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4585: FTE_FREIGHT_PRICING_UTIL.set_exception('print_top_level_detail',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
4586: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
4587:
4588: END print_top_level_detail;
4596: i NUMBER:=0;
4597:
4598: BEGIN
4599:
4600: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4601:
4602: IF p_rolledup_lines.COUNT > 0 THEN
4603: FTE_FREIGHT_PRICING_UTIL.print_tag(p_msg => '
4604: i := p_rolledup_lines.FIRST;
4615: END IF;
4616:
4617: EXCEPTION
4618: WHEN others THEN
4619: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4620: FTE_FREIGHT_PRICING_UTIL.set_exception('print_rolledup_lines',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
4621: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
4622: END print_rolledup_lines;
4623:
4630: i NUMBER:=0;
4631:
4632: BEGIN
4633:
4634: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4635:
4636: IF p_pattern_rows.COUNT > 0 THEN
4637: FTE_FREIGHT_PRICING_UTIL.print_tag(p_msg => '
4638: i := p_pattern_rows.FIRST;
4648: END IF;
4649:
4650: EXCEPTION
4651: WHEN others THEN
4652: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4653: FTE_FREIGHT_PRICING_UTIL.set_exception('print_top_level_pattern',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
4654: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
4655:
4656: END print_top_level_pattern;
4663: i NUMBER:=0;
4664:
4665: BEGIN
4666:
4667: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4668:
4669: IF p_dual_instances.COUNT > 0 THEN
4670: FTE_FREIGHT_PRICING_UTIL.print_tag(p_msg => '
4671: i := p_dual_instances.FIRST;
4683: END IF;
4684:
4685: EXCEPTION
4686: WHEN others THEN
4687: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4688: FTE_FREIGHT_PRICING_UTIL.set_exception('print_dual_instances',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
4689: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
4690:
4691: END print_dual_instances;
4700: I NUMBER:=0;
4701:
4702: BEGIN
4703:
4704: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4705:
4706: FTE_FREIGHT_PRICING_UTIL.print_msg(p_msg => 'Return Status text '|| p_return_status);
4707:
4708: FTE_FREIGHT_PRICING_UTIL.print_tag(p_msg => '
4753: END IF;
4754: FTE_FREIGHT_PRICING_UTIL.print_tag(FTE_FREIGHT_PRICING_UTIL.G_DBG,'');
4755: EXCEPTION
4756: WHEN others THEN
4757: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4758: FTE_FREIGHT_PRICING_UTIL.set_exception('print_qp_output_lines',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
4759: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
4760:
4761: END print_qp_output_lines;
4768: i NUMBER:=0;
4769:
4770: BEGIN
4771:
4772: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4773:
4774: IF p_engine_rows.COUNT > 0 THEN
4775: FTE_FREIGHT_PRICING_UTIL.print_tag(p_msg => '
4776: i := p_engine_rows.FIRST;
4794: END IF;
4795:
4796: EXCEPTION
4797: WHEN others THEN
4798: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4799: FTE_FREIGHT_PRICING_UTIL.set_exception('print_engine_rows',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
4800: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
4801:
4802: END print_engine_rows;
4809: i NUMBER:=0;
4810:
4811: BEGIN
4812:
4813: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4814:
4815: IF p_attribute_rows.COUNT > 0 THEN
4816: FTE_FREIGHT_PRICING_UTIL.print_tag(FTE_FREIGHT_PRICING_UTIL.G_INF,'
4817: i := p_attribute_rows.FIRST;
4827: END IF;
4828:
4829: EXCEPTION
4830: WHEN others THEN
4831: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4832: FTE_FREIGHT_PRICING_UTIL.set_exception('print_attribute_rows',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
4833: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
4834:
4835: END print_attribute_rows;
4842: i NUMBER:=0;
4843:
4844: BEGIN
4845:
4846: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4847:
4848: IF p_fc_main_rows.COUNT > 0 THEN
4849: FTE_FREIGHT_PRICING_UTIL.print_tag(FTE_FREIGHT_PRICING_UTIL.G_INF,'
4850: i := p_fc_main_rows.FIRST;
4862: END IF;
4863:
4864: EXCEPTION
4865: WHEN others THEN
4866: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4867: FTE_FREIGHT_PRICING_UTIL.set_exception('print_fc_main_rows',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
4868: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
4869:
4870: END print_fc_main_rows;
4878: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
4879:
4880: BEGIN
4881:
4882: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4883:
4884: IF p_fc_temp_rows.COUNT > 0 THEN
4885: FTE_FREIGHT_PRICING_UTIL.print_tag(l_log_level,'
4886: i := p_fc_temp_rows.FIRST;
4962: END IF;
4963:
4964: EXCEPTION
4965: WHEN others THEN
4966: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4967: FTE_FREIGHT_PRICING_UTIL.set_exception('print_fc_temp_rows',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
4968: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
4969:
4970: END print_fc_temp_rows;
4992: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_INF;
4993:
4994: BEGIN
4995:
4996: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4997: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
4998: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'rollup_container_hierarchy','start');
4999:
5000: OPEN get_uom_for_each;
5021: p_lane_id => p_lane_id,
5022: x_rolledup_lines => x_rolledup_lines,
5023: x_return_status => l_return_status);
5024:
5025: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
5026: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
5027: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Container '||g_shipment_line_rows(i).delivery_detail_id);
5028: raise FTE_FREIGHT_PRICING_UTIL.g_rollup_container_failed;
5029: END IF;
5022: x_rolledup_lines => x_rolledup_lines,
5023: x_return_status => l_return_status);
5024:
5025: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
5026: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
5027: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Container '||g_shipment_line_rows(i).delivery_detail_id);
5028: raise FTE_FREIGHT_PRICING_UTIL.g_rollup_container_failed;
5029: END IF;
5030: ELSE
5148: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'rollup_container_hierarchy');
5149:
5150: EXCEPTION
5151: WHEN FND_API.G_EXC_ERROR THEN
5152: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5153: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'rollup_container_hierarchy');
5154: WHEN FTE_FREIGHT_PRICING_UTIL.g_rollup_container_failed THEN
5155: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5156: FTE_FREIGHT_PRICING_UTIL.set_exception('rollup_container_hierarchy',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_rollup_container_failed');
5151: WHEN FND_API.G_EXC_ERROR THEN
5152: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5153: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'rollup_container_hierarchy');
5154: WHEN FTE_FREIGHT_PRICING_UTIL.g_rollup_container_failed THEN
5155: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5156: FTE_FREIGHT_PRICING_UTIL.set_exception('rollup_container_hierarchy',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_rollup_container_failed');
5157: --FTE_FREIGHT_PRICING_UTIL.print_debug('rollup_container failed ');
5158: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'rollup_container failed ');
5159: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'rollup_container_hierarchy');
5157: --FTE_FREIGHT_PRICING_UTIL.print_debug('rollup_container failed ');
5158: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'rollup_container failed ');
5159: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'rollup_container_hierarchy');
5160: WHEN FTE_FREIGHT_PRICING_UTIL.g_category_not_found THEN
5161: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5162: FTE_FREIGHT_PRICING_UTIL.set_exception('rollup_container_hierarchy',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_category_not_found');
5163: --FTE_FREIGHT_PRICING_UTIL.print_debug('category_not_found ');
5164: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'category_not_found ');
5165: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'rollup_container_hierarchy');
5163: --FTE_FREIGHT_PRICING_UTIL.print_debug('category_not_found ');
5164: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'category_not_found ');
5165: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'rollup_container_hierarchy');
5166: WHEN FTE_FREIGHT_PRICING_UTIL.g_invalid_basis THEN
5167: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5168: FTE_FREIGHT_PRICING_UTIL.set_exception('rollup_container_hierarchy',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_invalid_basis');
5169: --FTE_FREIGHT_PRICING_UTIL.print_debug('basis_not_found ');
5170: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'basis_not_found ');
5171: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'rollup_container_hierarchy');
5169: --FTE_FREIGHT_PRICING_UTIL.print_debug('basis_not_found ');
5170: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'basis_not_found ');
5171: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'rollup_container_hierarchy');
5172: WHEN others THEN
5173: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
5174: FTE_FREIGHT_PRICING_UTIL.set_exception('rollup_container_hierarchy',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
5175: --FTE_FREIGHT_PRICING_UTIL.print_debug('Unexpected Error : '||SQLCODE||' : '||SQLERRM);
5176: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
5177: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'rollup_container_hierarchy');
5200:
5201: BEGIN
5202: -- {
5203:
5204: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5205: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
5206: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'rollup_loose_item','start');
5207:
5208: OPEN get_uom_for_each;
5339: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'rollup_loose_item');
5340:
5341: EXCEPTION
5342: WHEN FND_API.G_EXC_ERROR THEN
5343: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5344: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'rollup_loose_item');
5345: WHEN FTE_FREIGHT_PRICING_UTIL.g_rollup_container_failed THEN
5346: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5347: FTE_FREIGHT_PRICING_UTIL.set_exception('rollup_loose_item',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_rollup_container_failed');
5342: WHEN FND_API.G_EXC_ERROR THEN
5343: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5344: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'rollup_loose_item');
5345: WHEN FTE_FREIGHT_PRICING_UTIL.g_rollup_container_failed THEN
5346: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5347: FTE_FREIGHT_PRICING_UTIL.set_exception('rollup_loose_item',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_rollup_container_failed');
5348: --FTE_FREIGHT_PRICING_UTIL.print_debug('rollup_container failed ');
5349: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'rollup_loose_item failed ');
5350: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'rollup_loose_item');
5348: --FTE_FREIGHT_PRICING_UTIL.print_debug('rollup_container failed ');
5349: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'rollup_loose_item failed ');
5350: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'rollup_loose_item');
5351: WHEN FTE_FREIGHT_PRICING_UTIL.g_category_not_found THEN
5352: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5353: FTE_FREIGHT_PRICING_UTIL.set_exception('rollup_loose_item',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_category_not_found');
5354: --FTE_FREIGHT_PRICING_UTIL.print_debug('category_not_found ');
5355: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'category_not_found ');
5356: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'rollup_loose_item');
5354: --FTE_FREIGHT_PRICING_UTIL.print_debug('category_not_found ');
5355: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'category_not_found ');
5356: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'rollup_loose_item');
5357: WHEN FTE_FREIGHT_PRICING_UTIL.g_invalid_basis THEN
5358: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5359: FTE_FREIGHT_PRICING_UTIL.set_exception('rollup_loose_item',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_invalid_basis');
5360: --FTE_FREIGHT_PRICING_UTIL.print_debug('basis_not_found ');
5361: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'basis_not_found ');
5362: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'rollup_loose_item');
5360: --FTE_FREIGHT_PRICING_UTIL.print_debug('basis_not_found ');
5361: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'basis_not_found ');
5362: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'rollup_loose_item');
5363: WHEN others THEN
5364: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
5365: FTE_FREIGHT_PRICING_UTIL.set_exception('rollup_loose_item',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
5366: --FTE_FREIGHT_PRICING_UTIL.print_debug('Unexpected Error : '||SQLCODE||' : '||SQLERRM);
5367: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
5368: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'rollup_loose_item');
5370: -- }
5371: END rollup_loose_item;
5372:
5373: PROCEDURE search_matching_instance (
5374: --p_rolledup_category_rows IN WSH_UTIL_CORE.id_tab_type, -- Indexed on category_id
5375: --p_rolledup_category_basis IN WSH_UTIL_CORE.id_tab_type,
5376: p_pattern_no IN NUMBER,
5377: p_grouping_level IN VARCHAR2,
5378: p_aggregation IN VARCHAR2,
5371: END rollup_loose_item;
5372:
5373: PROCEDURE search_matching_instance (
5374: --p_rolledup_category_rows IN WSH_UTIL_CORE.id_tab_type, -- Indexed on category_id
5375: --p_rolledup_category_basis IN WSH_UTIL_CORE.id_tab_type,
5376: p_pattern_no IN NUMBER,
5377: p_grouping_level IN VARCHAR2,
5378: p_aggregation IN VARCHAR2,
5379: p_objective IN VARCHAR2,
5389: k NUMBER :=0;
5390: l NUMBER :=0;
5391: m NUMBER :=0;
5392: n NUMBER :=0;
5393: l_matched_index WSH_UTIL_CORE.id_tab_type;
5394: l_matched_category_rows instance_category_tab_type;
5395: l_matched_basis_rows instance_basis_tab_type;
5396: l_matched_instance_index NUMBER :=0;
5397: l_hash_string VARCHAR2(50);
5400: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
5401:
5402: BEGIN
5403:
5404: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5405: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
5406: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'search_matching_instance','start');
5407:
5408: i := p_pricing_dual_instances.FIRST;
5470: RETURN;
5471:
5472: EXCEPTION
5473: WHEN others THEN
5474: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
5475: FTE_FREIGHT_PRICING_UTIL.set_exception('search_matching_instance',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
5476: --FTE_FREIGHT_PRICING_UTIL.print_debug('Unexpected Error : '||SQLCODE||' : '||SQLERRM);
5477: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
5478: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'search_matching_instance');
5514:
5515: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
5516:
5517: BEGIN
5518: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5519: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
5520: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'create_new_instance','start');
5521: l_instance_index := l_instance_index + 1;
5522:
5862: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'create_new_instance');
5863:
5864: EXCEPTION
5865: WHEN FTE_FREIGHT_PRICING_UTIL.g_no_enginerow_created THEN
5866: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5867: FTE_FREIGHT_PRICING_UTIL.set_exception('create_new_instance',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_no_enginerow_created');
5868: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'create_new_instance');
5869: WHEN others THEN
5870: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
5866: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5867: FTE_FREIGHT_PRICING_UTIL.set_exception('create_new_instance',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_no_enginerow_created');
5868: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'create_new_instance');
5869: WHEN others THEN
5870: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
5871: FTE_FREIGHT_PRICING_UTIL.set_exception('create_new_instance',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
5872: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
5873: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'create_new_instance');
5874: END create_new_instance;
5910: l_input_index NUMBER;
5911: l_attribute_index NUMBER;
5912:
5913: -- to fix bug 2739329
5914: l_consumed_rollup_det wsh_util_core.id_tab_type;
5915:
5916: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
5917:
5918: BEGIN
5916: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
5917:
5918: BEGIN
5919:
5920: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5921: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
5922: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'add_to_instance','start');
5923:
5924: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,
6325: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'add_to_instance');
6326:
6327: EXCEPTION
6328: WHEN others THEN
6329: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
6330: FTE_FREIGHT_PRICING_UTIL.set_exception('add_to_instance',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
6331: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
6332: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'add_to_instance');
6333: END add_to_instance;
6386: l_matched_instance_index NUMBER:=0;
6387: l_curr_engine_row_count NUMBER:=0;
6388: l_curr_attribute_count NUMBER:=0;
6389: l_rolledup_lines rolledup_line_tab_type;
6390: l_rolledup_category_rows WSH_UTIL_CORE.id_tab_type;
6391: l_rolledup_category_basis WSH_UTIL_CORE.id_tab_type;
6392:
6393: l_rolledup_rec rolledup_line_rec_type;
6394:
6387: l_curr_engine_row_count NUMBER:=0;
6388: l_curr_attribute_count NUMBER:=0;
6389: l_rolledup_lines rolledup_line_tab_type;
6390: l_rolledup_category_rows WSH_UTIL_CORE.id_tab_type;
6391: l_rolledup_category_basis WSH_UTIL_CORE.id_tab_type;
6392:
6393: l_rolledup_rec rolledup_line_rec_type;
6394:
6395: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_INF;
6396:
6397: BEGIN
6398: -- {
6399:
6400: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6401: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
6402: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'process_shipment_pattern','start');
6403:
6404: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_INF,'Inside process_shipment_pattern .Before initialization');
6410: p_lane_id => p_lane_id,
6411: x_lane_function => l_lane_function,
6412: x_return_status => l_return_status);
6413:
6414: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
6415: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
6416: raise FTE_FREIGHT_PRICING_UTIL.g_initialize_failed;
6417: END IF;
6418: ELSE -- What happens if there is an empty container ?
6411: x_lane_function => l_lane_function,
6412: x_return_status => l_return_status);
6413:
6414: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
6415: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
6416: raise FTE_FREIGHT_PRICING_UTIL.g_initialize_failed;
6417: END IF;
6418: ELSE -- What happens if there is an empty container ?
6419: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_INF,'Parameters and Rules for lane : '||p_lane_id||' has been looked up');
6454: p_lane_id => p_lane_id,
6455: x_rolledup_lines => l_rolledup_lines,
6456: x_return_status => l_return_status);
6457:
6458: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
6459: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
6460: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Container '||p_shpmnt_toplevel_rows(i).content_id);
6461: raise FTE_FREIGHT_PRICING_UTIL.g_rollup_container_failed;
6462: END IF;
6455: x_rolledup_lines => l_rolledup_lines,
6456: x_return_status => l_return_status);
6457:
6458: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
6459: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
6460: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Container '||p_shpmnt_toplevel_rows(i).content_id);
6461: raise FTE_FREIGHT_PRICING_UTIL.g_rollup_container_failed;
6462: END IF;
6463: ELSE -- What happens if there is an empty container ?
6540: p_top_level_rec => p_shpmnt_toplevel_rows(i),
6541: p_rolledup_rows => l_rolledup_lines,
6542: x_return_status => l_return_status );
6543:
6544: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
6545: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
6546: raise FTE_FREIGHT_PRICING_UTIL.g_dimensional_weight_failed;
6547: END IF;
6548: END IF;
6541: p_rolledup_rows => l_rolledup_lines,
6542: x_return_status => l_return_status );
6543:
6544: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
6545: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
6546: raise FTE_FREIGHT_PRICING_UTIL.g_dimensional_weight_failed;
6547: END IF;
6548: END IF;
6549:
6647: x_pricing_engine_rows => x_pricing_engine_rows,
6648: x_pricing_attribute_rows => x_pricing_attribute_rows,
6649: x_return_status => l_return_status );
6650:
6651: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
6652: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
6653: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'create_instance for container '||p_shpmnt_toplevel_rows(i).content_id);
6654: raise FTE_FREIGHT_PRICING_UTIL.g_create_instance_failed;
6655: END IF;
6648: x_pricing_attribute_rows => x_pricing_attribute_rows,
6649: x_return_status => l_return_status );
6650:
6651: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
6652: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
6653: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'create_instance for container '||p_shpmnt_toplevel_rows(i).content_id);
6654: raise FTE_FREIGHT_PRICING_UTIL.g_create_instance_failed;
6655: END IF;
6656: ELSE -- What happens if no new instance is created ? Exception ?
6704: --p_pricing_engine_rows => x_pricing_engine_rows,
6705: x_matched_instance_index => l_matched_instance_index, -- -100 if does not match
6706: x_return_status => l_return_status );
6707:
6708: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
6709: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
6710: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'search for container '||p_shpmnt_toplevel_rows(i).content_id);
6711: raise FTE_FREIGHT_PRICING_UTIL.g_search_instance_failed;
6712: END IF;
6705: x_matched_instance_index => l_matched_instance_index, -- -100 if does not match
6706: x_return_status => l_return_status );
6707:
6708: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
6709: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
6710: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'search for container '||p_shpmnt_toplevel_rows(i).content_id);
6711: raise FTE_FREIGHT_PRICING_UTIL.g_search_instance_failed;
6712: END IF;
6713: ELSE
6737: x_pricing_engine_rows => x_pricing_engine_rows,
6738: x_pricing_attribute_rows => x_pricing_attribute_rows,
6739: x_return_status => l_return_status );
6740:
6741: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
6742: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
6743: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'create_instance for container '||p_shpmnt_toplevel_rows(i).content_id);
6744: raise FTE_FREIGHT_PRICING_UTIL.g_create_instance_failed;
6745: END IF;
6738: x_pricing_attribute_rows => x_pricing_attribute_rows,
6739: x_return_status => l_return_status );
6740:
6741: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
6742: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
6743: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'create_instance for container '||p_shpmnt_toplevel_rows(i).content_id);
6744: raise FTE_FREIGHT_PRICING_UTIL.g_create_instance_failed;
6745: END IF;
6746: ELSE -- What happens if no new instance is created ? Exception ?
6774: x_pricing_engine_rows => x_pricing_engine_rows,
6775: x_pricing_attribute_rows => x_pricing_attribute_rows,
6776: x_return_status => l_return_status );
6777:
6778: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
6779: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
6780: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'add_to_instance for container '||p_shpmnt_toplevel_rows(i).content_id);
6781: raise FTE_FREIGHT_PRICING_UTIL.g_add_to_instance_failed;
6782: END IF;
6775: x_pricing_attribute_rows => x_pricing_attribute_rows,
6776: x_return_status => l_return_status );
6777:
6778: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
6779: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
6780: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'add_to_instance for container '||p_shpmnt_toplevel_rows(i).content_id);
6781: raise FTE_FREIGHT_PRICING_UTIL.g_add_to_instance_failed;
6782: END IF;
6783: ELSE
6836: x_rolledup_rec => l_rolledup_rec,
6837: x_return_status => l_return_status );
6838:
6839:
6840: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
6841: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
6842: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Loose Item '||p_shpmnt_toplevel_rows(i).content_id);
6843: raise FTE_FREIGHT_PRICING_UTIL.g_rollup_container_failed;
6844: END IF;
6837: x_return_status => l_return_status );
6838:
6839:
6840: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
6841: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
6842: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Loose Item '||p_shpmnt_toplevel_rows(i).content_id);
6843: raise FTE_FREIGHT_PRICING_UTIL.g_rollup_container_failed;
6844: END IF;
6845: END IF;
6907: x_pricing_engine_rows => x_pricing_engine_rows,
6908: x_pricing_attribute_rows => x_pricing_attribute_rows,
6909: x_return_status => l_return_status );
6910:
6911: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
6912: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
6913: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'create_instance for loose item '||p_shpmnt_toplevel_rows(i).content_id);
6914: raise FTE_FREIGHT_PRICING_UTIL.g_create_instance_failed;
6915: END IF;
6908: x_pricing_attribute_rows => x_pricing_attribute_rows,
6909: x_return_status => l_return_status );
6910:
6911: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
6912: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
6913: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'create_instance for loose item '||p_shpmnt_toplevel_rows(i).content_id);
6914: raise FTE_FREIGHT_PRICING_UTIL.g_create_instance_failed;
6915: END IF;
6916: ELSE -- What happens if no new instance is created ? Exception ?
6955: p_pricing_dual_instances => x_pricing_dual_instances,
6956: x_matched_instance_index => l_matched_instance_index, -- -100 if does not match
6957: x_return_status => l_return_status );
6958:
6959: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
6960: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
6961: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'search for loose item '||p_shpmnt_toplevel_rows(i).content_id);
6962: raise FTE_FREIGHT_PRICING_UTIL.g_search_instance_failed;
6963: END IF;
6956: x_matched_instance_index => l_matched_instance_index, -- -100 if does not match
6957: x_return_status => l_return_status );
6958:
6959: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
6960: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
6961: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'search for loose item '||p_shpmnt_toplevel_rows(i).content_id);
6962: raise FTE_FREIGHT_PRICING_UTIL.g_search_instance_failed;
6963: END IF;
6964: ELSE
6982: x_pricing_engine_rows => x_pricing_engine_rows,
6983: x_pricing_attribute_rows => x_pricing_attribute_rows,
6984: x_return_status => l_return_status );
6985:
6986: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
6987: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
6988: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'create_instance for loose item '||p_shpmnt_toplevel_rows(i).content_id);
6989: raise FTE_FREIGHT_PRICING_UTIL.g_create_instance_failed;
6990: END IF;
6983: x_pricing_attribute_rows => x_pricing_attribute_rows,
6984: x_return_status => l_return_status );
6985:
6986: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
6987: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
6988: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'create_instance for loose item '||p_shpmnt_toplevel_rows(i).content_id);
6989: raise FTE_FREIGHT_PRICING_UTIL.g_create_instance_failed;
6990: END IF;
6991: ELSE -- What happens if no new instance is created ? Exception ?
7025: x_pricing_engine_rows => x_pricing_engine_rows,
7026: x_pricing_attribute_rows => x_pricing_attribute_rows,
7027: x_return_status => l_return_status );
7028:
7029: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
7030: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7031: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'add_to_instance for loose item '||p_shpmnt_toplevel_rows(i).content_id);
7032: raise FTE_FREIGHT_PRICING_UTIL.g_add_to_instance_failed;
7033: END IF;
7026: x_pricing_attribute_rows => x_pricing_attribute_rows,
7027: x_return_status => l_return_status );
7028:
7029: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
7030: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7031: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'add_to_instance for loose item '||p_shpmnt_toplevel_rows(i).content_id);
7032: raise FTE_FREIGHT_PRICING_UTIL.g_add_to_instance_failed;
7033: END IF;
7034: ELSE
7108: p_top_level_rows => p_shpmnt_toplevel_rows,
7109: x_pricing_engine_rows => x_pricing_engine_rows,
7110: x_return_status => l_return_status );
7111:
7112: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
7113: and l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7114: RAISE FND_API.G_EXC_ERROR;
7115: END IF;
7116:
7109: x_pricing_engine_rows => x_pricing_engine_rows,
7110: x_return_status => l_return_status );
7111:
7112: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
7113: and l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7114: RAISE FND_API.G_EXC_ERROR;
7115: END IF;
7116:
7117: END IF; --l_lane_function = 'LTL' and p_classification_code = 'FC'
7119: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'process_shipment_pattern');
7120:
7121: EXCEPTION
7122: WHEN FND_API.G_EXC_ERROR THEN
7123: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7124: FTE_FREIGHT_PRICING_UTIL.set_exception('process_shipment_pattern',FTE_FREIGHT_PRICING_UTIL.G_ERR,'FND_API.G_EXC_ERROR');
7125: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'process_shipment_pattern');
7126: WHEN FTE_FREIGHT_PRICING_UTIL.g_initialize_failed THEN
7127: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7123: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7124: FTE_FREIGHT_PRICING_UTIL.set_exception('process_shipment_pattern',FTE_FREIGHT_PRICING_UTIL.G_ERR,'FND_API.G_EXC_ERROR');
7125: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'process_shipment_pattern');
7126: WHEN FTE_FREIGHT_PRICING_UTIL.g_initialize_failed THEN
7127: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7128: FTE_FREIGHT_PRICING_UTIL.set_exception('process_shipment_pattern',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_initialize_failed');
7129: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'process_shipment_pattern');
7130: WHEN FTE_FREIGHT_PRICING_UTIL.g_rollup_container_failed THEN
7131: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7127: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7128: FTE_FREIGHT_PRICING_UTIL.set_exception('process_shipment_pattern',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_initialize_failed');
7129: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'process_shipment_pattern');
7130: WHEN FTE_FREIGHT_PRICING_UTIL.g_rollup_container_failed THEN
7131: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7132: FTE_FREIGHT_PRICING_UTIL.set_exception('process_shipment_pattern',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_rollup_container_failed');
7133: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'process_shipment_pattern');
7134: WHEN FTE_FREIGHT_PRICING_UTIL.g_invalid_line_quantity THEN
7135: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7131: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7132: FTE_FREIGHT_PRICING_UTIL.set_exception('process_shipment_pattern',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_rollup_container_failed');
7133: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'process_shipment_pattern');
7134: WHEN FTE_FREIGHT_PRICING_UTIL.g_invalid_line_quantity THEN
7135: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7136: FTE_FREIGHT_PRICING_UTIL.set_exception('process_shipment_pattern',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_invalid_line_quantity');
7137: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'process_shipment_pattern');
7138: WHEN FTE_FREIGHT_PRICING_UTIL.g_dimensional_weight_failed THEN
7139: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7135: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7136: FTE_FREIGHT_PRICING_UTIL.set_exception('process_shipment_pattern',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_invalid_line_quantity');
7137: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'process_shipment_pattern');
7138: WHEN FTE_FREIGHT_PRICING_UTIL.g_dimensional_weight_failed THEN
7139: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7140: FTE_FREIGHT_PRICING_UTIL.set_exception('process_shipment_pattern',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_dimensional_weight_failed');
7141: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'process_shipment_pattern');
7142: WHEN FTE_FREIGHT_PRICING_UTIL.g_create_instance_failed THEN
7143: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7139: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7140: FTE_FREIGHT_PRICING_UTIL.set_exception('process_shipment_pattern',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_dimensional_weight_failed');
7141: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'process_shipment_pattern');
7142: WHEN FTE_FREIGHT_PRICING_UTIL.g_create_instance_failed THEN
7143: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7144: FTE_FREIGHT_PRICING_UTIL.set_exception('process_shipment_pattern',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_create_instance_failed');
7145: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'process_shipment_pattern');
7146: WHEN FTE_FREIGHT_PRICING_UTIL.g_search_instance_failed THEN
7147: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7143: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7144: FTE_FREIGHT_PRICING_UTIL.set_exception('process_shipment_pattern',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_create_instance_failed');
7145: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'process_shipment_pattern');
7146: WHEN FTE_FREIGHT_PRICING_UTIL.g_search_instance_failed THEN
7147: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7148: FTE_FREIGHT_PRICING_UTIL.set_exception('process_shipment_pattern',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_search_instance_failed');
7149: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'process_shipment_pattern');
7150: WHEN FTE_FREIGHT_PRICING_UTIL.g_add_to_instance_failed THEN
7151: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7147: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7148: FTE_FREIGHT_PRICING_UTIL.set_exception('process_shipment_pattern',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_search_instance_failed');
7149: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'process_shipment_pattern');
7150: WHEN FTE_FREIGHT_PRICING_UTIL.g_add_to_instance_failed THEN
7151: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7152: FTE_FREIGHT_PRICING_UTIL.set_exception('process_shipment_pattern',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_add_to_instance_failed');
7153: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'process_shipment_pattern');
7154: WHEN FTE_FREIGHT_PRICING_UTIL.g_category_not_found THEN
7155: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7151: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7152: FTE_FREIGHT_PRICING_UTIL.set_exception('process_shipment_pattern',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_add_to_instance_failed');
7153: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'process_shipment_pattern');
7154: WHEN FTE_FREIGHT_PRICING_UTIL.g_category_not_found THEN
7155: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7156: FTE_FREIGHT_PRICING_UTIL.set_exception('process_shipment_pattern',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_category_not_found');
7157: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'process_shipment_pattern');
7158: WHEN FTE_FREIGHT_PRICING_UTIL.g_invalid_basis THEN
7159: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7155: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7156: FTE_FREIGHT_PRICING_UTIL.set_exception('process_shipment_pattern',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_category_not_found');
7157: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'process_shipment_pattern');
7158: WHEN FTE_FREIGHT_PRICING_UTIL.g_invalid_basis THEN
7159: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7160: FTE_FREIGHT_PRICING_UTIL.set_exception('process_shipment_pattern',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_invalid_basis');
7161: --FTE_FREIGHT_PRICING_UTIL.print_debug('basis_not_found ');
7162: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'basis_not_found ');
7163: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'process_shipment_pattern');
7161: --FTE_FREIGHT_PRICING_UTIL.print_debug('basis_not_found ');
7162: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'basis_not_found ');
7163: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'process_shipment_pattern');
7164: WHEN FTE_FREIGHT_PRICING_UTIL.g_loose_item_wrong_basis THEN
7165: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7166: FTE_FREIGHT_PRICING_UTIL.set_exception('process_shipment_pattern',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_loose_item_wrong_basis');
7167: --FTE_FREIGHT_PRICING_UTIL.print_debug('Loose item can not have container basis');
7168: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Loose item can not have container basis');
7169: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'process_shipment_pattern');
7167: --FTE_FREIGHT_PRICING_UTIL.print_debug('Loose item can not have container basis');
7168: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Loose item can not have container basis');
7169: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'process_shipment_pattern');
7170: WHEN others THEN
7171: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
7172: FTE_FREIGHT_PRICING_UTIL.set_exception('process_shipment_pattern',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
7173: --FTE_FREIGHT_PRICING_UTIL.print_debug('Unexpected Error : '||SQLCODE||' : '||SQLERRM);
7174: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
7175: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'process_shipment_pattern');
7193: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
7194:
7195: BEGIN
7196:
7197: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
7198: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
7199: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'get_currency_code','start');
7200:
7201: OPEN c_get_currency;
7210: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'get_currency_code');
7211:
7212: EXCEPTION
7213: WHEN FTE_FREIGHT_PRICING_UTIL.g_no_currency_found THEN
7214: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7215: FTE_FREIGHT_PRICING_UTIL.set_exception('get_currency_code',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_no_currency_found');
7216: --FTE_FREIGHT_PRICING_UTIL.print_debug('currency_not_found ');
7217: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'currency_not_found ');
7218: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'get_currency_code');
7216: --FTE_FREIGHT_PRICING_UTIL.print_debug('currency_not_found ');
7217: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'currency_not_found ');
7218: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'get_currency_code');
7219: WHEN others THEN
7220: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
7221: FTE_FREIGHT_PRICING_UTIL.set_exception('get_currency_code',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
7222: --FTE_FREIGHT_PRICING_UTIL.print_debug('Unexpected Error : '||SQLCODE||' : '||SQLERRM);
7223: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
7224: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'get_currency_code');
7256: l_msg_data VARCHAR2(240);
7257: l_first_level_rows shpmnt_content_tab_type;
7258: l_first_level_charges addl_services_tab_type;
7259: BEGIN
7260: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
7261:
7262: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
7263: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,l_api_name);
7264:
7273: flatten_shipment (
7274: x_first_level_rows => l_first_level_rows,
7275: x_return_status => l_return_status );
7276:
7277: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS and
7278: l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7279: raise FTE_FREIGHT_PRICING_UTIL.g_flatten_shipment_failed;
7280: ELSE
7281: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level, 'No. of top level lines 7 : '||l_first_level_rows.COUNT);
7274: x_first_level_rows => l_first_level_rows,
7275: x_return_status => l_return_status );
7276:
7277: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS and
7278: l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7279: raise FTE_FREIGHT_PRICING_UTIL.g_flatten_shipment_failed;
7280: ELSE
7281: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level, 'No. of top level lines 7 : '||l_first_level_rows.COUNT);
7282: IF l_first_level_rows.COUNT = 0 THEN
7300: x_freight_cost_temp_price => x_freight_cost_temp_price,
7301: x_freight_cost_temp_charge => x_freight_cost_temp_charge,
7302: x_return_status => l_return_status ) ;
7303:
7304: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS and
7305: l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7306: raise FTE_FREIGHT_PRICING_UTIL.g_shipment_pricing_failed;
7307: END IF;
7308:
7301: x_freight_cost_temp_charge => x_freight_cost_temp_charge,
7302: x_return_status => l_return_status ) ;
7303:
7304: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS and
7305: l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7306: raise FTE_FREIGHT_PRICING_UTIL.g_shipment_pricing_failed;
7307: END IF;
7308:
7309: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
7309: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
7310:
7311: EXCEPTION
7312: WHEN FTE_FREIGHT_PRICING_UTIL.g_shipment_pricing_failed THEN
7313: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7314: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_shipment_pricing_failed');
7315: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
7316: WHEN FTE_FREIGHT_PRICING_UTIL.g_flatten_shipment_failed THEN
7317: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7313: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7314: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_shipment_pricing_failed');
7315: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
7316: WHEN FTE_FREIGHT_PRICING_UTIL.g_flatten_shipment_failed THEN
7317: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7318: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_flatten_shipment_failed');
7319: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
7320: WHEN others THEN
7321: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
7317: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7318: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_flatten_shipment_failed');
7319: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
7320: WHEN others THEN
7321: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
7322: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
7323: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
7324: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
7325: END shipment_rating;
7417: l_freight_cost_temp_price Freight_Cost_Temp_Tab_Type;
7418: l_freight_cost_temp_charge Freight_Cost_Temp_Tab_Type;
7419: l_fc_main_update_rows Freight_Cost_Main_Tab_Type;
7420: l_freight_cost_id NUMBER;
7421: l_freight_cost_main_ids WSH_UTIL_CORE.id_tab_type;
7422: l_freight_cost_temp_ids WSH_UTIL_CORE.id_tab_type;
7423: l_freight_cost_temp_id NUMBER;
7424: l_rowid VARCHAR2(30);
7425: l_rowids WSH_UTIL_CORE.column_tab_type;
7418: l_freight_cost_temp_charge Freight_Cost_Temp_Tab_Type;
7419: l_fc_main_update_rows Freight_Cost_Main_Tab_Type;
7420: l_freight_cost_id NUMBER;
7421: l_freight_cost_main_ids WSH_UTIL_CORE.id_tab_type;
7422: l_freight_cost_temp_ids WSH_UTIL_CORE.id_tab_type;
7423: l_freight_cost_temp_id NUMBER;
7424: l_rowid VARCHAR2(30);
7425: l_rowids WSH_UTIL_CORE.column_tab_type;
7426: l_temp_row_count NUMBER;
7421: l_freight_cost_main_ids WSH_UTIL_CORE.id_tab_type;
7422: l_freight_cost_temp_ids WSH_UTIL_CORE.id_tab_type;
7423: l_freight_cost_temp_id NUMBER;
7424: l_rowid VARCHAR2(30);
7425: l_rowids WSH_UTIL_CORE.column_tab_type;
7426: l_temp_row_count NUMBER;
7427: l_return_status_text VARCHAR2(240);
7428:
7429: l_shpmnt_toplevel_rows shpmnt_content_tab_type;
7432: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_LOG;
7433:
7434: BEGIN
7435:
7436: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
7437: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
7438: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'shipment_pricing','start');
7439:
7440: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'p_lane_id='||p_lane_id);
7518: p_carrier_id => l_lane_info.carrier_id,
7519: x_currency_code => l_currency_code,
7520: x_return_status => l_return_status ); -- New API
7521:
7522: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
7523: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7524: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'get_currency_code ');
7525: raise FTE_FREIGHT_PRICING_UTIL.g_currency_code_failed;
7526: END IF;
7519: x_currency_code => l_currency_code,
7520: x_return_status => l_return_status ); -- New API
7521:
7522: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
7523: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7524: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'get_currency_code ');
7525: raise FTE_FREIGHT_PRICING_UTIL.g_currency_code_failed;
7526: END IF;
7527: ELSE
7552: x_summary_lanesched_price => x_summary_lanesched_price,
7553: x_summary_lanesched_price_uom => x_summary_lanesched_price_uom,
7554: x_return_status => l_return_status ) ;
7555:
7556: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
7557: and l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7558: RAISE FND_API.G_EXC_ERROR;
7559: END IF;
7560:
7553: x_summary_lanesched_price_uom => x_summary_lanesched_price_uom,
7554: x_return_status => l_return_status ) ;
7555:
7556: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
7557: and l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7558: RAISE FND_API.G_EXC_ERROR;
7559: END IF;
7560:
7561: ELSE -- l_lane_info.basis <> 'CONTAINER_ALL'
7592:
7593:
7594: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,' After process_shipment_pattern ' );
7595:
7596: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
7597: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7598: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'process_shipment_pattern ');
7599: raise FTE_FREIGHT_PRICING_UTIL.g_shipment_pattern_failed;
7600: END IF;
7593:
7594: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,' After process_shipment_pattern ' );
7595:
7596: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
7597: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7598: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'process_shipment_pattern ');
7599: raise FTE_FREIGHT_PRICING_UTIL.g_shipment_pattern_failed;
7600: END IF;
7601: ELSE -- What happens if no new instance is created ? Exception ?
7623: x_summary_lanesched_price => x_summary_lanesched_price,
7624: x_summary_lanesched_price_uom => x_summary_lanesched_price_uom,
7625: x_return_status => l_return_status ) ;
7626:
7627: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
7628: and l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7629: RAISE FND_API.G_EXC_ERROR;
7630: END IF;
7631:
7624: x_summary_lanesched_price_uom => x_summary_lanesched_price_uom,
7625: x_return_status => l_return_status ) ;
7626:
7627: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
7628: and l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7629: RAISE FND_API.G_EXC_ERROR;
7630: END IF;
7631:
7632: ELSE
7713: x_qp_output_line_rows => l_pricing_engine_output_lines, -- line_index = input_index
7714: x_qp_output_detail_rows => l_qp_output_line_details,
7715: x_return_status => l_return_status );
7716:
7717: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
7718: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7719: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'process_special_conditions ');
7720: raise FTE_FREIGHT_PRICING_UTIL.g_special_conditions_failed;
7721: END IF;
7714: x_qp_output_detail_rows => l_qp_output_line_details,
7715: x_return_status => l_return_status );
7716:
7717: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
7718: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7719: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'process_special_conditions ');
7720: raise FTE_FREIGHT_PRICING_UTIL.g_special_conditions_failed;
7721: END IF;
7722: ELSE -- What happens if no QP output lines come back ? Exception ?
7748: x_summary_lanesched_price => x_summary_lanesched_price, -- Only in case of 'T'
7749: x_summary_lanesched_price_uom => x_summary_lanesched_price_uom,
7750: x_return_status => l_return_status ) ;
7751:
7752: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
7753: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7754: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'process_qp_output');
7755: raise FTE_FREIGHT_PRICING_UTIL.g_process_qp_output_failed;
7756: END IF;
7749: x_summary_lanesched_price_uom => x_summary_lanesched_price_uom,
7750: x_return_status => l_return_status ) ;
7751:
7752: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
7753: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7754: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'process_qp_output');
7755: raise FTE_FREIGHT_PRICING_UTIL.g_process_qp_output_failed;
7756: END IF;
7757: ELSE -- What happens if no new fc records created ? Exception ?
7781: x_freight_cost_temp_charge => l_freight_cost_temp_charge,
7782: x_fc_main_update_rows => l_fc_main_update_rows, -- For update of SUMMARY records
7783: x_return_status => l_return_status ) ;
7784:
7785: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
7786: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7787: raise FTE_FREIGHT_PRICING_UTIL.g_MDC_handle_MDC;
7788: END IF;
7789: END IF;
7782: x_fc_main_update_rows => l_fc_main_update_rows, -- For update of SUMMARY records
7783: x_return_status => l_return_status ) ;
7784:
7785: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
7786: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7787: raise FTE_FREIGHT_PRICING_UTIL.g_MDC_handle_MDC;
7788: END IF;
7789: END IF;
7790:
7869: p_freight_cost_temp_info => l_freight_cost_temp_price(k),
7870: x_freight_cost_temp_id => l_freight_cost_temp_id,
7871: x_return_status => l_return_status);
7872:
7873: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
7874: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7875: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Create_Freight_Cost_Temp Price');
7876: raise FTE_FREIGHT_PRICING_UTIL.g_create_fc_temp_failed;
7877: END IF;
7870: x_freight_cost_temp_id => l_freight_cost_temp_id,
7871: x_return_status => l_return_status);
7872:
7873: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
7874: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7875: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Create_Freight_Cost_Temp Price');
7876: raise FTE_FREIGHT_PRICING_UTIL.g_create_fc_temp_failed;
7877: END IF;
7878: END IF;
7927: p_freight_cost_temp_info => l_freight_cost_temp_charge(n),
7928: x_freight_cost_temp_id => l_freight_cost_temp_id,
7929: x_return_status => l_return_status);
7930:
7931: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
7932: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7933: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Create_Freight_Cost_Temp Charge');
7934: raise FTE_FREIGHT_PRICING_UTIL.g_create_fc_temp_failed;
7935: END IF;
7928: x_freight_cost_temp_id => l_freight_cost_temp_id,
7929: x_return_status => l_return_status);
7930:
7931: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
7932: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7933: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Create_Freight_Cost_Temp Charge');
7934: raise FTE_FREIGHT_PRICING_UTIL.g_create_fc_temp_failed;
7935: END IF;
7936: END IF;
7957: p_rowid => l_rowid,
7958: p_freight_cost_info => l_fc_main_update_rows(l),
7959: x_return_status => l_return_status);
7960:
7961: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
7962: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7963: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Update_Freight_Cost');
7964: raise FTE_FREIGHT_PRICING_UTIL.g_update_freight_cost_failed;
7965: ELSE
7958: p_freight_cost_info => l_fc_main_update_rows(l),
7959: x_return_status => l_return_status);
7960:
7961: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
7962: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7963: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Update_Freight_Cost');
7964: raise FTE_FREIGHT_PRICING_UTIL.g_update_freight_cost_failed;
7965: ELSE
7966: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_WRN,'Update_Freight_Cost returned warning ');
8003: x_rowid => l_rowid,
8004: x_freight_cost_id => l_freight_cost_id,
8005: x_return_status => l_return_status);
8006:
8007: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
8008: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
8009: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Create_Freight_Cost Main Price');
8010: raise FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed;
8011: END IF;
8004: x_freight_cost_id => l_freight_cost_id,
8005: x_return_status => l_return_status);
8006:
8007: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
8008: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
8009: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Create_Freight_Cost Main Price');
8010: raise FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed;
8011: END IF;
8012: END IF;
8051: x_rowid => l_rowid,
8052: x_freight_cost_id => l_freight_cost_id,
8053: x_return_status => l_return_status);
8054:
8055: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
8056: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
8057: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Create_Freight_Cost Main Charge');
8058: raise FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed;
8059: END IF;
8052: x_freight_cost_id => l_freight_cost_id,
8053: x_return_status => l_return_status);
8054:
8055: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
8056: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
8057: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Create_Freight_Cost Main Charge');
8058: raise FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed;
8059: END IF;
8060: END IF;
8122: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_pricing');
8123:
8124: EXCEPTION
8125: WHEN FND_API.G_EXC_ERROR THEN
8126: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8127: FTE_FREIGHT_PRICING_UTIL.set_exception('process_shipment_pattern',FTE_FREIGHT_PRICING_UTIL.G_ERR,'FND_API.G_EXC_ERROR');
8128: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_pricing');
8129:
8130:
8129:
8130:
8131:
8132: WHEN FTE_FREIGHT_PRICING_UTIL.g_MDC_handle_MDC THEN
8133: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8134: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_pricing',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_MDC_handle_MDC');
8135: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_pricing');
8136:
8137: WHEN FTE_FREIGHT_PRICING_UTIL.g_no_lanesched_seg THEN
8134: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_pricing',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_MDC_handle_MDC');
8135: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_pricing');
8136:
8137: WHEN FTE_FREIGHT_PRICING_UTIL.g_no_lanesched_seg THEN
8138: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8139: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_pricing',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_no_lanesched_seg');
8140: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_pricing');
8141: WHEN FTE_FREIGHT_PRICING_UTIL.g_no_lane_info THEN
8142: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8138: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8139: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_pricing',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_no_lanesched_seg');
8140: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_pricing');
8141: WHEN FTE_FREIGHT_PRICING_UTIL.g_no_lane_info THEN
8142: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8143: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_pricing',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_no_lane_info');
8144: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_pricing');
8145: WHEN FTE_FREIGHT_PRICING_UTIL.g_no_segment_service_type THEN
8146: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8142: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8143: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_pricing',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_no_lane_info');
8144: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_pricing');
8145: WHEN FTE_FREIGHT_PRICING_UTIL.g_no_segment_service_type THEN
8146: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8147: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_pricing',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_no_segment_service_type');
8148: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_pricing');
8149: WHEN FTE_FREIGHT_PRICING_UTIL.g_currency_code_failed THEN
8150: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8146: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8147: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_pricing',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_no_segment_service_type');
8148: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_pricing');
8149: WHEN FTE_FREIGHT_PRICING_UTIL.g_currency_code_failed THEN
8150: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8151: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_pricing',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_currency_code_failed');
8152: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_pricing');
8153: WHEN FTE_FREIGHT_PRICING_UTIL.g_shipment_pattern_failed THEN
8154: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8150: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8151: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_pricing',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_currency_code_failed');
8152: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_pricing');
8153: WHEN FTE_FREIGHT_PRICING_UTIL.g_shipment_pattern_failed THEN
8154: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8155: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_pricing',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_shipment_pattern_failed');
8156: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_pricing');
8157: WHEN FTE_FREIGHT_PRICING_UTIL.g_special_conditions_failed THEN
8158: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8154: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8155: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_pricing',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_shipment_pattern_failed');
8156: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_pricing');
8157: WHEN FTE_FREIGHT_PRICING_UTIL.g_special_conditions_failed THEN
8158: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8159: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_pricing',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_special_conditions_failed');
8160: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_pricing');
8161: WHEN FTE_FREIGHT_PRICING_UTIL.g_process_qp_output_failed THEN
8162: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8158: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8159: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_pricing',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_special_conditions_failed');
8160: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_pricing');
8161: WHEN FTE_FREIGHT_PRICING_UTIL.g_process_qp_output_failed THEN
8162: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8163: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_pricing',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_process_qp_output_failed');
8164: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_pricing');
8165: WHEN FTE_FREIGHT_PRICING_UTIL.g_create_fc_temp_failed THEN
8166: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8162: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8163: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_pricing',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_process_qp_output_failed');
8164: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_pricing');
8165: WHEN FTE_FREIGHT_PRICING_UTIL.g_create_fc_temp_failed THEN
8166: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8167: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_pricing',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_create_fc_temp_failed');
8168: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_pricing');
8169: WHEN FTE_FREIGHT_PRICING_UTIL.g_update_freight_cost_failed THEN
8170: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8166: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8167: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_pricing',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_create_fc_temp_failed');
8168: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_pricing');
8169: WHEN FTE_FREIGHT_PRICING_UTIL.g_update_freight_cost_failed THEN
8170: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8171: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_pricing',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_update_freight_cost_failed');
8172: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_pricing');
8173: WHEN FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed THEN
8174: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8170: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8171: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_pricing',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_update_freight_cost_failed');
8172: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_pricing');
8173: WHEN FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed THEN
8174: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8175: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_pricing',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_create_freight_cost_failed');
8176: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_pricing');
8177: WHEN others THEN
8178: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
8174: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8175: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_pricing',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_create_freight_cost_failed');
8176: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_pricing');
8177: WHEN others THEN
8178: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
8179: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_pricing',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
8180: --FTE_FREIGHT_PRICING_UTIL.print_debug('Unexpected Error : '||SQLCODE||' : '||SQLERRM);
8181: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
8182: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_pricing');
8215:
8216: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
8217:
8218: BEGIN
8219: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
8220: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
8221: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'flatten_shipment','start');
8222:
8223: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'g_shipment_line_rows COUNT : '||g_shipment_line_rows.COUNT);
8338: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'flatten_shipment');
8339:
8340: EXCEPTION
8341: WHEN others THEN
8342: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
8343: FTE_FREIGHT_PRICING_UTIL.set_exception('flatten_shipment',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
8344: --FTE_FREIGHT_PRICING_UTIL.print_debug('Unexpected Error : '||SQLCODE||' : '||SQLERRM);
8345: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
8346: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'flatten_shipment');
8367: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
8368:
8369: BEGIN
8370:
8371: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
8372: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
8373: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'get_top_level_charges','start');
8374:
8375: i := p_first_level_rows.FIRST;
8395: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'get_top_level_charges');
8396:
8397: EXCEPTION
8398: WHEN others THEN
8399: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
8400: FTE_FREIGHT_PRICING_UTIL.set_exception('get_top_level_charges',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
8401: --FTE_FREIGHT_PRICING_UTIL.print_debug('Unexpected Error : '||SQLCODE||' : '||SQLERRM);
8402: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
8403: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'get_top_level_charges');
8459: RETURN TRUE;
8460: END IF;
8461: EXCEPTION
8462: WHEN others THEN
8463: --x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
8464: FTE_FREIGHT_PRICING_UTIL.set_exception('is_consolidated',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
8465: --FTE_FREIGHT_PRICING_UTIL.print_debug('Unexpected Error : '||SQLCODE||' : '||SQLERRM);
8466: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
8467: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'is_consolidated');
8498: RETURN l_segment_id;
8499:
8500: EXCEPTION
8501: WHEN others THEN
8502: --x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
8503: FTE_FREIGHT_PRICING_UTIL.set_exception('get_segment_from_dleg',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
8504: --FTE_FREIGHT_PRICING_UTIL.print_debug('Unexpected Error : '||SQLCODE||' : '||SQLERRM);
8505: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
8506: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'get_segment_from_dleg');
8531: RETURN l_delivery_id;
8532:
8533: EXCEPTION
8534: WHEN others THEN
8535: --x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
8536: FTE_FREIGHT_PRICING_UTIL.set_exception('get_delivery_from_dleg',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
8537: --FTE_FREIGHT_PRICING_UTIL.print_debug('Unexpected Error : '||SQLCODE||' : '||SQLERRM);
8538: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
8539: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'get_delivery_from_dleg');
8572: RETURN l_freight_cost_id;
8573:
8574: EXCEPTION
8575: WHEN others THEN
8576: --x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
8577: FTE_FREIGHT_PRICING_UTIL.set_exception('get_fc_id_from_dleg',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
8578: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
8579: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'get_fc_id_from_dleg');
8580: END get_fc_id_from_dleg;
8616:
8617:
8618: BEGIN
8619:
8620: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
8621: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
8622: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'delete_invalid_fc_recs','start');
8623:
8624: -- Here determine if a trip has been passed or a delivery leg
8624: -- Here determine if a trip has been passed or a delivery leg
8625:
8626: IF p_segment_id IS NULL AND p_delivery_leg_id IS NULL THEN
8627:
8628: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8629: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'delete_invalid_fc_recs');
8630: RETURN;
8631:
8632: ELSIF p_delivery_leg_id IS NULL THEN
8693: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'delete_invalid_fc_recs');
8694:
8695: EXCEPTION
8696: WHEN others THEN
8697: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
8698: FTE_FREIGHT_PRICING_UTIL.set_exception('delete_invalid_fc_recs',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
8699: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
8700: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'delete_invalid_fc_recs');
8701: END delete_invalid_fc_recs;
8709: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
8710:
8711: BEGIN
8712:
8713: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
8714: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
8715: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'unmark_reprice_required','start');
8716:
8717: -- Here determine if a trip has been passed or a delivery leg
8717: -- Here determine if a trip has been passed or a delivery leg
8718:
8719: IF p_segment_id IS NULL AND p_delivery_leg_id IS NULL THEN
8720:
8721: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8722: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'unmark_reprice_required');
8723: RETURN;
8724:
8725: ELSIF p_delivery_leg_id IS NULL THEN
8748: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'unmark_reprice_required');
8749:
8750: EXCEPTION
8751: WHEN others THEN
8752: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
8753: FTE_FREIGHT_PRICING_UTIL.set_exception('unmark_reprice_required',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
8754: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
8755: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'unmark_reprice_required');
8756: END unmark_reprice_required;
8953: --
8954: l_return_status VARCHAR2(1);
8955: l_return_code NUMBER;
8956: l_delvy_det_rec shipment_line_rec_type;
8957: l_dlvy WSH_UTIL_CORE.id_tab_type;
8958: l_first_level_rows shpmnt_content_tab_type;
8959: l_first_level_charges addl_services_tab_type;
8960:
8961: l_dummy_summary NUMBER;
8974: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_LOG;
8975:
8976: BEGIN
8977:
8978: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
8979: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
8980: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'shipment_price_consolidate','start');
8981:
8982: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'p_delivery_leg_id='||p_delivery_leg_id);
8996: RAISE FND_API.G_EXC_ERROR;
8997: ELSIF (l_return_code = G_RC_REPRICE_NOT_REQUIRED
8998: OR l_return_code = G_RC_NOT_RATE_FREIGHT_TERM
8999: OR l_return_code = G_RC_NOT_RATE_MANIFESTING) THEN
9000: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9001: raise g_finished_warning;
9002: END IF;
9003: ELSE
9004:
9014: RAISE FND_API.G_EXC_ERROR;
9015: ELSIF (l_return_code = G_RC_REPRICE_NOT_REQUIRED
9016: OR l_return_code = G_RC_NOT_RATE_FREIGHT_TERM
9017: OR l_return_code = G_RC_NOT_RATE_MANIFESTING) THEN
9018: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9019: raise g_finished_warning;
9020: END IF;
9021: END IF;
9022:
9068: delete_invalid_fc_recs (
9069: p_segment_id => p_segment_id,
9070: x_return_status => l_return_status ) ;
9071:
9072: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9073: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9074: ROLLBACK to before_pricing;
9075: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'segment:delete_invalid_fc_recs ');
9076: raise FTE_FREIGHT_PRICING_UTIL.g_delete_invalid_fc_failed;
9069: p_segment_id => p_segment_id,
9070: x_return_status => l_return_status ) ;
9071:
9072: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9073: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9074: ROLLBACK to before_pricing;
9075: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'segment:delete_invalid_fc_recs ');
9076: raise FTE_FREIGHT_PRICING_UTIL.g_delete_invalid_fc_failed;
9077: END IF;
9082: flatten_shipment (
9083: x_first_level_rows => l_first_level_rows,
9084: x_return_status => l_return_status );
9085:
9086: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9087: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9088: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'segment:Consolidate=Y:flatten_shipment ');
9089: ROLLBACK to before_pricing;
9090: raise FTE_FREIGHT_PRICING_UTIL.g_flatten_shipment_failed;
9083: x_first_level_rows => l_first_level_rows,
9084: x_return_status => l_return_status );
9085:
9086: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9087: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9088: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'segment:Consolidate=Y:flatten_shipment ');
9089: ROLLBACK to before_pricing;
9090: raise FTE_FREIGHT_PRICING_UTIL.g_flatten_shipment_failed;
9091: END IF;
9127: x_freight_cost_temp_price => l_dummy_fc_temp_price,
9128: x_freight_cost_temp_charge => l_dummy_fc_temp_charge,
9129: x_return_status => l_return_status ) ;
9130:
9131: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9132: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9133: ROLLBACK to before_pricing;
9134: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'segment:Consolidate=Y:shipment_pricing ');
9135: raise FTE_FREIGHT_PRICING_UTIL.g_shipment_pricing_failed;
9128: x_freight_cost_temp_charge => l_dummy_fc_temp_charge,
9129: x_return_status => l_return_status ) ;
9130:
9131: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9132: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9133: ROLLBACK to before_pricing;
9134: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'segment:Consolidate=Y:shipment_pricing ');
9135: raise FTE_FREIGHT_PRICING_UTIL.g_shipment_pricing_failed;
9136: END IF;
9142: unmark_reprice_required (
9143: p_segment_id => p_segment_id,
9144: x_return_status => l_return_status ) ;
9145:
9146: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9147: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9148: ROLLBACK to before_pricing;
9149: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'segment:unmark_reprice_required ');
9150: raise FTE_FREIGHT_PRICING_UTIL.g_unmark_reprice_req_failed;
9143: p_segment_id => p_segment_id,
9144: x_return_status => l_return_status ) ;
9145:
9146: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9147: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9148: ROLLBACK to before_pricing;
9149: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'segment:unmark_reprice_required ');
9150: raise FTE_FREIGHT_PRICING_UTIL.g_unmark_reprice_req_failed;
9151: END IF;
9188: delete_invalid_fc_recs (
9189: p_delivery_leg_id => l_dlvy(j),
9190: x_return_status => l_return_status ) ;
9191:
9192: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9193: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9194: ROLLBACK to before_pricing;
9195: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'dleg:consolidate:N:delete_invalid_fc_recs ');
9196: raise FTE_FREIGHT_PRICING_UTIL.g_delete_invalid_fc_failed;
9189: p_delivery_leg_id => l_dlvy(j),
9190: x_return_status => l_return_status ) ;
9191:
9192: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9193: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9194: ROLLBACK to before_pricing;
9195: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'dleg:consolidate:N:delete_invalid_fc_recs ');
9196: raise FTE_FREIGHT_PRICING_UTIL.g_delete_invalid_fc_failed;
9197: END IF;
9203: p_delivery_leg_id => l_dlvy(j),
9204: x_first_level_rows => l_first_level_rows,
9205: x_return_status => l_return_status );
9206:
9207: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9208: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9209: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'segment:Consolidate=N:flatten_shipment ');
9210: ROLLBACK to before_pricing;
9211: raise FTE_FREIGHT_PRICING_UTIL.g_flatten_shipment_failed;
9204: x_first_level_rows => l_first_level_rows,
9205: x_return_status => l_return_status );
9206:
9207: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9208: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9209: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'segment:Consolidate=N:flatten_shipment ');
9210: ROLLBACK to before_pricing;
9211: raise FTE_FREIGHT_PRICING_UTIL.g_flatten_shipment_failed;
9212: END IF;
9237: x_freight_cost_temp_price => l_dummy_fc_temp_price,
9238: x_freight_cost_temp_charge => l_dummy_fc_temp_charge,
9239: x_return_status => l_return_status ) ;
9240:
9241: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9242: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9243: ROLLBACK to before_pricing;
9244: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'segment:Consolidate=N:shipment_pricing ');
9245: raise FTE_FREIGHT_PRICING_UTIL.g_shipment_pricing_failed;
9238: x_freight_cost_temp_charge => l_dummy_fc_temp_charge,
9239: x_return_status => l_return_status ) ;
9240:
9241: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9242: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9243: ROLLBACK to before_pricing;
9244: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'segment:Consolidate=N:shipment_pricing ');
9245: raise FTE_FREIGHT_PRICING_UTIL.g_shipment_pricing_failed;
9246: END IF;
9252: unmark_reprice_required (
9253: p_delivery_leg_id => l_dlvy(j),
9254: x_return_status => l_return_status ) ;
9255:
9256: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9257: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9258: ROLLBACK to before_pricing;
9259: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'dleg:consolidate:N:unmark_reprice_required ');
9260: raise FTE_FREIGHT_PRICING_UTIL.g_unmark_reprice_req_failed;
9253: p_delivery_leg_id => l_dlvy(j),
9254: x_return_status => l_return_status ) ;
9255:
9256: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9257: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9258: ROLLBACK to before_pricing;
9259: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'dleg:consolidate:N:unmark_reprice_required ');
9260: raise FTE_FREIGHT_PRICING_UTIL.g_unmark_reprice_req_failed;
9261: END IF;
9322: delete_invalid_fc_recs (
9323: p_segment_id => l_segment_id,
9324: x_return_status => l_return_status ) ;
9325:
9326: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9327: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9328: ROLLBACK to before_pricing;
9329: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'dleg:consolidate:Y:delete_invalid_fc_recs ');
9330: raise FTE_FREIGHT_PRICING_UTIL.g_delete_invalid_fc_failed;
9323: p_segment_id => l_segment_id,
9324: x_return_status => l_return_status ) ;
9325:
9326: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9327: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9328: ROLLBACK to before_pricing;
9329: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'dleg:consolidate:Y:delete_invalid_fc_recs ');
9330: raise FTE_FREIGHT_PRICING_UTIL.g_delete_invalid_fc_failed;
9331: END IF;
9336: flatten_shipment (
9337: x_first_level_rows => l_first_level_rows,
9338: x_return_status => l_return_status );
9339:
9340: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9341: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9342: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'dleg:Consolidate=Y:flatten_shipment ');
9343: ROLLBACK to before_pricing;
9344: raise FTE_FREIGHT_PRICING_UTIL.g_flatten_shipment_failed;
9337: x_first_level_rows => l_first_level_rows,
9338: x_return_status => l_return_status );
9339:
9340: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9341: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9342: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'dleg:Consolidate=Y:flatten_shipment ');
9343: ROLLBACK to before_pricing;
9344: raise FTE_FREIGHT_PRICING_UTIL.g_flatten_shipment_failed;
9345: END IF;
9380: x_freight_cost_temp_price => l_dummy_fc_temp_price,
9381: x_freight_cost_temp_charge => l_dummy_fc_temp_charge,
9382: x_return_status => l_return_status ) ;
9383:
9384: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9385: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9386: ROLLBACK to before_pricing;
9387: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'dleg:Consolidate=Y:shipment_pricing ');
9388: raise FTE_FREIGHT_PRICING_UTIL.g_shipment_pricing_failed;
9381: x_freight_cost_temp_charge => l_dummy_fc_temp_charge,
9382: x_return_status => l_return_status ) ;
9383:
9384: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9385: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9386: ROLLBACK to before_pricing;
9387: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'dleg:Consolidate=Y:shipment_pricing ');
9388: raise FTE_FREIGHT_PRICING_UTIL.g_shipment_pricing_failed;
9389: END IF;
9395: unmark_reprice_required (
9396: p_segment_id => l_segment_id,
9397: x_return_status => l_return_status ) ;
9398:
9399: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9400: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9401: ROLLBACK to before_pricing;
9402: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'dleg:consolidate:Y:unmark_reprice_required ');
9403: raise FTE_FREIGHT_PRICING_UTIL.g_unmark_reprice_req_failed;
9396: p_segment_id => l_segment_id,
9397: x_return_status => l_return_status ) ;
9398:
9399: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9400: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9401: ROLLBACK to before_pricing;
9402: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'dleg:consolidate:Y:unmark_reprice_required ');
9403: raise FTE_FREIGHT_PRICING_UTIL.g_unmark_reprice_req_failed;
9404: END IF;
9435: delete_invalid_fc_recs (
9436: p_delivery_leg_id => p_delivery_leg_id,
9437: x_return_status => l_return_status ) ;
9438:
9439: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9440: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9441: ROLLBACK to before_pricing;
9442: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'dleg:consolidate:N:delete_invalid_fc_recs ');
9443: raise FTE_FREIGHT_PRICING_UTIL.g_delete_invalid_fc_failed;
9436: p_delivery_leg_id => p_delivery_leg_id,
9437: x_return_status => l_return_status ) ;
9438:
9439: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9440: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9441: ROLLBACK to before_pricing;
9442: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'dleg:consolidate:N:delete_invalid_fc_recs ');
9443: raise FTE_FREIGHT_PRICING_UTIL.g_delete_invalid_fc_failed;
9444: END IF;
9450: -- p_delivery_leg_id => p_delivery_leg_id, -- Not required
9451: x_first_level_rows => l_first_level_rows,
9452: x_return_status => l_return_status );
9453:
9454: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9455: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9456: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'dleg:Consolidate=N:flatten_shipment ');
9457: ROLLBACK to before_pricing;
9458: raise FTE_FREIGHT_PRICING_UTIL.g_flatten_shipment_failed;
9451: x_first_level_rows => l_first_level_rows,
9452: x_return_status => l_return_status );
9453:
9454: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9455: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9456: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'dleg:Consolidate=N:flatten_shipment ');
9457: ROLLBACK to before_pricing;
9458: raise FTE_FREIGHT_PRICING_UTIL.g_flatten_shipment_failed;
9459: END IF;
9484: x_freight_cost_temp_price => l_dummy_fc_temp_price,
9485: x_freight_cost_temp_charge => l_dummy_fc_temp_charge,
9486: x_return_status => l_return_status ) ;
9487:
9488: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9489: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9490: ROLLBACK to before_pricing;
9491: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'dleg:Consolidate=N:shipment_pricing ');
9492: raise FTE_FREIGHT_PRICING_UTIL.g_shipment_pricing_failed;
9485: x_freight_cost_temp_charge => l_dummy_fc_temp_charge,
9486: x_return_status => l_return_status ) ;
9487:
9488: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9489: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9490: ROLLBACK to before_pricing;
9491: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'dleg:Consolidate=N:shipment_pricing ');
9492: raise FTE_FREIGHT_PRICING_UTIL.g_shipment_pricing_failed;
9493: END IF;
9499: unmark_reprice_required (
9500: p_delivery_leg_id => p_delivery_leg_id,
9501: x_return_status => l_return_status ) ;
9502:
9503: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9504: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9505: ROLLBACK to before_pricing;
9506: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'dleg:consolidate:N:unmark_reprice_required ');
9507: raise FTE_FREIGHT_PRICING_UTIL.g_unmark_reprice_req_failed;
9500: p_delivery_leg_id => p_delivery_leg_id,
9501: x_return_status => l_return_status ) ;
9502:
9503: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9504: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9505: ROLLBACK to before_pricing;
9506: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'dleg:consolidate:N:unmark_reprice_required ');
9507: raise FTE_FREIGHT_PRICING_UTIL.g_unmark_reprice_req_failed;
9508: END IF;
9517: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate');
9518:
9519: EXCEPTION
9520: WHEN g_finished_warning THEN
9521: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9522: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate');
9523: WHEN FND_API.G_EXC_ERROR THEN
9524: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9525: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_consolidate',FTE_FREIGHT_PRICING_UTIL.G_ERR,'FND_API.G_EXC_ERROR');
9520: WHEN g_finished_warning THEN
9521: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9522: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate');
9523: WHEN FND_API.G_EXC_ERROR THEN
9524: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9525: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_consolidate',FTE_FREIGHT_PRICING_UTIL.G_ERR,'FND_API.G_EXC_ERROR');
9526: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate');
9527: WHEN FTE_FREIGHT_PRICING_UTIL.g_noleg_segment THEN
9528: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9524: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9525: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_consolidate',FTE_FREIGHT_PRICING_UTIL.G_ERR,'FND_API.G_EXC_ERROR');
9526: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate');
9527: WHEN FTE_FREIGHT_PRICING_UTIL.g_noleg_segment THEN
9528: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9529: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_consolidate',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_noleg_segment');
9530: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate');
9531: WHEN FTE_FREIGHT_PRICING_UTIL.g_pricing_not_required THEN
9532: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9528: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9529: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_consolidate',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_noleg_segment');
9530: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate');
9531: WHEN FTE_FREIGHT_PRICING_UTIL.g_pricing_not_required THEN
9532: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9533: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_consolidate',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_pricing_not_required');
9534: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate');
9535: WHEN FTE_FREIGHT_PRICING_UTIL.g_flatten_shipment_failed THEN
9536: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9532: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9533: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_consolidate',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_pricing_not_required');
9534: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate');
9535: WHEN FTE_FREIGHT_PRICING_UTIL.g_flatten_shipment_failed THEN
9536: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9537: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_consolidate',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_flatten_shipment_failed');
9538: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate');
9539: WHEN FTE_FREIGHT_PRICING_UTIL.g_empty_delivery THEN
9540: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9536: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9537: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_consolidate',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_flatten_shipment_failed');
9538: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate');
9539: WHEN FTE_FREIGHT_PRICING_UTIL.g_empty_delivery THEN
9540: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9541: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_consolidate',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_empty_delivery');
9542: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate');
9543: WHEN FTE_FREIGHT_PRICING_UTIL.g_shipment_pricing_failed THEN
9544: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9540: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9541: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_consolidate',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_empty_delivery');
9542: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate');
9543: WHEN FTE_FREIGHT_PRICING_UTIL.g_shipment_pricing_failed THEN
9544: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9545: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_consolidate',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_shipment_pricing_failed');
9546: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate');
9547: WHEN FTE_FREIGHT_PRICING_UTIL.g_unmark_reprice_req_failed THEN
9548: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9544: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9545: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_consolidate',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_shipment_pricing_failed');
9546: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate');
9547: WHEN FTE_FREIGHT_PRICING_UTIL.g_unmark_reprice_req_failed THEN
9548: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9549: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_consolidate',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_unmark_reprice_req_failed');
9550: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate');
9551: WHEN FTE_FREIGHT_PRICING_UTIL.g_delete_invalid_fc_failed THEN
9552: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9548: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9549: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_consolidate',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_unmark_reprice_req_failed');
9550: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate');
9551: WHEN FTE_FREIGHT_PRICING_UTIL.g_delete_invalid_fc_failed THEN
9552: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9553: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_consolidate',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_delete_invalid_fc_failed');
9554: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate');
9555: WHEN others THEN
9556: ROLLBACK to before_pricing;
9553: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_consolidate',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_delete_invalid_fc_failed');
9554: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate');
9555: WHEN others THEN
9556: ROLLBACK to before_pricing;
9557: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
9558: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_consolidate',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
9559: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
9560: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate');
9561:
9577: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_LOG;
9578:
9579: BEGIN
9580:
9581: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
9582:
9583: -- Initialize message list if p_init_msg_list is set to TRUE.
9584: IF FND_API.to_Boolean( p_init_msg_list ) THEN
9585:
9585:
9586: FTE_FREIGHT_PRICING_UTIL.initialize_logging( p_init_msg_list => p_init_msg_list,
9587: x_return_status => l_return_status );
9588:
9589: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9590: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9591: x_return_status := l_return_status;
9592: RETURN;
9593: END IF;
9586: FTE_FREIGHT_PRICING_UTIL.initialize_logging( p_init_msg_list => p_init_msg_list,
9587: x_return_status => l_return_status );
9588:
9589: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9590: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9591: x_return_status := l_return_status;
9592: RETURN;
9593: END IF;
9594: ELSE
9614: x_trip_id=>l_trip_id,
9615: x_mode_of_transport=>l_mode,
9616: x_return_status=>l_return_status);
9617:
9618: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
9619: THEN
9620: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
9621: THEN
9622: raise FTE_FREIGHT_PRICING_UTIL.g_get_trip_mode_fail;
9616: x_return_status=>l_return_status);
9617:
9618: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
9619: THEN
9620: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
9621: THEN
9622: raise FTE_FREIGHT_PRICING_UTIL.g_get_trip_mode_fail;
9623: END IF;
9624: END IF;
9631: x_trip_id=>l_trip_id,
9632: x_mode_of_transport=>l_mode,
9633: x_return_status=>l_return_status);
9634:
9635: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
9636: THEN
9637: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
9638: THEN
9639: raise FTE_FREIGHT_PRICING_UTIL.g_get_trip_mode_fail;
9633: x_return_status=>l_return_status);
9634:
9635: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
9636: THEN
9637: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
9638: THEN
9639: raise FTE_FREIGHT_PRICING_UTIL.g_get_trip_mode_fail;
9640: END IF;
9641: END IF;
9651: p_check_reprice_flag=>'Y',
9652: x_output_cost_tab=>l_output_tab,
9653: x_return_status=>l_return_status);
9654:
9655: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
9656: THEN
9657: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
9658: THEN
9659: raise FTE_FREIGHT_PRICING_UTIL.g_tl_rate_trip_fail;
9653: x_return_status=>l_return_status);
9654:
9655: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
9656: THEN
9657: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
9658: THEN
9659: raise FTE_FREIGHT_PRICING_UTIL.g_tl_rate_trip_fail;
9660: END IF;
9661: END IF;
9671: p_segment_id => p_in_attributes.segment_id,
9672: p_check_reprice_flag => 'Y',
9673: x_return_status => l_return_status );
9674:
9675: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9676: FTE_FREIGHT_PRICING_UTIL.print_msg(p_msg => 'Shipment price consolidate successful ');
9677: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9678: x_return_status := l_return_status;
9679: FTE_FREIGHT_PRICING_UTIL.print_msg(p_msg => 'Shipment price consolidate successful with warning ');
9673: x_return_status => l_return_status );
9674:
9675: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9676: FTE_FREIGHT_PRICING_UTIL.print_msg(p_msg => 'Shipment price consolidate successful ');
9677: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9678: x_return_status := l_return_status;
9679: FTE_FREIGHT_PRICING_UTIL.print_msg(p_msg => 'Shipment price consolidate successful with warning ');
9680: ELSE
9681: raise FTE_FREIGHT_PRICING_UTIL.g_price_consolidate_failed;
9695:
9696: EXCEPTION
9697:
9698: WHEN FTE_FREIGHT_PRICING_UTIL.g_get_trip_mode_fail THEN
9699: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9700: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('shipment_price_consolidate_standard','g_get_trip_mode_fail');
9701: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate_standard');
9702: IF FND_API.to_Boolean( p_init_msg_list ) THEN
9703: FTE_FREIGHT_PRICING_UTIL.close_logs;
9704: END IF;
9705:
9706:
9707: WHEN FTE_FREIGHT_PRICING_UTIL.g_tl_rate_trip_fail THEN
9708: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9709: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('shipment_price_consolidate_standard','g_tl_rate_trip_fail');
9710: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate_standard');
9711: IF FND_API.to_Boolean( p_init_msg_list ) THEN
9712: FTE_FREIGHT_PRICING_UTIL.close_logs;
9713: END IF;
9714:
9715:
9716: WHEN FTE_FREIGHT_PRICING_UTIL.g_price_consolidate_failed THEN
9717: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9718: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('shipment_price_consolidate_standard','g_price_consolidate_failed');
9719: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate_standard');
9720: IF FND_API.to_Boolean( p_init_msg_list ) THEN
9721: FTE_FREIGHT_PRICING_UTIL.close_logs;
9720: IF FND_API.to_Boolean( p_init_msg_list ) THEN
9721: FTE_FREIGHT_PRICING_UTIL.close_logs;
9722: END IF;
9723: WHEN others THEN
9724: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
9725: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('shipment_price_consolidate_standard','g_others');
9726: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
9727: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate_standard');
9728: IF FND_API.to_Boolean( p_init_msg_list ) THEN
9784: p_delivery_id => p_delivery_id,
9785: p_delivery_leg_id => p_delivery_leg_id,
9786: x_return_status => l_return_status );
9787:
9788: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9789: l_status := 'NORMAL';
9790: errbuf := 'Shipment Reprice is completed successfully';
9791: retcode := '0';
9792: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9788: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9789: l_status := 'NORMAL';
9790: errbuf := 'Shipment Reprice is completed successfully';
9791: retcode := '0';
9792: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9793: l_status := 'WARNING';
9794: errbuf := 'Shipment Reprice is completed with warning';
9795: retcode := '1';
9796: ELSE
9842: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_LOG;
9843:
9844: BEGIN
9845:
9846: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
9847:
9848: IF p_init_prc_log = 'Y' THEN
9849: FTE_FREIGHT_PRICING_UTIL.initialize_logging(x_return_status => l_return_status);
9850:
9847:
9848: IF p_init_prc_log = 'Y' THEN
9849: FTE_FREIGHT_PRICING_UTIL.initialize_logging(x_return_status => l_return_status);
9850:
9851: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9852: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9853: x_return_status := l_return_status;
9854: RETURN;
9855: END IF;
9848: IF p_init_prc_log = 'Y' THEN
9849: FTE_FREIGHT_PRICING_UTIL.initialize_logging(x_return_status => l_return_status);
9850:
9851: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9852: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9853: x_return_status := l_return_status;
9854: RETURN;
9855: END IF;
9856: ELSE
9873: x_trip_id=>l_trip_id,
9874: x_mode_of_transport=>l_mode,
9875: x_return_status=>l_return_status);
9876:
9877: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
9878: THEN
9879: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
9880: THEN
9881: raise FTE_FREIGHT_PRICING_UTIL.g_get_trip_mode_fail;
9875: x_return_status=>l_return_status);
9876:
9877: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
9878: THEN
9879: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
9880: THEN
9881: raise FTE_FREIGHT_PRICING_UTIL.g_get_trip_mode_fail;
9882: END IF;
9883: END IF;
9890: p_check_reprice_flag=>'N',
9891: x_output_cost_tab=>l_output_tab,
9892: x_return_status=>l_return_status);
9893:
9894: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
9895: THEN
9896: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
9897: THEN
9898: raise FTE_FREIGHT_PRICING_UTIL.g_tl_rate_trip_fail;
9892: x_return_status=>l_return_status);
9893:
9894: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
9895: THEN
9896: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
9897: THEN
9898: raise FTE_FREIGHT_PRICING_UTIL.g_tl_rate_trip_fail;
9899: END IF;
9900: END IF;
9906: shipment_price_consolidate (
9907: p_segment_id => p_segment_id,
9908: x_return_status => l_return_status );
9909:
9910: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9911: FTE_FREIGHT_PRICING_UTIL.print_msg(p_msg => 'Shipment price consolidate successful for segment : '||p_segment_id);
9912: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9913: x_return_status := l_return_status;
9914: FTE_FREIGHT_PRICING_UTIL.print_msg(p_msg => 'Shipment price consolidate successful with warning for segment : '||p_segment_id);
9908: x_return_status => l_return_status );
9909:
9910: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9911: FTE_FREIGHT_PRICING_UTIL.print_msg(p_msg => 'Shipment price consolidate successful for segment : '||p_segment_id);
9912: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9913: x_return_status := l_return_status;
9914: FTE_FREIGHT_PRICING_UTIL.print_msg(p_msg => 'Shipment price consolidate successful with warning for segment : '||p_segment_id);
9915: ELSE
9916: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'segment: '||p_segment_id||' shipment_price_consolidate ');
9938: x_trip_id=>l_trip_id,
9939: x_mode_of_transport=>l_mode,
9940: x_return_status=>l_return_status);
9941:
9942: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
9943: THEN
9944: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
9945: THEN
9946: raise FTE_FREIGHT_PRICING_UTIL.g_get_trip_mode_fail;
9940: x_return_status=>l_return_status);
9941:
9942: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
9943: THEN
9944: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
9945: THEN
9946: raise FTE_FREIGHT_PRICING_UTIL.g_get_trip_mode_fail;
9947: END IF;
9948: END IF;
9955: p_check_reprice_flag=>'N',
9956: x_output_cost_tab=>l_output_tab,
9957: x_return_status=>l_return_status);
9958:
9959: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
9960: THEN
9961: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
9962: THEN
9963: raise FTE_FREIGHT_PRICING_UTIL.g_tl_rate_trip_fail;
9957: x_return_status=>l_return_status);
9958:
9959: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
9960: THEN
9961: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
9962: THEN
9963: raise FTE_FREIGHT_PRICING_UTIL.g_tl_rate_trip_fail;
9964: END IF;
9965: END IF;
9972: shipment_price_consolidate (
9973: p_delivery_leg_id => l_delivery_leg_id,
9974: x_return_status => l_return_status );
9975:
9976: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9977: FTE_FREIGHT_PRICING_UTIL.print_msg(p_msg => 'Shipment price consolidate successful for delivery leg : '||l_delivery_leg_id);
9978: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9979: x_return_status := l_return_status;
9980: FTE_FREIGHT_PRICING_UTIL.print_msg(p_msg => 'Shipment price consolidate successful for segment : '||p_segment_id);
9974: x_return_status => l_return_status );
9975:
9976: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9977: FTE_FREIGHT_PRICING_UTIL.print_msg(p_msg => 'Shipment price consolidate successful for delivery leg : '||l_delivery_leg_id);
9978: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9979: x_return_status := l_return_status;
9980: FTE_FREIGHT_PRICING_UTIL.print_msg(p_msg => 'Shipment price consolidate successful for segment : '||p_segment_id);
9981: ELSE
9982: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Delivery leg: '||l_delivery_leg_id||' shipment_price_consolidate ');
9995: x_trip_id=>l_trip_id,
9996: x_mode_of_transport=>l_mode,
9997: x_return_status=>l_return_status);
9998:
9999: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
10000: THEN
10001: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
10002: THEN
10003: raise FTE_FREIGHT_PRICING_UTIL.g_get_trip_mode_fail;
9997: x_return_status=>l_return_status);
9998:
9999: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
10000: THEN
10001: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
10002: THEN
10003: raise FTE_FREIGHT_PRICING_UTIL.g_get_trip_mode_fail;
10004: END IF;
10005: END IF;
10012: p_check_reprice_flag=>'N',
10013: x_output_cost_tab=>l_output_tab,
10014: x_return_status=>l_return_status);
10015:
10016: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
10017: THEN
10018: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
10019: THEN
10020: raise FTE_FREIGHT_PRICING_UTIL.g_tl_rate_trip_fail;
10014: x_return_status=>l_return_status);
10015:
10016: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
10017: THEN
10018: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
10019: THEN
10020: raise FTE_FREIGHT_PRICING_UTIL.g_tl_rate_trip_fail;
10021: END IF;
10022: END IF;
10027: shipment_price_consolidate (
10028: p_delivery_leg_id => p_delivery_leg_id,
10029: x_return_status => l_return_status );
10030:
10031: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10032: FTE_FREIGHT_PRICING_UTIL.print_msg(p_msg => 'Shipment price consolidate successful for delivery leg : '||p_delivery_leg_id);
10033: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
10034: x_return_status := l_return_status;
10035: ELSE
10029: x_return_status => l_return_status );
10030:
10031: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10032: FTE_FREIGHT_PRICING_UTIL.print_msg(p_msg => 'Shipment price consolidate successful for delivery leg : '||p_delivery_leg_id);
10033: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
10034: x_return_status := l_return_status;
10035: ELSE
10036: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'delivery leg: '||p_delivery_leg_id||' shipment_price_consolidate ');
10037: raise FTE_FREIGHT_PRICING_UTIL.g_price_consolidate_failed;
10045: END IF;
10046:
10047: EXCEPTION
10048: WHEN FTE_FREIGHT_PRICING_UTIL.g_no_input THEN
10049: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10050: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_reprice2',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_no_input');
10051: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_reprice2');
10052: IF p_init_prc_log = 'Y' THEN
10053: FTE_FREIGHT_PRICING_UTIL.close_logs;
10053: FTE_FREIGHT_PRICING_UTIL.close_logs;
10054: END IF;
10055:
10056: WHEN FTE_FREIGHT_PRICING_UTIL.g_get_trip_mode_fail THEN
10057: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10058: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_reprice2',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_get_trip_mode_fail');
10059: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_reprice2');
10060: IF p_init_prc_log = 'Y' THEN
10061: FTE_FREIGHT_PRICING_UTIL.close_logs;
10061: FTE_FREIGHT_PRICING_UTIL.close_logs;
10062: END IF;
10063:
10064: WHEN FTE_FREIGHT_PRICING_UTIL.g_tl_rate_trip_fail THEN
10065: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10066: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_reprice2',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_tl_rate_trip_fail');
10067: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_reprice2');
10068: IF p_init_prc_log = 'Y' THEN
10069: FTE_FREIGHT_PRICING_UTIL.close_logs;
10070: END IF;
10071:
10072:
10073: WHEN FTE_FREIGHT_PRICING_UTIL.g_price_consolidate_failed THEN
10074: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10075: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_reprice2',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_price_consolidate_failed');
10076: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_reprice2');
10077: IF p_init_prc_log = 'Y' THEN
10078: FTE_FREIGHT_PRICING_UTIL.close_logs;
10078: FTE_FREIGHT_PRICING_UTIL.close_logs;
10079: END IF;
10080:
10081: WHEN others THEN
10082: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
10083: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_reprice2',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
10084: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
10085: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_reprice2');
10086: IF p_init_prc_log = 'Y' THEN
10143: x_delivery_legs := l_delvy_tab;
10144:
10145: EXCEPTION
10146: WHEN others THEN
10147: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
10148: FTE_FREIGHT_PRICING_UTIL.set_exception('get_delivery_legs',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
10149: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
10150: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'get_delivery_legs');
10151: END get_delivery_legs;
10232:
10233:
10234: EXCEPTION
10235: WHEN others THEN
10236: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10237: FTE_FREIGHT_PRICING_UTIL.set_exception('get_distinct_trip_ids',FTE_FREIGHT_PRICING_UTIL.G_ERR,'get distinct trips failed');
10238: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'get_distinct_trip_ids');
10239: END get_distinct_trip_ids;
10240:
10356:
10357: EXCEPTION
10358:
10359: --WHEN dleg_rates_not_found THEN
10360: -- x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10361: -- FTE_FREIGHT_PRICING_UTIL.set_exception('validate_delivery_legs',FTE_FREIGHT_PRICING_UTIL.G_ERR,'dleg_rates_not_found');
10362: -- FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'validate_delivery_legs');
10363: WHEN OTHERS THEN
10364: FTE_FREIGHT_PRICING_UTIL.set_exception('validate_delivery_legs',FTE_FREIGHT_PRICING_UTIL.G_ERR,'validate_delivery_legs failed');
10366: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'validate_delivery_legs');
10367: END validate_delivery_legs;
10368:
10369:
10370: PROCEDURE validate_trips(p_trip_id_list IN WSH_UTIL_CORE.id_tab_type,
10371: x_failed_trips_list OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
10372: x_success_trips_list OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
10373: x_closed_trips_list OUT NOCOPY WSH_UTIL_CORE.id_tab_type)
10374:
10367: END validate_delivery_legs;
10368:
10369:
10370: PROCEDURE validate_trips(p_trip_id_list IN WSH_UTIL_CORE.id_tab_type,
10371: x_failed_trips_list OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
10372: x_success_trips_list OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
10373: x_closed_trips_list OUT NOCOPY WSH_UTIL_CORE.id_tab_type)
10374:
10375: IS
10368:
10369:
10370: PROCEDURE validate_trips(p_trip_id_list IN WSH_UTIL_CORE.id_tab_type,
10371: x_failed_trips_list OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
10372: x_success_trips_list OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
10373: x_closed_trips_list OUT NOCOPY WSH_UTIL_CORE.id_tab_type)
10374:
10375: IS
10376:
10369:
10370: PROCEDURE validate_trips(p_trip_id_list IN WSH_UTIL_CORE.id_tab_type,
10371: x_failed_trips_list OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
10372: x_success_trips_list OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
10373: x_closed_trips_list OUT NOCOPY WSH_UTIL_CORE.id_tab_type)
10374:
10375: IS
10376:
10377: CURSOR c_trip_info(c_trip_id NUMBER)
10524: l_service_failed_delv_ids VARCHAR2(32767);
10525: l_closed_trips_delv_ids VARCHAR2(32767);
10526: l_fail_val_dleg_list FTE_ID_TAB_TYPE;
10527: l_action_params FTE_TRIP_RATING_GRP.action_param_rec;
10528: l_trip_id_list WSH_UTIL_CORE.id_tab_type;
10529: l_failed_trips WSH_UTIL_CORE.id_tab_type;
10530: l_success_trips WSH_UTIL_CORE.id_tab_type;
10531: l_temp_trips_tab WSH_UTIL_CORE.id_tab_type;
10532: l_closed_trips WSH_UTIL_CORE.id_tab_type;
10525: l_closed_trips_delv_ids VARCHAR2(32767);
10526: l_fail_val_dleg_list FTE_ID_TAB_TYPE;
10527: l_action_params FTE_TRIP_RATING_GRP.action_param_rec;
10528: l_trip_id_list WSH_UTIL_CORE.id_tab_type;
10529: l_failed_trips WSH_UTIL_CORE.id_tab_type;
10530: l_success_trips WSH_UTIL_CORE.id_tab_type;
10531: l_temp_trips_tab WSH_UTIL_CORE.id_tab_type;
10532: l_closed_trips WSH_UTIL_CORE.id_tab_type;
10533: l_number_of_warnings NUMBER;
10526: l_fail_val_dleg_list FTE_ID_TAB_TYPE;
10527: l_action_params FTE_TRIP_RATING_GRP.action_param_rec;
10528: l_trip_id_list WSH_UTIL_CORE.id_tab_type;
10529: l_failed_trips WSH_UTIL_CORE.id_tab_type;
10530: l_success_trips WSH_UTIL_CORE.id_tab_type;
10531: l_temp_trips_tab WSH_UTIL_CORE.id_tab_type;
10532: l_closed_trips WSH_UTIL_CORE.id_tab_type;
10533: l_number_of_warnings NUMBER;
10534: l_number_of_errors NUMBER;
10527: l_action_params FTE_TRIP_RATING_GRP.action_param_rec;
10528: l_trip_id_list WSH_UTIL_CORE.id_tab_type;
10529: l_failed_trips WSH_UTIL_CORE.id_tab_type;
10530: l_success_trips WSH_UTIL_CORE.id_tab_type;
10531: l_temp_trips_tab WSH_UTIL_CORE.id_tab_type;
10532: l_closed_trips WSH_UTIL_CORE.id_tab_type;
10533: l_number_of_warnings NUMBER;
10534: l_number_of_errors NUMBER;
10535: l_return_status VARCHAR2(32767);
10528: l_trip_id_list WSH_UTIL_CORE.id_tab_type;
10529: l_failed_trips WSH_UTIL_CORE.id_tab_type;
10530: l_success_trips WSH_UTIL_CORE.id_tab_type;
10531: l_temp_trips_tab WSH_UTIL_CORE.id_tab_type;
10532: l_closed_trips WSH_UTIL_CORE.id_tab_type;
10533: l_number_of_warnings NUMBER;
10534: l_number_of_errors NUMBER;
10535: l_return_status VARCHAR2(32767);
10536: l_no_rates_delv_ids VARCHAR2(32767);
10571: THEN
10572: FND_MSG_PUB.initialize;
10573: END IF;
10574:
10575: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
10576:
10577: FTE_FREIGHT_PRICING_UTIL.initialize_logging(x_return_status => l_return_status);
10578:
10579: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10575: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
10576:
10577: FTE_FREIGHT_PRICING_UTIL.initialize_logging(x_return_status => l_return_status);
10578:
10579: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10580: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
10581: x_return_status := l_return_status;
10582: RETURN;
10583: END IF;
10576:
10577: FTE_FREIGHT_PRICING_UTIL.initialize_logging(x_return_status => l_return_status);
10578:
10579: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10580: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
10581: x_return_status := l_return_status;
10582: RETURN;
10583: END IF;
10584: ELSE
10811: x_msg_count => l_msg_count,
10812: x_msg_data => l_msg_data
10813: );
10814: j1 := 0;
10815: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10816: FTE_FREIGHT_PRICING_UTIL.print_msg(p_msg => 'Trip Re-Rating successful for trip_id : '||l_trip_ids(l_index).trip_id);
10817: FOR j1 IN l_all_trips.FIRST..l_all_trips.LAST LOOP
10818: IF l_all_trips(j1).trip_id = l_trip_ids(l_index).trip_id THEN
10819: l_success_list.EXTEND;
10823: l_success_list(l_success_list.LAST) := l_all_trips(j1).delivery_leg_id;
10824: END IF;
10825: END IF;
10826: END LOOP;
10827: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
10828: FTE_FREIGHT_PRICING_UTIL.print_msg(p_msg => 'Trip Re-Rating with Warnings for trip_id : '||l_trip_ids(l_index).trip_id);
10829: x_return_status := l_return_status;
10830:
10831: FND_MSG_PUB.Count_And_Get
10887: FND_MSG_PUB.Delete_Msg ( p_msg_index => null);
10888:
10889: IF l_success_list.COUNT > 0 THEN
10890: IF l_success_list.COUNT = l_dleg_list.COUNT THEN
10891: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
10892: END IF;
10893: END IF;
10894:
10895: IF l_warning_list.COUNT > 0 THEN
10892: END IF;
10893: END IF;
10894:
10895: IF l_warning_list.COUNT > 0 THEN
10896: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10897: IF l_delv_with_multlegs_names IS NOT NULL THEN
10898: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,' Delv with MulipleLegs::= '||l_delv_with_multlegs_names);
10899: FND_MESSAGE.SET_NAME('FTE','FTE_PRC_RERATE_MULTILEG_WARN');
10900: FND_MESSAGE.SET_TOKEN('DEL_NAMES',l_delv_with_multlegs_names);
10930: FND_MESSAGE.SET_TOKEN('LOGFILE',FTE_FREIGHT_PRICING_UTIL.get_log_file_name());
10931: FND_MSG_PUB.ADD;
10932: END IF;
10933: IF l_success_list.COUNT > 0 OR l_warning_list.COUNT > 0 THEN
10934: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10935: ELSE
10936: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10937: END IF;
10938: END IF;
10932: END IF;
10933: IF l_success_list.COUNT > 0 OR l_warning_list.COUNT > 0 THEN
10934: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10935: ELSE
10936: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10937: END IF;
10938: END IF;
10939: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'x_return_status='||x_return_status);
10940:
10968:
10969: EXCEPTION
10970: WHEN l_delivery_validation_failed THEN
10971: ROLLBACK TO rerate_shipment_online;
10972: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10973: --FND_MSG_PUB.Count_And_Get
10974: -- (
10975: -- p_count => x_msg_count,
10976: -- p_data => x_msg_data,
10982: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
10983: FTE_FREIGHT_PRICING_UTIL.close_logs;
10984: WHEN l_dleg_list_empty THEN
10985: ROLLBACK TO rerate_shipment_online;
10986: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10987: FND_MSG_PUB.Count_And_Get
10988: (
10989: p_count => x_msg_count,
10990: p_data => x_msg_data,
10995: FTE_FREIGHT_PRICING_UTIL.close_logs;
10996:
10997: WHEN l_delv_list_empty THEN
10998: ROLLBACK TO rerate_shipment_online;
10999: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11000: FND_MSG_PUB.Count_And_Get
11001: (
11002: p_count => x_msg_count,
11003: p_data => x_msg_data,
11008: FTE_FREIGHT_PRICING_UTIL.close_logs;
11009:
11010: WHEN l_del_name_mismatch THEN
11011: ROLLBACK TO rerate_shipment_online;
11012: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11013: FND_MSG_PUB.Count_And_Get
11014: (
11015: p_count => x_msg_count,
11016: p_data => x_msg_data,
11020: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
11021: FTE_FREIGHT_PRICING_UTIL.close_logs;
11022: WHEN l_dleg_validation_failed THEN
11023: ROLLBACK TO rerate_shipment_online;
11024: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11025: FND_MSG_PUB.Count_And_Get
11026: (
11027: p_count => x_msg_count,
11028: p_data => x_msg_data,
11031: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_reprice2',FTE_FREIGHT_PRICING_UTIL.G_ERR,'l_dleg_validation_failed');
11032: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_reprice2');
11033: FTE_FREIGHT_PRICING_UTIL.close_logs;
11034: WHEN l_trip_rating_failed THEN
11035: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11036: FND_MSG_PUB.Count_And_Get
11037: (
11038: p_count => x_msg_count,
11039: p_data => x_msg_data,
11043: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_reprice2');
11044: FTE_FREIGHT_PRICING_UTIL.close_logs;
11045: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
11046: ROLLBACK TO rerate_shipment_online;
11047: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11048: FND_MSG_PUB.Count_And_Get
11049: (
11050: p_count => x_msg_count,
11051: p_data => x_msg_data,
11056: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
11057: FTE_FREIGHT_PRICING_UTIL.close_logs;
11058: WHEN others THEN
11059: ROLLBACK TO rerate_shipment_online;
11060: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
11061: FND_MSG_PUB.Count_And_Get
11062: (
11063: p_count => x_msg_count,
11064: p_data => x_msg_data,
11083: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
11084:
11085: BEGIN
11086:
11087: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
11088: IF p_initialized THEN
11089: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
11090: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'delete_fc_temp_pvt','start');
11091: END IF;
11102: END IF;
11103:
11104: EXCEPTION
11105: WHEN others THEN
11106: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
11107: IF p_initialized THEN
11108: FTE_FREIGHT_PRICING_UTIL.set_exception('delete_fc_temp_pvt',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
11109: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
11110: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'delete_fc_temp_pvt');
11129:
11130: l_empty_main_row WSH_FREIGHT_COSTS_PVT.Freight_Cost_Rec_Type;
11131: l_freight_cost_main_row WSH_FREIGHT_COSTS_PVT.Freight_Cost_Rec_Type;
11132: l_freight_cost_main_charge WSH_FREIGHT_COSTS_PVT.Freight_Cost_Rec_Type;
11133: l_price_fc_ids WSH_UTIL_CORE.id_tab_type;
11134: l_rowid VARCHAR2(30);
11135: l_update_rowid VARCHAR2(30);
11136: l_freight_cost_id NUMBER;
11137:
11135: l_update_rowid VARCHAR2(30);
11136: l_freight_cost_id NUMBER;
11137:
11138: BEGIN
11139: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
11140:
11141: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
11142: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,l_api_name);
11143:
11231: p_rowid => l_update_rowid,
11232: p_freight_cost_info => l_freight_cost_main_row,
11233: x_return_status => l_return_status);
11234:
11235: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11236: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11237: ROLLBACK to before_fc_creation;
11238: raise FTE_FREIGHT_PRICING_UTIL.g_update_freight_cost_failed;
11239: END IF;
11232: p_freight_cost_info => l_freight_cost_main_row,
11233: x_return_status => l_return_status);
11234:
11235: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11236: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11237: ROLLBACK to before_fc_creation;
11238: raise FTE_FREIGHT_PRICING_UTIL.g_update_freight_cost_failed;
11239: END IF;
11240: END IF;
11251: x_rowid => l_rowid,
11252: x_freight_cost_id => l_freight_cost_id,
11253: x_return_status => l_return_status);
11254:
11255: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11256: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11257: ROLLBACK to before_fc_creation;
11258: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Base price');
11259: raise FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed;
11252: x_freight_cost_id => l_freight_cost_id,
11253: x_return_status => l_return_status);
11254:
11255: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11256: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11257: ROLLBACK to before_fc_creation;
11258: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Base price');
11259: raise FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed;
11260: END IF;
11320: x_rowid => l_rowid,
11321: x_freight_cost_id => l_freight_cost_id,
11322: x_return_status => l_return_status);
11323:
11324: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11325: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11326: ROLLBACK to before_fc_creation;
11327: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Charge');
11328: raise FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed;
11321: x_freight_cost_id => l_freight_cost_id,
11322: x_return_status => l_return_status);
11323:
11324: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11325: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11326: ROLLBACK to before_fc_creation;
11327: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Charge');
11328: raise FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed;
11329: END IF;
11336: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
11337:
11338: EXCEPTION
11339: WHEN FTE_FREIGHT_PRICING_UTIL.g_no_temp_fc_to_move THEN
11340: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11341: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_no_temp_fc_to_move');
11342: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
11343: WHEN FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed THEN
11344: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11340: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11341: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_no_temp_fc_to_move');
11342: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
11343: WHEN FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed THEN
11344: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11345: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_create_freight_cost_failed');
11346: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
11347: WHEN FTE_FREIGHT_PRICING_UTIL.g_update_freight_cost_failed THEN
11348: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11344: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11345: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_create_freight_cost_failed');
11346: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
11347: WHEN FTE_FREIGHT_PRICING_UTIL.g_update_freight_cost_failed THEN
11348: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11349: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_update_freight_cost_failed');
11350: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
11351: WHEN others THEN
11352: ROLLBACK to before_fc_creation;
11349: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_update_freight_cost_failed');
11350: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
11351: WHEN others THEN
11352: ROLLBACK to before_fc_creation;
11353: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
11354: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
11355: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
11356: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
11357: END;
11375: l_update_rowid VARCHAR2(30);
11376: l_freight_cost_id NUMBER;
11377:
11378: BEGIN
11379: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
11380:
11381: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
11382: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,l_api_name);
11383:
11447: p_rowid => l_update_rowid,
11448: p_freight_cost_info => l_freight_cost_main_row,
11449: x_return_status => l_return_status);
11450:
11451: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11452: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11453: ROLLBACK to before_fc_creation;
11454: raise FTE_FREIGHT_PRICING_UTIL.g_update_freight_cost_failed;
11455: END IF;
11448: p_freight_cost_info => l_freight_cost_main_row,
11449: x_return_status => l_return_status);
11450:
11451: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11452: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11453: ROLLBACK to before_fc_creation;
11454: raise FTE_FREIGHT_PRICING_UTIL.g_update_freight_cost_failed;
11455: END IF;
11456: END IF;
11467: x_rowid => l_rowid,
11468: x_freight_cost_id => l_freight_cost_id,
11469: x_return_status => l_return_status);
11470:
11471: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11472: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11473: ROLLBACK to before_fc_creation;
11474: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Base price');
11475: raise FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed;
11468: x_freight_cost_id => l_freight_cost_id,
11469: x_return_status => l_return_status);
11470:
11471: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11472: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11473: ROLLBACK to before_fc_creation;
11474: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Base price');
11475: raise FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed;
11476: END IF;
11485: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
11486:
11487: EXCEPTION
11488: WHEN FTE_FREIGHT_PRICING_UTIL.g_no_temp_fc_to_move THEN
11489: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11490: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_no_temp_fc_to_move');
11491: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
11492: WHEN FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed THEN
11493: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11489: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11490: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_no_temp_fc_to_move');
11491: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
11492: WHEN FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed THEN
11493: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11494: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_create_freight_cost_failed');
11495: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
11496: WHEN FTE_FREIGHT_PRICING_UTIL.g_update_freight_cost_failed THEN
11497: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11493: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11494: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_create_freight_cost_failed');
11495: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
11496: WHEN FTE_FREIGHT_PRICING_UTIL.g_update_freight_cost_failed THEN
11497: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11498: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_update_freight_cost_failed');
11499: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
11500: WHEN others THEN
11501: ROLLBACK to before_fc_creation;
11498: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_update_freight_cost_failed');
11499: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
11500: WHEN others THEN
11501: ROLLBACK to before_fc_creation;
11502: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
11503: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
11504: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
11505: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
11506: END;
11561: l_empty_main_row WSH_FREIGHT_COSTS_PVT.Freight_Cost_Rec_Type;
11562: l_freight_cost_main_row WSH_FREIGHT_COSTS_PVT.Freight_Cost_Rec_Type;
11563: l_freight_cost_temp_charge c_move_fc_temp_charge%ROWTYPE;
11564: l_freight_cost_main_charge WSH_FREIGHT_COSTS_PVT.Freight_Cost_Rec_Type;
11565: l_price_fc_ids WSH_UTIL_CORE.id_tab_type;
11566: l_rowid VARCHAR2(30);
11567: l_update_rowid VARCHAR2(30);
11568: l_freight_cost_id NUMBER;
11569: l_return_status VARCHAR2(1);
11571: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
11572:
11573: BEGIN
11574:
11575: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
11576: IF (p_init_prc_log = 'Y') THEN
11577: FTE_FREIGHT_PRICING_UTIL.initialize_logging( p_init_msg_list => p_init_msg_list,
11578: x_return_status => l_return_status );
11579: END IF;
11577: FTE_FREIGHT_PRICING_UTIL.initialize_logging( p_init_msg_list => p_init_msg_list,
11578: x_return_status => l_return_status );
11579: END IF;
11580:
11581: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11582: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11583: x_return_status := l_return_status;
11584: RETURN;
11585: END IF;
11578: x_return_status => l_return_status );
11579: END IF;
11580:
11581: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11582: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11583: x_return_status := l_return_status;
11584: RETURN;
11585: END IF;
11586: ELSE
11622: p_schedule_id=>p_schedule_id,
11623: p_comparison_request_id=>p_request_id,
11624: x_return_status=>l_return_status);
11625:
11626: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11627: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11628: raise FTE_FREIGHT_PRICING_UTIL.g_tl_move_dlv_rec_fail;
11629: END IF;
11630: END IF;
11623: p_comparison_request_id=>p_request_id,
11624: x_return_status=>l_return_status);
11625:
11626: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11627: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11628: raise FTE_FREIGHT_PRICING_UTIL.g_tl_move_dlv_rec_fail;
11629: END IF;
11630: END IF;
11631:
11697: x_rowid => l_rowid,
11698: x_freight_cost_id => l_freight_cost_id,
11699: x_return_status => l_return_status);
11700:
11701: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11702: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11703: ROLLBACK to before_fc_creation;
11704: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Base price');
11705: raise FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed;
11698: x_freight_cost_id => l_freight_cost_id,
11699: x_return_status => l_return_status);
11700:
11701: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11702: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11703: ROLLBACK to before_fc_creation;
11704: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Base price');
11705: raise FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed;
11706: END IF;
11724: p_rowid => l_update_rowid,
11725: p_freight_cost_info => l_freight_cost_main_row,
11726: x_return_status => l_return_status);
11727:
11728: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11729: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11730: ROLLBACK to before_fc_creation;
11731: raise FTE_FREIGHT_PRICING_UTIL.g_update_freight_cost_failed;
11732: END IF;
11725: p_freight_cost_info => l_freight_cost_main_row,
11726: x_return_status => l_return_status);
11727:
11728: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11729: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11730: ROLLBACK to before_fc_creation;
11731: raise FTE_FREIGHT_PRICING_UTIL.g_update_freight_cost_failed;
11732: END IF;
11733: END IF;
11796: x_rowid => l_rowid,
11797: x_freight_cost_id => l_freight_cost_id,
11798: x_return_status => l_return_status);
11799:
11800: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11801: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11802: ROLLBACK to before_fc_creation;
11803: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Charge');
11804: raise FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed;
11797: x_freight_cost_id => l_freight_cost_id,
11798: x_return_status => l_return_status);
11799:
11800: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11801: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11802: ROLLBACK to before_fc_creation;
11803: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Charge');
11804: raise FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed;
11805: END IF;
11831: p_lane_id => p_lane_id,
11832: p_schedule_id => p_schedule_id,
11833: x_return_status => l_return_status);
11834:
11835: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11836: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11837: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'delete_fc_temp failed ');
11838: raise FTE_FREIGHT_PRICING_UTIL.g_delete_fc_temp_failed;
11839: END IF;
11832: p_schedule_id => p_schedule_id,
11833: x_return_status => l_return_status);
11834:
11835: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11836: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11837: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'delete_fc_temp failed ');
11838: raise FTE_FREIGHT_PRICING_UTIL.g_delete_fc_temp_failed;
11839: END IF;
11840: ELSE
11851: EXCEPTION
11852:
11853: WHEN FTE_FREIGHT_PRICING_UTIL.g_tl_move_dlv_rec_fail THEN
11854: ROLLBACK to before_fc_creation;
11855: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11856: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('Move_fc_temp_to_main','g_tl_move_dlv_rec_fail');
11857: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Move_fc_temp_to_main');
11858: IF (p_init_prc_log = 'Y') THEN
11859: FTE_FREIGHT_PRICING_UTIL.close_logs;
11859: FTE_FREIGHT_PRICING_UTIL.close_logs;
11860: END IF;
11861:
11862: WHEN FTE_FREIGHT_PRICING_UTIL.g_no_lanesched_seg THEN
11863: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11864: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('Move_fc_temp_to_main','g_no_lanesched_seg');
11865: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Move_fc_temp_to_main');
11866: IF (p_init_prc_log = 'Y') THEN
11867: FTE_FREIGHT_PRICING_UTIL.close_logs;
11867: FTE_FREIGHT_PRICING_UTIL.close_logs;
11868: END IF;
11869: WHEN FTE_FREIGHT_PRICING_UTIL.g_no_temp_fc_to_move THEN
11870: --ROLLBACK to before_fc_creation;
11871: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11872: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('Move_fc_temp_to_main','g_no_temp_fc_to_move');
11873: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Move_fc_temp_to_main');
11874: IF (p_init_prc_log = 'Y') THEN
11875: FTE_FREIGHT_PRICING_UTIL.close_logs;
11874: IF (p_init_prc_log = 'Y') THEN
11875: FTE_FREIGHT_PRICING_UTIL.close_logs;
11876: END IF;
11877: WHEN FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed THEN
11878: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11879: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('Move_fc_temp_to_main','g_create_freight_cost_failed');
11880: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Move_fc_temp_to_main');
11881: IF (p_init_prc_log = 'Y') THEN
11882: FTE_FREIGHT_PRICING_UTIL.close_logs;
11881: IF (p_init_prc_log = 'Y') THEN
11882: FTE_FREIGHT_PRICING_UTIL.close_logs;
11883: END IF;
11884: WHEN FTE_FREIGHT_PRICING_UTIL.g_update_freight_cost_failed THEN
11885: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11886: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('Move_fc_temp_to_main','g_update_freight_cost_failed');
11887: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Move_fc_temp_to_main');
11888: IF (p_init_prc_log = 'Y') THEN
11889: FTE_FREIGHT_PRICING_UTIL.close_logs;
11888: IF (p_init_prc_log = 'Y') THEN
11889: FTE_FREIGHT_PRICING_UTIL.close_logs;
11890: END IF;
11891: WHEN FTE_FREIGHT_PRICING_UTIL.g_delete_fc_temp_failed THEN
11892: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
11893: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('Move_fc_temp_to_main','g_delete_fc_temp_failed');
11894: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Move_fc_temp_to_main');
11895: IF (p_init_prc_log = 'Y') THEN
11896: FTE_FREIGHT_PRICING_UTIL.close_logs;
11896: FTE_FREIGHT_PRICING_UTIL.close_logs;
11897: END IF;
11898: WHEN others THEN
11899: ROLLBACK to before_fc_creation;
11900: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
11901: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('Move_fc_temp_to_main','g_others');
11902: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
11903: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Move_fc_temp_to_main');
11904: IF (p_init_prc_log = 'Y') THEN
11955: l_freight_cost_temp_row c_move_fc_temp%ROWTYPE;
11956: l_freight_cost_main_row WSH_FREIGHT_COSTS_PVT.Freight_Cost_Rec_Type;
11957: l_freight_cost_temp_charge c_move_fc_temp_charge%ROWTYPE;
11958: l_freight_cost_main_charge WSH_FREIGHT_COSTS_PVT.Freight_Cost_Rec_Type;
11959: l_price_fc_ids WSH_UTIL_CORE.id_tab_type;
11960: l_rowid VARCHAR2(30);
11961: l_update_rowid VARCHAR2(30);
11962: l_dleg_ids DBMS_UTILITY.NUMBER_ARRAY;
11963: l_delivery_id NUMBER;
11969: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
11970:
11971: BEGIN
11972:
11973: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
11974: IF (p_init_prc_log = 'Y') THEN
11975: FTE_FREIGHT_PRICING_UTIL.initialize_logging( p_init_msg_list => p_init_msg_list,
11976: x_return_status => l_return_status );
11977: END IF;
11975: FTE_FREIGHT_PRICING_UTIL.initialize_logging( p_init_msg_list => p_init_msg_list,
11976: x_return_status => l_return_status );
11977: END IF;
11978:
11979: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11980: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11981: x_return_status := l_return_status;
11982: RETURN;
11983: END IF;
11976: x_return_status => l_return_status );
11977: END IF;
11978:
11979: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11980: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11981: x_return_status := l_return_status;
11982: RETURN;
11983: END IF;
11984: ELSE
12100: x_rowid => l_rowid,
12101: x_freight_cost_id => l_freight_cost_id,
12102: x_return_status => l_return_status);
12103:
12104: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12105: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12106: ROLLBACK to before_fc_creation;
12107: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Base price');
12108: raise FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed;
12101: x_freight_cost_id => l_freight_cost_id,
12102: x_return_status => l_return_status);
12103:
12104: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12105: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12106: ROLLBACK to before_fc_creation;
12107: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Base price');
12108: raise FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed;
12109: END IF;
12127: p_rowid => l_update_rowid,
12128: p_freight_cost_info => l_freight_cost_main_row,
12129: x_return_status => l_return_status);
12130:
12131: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12132: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12133: ROLLBACK to before_fc_creation;
12134: raise FTE_FREIGHT_PRICING_UTIL.g_update_freight_cost_failed;
12135: END IF;
12128: p_freight_cost_info => l_freight_cost_main_row,
12129: x_return_status => l_return_status);
12130:
12131: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12132: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12133: ROLLBACK to before_fc_creation;
12134: raise FTE_FREIGHT_PRICING_UTIL.g_update_freight_cost_failed;
12135: END IF;
12136: END IF;
12214: x_rowid => l_rowid,
12215: x_freight_cost_id => l_freight_cost_id,
12216: x_return_status => l_return_status);
12217:
12218: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12219: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12220: ROLLBACK to before_fc_creation;
12221: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Charge');
12222: raise FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed;
12215: x_freight_cost_id => l_freight_cost_id,
12216: x_return_status => l_return_status);
12217:
12218: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12219: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12220: ROLLBACK to before_fc_creation;
12221: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Charge');
12222: raise FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed;
12223: END IF;
12250: p_lane_id => p_lane_id,
12251: p_schedule_id => p_schedule_id,
12252: x_return_status => l_return_status);
12253:
12254: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12255: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12256: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'delete_fc_temp failed ');
12257: raise FTE_FREIGHT_PRICING_UTIL.g_delete_fc_temp_failed;
12258: END IF;
12251: p_schedule_id => p_schedule_id,
12252: x_return_status => l_return_status);
12253:
12254: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12255: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12256: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'delete_fc_temp failed ');
12257: raise FTE_FREIGHT_PRICING_UTIL.g_delete_fc_temp_failed;
12258: END IF;
12259: ELSE
12266: END IF;
12267:
12268: EXCEPTION
12269: WHEN FTE_FREIGHT_PRICING_UTIL.g_no_lanesched_seg THEN
12270: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12271: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('Move_fc_temp_to_main','g_no_lanesched_seg');
12272: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Move_fc_temp_to_main');
12273: IF (p_init_prc_log = 'Y') THEN
12274: FTE_FREIGHT_PRICING_UTIL.close_logs;
12274: FTE_FREIGHT_PRICING_UTIL.close_logs;
12275: END IF;
12276: WHEN FTE_FREIGHT_PRICING_UTIL.g_no_temp_fc_to_move THEN
12277: --ROLLBACK to before_fc_creation;
12278: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12279: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('Move_fc_temp_to_main','g_no_temp_fc_to_move');
12280: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Move_fc_temp_to_main');
12281: IF (p_init_prc_log = 'Y') THEN
12282: FTE_FREIGHT_PRICING_UTIL.close_logs;
12281: IF (p_init_prc_log = 'Y') THEN
12282: FTE_FREIGHT_PRICING_UTIL.close_logs;
12283: END IF;
12284: WHEN FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed THEN
12285: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12286: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('Move_fc_temp_to_main','g_create_freight_cost_failed');
12287: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Move_fc_temp_to_main');
12288: IF (p_init_prc_log = 'Y') THEN
12289: FTE_FREIGHT_PRICING_UTIL.close_logs;
12288: IF (p_init_prc_log = 'Y') THEN
12289: FTE_FREIGHT_PRICING_UTIL.close_logs;
12290: END IF;
12291: WHEN FTE_FREIGHT_PRICING_UTIL.g_update_freight_cost_failed THEN
12292: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12293: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('Move_fc_temp_to_main','g_update_freight_cost_failed');
12294: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Move_fc_temp_to_main');
12295: IF (p_init_prc_log = 'Y') THEN
12296: FTE_FREIGHT_PRICING_UTIL.close_logs;
12295: IF (p_init_prc_log = 'Y') THEN
12296: FTE_FREIGHT_PRICING_UTIL.close_logs;
12297: END IF;
12298: WHEN FTE_FREIGHT_PRICING_UTIL.g_delete_fc_temp_failed THEN
12299: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
12300: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('Move_fc_temp_to_main','g_delete_fc_temp_failed');
12301: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Move_fc_temp_to_main');
12302: IF (p_init_prc_log = 'Y') THEN
12303: FTE_FREIGHT_PRICING_UTIL.close_logs;
12303: FTE_FREIGHT_PRICING_UTIL.close_logs;
12304: END IF;
12305: WHEN others THEN
12306: ROLLBACK to before_fc_creation;
12307: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
12308: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('Move_fc_temp_to_main','g_others');
12309: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
12310: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Move_fc_temp_to_main');
12311: IF (p_init_prc_log = 'Y') THEN
12328:
12329: BEGIN
12330: SAVEPOINT DELETE_FC_TEMP;
12331:
12332: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
12333:
12334: FTE_FREIGHT_PRICING_UTIL.initialize_logging( p_init_msg_list => p_init_msg_list,
12335: x_return_status => l_return_status );
12336:
12333:
12334: FTE_FREIGHT_PRICING_UTIL.initialize_logging( p_init_msg_list => p_init_msg_list,
12335: x_return_status => l_return_status );
12336:
12337: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12338: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12339: l_initialized := FALSE;
12340: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
12341: END IF;
12334: FTE_FREIGHT_PRICING_UTIL.initialize_logging( p_init_msg_list => p_init_msg_list,
12335: x_return_status => l_return_status );
12336:
12337: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12338: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12339: l_initialized := FALSE;
12340: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
12341: END IF;
12342: ELSE
12336:
12337: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12338: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12339: l_initialized := FALSE;
12340: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
12341: END IF;
12342: ELSE
12343: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'Initialize Logging successful ');
12344: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
12350: p_request_id => p_request_id, -- Comparison Request ID to move to main
12351: p_initialized => l_initialized,
12352: x_return_status => l_return_status);
12353:
12354: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12355: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12356: IF l_initialized THEN
12357: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'delete_fc_temp failed ');
12358: END IF;
12351: p_initialized => l_initialized,
12352: x_return_status => l_return_status);
12353:
12354: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12355: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12356: IF l_initialized THEN
12357: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'delete_fc_temp failed ');
12358: END IF;
12359: ROLLBACK TO DELETE_FC_TEMP;
12356: IF l_initialized THEN
12357: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'delete_fc_temp failed ');
12358: END IF;
12359: ROLLBACK TO DELETE_FC_TEMP;
12360: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
12361: END IF;
12362: ELSE
12363: IF l_initialized THEN
12364: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'delete_fc_temp successful ');
12373:
12374: EXCEPTION
12375:
12376: WHEN others THEN
12377: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
12378: IF l_initialized THEN
12379: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('delete_fc_temp','g_others');
12380: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
12381: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'delete_fc_temp');
12413:
12414: PROCEDURE shipment_price_compare_pvt (
12415: p_delivery_id IN NUMBER DEFAULT NULL,
12416: p_trip_id IN NUMBER DEFAULT NULL,
12417: p_lane_id_tab IN WSH_UTIL_CORE.id_tab_type,
12418: p_sched_id_tab IN WSH_UTIL_CORE.id_tab_type,
12419: p_service_lane_tab IN WSH_UTIL_CORE.Column_Tab_Type,
12420: p_service_sched_tab IN WSH_UTIL_CORE.Column_Tab_Type,
12421: p_dep_date IN DATE DEFAULT sysdate,
12414: PROCEDURE shipment_price_compare_pvt (
12415: p_delivery_id IN NUMBER DEFAULT NULL,
12416: p_trip_id IN NUMBER DEFAULT NULL,
12417: p_lane_id_tab IN WSH_UTIL_CORE.id_tab_type,
12418: p_sched_id_tab IN WSH_UTIL_CORE.id_tab_type,
12419: p_service_lane_tab IN WSH_UTIL_CORE.Column_Tab_Type,
12420: p_service_sched_tab IN WSH_UTIL_CORE.Column_Tab_Type,
12421: p_dep_date IN DATE DEFAULT sysdate,
12422: p_arr_date IN DATE DEFAULT sysdate,
12415: p_delivery_id IN NUMBER DEFAULT NULL,
12416: p_trip_id IN NUMBER DEFAULT NULL,
12417: p_lane_id_tab IN WSH_UTIL_CORE.id_tab_type,
12418: p_sched_id_tab IN WSH_UTIL_CORE.id_tab_type,
12419: p_service_lane_tab IN WSH_UTIL_CORE.Column_Tab_Type,
12420: p_service_sched_tab IN WSH_UTIL_CORE.Column_Tab_Type,
12421: p_dep_date IN DATE DEFAULT sysdate,
12422: p_arr_date IN DATE DEFAULT sysdate,
12423: x_sum_lane_price_tab OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
12416: p_trip_id IN NUMBER DEFAULT NULL,
12417: p_lane_id_tab IN WSH_UTIL_CORE.id_tab_type,
12418: p_sched_id_tab IN WSH_UTIL_CORE.id_tab_type,
12419: p_service_lane_tab IN WSH_UTIL_CORE.Column_Tab_Type,
12420: p_service_sched_tab IN WSH_UTIL_CORE.Column_Tab_Type,
12421: p_dep_date IN DATE DEFAULT sysdate,
12422: p_arr_date IN DATE DEFAULT sysdate,
12423: x_sum_lane_price_tab OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
12424: x_sum_lane_price_curr_tab OUT NOCOPY WSH_UTIL_CORE.Column_tab_type,
12419: p_service_lane_tab IN WSH_UTIL_CORE.Column_Tab_Type,
12420: p_service_sched_tab IN WSH_UTIL_CORE.Column_Tab_Type,
12421: p_dep_date IN DATE DEFAULT sysdate,
12422: p_arr_date IN DATE DEFAULT sysdate,
12423: x_sum_lane_price_tab OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
12424: x_sum_lane_price_curr_tab OUT NOCOPY WSH_UTIL_CORE.Column_tab_type,
12425: x_sum_sched_price_tab OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
12426: x_sum_sched_price_curr_tab OUT NOCOPY WSH_UTIL_CORE.Column_tab_type,
12427: x_request_id IN OUT NOCOPY NUMBER,
12420: p_service_sched_tab IN WSH_UTIL_CORE.Column_Tab_Type,
12421: p_dep_date IN DATE DEFAULT sysdate,
12422: p_arr_date IN DATE DEFAULT sysdate,
12423: x_sum_lane_price_tab OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
12424: x_sum_lane_price_curr_tab OUT NOCOPY WSH_UTIL_CORE.Column_tab_type,
12425: x_sum_sched_price_tab OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
12426: x_sum_sched_price_curr_tab OUT NOCOPY WSH_UTIL_CORE.Column_tab_type,
12427: x_request_id IN OUT NOCOPY NUMBER,
12428: x_return_status OUT NOCOPY VARCHAR2 )
12421: p_dep_date IN DATE DEFAULT sysdate,
12422: p_arr_date IN DATE DEFAULT sysdate,
12423: x_sum_lane_price_tab OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
12424: x_sum_lane_price_curr_tab OUT NOCOPY WSH_UTIL_CORE.Column_tab_type,
12425: x_sum_sched_price_tab OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
12426: x_sum_sched_price_curr_tab OUT NOCOPY WSH_UTIL_CORE.Column_tab_type,
12427: x_request_id IN OUT NOCOPY NUMBER,
12428: x_return_status OUT NOCOPY VARCHAR2 )
12429: IS
12422: p_arr_date IN DATE DEFAULT sysdate,
12423: x_sum_lane_price_tab OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
12424: x_sum_lane_price_curr_tab OUT NOCOPY WSH_UTIL_CORE.Column_tab_type,
12425: x_sum_sched_price_tab OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
12426: x_sum_sched_price_curr_tab OUT NOCOPY WSH_UTIL_CORE.Column_tab_type,
12427: x_request_id IN OUT NOCOPY NUMBER,
12428: x_return_status OUT NOCOPY VARCHAR2 )
12429: IS
12430:
12629: BEGIN
12630:
12631: SAVEPOINT SHIPMENT_PRICE_COMPARE_PVT;
12632:
12633: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
12634:
12635: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
12636: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'shipment_price_compare_pvt','start');
12637:
12652: RAISE FND_API.G_EXC_ERROR;
12653: ELSIF (l_return_code = G_RC_REPRICE_NOT_REQUIRED
12654: OR l_return_code = G_RC_NOT_RATE_FREIGHT_TERM
12655: OR l_return_code = G_RC_NOT_RATE_MANIFESTING) THEN
12656: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
12657: raise g_finished_warning;
12658: END IF;
12659:
12660:
12669: RAISE FND_API.G_EXC_ERROR;
12670: ELSIF (l_return_code = G_RC_REPRICE_NOT_REQUIRED
12671: OR l_return_code = G_RC_NOT_RATE_FREIGHT_TERM
12672: OR l_return_code = G_RC_NOT_RATE_MANIFESTING) THEN
12673: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
12674: raise g_finished_warning;
12675: END IF;
12676: END IF;
12677:
12674: raise g_finished_warning;
12675: END IF;
12676: END IF;
12677:
12678: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12679: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12680: raise FTE_FREIGHT_PRICING_UTIL.g_currency_code_failed;
12681: END IF;
12682: END IF;
12675: END IF;
12676: END IF;
12677:
12678: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12679: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12680: raise FTE_FREIGHT_PRICING_UTIL.g_currency_code_failed;
12681: END IF;
12682: END IF;
12683:
12750: flatten_shipment (
12751: x_first_level_rows => l_first_level_rows,
12752: x_return_status => l_return_status );
12753:
12754: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12755: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12756: raise FTE_FREIGHT_PRICING_UTIL.g_flatten_shipment_failed;
12757: END IF;
12758: ELSE
12751: x_first_level_rows => l_first_level_rows,
12752: x_return_status => l_return_status );
12753:
12754: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12755: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12756: raise FTE_FREIGHT_PRICING_UTIL.g_flatten_shipment_failed;
12757: END IF;
12758: ELSE
12759: IF l_first_level_rows.COUNT = 0 THEN
12814: x_return_status => l_return_status ) ;
12815:
12816: FTE_FREIGHT_PRICING_UTIL.print_msg(p_msg => 'After shipment_pricing - p_lane_id = '||p_lane_id_tab(i));
12817: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'l_return_status='||l_return_status);
12818: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12819: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12820: x_sum_lane_price_tab(i) := -1;
12821: x_sum_lane_price_curr_tab(i) := 'NULL';
12822: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'lane: '||p_lane_id_tab(i)||' shipment_pricing ');
12815:
12816: FTE_FREIGHT_PRICING_UTIL.print_msg(p_msg => 'After shipment_pricing - p_lane_id = '||p_lane_id_tab(i));
12817: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'l_return_status='||l_return_status);
12818: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12819: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12820: x_sum_lane_price_tab(i) := -1;
12821: x_sum_lane_price_curr_tab(i) := 'NULL';
12822: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'lane: '||p_lane_id_tab(i)||' shipment_pricing ');
12823: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
12819: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12820: x_sum_lane_price_tab(i) := -1;
12821: x_sum_lane_price_curr_tab(i) := 'NULL';
12822: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'lane: '||p_lane_id_tab(i)||' shipment_pricing ');
12823: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
12824: END IF;
12825: ELSE
12826: FTE_FREIGHT_PRICING_UTIL.print_msg(p_msg => 'Shipment pricing successful for lane : '||p_lane_id_tab(i));
12827:
12862: x_freight_cost_temp_price => l_dummy_fc_temp_price,
12863: x_freight_cost_temp_charge => l_dummy_fc_temp_charge,
12864: x_return_status => l_return_status ) ;
12865:
12866: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12867: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12868: x_sum_sched_price_tab(i) := -1;
12869: x_sum_sched_price_curr_tab(i) := 'NULL';
12870: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'sched: '||p_sched_id_tab(i)||' shipment_pricing ');
12863: x_freight_cost_temp_charge => l_dummy_fc_temp_charge,
12864: x_return_status => l_return_status ) ;
12865:
12866: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12867: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12868: x_sum_sched_price_tab(i) := -1;
12869: x_sum_sched_price_curr_tab(i) := 'NULL';
12870: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'sched: '||p_sched_id_tab(i)||' shipment_pricing ');
12871: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
12867: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12868: x_sum_sched_price_tab(i) := -1;
12869: x_sum_sched_price_curr_tab(i) := 'NULL';
12870: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'sched: '||p_sched_id_tab(i)||' shipment_pricing ');
12871: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
12872: END IF;
12873: ELSE
12874: FTE_FREIGHT_PRICING_UTIL.print_msg(p_msg => 'Shipment pricing successful for sched : '||p_sched_id_tab(i));
12875:
12889: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_compare_pvt');
12890:
12891: EXCEPTION
12892: WHEN g_finished_warning THEN
12893: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
12894: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_compare_pvt');
12895: WHEN FND_API.G_EXC_ERROR THEN
12896: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12897: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_compare_pvt',FTE_FREIGHT_PRICING_UTIL.G_ERR,'FND_API.G_EXC_ERROR');
12892: WHEN g_finished_warning THEN
12893: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
12894: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_compare_pvt');
12895: WHEN FND_API.G_EXC_ERROR THEN
12896: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12897: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_compare_pvt',FTE_FREIGHT_PRICING_UTIL.G_ERR,'FND_API.G_EXC_ERROR');
12898: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_compare_pvt');
12899: WHEN FTE_FREIGHT_PRICING_UTIL.g_delivery_not_found THEN
12900: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12896: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12897: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_compare_pvt',FTE_FREIGHT_PRICING_UTIL.G_ERR,'FND_API.G_EXC_ERROR');
12898: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_compare_pvt');
12899: WHEN FTE_FREIGHT_PRICING_UTIL.g_delivery_not_found THEN
12900: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12901: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_compare_pvt',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_delivery_not_found');
12902: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_compare_pvt');
12903: WHEN FTE_FREIGHT_PRICING_UTIL.g_flatten_shipment_failed THEN
12904: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12900: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12901: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_compare_pvt',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_delivery_not_found');
12902: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_compare_pvt');
12903: WHEN FTE_FREIGHT_PRICING_UTIL.g_flatten_shipment_failed THEN
12904: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12905: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_compare_pvt',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_flatten_shipment_failed');
12906: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_compare_pvt');
12907: WHEN FTE_FREIGHT_PRICING_UTIL.g_empty_delivery THEN
12908: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
12904: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12905: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_compare_pvt',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_flatten_shipment_failed');
12906: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_compare_pvt');
12907: WHEN FTE_FREIGHT_PRICING_UTIL.g_empty_delivery THEN
12908: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
12909: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_compare_pvt',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_empty_delivery');
12910: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_compare_pvt');
12911: WHEN FTE_FREIGHT_PRICING_UTIL.g_missing_service_type THEN
12912: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12908: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
12909: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_compare_pvt',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_empty_delivery');
12910: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_compare_pvt');
12911: WHEN FTE_FREIGHT_PRICING_UTIL.g_missing_service_type THEN
12912: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12913: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_compare_pvt',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_missing_service_type');
12914: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_compare_pvt');
12915: WHEN FTE_FREIGHT_PRICING_UTIL.g_shipment_pricing_failed THEN
12916: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12912: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12913: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_compare_pvt',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_missing_service_type');
12914: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_compare_pvt');
12915: WHEN FTE_FREIGHT_PRICING_UTIL.g_shipment_pricing_failed THEN
12916: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12917: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_compare_pvt',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_shipment_pricing_failed');
12918: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_compare_pvt');
12919: WHEN others THEN
12920: ROLLBACK TO SHIPMENT_PRICE_COMPARE_PVT;
12917: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_compare_pvt',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_shipment_pricing_failed');
12918: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_compare_pvt');
12919: WHEN others THEN
12920: ROLLBACK TO SHIPMENT_PRICE_COMPARE_PVT;
12921: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
12922: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_compare_pvt',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
12923: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
12924: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_compare_pvt');
12925:
12959: l_temp_wt NUMBER;
12960:
12961: BEGIN
12962:
12963: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
12964:
12965: -- Initialize message list if p_init_msg_list is set to TRUE.
12966:
12967: FTE_FREIGHT_PRICING_UTIL.initialize_logging( p_init_msg_list => p_init_msg_list,
12966:
12967: FTE_FREIGHT_PRICING_UTIL.initialize_logging( p_init_msg_list => p_init_msg_list,
12968: x_return_status => l_return_status );
12969:
12970: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12971: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12972: x_return_status := l_return_status;
12973: RETURN;
12974: END IF;
12967: FTE_FREIGHT_PRICING_UTIL.initialize_logging( p_init_msg_list => p_init_msg_list,
12968: x_return_status => l_return_status );
12969:
12970: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12971: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12972: x_return_status := l_return_status;
12973: RETURN;
12974: END IF;
12975: ELSE
13029: FTE_FREIGHT_PRICING_UTIL.close_logs;
13030:
13031: EXCEPTION
13032: WHEN FTE_FREIGHT_PRICING_UTIL.g_tl_dtl_no_gross_weight THEN
13033: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13034: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('FPA_total_commodity_weight','g_tl_dtl_no_gross_weight');
13035: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'FPA_total_commodity_weight');
13036: FTE_FREIGHT_PRICING_UTIL.close_logs;
13037: WHEN FTE_FREIGHT_PRICING_UTIL.g_weight_uom_not_found THEN
13038: FTE_FREIGHT_PRICING_UTIL.setmsg (p_api =>'FPA_total_commodity_weight',
13039: p_exc =>'g_tl_dtl_no_gross_weight',
13040: p_msg_name =>'FTE_INVALID_DEL_WT_UOM',
13041: p_delivery_id =>p_delivery_id);
13042: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13043: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('FPA_total_commodity_weight','g_weight_uom_not_found');
13044: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'FPA_total_commodity_weight');
13045: FTE_FREIGHT_PRICING_UTIL.close_logs;
13046: WHEN others THEN
13043: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('FPA_total_commodity_weight','g_weight_uom_not_found');
13044: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'FPA_total_commodity_weight');
13045: FTE_FREIGHT_PRICING_UTIL.close_logs;
13046: WHEN others THEN
13047: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
13048: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('FPA_total_commodity_weight','g_others');
13049: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
13050: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'FPA_total_commodity_weight');
13051: FTE_FREIGHT_PRICING_UTIL.close_logs;
13100: l NUMBER;
13101: s NUMBER;
13102:
13103:
13104: l_lane_id_tab WSH_UTIL_CORE.id_tab_type;
13105: l_sched_id_tab WSH_UTIL_CORE.id_tab_type;
13106: l_service_lane_tab WSH_UTIL_CORE.Column_Tab_Type;
13107: l_service_sched_tab WSH_UTIL_CORE.Column_Tab_Type;
13108:
13101: s NUMBER;
13102:
13103:
13104: l_lane_id_tab WSH_UTIL_CORE.id_tab_type;
13105: l_sched_id_tab WSH_UTIL_CORE.id_tab_type;
13106: l_service_lane_tab WSH_UTIL_CORE.Column_Tab_Type;
13107: l_service_sched_tab WSH_UTIL_CORE.Column_Tab_Type;
13108:
13109: l_sum_lane_price_tab WSH_UTIL_CORE.id_tab_type;
13102:
13103:
13104: l_lane_id_tab WSH_UTIL_CORE.id_tab_type;
13105: l_sched_id_tab WSH_UTIL_CORE.id_tab_type;
13106: l_service_lane_tab WSH_UTIL_CORE.Column_Tab_Type;
13107: l_service_sched_tab WSH_UTIL_CORE.Column_Tab_Type;
13108:
13109: l_sum_lane_price_tab WSH_UTIL_CORE.id_tab_type;
13110: l_sum_lane_price_curr_tab WSH_UTIL_CORE.Column_tab_type;
13103:
13104: l_lane_id_tab WSH_UTIL_CORE.id_tab_type;
13105: l_sched_id_tab WSH_UTIL_CORE.id_tab_type;
13106: l_service_lane_tab WSH_UTIL_CORE.Column_Tab_Type;
13107: l_service_sched_tab WSH_UTIL_CORE.Column_Tab_Type;
13108:
13109: l_sum_lane_price_tab WSH_UTIL_CORE.id_tab_type;
13110: l_sum_lane_price_curr_tab WSH_UTIL_CORE.Column_tab_type;
13111: l_sum_sched_price_tab WSH_UTIL_CORE.id_tab_type;
13105: l_sched_id_tab WSH_UTIL_CORE.id_tab_type;
13106: l_service_lane_tab WSH_UTIL_CORE.Column_Tab_Type;
13107: l_service_sched_tab WSH_UTIL_CORE.Column_Tab_Type;
13108:
13109: l_sum_lane_price_tab WSH_UTIL_CORE.id_tab_type;
13110: l_sum_lane_price_curr_tab WSH_UTIL_CORE.Column_tab_type;
13111: l_sum_sched_price_tab WSH_UTIL_CORE.id_tab_type;
13112: l_sum_sched_price_curr_tab WSH_UTIL_CORE.Column_tab_type;
13113:
13106: l_service_lane_tab WSH_UTIL_CORE.Column_Tab_Type;
13107: l_service_sched_tab WSH_UTIL_CORE.Column_Tab_Type;
13108:
13109: l_sum_lane_price_tab WSH_UTIL_CORE.id_tab_type;
13110: l_sum_lane_price_curr_tab WSH_UTIL_CORE.Column_tab_type;
13111: l_sum_sched_price_tab WSH_UTIL_CORE.id_tab_type;
13112: l_sum_sched_price_curr_tab WSH_UTIL_CORE.Column_tab_type;
13113:
13114: l_tl_lane_rows dbms_utility.number_array;
13107: l_service_sched_tab WSH_UTIL_CORE.Column_Tab_Type;
13108:
13109: l_sum_lane_price_tab WSH_UTIL_CORE.id_tab_type;
13110: l_sum_lane_price_curr_tab WSH_UTIL_CORE.Column_tab_type;
13111: l_sum_sched_price_tab WSH_UTIL_CORE.id_tab_type;
13112: l_sum_sched_price_curr_tab WSH_UTIL_CORE.Column_tab_type;
13113:
13114: l_tl_lane_rows dbms_utility.number_array;
13115: l_tl_schedule_rows dbms_utility.number_array;
13108:
13109: l_sum_lane_price_tab WSH_UTIL_CORE.id_tab_type;
13110: l_sum_lane_price_curr_tab WSH_UTIL_CORE.Column_tab_type;
13111: l_sum_sched_price_tab WSH_UTIL_CORE.id_tab_type;
13112: l_sum_sched_price_curr_tab WSH_UTIL_CORE.Column_tab_type;
13113:
13114: l_tl_lane_rows dbms_utility.number_array;
13115: l_tl_schedule_rows dbms_utility.number_array;
13116: l_tl_vehicle_rows dbms_utility.number_array;
13139: BEGIN
13140:
13141: SAVEPOINT SHIPMENT_PRICE_COMPARE;
13142:
13143: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
13144:
13145: IF(p_init_prc_log='Y')
13146: THEN
13147:
13150:
13151: FTE_FREIGHT_PRICING_UTIL.initialize_logging( p_init_msg_list => p_init_msg_list,
13152: x_return_status => l_return_status );
13153:
13154: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13155: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13156: x_return_status := l_return_status;
13157: RETURN;
13158: END IF;
13151: FTE_FREIGHT_PRICING_UTIL.initialize_logging( p_init_msg_list => p_init_msg_list,
13152: x_return_status => l_return_status );
13153:
13154: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13155: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13156: x_return_status := l_return_status;
13157: RETURN;
13158: END IF;
13159: ELSE
13245: x_request_id := l_request_id;
13246:
13247: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'l_return_status='||l_return_status);
13248:
13249: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ) THEN
13250: raise fte_freight_pricing_util.g_unexp_err;
13251: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR ) THEN
13252: --raise fte_freight_pricing_util.g_ship_prc_compare_fail;
13253: --In case of expected errors in shipment_price_compare_pvt
13247: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'l_return_status='||l_return_status);
13248:
13249: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ) THEN
13250: raise fte_freight_pricing_util.g_unexp_err;
13251: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR ) THEN
13252: --raise fte_freight_pricing_util.g_ship_prc_compare_fail;
13253: --In case of expected errors in shipment_price_compare_pvt
13254: ---Allow this procedure to continue to TL if necessary
13255: x_return_status := l_return_status;
13254: ---Allow this procedure to continue to TL if necessary
13255: x_return_status := l_return_status;
13256: l_warn_flag := 'Y';
13257:
13258: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING ) THEN
13259:
13260: x_return_status := l_return_status;
13261: l_warn_flag := 'Y';
13262: END IF;
13279: x_schedule_rows =>l_exploded_schedule_rows,
13280: x_ref_rows =>l_exploded_ref_rows,
13281: x_return_status =>l_return_status);
13282:
13283: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
13284: THEN
13285: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
13286: THEN
13287: raise FTE_FREIGHT_PRICING_UTIL.g_unexp_err;
13281: x_return_status =>l_return_status);
13282:
13283: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
13284: THEN
13285: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
13286: THEN
13287: raise FTE_FREIGHT_PRICING_UTIL.g_unexp_err;
13288: END IF;
13289: END IF;
13314: -- However, we can go more granular, and fail even on certain
13315: -- errors caused in the child procedures
13316:
13317: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>l_return_status='||l_return_status);
13318: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
13319: THEN
13320: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
13321: THEN
13322: raise FTE_FREIGHT_PRICING_UTIL.g_unexp_err;
13316:
13317: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>l_return_status='||l_return_status);
13318: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
13319: THEN
13320: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
13321: THEN
13322: raise FTE_FREIGHT_PRICING_UTIL.g_unexp_err;
13323: ELSE
13324: --In case of expected errors
13518: IF (l_warn_flag = 'Y' ) THEN
13519: -- bug 2762257
13520: FTE_FREIGHT_PRICING_UTIL.set_price_comp_exit_warn;
13521: --Added to ensure return status is warning if l_warn_flag=Y
13522: x_return_status :=WSH_UTIL_CORE.G_RET_STS_WARNING;
13523: END IF;
13524:
13525: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'DBg.2');
13526: x_request_id := l_request_id;
13543:
13544:
13545: WHEN FTE_FREIGHT_PRICING_UTIL.g_ship_prc_compare_fail THEN
13546: ROLLBACK; -- TO SHIPMENT_PRICE_COMPARE;
13547: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13548: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_compare');
13549: IF(p_init_prc_log='Y')
13550: THEN
13551: FTE_FREIGHT_PRICING_UTIL.close_logs;
13553:
13554:
13555: WHEN FTE_FREIGHT_PRICING_UTIL.g_unexp_err THEN
13556: ROLLBACK; -- TO SHIPMENT_PRICE_COMPARE;
13557: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
13558: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('shipment_price_compare','g_others');
13559: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_compare');
13560: IF(p_init_prc_log='Y')
13561: THEN
13563: END IF;
13564:
13565: WHEN others THEN
13566: ROLLBACK; -- TO SHIPMENT_PRICE_COMPARE;
13567: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
13568: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('shipment_price_compare','g_others');
13569: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
13570: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_compare');
13571: IF(p_init_prc_log='Y')