[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');
8460: RETURN TRUE;
8461: END IF;
8462: EXCEPTION
8463: WHEN others THEN
8464: --x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
8465: FTE_FREIGHT_PRICING_UTIL.set_exception('is_consolidated',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
8466: --FTE_FREIGHT_PRICING_UTIL.print_debug('Unexpected Error : '||SQLCODE||' : '||SQLERRM);
8467: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
8468: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'is_consolidated');
8499: RETURN l_segment_id;
8500:
8501: EXCEPTION
8502: WHEN others THEN
8503: --x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
8504: FTE_FREIGHT_PRICING_UTIL.set_exception('get_segment_from_dleg',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
8505: --FTE_FREIGHT_PRICING_UTIL.print_debug('Unexpected Error : '||SQLCODE||' : '||SQLERRM);
8506: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
8507: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'get_segment_from_dleg');
8532: RETURN l_delivery_id;
8533:
8534: EXCEPTION
8535: WHEN others THEN
8536: --x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
8537: FTE_FREIGHT_PRICING_UTIL.set_exception('get_delivery_from_dleg',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
8538: --FTE_FREIGHT_PRICING_UTIL.print_debug('Unexpected Error : '||SQLCODE||' : '||SQLERRM);
8539: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
8540: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'get_delivery_from_dleg');
8573: RETURN l_freight_cost_id;
8574:
8575: EXCEPTION
8576: WHEN others THEN
8577: --x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
8578: FTE_FREIGHT_PRICING_UTIL.set_exception('get_fc_id_from_dleg',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
8579: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
8580: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'get_fc_id_from_dleg');
8581: END get_fc_id_from_dleg;
8617:
8618:
8619: BEGIN
8620:
8621: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
8622: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
8623: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'delete_invalid_fc_recs','start');
8624:
8625: -- Here determine if a trip has been passed or a delivery leg
8625: -- Here determine if a trip has been passed or a delivery leg
8626:
8627: IF p_segment_id IS NULL AND p_delivery_leg_id IS NULL THEN
8628:
8629: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8630: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'delete_invalid_fc_recs');
8631: RETURN;
8632:
8633: ELSIF p_delivery_leg_id IS NULL THEN
8694: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'delete_invalid_fc_recs');
8695:
8696: EXCEPTION
8697: WHEN others THEN
8698: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
8699: FTE_FREIGHT_PRICING_UTIL.set_exception('delete_invalid_fc_recs',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
8700: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
8701: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'delete_invalid_fc_recs');
8702: END delete_invalid_fc_recs;
8710: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
8711:
8712: BEGIN
8713:
8714: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
8715: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
8716: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'unmark_reprice_required','start');
8717:
8718: -- Here determine if a trip has been passed or a delivery leg
8718: -- Here determine if a trip has been passed or a delivery leg
8719:
8720: IF p_segment_id IS NULL AND p_delivery_leg_id IS NULL THEN
8721:
8722: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8723: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'unmark_reprice_required');
8724: RETURN;
8725:
8726: ELSIF p_delivery_leg_id IS NULL THEN
8749: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'unmark_reprice_required');
8750:
8751: EXCEPTION
8752: WHEN others THEN
8753: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
8754: FTE_FREIGHT_PRICING_UTIL.set_exception('unmark_reprice_required',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
8755: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
8756: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'unmark_reprice_required');
8757: END unmark_reprice_required;
8954: --
8955: l_return_status VARCHAR2(1);
8956: l_return_code NUMBER;
8957: l_delvy_det_rec shipment_line_rec_type;
8958: l_dlvy WSH_UTIL_CORE.id_tab_type;
8959: l_first_level_rows shpmnt_content_tab_type;
8960: l_first_level_charges addl_services_tab_type;
8961:
8962: l_dummy_summary NUMBER;
8975: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_LOG;
8976:
8977: BEGIN
8978:
8979: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
8980: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
8981: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'shipment_price_consolidate','start');
8982:
8983: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'p_delivery_leg_id='||p_delivery_leg_id);
8997: RAISE FND_API.G_EXC_ERROR;
8998: ELSIF (l_return_code = G_RC_REPRICE_NOT_REQUIRED
8999: OR l_return_code = G_RC_NOT_RATE_FREIGHT_TERM
9000: OR l_return_code = G_RC_NOT_RATE_MANIFESTING) THEN
9001: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9002: raise g_finished_warning;
9003: END IF;
9004: ELSE
9005:
9015: RAISE FND_API.G_EXC_ERROR;
9016: ELSIF (l_return_code = G_RC_REPRICE_NOT_REQUIRED
9017: OR l_return_code = G_RC_NOT_RATE_FREIGHT_TERM
9018: OR l_return_code = G_RC_NOT_RATE_MANIFESTING) THEN
9019: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9020: raise g_finished_warning;
9021: END IF;
9022: END IF;
9023:
9069: delete_invalid_fc_recs (
9070: p_segment_id => p_segment_id,
9071: x_return_status => l_return_status ) ;
9072:
9073: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9074: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9075: ROLLBACK to before_pricing;
9076: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'segment:delete_invalid_fc_recs ');
9077: raise FTE_FREIGHT_PRICING_UTIL.g_delete_invalid_fc_failed;
9070: p_segment_id => p_segment_id,
9071: x_return_status => l_return_status ) ;
9072:
9073: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9074: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9075: ROLLBACK to before_pricing;
9076: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'segment:delete_invalid_fc_recs ');
9077: raise FTE_FREIGHT_PRICING_UTIL.g_delete_invalid_fc_failed;
9078: END IF;
9083: flatten_shipment (
9084: x_first_level_rows => l_first_level_rows,
9085: x_return_status => l_return_status );
9086:
9087: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9088: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9089: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'segment:Consolidate=Y:flatten_shipment ');
9090: ROLLBACK to before_pricing;
9091: raise FTE_FREIGHT_PRICING_UTIL.g_flatten_shipment_failed;
9084: x_first_level_rows => l_first_level_rows,
9085: x_return_status => l_return_status );
9086:
9087: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9088: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9089: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'segment:Consolidate=Y:flatten_shipment ');
9090: ROLLBACK to before_pricing;
9091: raise FTE_FREIGHT_PRICING_UTIL.g_flatten_shipment_failed;
9092: END IF;
9128: x_freight_cost_temp_price => l_dummy_fc_temp_price,
9129: x_freight_cost_temp_charge => l_dummy_fc_temp_charge,
9130: x_return_status => l_return_status ) ;
9131:
9132: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9133: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9134: ROLLBACK to before_pricing;
9135: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'segment:Consolidate=Y:shipment_pricing ');
9136: raise FTE_FREIGHT_PRICING_UTIL.g_shipment_pricing_failed;
9129: x_freight_cost_temp_charge => l_dummy_fc_temp_charge,
9130: x_return_status => l_return_status ) ;
9131:
9132: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9133: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9134: ROLLBACK to before_pricing;
9135: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'segment:Consolidate=Y:shipment_pricing ');
9136: raise FTE_FREIGHT_PRICING_UTIL.g_shipment_pricing_failed;
9137: END IF;
9143: unmark_reprice_required (
9144: p_segment_id => p_segment_id,
9145: x_return_status => l_return_status ) ;
9146:
9147: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9148: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9149: ROLLBACK to before_pricing;
9150: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'segment:unmark_reprice_required ');
9151: raise FTE_FREIGHT_PRICING_UTIL.g_unmark_reprice_req_failed;
9144: p_segment_id => p_segment_id,
9145: x_return_status => l_return_status ) ;
9146:
9147: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9148: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9149: ROLLBACK to before_pricing;
9150: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'segment:unmark_reprice_required ');
9151: raise FTE_FREIGHT_PRICING_UTIL.g_unmark_reprice_req_failed;
9152: END IF;
9189: delete_invalid_fc_recs (
9190: p_delivery_leg_id => l_dlvy(j),
9191: x_return_status => l_return_status ) ;
9192:
9193: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9194: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9195: ROLLBACK to before_pricing;
9196: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'dleg:consolidate:N:delete_invalid_fc_recs ');
9197: raise FTE_FREIGHT_PRICING_UTIL.g_delete_invalid_fc_failed;
9190: p_delivery_leg_id => l_dlvy(j),
9191: x_return_status => l_return_status ) ;
9192:
9193: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9194: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9195: ROLLBACK to before_pricing;
9196: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'dleg:consolidate:N:delete_invalid_fc_recs ');
9197: raise FTE_FREIGHT_PRICING_UTIL.g_delete_invalid_fc_failed;
9198: END IF;
9204: p_delivery_leg_id => l_dlvy(j),
9205: x_first_level_rows => l_first_level_rows,
9206: x_return_status => l_return_status );
9207:
9208: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9209: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9210: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'segment:Consolidate=N:flatten_shipment ');
9211: ROLLBACK to before_pricing;
9212: raise FTE_FREIGHT_PRICING_UTIL.g_flatten_shipment_failed;
9205: x_first_level_rows => l_first_level_rows,
9206: x_return_status => l_return_status );
9207:
9208: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9209: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9210: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'segment:Consolidate=N:flatten_shipment ');
9211: ROLLBACK to before_pricing;
9212: raise FTE_FREIGHT_PRICING_UTIL.g_flatten_shipment_failed;
9213: END IF;
9238: x_freight_cost_temp_price => l_dummy_fc_temp_price,
9239: x_freight_cost_temp_charge => l_dummy_fc_temp_charge,
9240: x_return_status => l_return_status ) ;
9241:
9242: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9243: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9244: ROLLBACK to before_pricing;
9245: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'segment:Consolidate=N:shipment_pricing ');
9246: raise FTE_FREIGHT_PRICING_UTIL.g_shipment_pricing_failed;
9239: x_freight_cost_temp_charge => l_dummy_fc_temp_charge,
9240: x_return_status => l_return_status ) ;
9241:
9242: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9243: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9244: ROLLBACK to before_pricing;
9245: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'segment:Consolidate=N:shipment_pricing ');
9246: raise FTE_FREIGHT_PRICING_UTIL.g_shipment_pricing_failed;
9247: END IF;
9253: unmark_reprice_required (
9254: p_delivery_leg_id => l_dlvy(j),
9255: x_return_status => l_return_status ) ;
9256:
9257: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9258: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9259: ROLLBACK to before_pricing;
9260: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'dleg:consolidate:N:unmark_reprice_required ');
9261: raise FTE_FREIGHT_PRICING_UTIL.g_unmark_reprice_req_failed;
9254: p_delivery_leg_id => l_dlvy(j),
9255: x_return_status => l_return_status ) ;
9256:
9257: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9258: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9259: ROLLBACK to before_pricing;
9260: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'dleg:consolidate:N:unmark_reprice_required ');
9261: raise FTE_FREIGHT_PRICING_UTIL.g_unmark_reprice_req_failed;
9262: END IF;
9323: delete_invalid_fc_recs (
9324: p_segment_id => l_segment_id,
9325: x_return_status => l_return_status ) ;
9326:
9327: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9328: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9329: ROLLBACK to before_pricing;
9330: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'dleg:consolidate:Y:delete_invalid_fc_recs ');
9331: raise FTE_FREIGHT_PRICING_UTIL.g_delete_invalid_fc_failed;
9324: p_segment_id => l_segment_id,
9325: x_return_status => l_return_status ) ;
9326:
9327: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9328: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9329: ROLLBACK to before_pricing;
9330: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'dleg:consolidate:Y:delete_invalid_fc_recs ');
9331: raise FTE_FREIGHT_PRICING_UTIL.g_delete_invalid_fc_failed;
9332: END IF;
9337: flatten_shipment (
9338: x_first_level_rows => l_first_level_rows,
9339: x_return_status => l_return_status );
9340:
9341: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9342: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9343: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'dleg:Consolidate=Y:flatten_shipment ');
9344: ROLLBACK to before_pricing;
9345: raise FTE_FREIGHT_PRICING_UTIL.g_flatten_shipment_failed;
9338: x_first_level_rows => l_first_level_rows,
9339: x_return_status => l_return_status );
9340:
9341: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9342: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9343: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'dleg:Consolidate=Y:flatten_shipment ');
9344: ROLLBACK to before_pricing;
9345: raise FTE_FREIGHT_PRICING_UTIL.g_flatten_shipment_failed;
9346: END IF;
9381: x_freight_cost_temp_price => l_dummy_fc_temp_price,
9382: x_freight_cost_temp_charge => l_dummy_fc_temp_charge,
9383: x_return_status => l_return_status ) ;
9384:
9385: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9386: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9387: ROLLBACK to before_pricing;
9388: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'dleg:Consolidate=Y:shipment_pricing ');
9389: raise FTE_FREIGHT_PRICING_UTIL.g_shipment_pricing_failed;
9382: x_freight_cost_temp_charge => l_dummy_fc_temp_charge,
9383: x_return_status => l_return_status ) ;
9384:
9385: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9386: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9387: ROLLBACK to before_pricing;
9388: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'dleg:Consolidate=Y:shipment_pricing ');
9389: raise FTE_FREIGHT_PRICING_UTIL.g_shipment_pricing_failed;
9390: END IF;
9396: unmark_reprice_required (
9397: p_segment_id => l_segment_id,
9398: x_return_status => l_return_status ) ;
9399:
9400: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9401: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9402: ROLLBACK to before_pricing;
9403: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'dleg:consolidate:Y:unmark_reprice_required ');
9404: raise FTE_FREIGHT_PRICING_UTIL.g_unmark_reprice_req_failed;
9397: p_segment_id => l_segment_id,
9398: x_return_status => l_return_status ) ;
9399:
9400: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9401: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9402: ROLLBACK to before_pricing;
9403: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'dleg:consolidate:Y:unmark_reprice_required ');
9404: raise FTE_FREIGHT_PRICING_UTIL.g_unmark_reprice_req_failed;
9405: END IF;
9436: delete_invalid_fc_recs (
9437: p_delivery_leg_id => p_delivery_leg_id,
9438: x_return_status => l_return_status ) ;
9439:
9440: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9441: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9442: ROLLBACK to before_pricing;
9443: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'dleg:consolidate:N:delete_invalid_fc_recs ');
9444: raise FTE_FREIGHT_PRICING_UTIL.g_delete_invalid_fc_failed;
9437: p_delivery_leg_id => p_delivery_leg_id,
9438: x_return_status => l_return_status ) ;
9439:
9440: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9441: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9442: ROLLBACK to before_pricing;
9443: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'dleg:consolidate:N:delete_invalid_fc_recs ');
9444: raise FTE_FREIGHT_PRICING_UTIL.g_delete_invalid_fc_failed;
9445: END IF;
9451: -- p_delivery_leg_id => p_delivery_leg_id, -- Not required
9452: x_first_level_rows => l_first_level_rows,
9453: x_return_status => l_return_status );
9454:
9455: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9456: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9457: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'dleg:Consolidate=N:flatten_shipment ');
9458: ROLLBACK to before_pricing;
9459: raise FTE_FREIGHT_PRICING_UTIL.g_flatten_shipment_failed;
9452: x_first_level_rows => l_first_level_rows,
9453: x_return_status => l_return_status );
9454:
9455: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9456: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9457: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'dleg:Consolidate=N:flatten_shipment ');
9458: ROLLBACK to before_pricing;
9459: raise FTE_FREIGHT_PRICING_UTIL.g_flatten_shipment_failed;
9460: END IF;
9485: x_freight_cost_temp_price => l_dummy_fc_temp_price,
9486: x_freight_cost_temp_charge => l_dummy_fc_temp_charge,
9487: x_return_status => l_return_status ) ;
9488:
9489: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9490: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9491: ROLLBACK to before_pricing;
9492: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'dleg:Consolidate=N:shipment_pricing ');
9493: raise FTE_FREIGHT_PRICING_UTIL.g_shipment_pricing_failed;
9486: x_freight_cost_temp_charge => l_dummy_fc_temp_charge,
9487: x_return_status => l_return_status ) ;
9488:
9489: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9490: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9491: ROLLBACK to before_pricing;
9492: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'dleg:Consolidate=N:shipment_pricing ');
9493: raise FTE_FREIGHT_PRICING_UTIL.g_shipment_pricing_failed;
9494: END IF;
9500: unmark_reprice_required (
9501: p_delivery_leg_id => p_delivery_leg_id,
9502: x_return_status => l_return_status ) ;
9503:
9504: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9505: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9506: ROLLBACK to before_pricing;
9507: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'dleg:consolidate:N:unmark_reprice_required ');
9508: raise FTE_FREIGHT_PRICING_UTIL.g_unmark_reprice_req_failed;
9501: p_delivery_leg_id => p_delivery_leg_id,
9502: x_return_status => l_return_status ) ;
9503:
9504: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9505: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9506: ROLLBACK to before_pricing;
9507: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'dleg:consolidate:N:unmark_reprice_required ');
9508: raise FTE_FREIGHT_PRICING_UTIL.g_unmark_reprice_req_failed;
9509: END IF;
9518: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate');
9519:
9520: EXCEPTION
9521: WHEN g_finished_warning THEN
9522: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9523: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate');
9524: WHEN FND_API.G_EXC_ERROR THEN
9525: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9526: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_consolidate',FTE_FREIGHT_PRICING_UTIL.G_ERR,'FND_API.G_EXC_ERROR');
9521: WHEN g_finished_warning THEN
9522: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9523: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate');
9524: WHEN FND_API.G_EXC_ERROR THEN
9525: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9526: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_consolidate',FTE_FREIGHT_PRICING_UTIL.G_ERR,'FND_API.G_EXC_ERROR');
9527: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate');
9528: WHEN FTE_FREIGHT_PRICING_UTIL.g_noleg_segment THEN
9529: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9525: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9526: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_consolidate',FTE_FREIGHT_PRICING_UTIL.G_ERR,'FND_API.G_EXC_ERROR');
9527: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate');
9528: WHEN FTE_FREIGHT_PRICING_UTIL.g_noleg_segment THEN
9529: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9530: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_consolidate',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_noleg_segment');
9531: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate');
9532: WHEN FTE_FREIGHT_PRICING_UTIL.g_pricing_not_required THEN
9533: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9529: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9530: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_consolidate',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_noleg_segment');
9531: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate');
9532: WHEN FTE_FREIGHT_PRICING_UTIL.g_pricing_not_required THEN
9533: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9534: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_consolidate',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_pricing_not_required');
9535: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate');
9536: WHEN FTE_FREIGHT_PRICING_UTIL.g_flatten_shipment_failed THEN
9537: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9533: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9534: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_consolidate',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_pricing_not_required');
9535: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate');
9536: WHEN FTE_FREIGHT_PRICING_UTIL.g_flatten_shipment_failed THEN
9537: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9538: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_consolidate',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_flatten_shipment_failed');
9539: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate');
9540: WHEN FTE_FREIGHT_PRICING_UTIL.g_empty_delivery THEN
9541: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9537: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9538: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_consolidate',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_flatten_shipment_failed');
9539: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate');
9540: WHEN FTE_FREIGHT_PRICING_UTIL.g_empty_delivery THEN
9541: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9542: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_consolidate',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_empty_delivery');
9543: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate');
9544: WHEN FTE_FREIGHT_PRICING_UTIL.g_shipment_pricing_failed THEN
9545: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9541: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9542: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_consolidate',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_empty_delivery');
9543: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate');
9544: WHEN FTE_FREIGHT_PRICING_UTIL.g_shipment_pricing_failed THEN
9545: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9546: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_consolidate',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_shipment_pricing_failed');
9547: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate');
9548: WHEN FTE_FREIGHT_PRICING_UTIL.g_unmark_reprice_req_failed THEN
9549: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9545: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9546: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_consolidate',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_shipment_pricing_failed');
9547: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate');
9548: WHEN FTE_FREIGHT_PRICING_UTIL.g_unmark_reprice_req_failed THEN
9549: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9550: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_consolidate',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_unmark_reprice_req_failed');
9551: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate');
9552: WHEN FTE_FREIGHT_PRICING_UTIL.g_delete_invalid_fc_failed THEN
9553: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9549: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9550: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_consolidate',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_unmark_reprice_req_failed');
9551: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate');
9552: WHEN FTE_FREIGHT_PRICING_UTIL.g_delete_invalid_fc_failed THEN
9553: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9554: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_consolidate',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_delete_invalid_fc_failed');
9555: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate');
9556: WHEN others THEN
9557: ROLLBACK to before_pricing;
9554: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_consolidate',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_delete_invalid_fc_failed');
9555: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate');
9556: WHEN others THEN
9557: ROLLBACK to before_pricing;
9558: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
9559: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_consolidate',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
9560: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
9561: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate');
9562:
9578: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_LOG;
9579:
9580: BEGIN
9581:
9582: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
9583:
9584: -- Initialize message list if p_init_msg_list is set to TRUE.
9585: IF FND_API.to_Boolean( p_init_msg_list ) THEN
9586:
9586:
9587: FTE_FREIGHT_PRICING_UTIL.initialize_logging( p_init_msg_list => p_init_msg_list,
9588: x_return_status => l_return_status );
9589:
9590: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9591: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9592: x_return_status := l_return_status;
9593: RETURN;
9594: END IF;
9587: FTE_FREIGHT_PRICING_UTIL.initialize_logging( p_init_msg_list => p_init_msg_list,
9588: x_return_status => l_return_status );
9589:
9590: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9591: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9592: x_return_status := l_return_status;
9593: RETURN;
9594: END IF;
9595: ELSE
9615: x_trip_id=>l_trip_id,
9616: x_mode_of_transport=>l_mode,
9617: x_return_status=>l_return_status);
9618:
9619: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
9620: THEN
9621: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
9622: THEN
9623: raise FTE_FREIGHT_PRICING_UTIL.g_get_trip_mode_fail;
9617: x_return_status=>l_return_status);
9618:
9619: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
9620: THEN
9621: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
9622: THEN
9623: raise FTE_FREIGHT_PRICING_UTIL.g_get_trip_mode_fail;
9624: END IF;
9625: END IF;
9632: x_trip_id=>l_trip_id,
9633: x_mode_of_transport=>l_mode,
9634: x_return_status=>l_return_status);
9635:
9636: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
9637: THEN
9638: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
9639: THEN
9640: raise FTE_FREIGHT_PRICING_UTIL.g_get_trip_mode_fail;
9634: x_return_status=>l_return_status);
9635:
9636: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
9637: THEN
9638: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
9639: THEN
9640: raise FTE_FREIGHT_PRICING_UTIL.g_get_trip_mode_fail;
9641: END IF;
9642: END IF;
9652: p_check_reprice_flag=>'Y',
9653: x_output_cost_tab=>l_output_tab,
9654: x_return_status=>l_return_status);
9655:
9656: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
9657: THEN
9658: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
9659: THEN
9660: raise FTE_FREIGHT_PRICING_UTIL.g_tl_rate_trip_fail;
9654: x_return_status=>l_return_status);
9655:
9656: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
9657: THEN
9658: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
9659: THEN
9660: raise FTE_FREIGHT_PRICING_UTIL.g_tl_rate_trip_fail;
9661: END IF;
9662: END IF;
9672: p_segment_id => p_in_attributes.segment_id,
9673: p_check_reprice_flag => 'Y',
9674: x_return_status => l_return_status );
9675:
9676: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9677: FTE_FREIGHT_PRICING_UTIL.print_msg(p_msg => 'Shipment price consolidate successful ');
9678: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9679: x_return_status := l_return_status;
9680: FTE_FREIGHT_PRICING_UTIL.print_msg(p_msg => 'Shipment price consolidate successful with warning ');
9674: x_return_status => l_return_status );
9675:
9676: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9677: FTE_FREIGHT_PRICING_UTIL.print_msg(p_msg => 'Shipment price consolidate successful ');
9678: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9679: x_return_status := l_return_status;
9680: FTE_FREIGHT_PRICING_UTIL.print_msg(p_msg => 'Shipment price consolidate successful with warning ');
9681: ELSE
9682: raise FTE_FREIGHT_PRICING_UTIL.g_price_consolidate_failed;
9696:
9697: EXCEPTION
9698:
9699: WHEN FTE_FREIGHT_PRICING_UTIL.g_get_trip_mode_fail THEN
9700: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9701: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('shipment_price_consolidate_standard','g_get_trip_mode_fail');
9702: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate_standard');
9703: IF FND_API.to_Boolean( p_init_msg_list ) THEN
9704: FTE_FREIGHT_PRICING_UTIL.close_logs;
9705: END IF;
9706:
9707:
9708: WHEN FTE_FREIGHT_PRICING_UTIL.g_tl_rate_trip_fail THEN
9709: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9710: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('shipment_price_consolidate_standard','g_tl_rate_trip_fail');
9711: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate_standard');
9712: IF FND_API.to_Boolean( p_init_msg_list ) THEN
9713: FTE_FREIGHT_PRICING_UTIL.close_logs;
9714: END IF;
9715:
9716:
9717: WHEN FTE_FREIGHT_PRICING_UTIL.g_price_consolidate_failed THEN
9718: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9719: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('shipment_price_consolidate_standard','g_price_consolidate_failed');
9720: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate_standard');
9721: IF FND_API.to_Boolean( p_init_msg_list ) THEN
9722: FTE_FREIGHT_PRICING_UTIL.close_logs;
9721: IF FND_API.to_Boolean( p_init_msg_list ) THEN
9722: FTE_FREIGHT_PRICING_UTIL.close_logs;
9723: END IF;
9724: WHEN others THEN
9725: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
9726: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('shipment_price_consolidate_standard','g_others');
9727: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
9728: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_consolidate_standard');
9729: IF FND_API.to_Boolean( p_init_msg_list ) THEN
9785: p_delivery_id => p_delivery_id,
9786: p_delivery_leg_id => p_delivery_leg_id,
9787: x_return_status => l_return_status );
9788:
9789: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9790: l_status := 'NORMAL';
9791: errbuf := 'Shipment Reprice is completed successfully';
9792: retcode := '0';
9793: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9789: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9790: l_status := 'NORMAL';
9791: errbuf := 'Shipment Reprice is completed successfully';
9792: retcode := '0';
9793: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9794: l_status := 'WARNING';
9795: errbuf := 'Shipment Reprice is completed with warning';
9796: retcode := '1';
9797: ELSE
9843: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_LOG;
9844:
9845: BEGIN
9846:
9847: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
9848:
9849: IF p_init_prc_log = 'Y' THEN
9850: FTE_FREIGHT_PRICING_UTIL.initialize_logging(x_return_status => l_return_status);
9851:
9848:
9849: IF p_init_prc_log = 'Y' THEN
9850: FTE_FREIGHT_PRICING_UTIL.initialize_logging(x_return_status => l_return_status);
9851:
9852: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9853: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9854: x_return_status := l_return_status;
9855: RETURN;
9856: END IF;
9849: IF p_init_prc_log = 'Y' THEN
9850: FTE_FREIGHT_PRICING_UTIL.initialize_logging(x_return_status => l_return_status);
9851:
9852: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9853: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9854: x_return_status := l_return_status;
9855: RETURN;
9856: END IF;
9857: ELSE
9874: x_trip_id=>l_trip_id,
9875: x_mode_of_transport=>l_mode,
9876: x_return_status=>l_return_status);
9877:
9878: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
9879: THEN
9880: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
9881: THEN
9882: raise FTE_FREIGHT_PRICING_UTIL.g_get_trip_mode_fail;
9876: x_return_status=>l_return_status);
9877:
9878: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
9879: THEN
9880: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
9881: THEN
9882: raise FTE_FREIGHT_PRICING_UTIL.g_get_trip_mode_fail;
9883: END IF;
9884: END IF;
9891: p_check_reprice_flag=>'N',
9892: x_output_cost_tab=>l_output_tab,
9893: x_return_status=>l_return_status);
9894:
9895: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
9896: THEN
9897: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
9898: THEN
9899: raise FTE_FREIGHT_PRICING_UTIL.g_tl_rate_trip_fail;
9893: x_return_status=>l_return_status);
9894:
9895: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
9896: THEN
9897: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
9898: THEN
9899: raise FTE_FREIGHT_PRICING_UTIL.g_tl_rate_trip_fail;
9900: END IF;
9901: END IF;
9907: shipment_price_consolidate (
9908: p_segment_id => p_segment_id,
9909: x_return_status => l_return_status );
9910:
9911: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9912: FTE_FREIGHT_PRICING_UTIL.print_msg(p_msg => 'Shipment price consolidate successful for segment : '||p_segment_id);
9913: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9914: x_return_status := l_return_status;
9915: FTE_FREIGHT_PRICING_UTIL.print_msg(p_msg => 'Shipment price consolidate successful with warning for segment : '||p_segment_id);
9909: x_return_status => l_return_status );
9910:
9911: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9912: FTE_FREIGHT_PRICING_UTIL.print_msg(p_msg => 'Shipment price consolidate successful for segment : '||p_segment_id);
9913: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9914: x_return_status := l_return_status;
9915: FTE_FREIGHT_PRICING_UTIL.print_msg(p_msg => 'Shipment price consolidate successful with warning for segment : '||p_segment_id);
9916: ELSE
9917: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'segment: '||p_segment_id||' shipment_price_consolidate ');
9939: x_trip_id=>l_trip_id,
9940: x_mode_of_transport=>l_mode,
9941: x_return_status=>l_return_status);
9942:
9943: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
9944: THEN
9945: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
9946: THEN
9947: raise FTE_FREIGHT_PRICING_UTIL.g_get_trip_mode_fail;
9941: x_return_status=>l_return_status);
9942:
9943: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
9944: THEN
9945: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
9946: THEN
9947: raise FTE_FREIGHT_PRICING_UTIL.g_get_trip_mode_fail;
9948: END IF;
9949: END IF;
9956: p_check_reprice_flag=>'N',
9957: x_output_cost_tab=>l_output_tab,
9958: x_return_status=>l_return_status);
9959:
9960: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
9961: THEN
9962: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
9963: THEN
9964: raise FTE_FREIGHT_PRICING_UTIL.g_tl_rate_trip_fail;
9958: x_return_status=>l_return_status);
9959:
9960: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
9961: THEN
9962: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
9963: THEN
9964: raise FTE_FREIGHT_PRICING_UTIL.g_tl_rate_trip_fail;
9965: END IF;
9966: END IF;
9973: shipment_price_consolidate (
9974: p_delivery_leg_id => l_delivery_leg_id,
9975: x_return_status => l_return_status );
9976:
9977: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9978: FTE_FREIGHT_PRICING_UTIL.print_msg(p_msg => 'Shipment price consolidate successful for delivery leg : '||l_delivery_leg_id);
9979: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9980: x_return_status := l_return_status;
9981: FTE_FREIGHT_PRICING_UTIL.print_msg(p_msg => 'Shipment price consolidate successful for segment : '||p_segment_id);
9975: x_return_status => l_return_status );
9976:
9977: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9978: FTE_FREIGHT_PRICING_UTIL.print_msg(p_msg => 'Shipment price consolidate successful for delivery leg : '||l_delivery_leg_id);
9979: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9980: x_return_status := l_return_status;
9981: FTE_FREIGHT_PRICING_UTIL.print_msg(p_msg => 'Shipment price consolidate successful for segment : '||p_segment_id);
9982: ELSE
9983: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Delivery leg: '||l_delivery_leg_id||' shipment_price_consolidate ');
9996: x_trip_id=>l_trip_id,
9997: x_mode_of_transport=>l_mode,
9998: x_return_status=>l_return_status);
9999:
10000: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
10001: THEN
10002: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
10003: THEN
10004: raise FTE_FREIGHT_PRICING_UTIL.g_get_trip_mode_fail;
9998: x_return_status=>l_return_status);
9999:
10000: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
10001: THEN
10002: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
10003: THEN
10004: raise FTE_FREIGHT_PRICING_UTIL.g_get_trip_mode_fail;
10005: END IF;
10006: END IF;
10013: p_check_reprice_flag=>'N',
10014: x_output_cost_tab=>l_output_tab,
10015: x_return_status=>l_return_status);
10016:
10017: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
10018: THEN
10019: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
10020: THEN
10021: raise FTE_FREIGHT_PRICING_UTIL.g_tl_rate_trip_fail;
10015: x_return_status=>l_return_status);
10016:
10017: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
10018: THEN
10019: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING
10020: THEN
10021: raise FTE_FREIGHT_PRICING_UTIL.g_tl_rate_trip_fail;
10022: END IF;
10023: END IF;
10028: shipment_price_consolidate (
10029: p_delivery_leg_id => p_delivery_leg_id,
10030: x_return_status => l_return_status );
10031:
10032: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10033: FTE_FREIGHT_PRICING_UTIL.print_msg(p_msg => 'Shipment price consolidate successful for delivery leg : '||p_delivery_leg_id);
10034: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
10035: x_return_status := l_return_status;
10036: ELSE
10030: x_return_status => l_return_status );
10031:
10032: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10033: FTE_FREIGHT_PRICING_UTIL.print_msg(p_msg => 'Shipment price consolidate successful for delivery leg : '||p_delivery_leg_id);
10034: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
10035: x_return_status := l_return_status;
10036: ELSE
10037: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'delivery leg: '||p_delivery_leg_id||' shipment_price_consolidate ');
10038: raise FTE_FREIGHT_PRICING_UTIL.g_price_consolidate_failed;
10046: END IF;
10047:
10048: EXCEPTION
10049: WHEN FTE_FREIGHT_PRICING_UTIL.g_no_input THEN
10050: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10051: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_reprice2',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_no_input');
10052: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_reprice2');
10053: IF p_init_prc_log = 'Y' THEN
10054: FTE_FREIGHT_PRICING_UTIL.close_logs;
10054: FTE_FREIGHT_PRICING_UTIL.close_logs;
10055: END IF;
10056:
10057: WHEN FTE_FREIGHT_PRICING_UTIL.g_get_trip_mode_fail THEN
10058: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10059: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_reprice2',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_get_trip_mode_fail');
10060: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_reprice2');
10061: IF p_init_prc_log = 'Y' THEN
10062: FTE_FREIGHT_PRICING_UTIL.close_logs;
10062: FTE_FREIGHT_PRICING_UTIL.close_logs;
10063: END IF;
10064:
10065: WHEN FTE_FREIGHT_PRICING_UTIL.g_tl_rate_trip_fail THEN
10066: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10067: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_reprice2',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_tl_rate_trip_fail');
10068: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_reprice2');
10069: IF p_init_prc_log = 'Y' THEN
10070: FTE_FREIGHT_PRICING_UTIL.close_logs;
10071: END IF;
10072:
10073:
10074: WHEN FTE_FREIGHT_PRICING_UTIL.g_price_consolidate_failed THEN
10075: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10076: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_reprice2',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_price_consolidate_failed');
10077: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_reprice2');
10078: IF p_init_prc_log = 'Y' THEN
10079: FTE_FREIGHT_PRICING_UTIL.close_logs;
10079: FTE_FREIGHT_PRICING_UTIL.close_logs;
10080: END IF;
10081:
10082: WHEN others THEN
10083: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
10084: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_reprice2',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
10085: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
10086: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_reprice2');
10087: IF p_init_prc_log = 'Y' THEN
10144: x_delivery_legs := l_delvy_tab;
10145:
10146: EXCEPTION
10147: WHEN others THEN
10148: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
10149: FTE_FREIGHT_PRICING_UTIL.set_exception('get_delivery_legs',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
10150: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
10151: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'get_delivery_legs');
10152: END get_delivery_legs;
10233:
10234:
10235: EXCEPTION
10236: WHEN others THEN
10237: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10238: FTE_FREIGHT_PRICING_UTIL.set_exception('get_distinct_trip_ids',FTE_FREIGHT_PRICING_UTIL.G_ERR,'get distinct trips failed');
10239: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'get_distinct_trip_ids');
10240: END get_distinct_trip_ids;
10241:
10357:
10358: EXCEPTION
10359:
10360: --WHEN dleg_rates_not_found THEN
10361: -- x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10362: -- FTE_FREIGHT_PRICING_UTIL.set_exception('validate_delivery_legs',FTE_FREIGHT_PRICING_UTIL.G_ERR,'dleg_rates_not_found');
10363: -- FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'validate_delivery_legs');
10364: WHEN OTHERS THEN
10365: FTE_FREIGHT_PRICING_UTIL.set_exception('validate_delivery_legs',FTE_FREIGHT_PRICING_UTIL.G_ERR,'validate_delivery_legs failed');
10367: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'validate_delivery_legs');
10368: END validate_delivery_legs;
10369:
10370:
10371: PROCEDURE validate_trips(p_trip_id_list IN WSH_UTIL_CORE.id_tab_type,
10372: x_failed_trips_list OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
10373: x_success_trips_list OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
10374: x_closed_trips_list OUT NOCOPY WSH_UTIL_CORE.id_tab_type)
10375:
10368: END validate_delivery_legs;
10369:
10370:
10371: PROCEDURE validate_trips(p_trip_id_list IN WSH_UTIL_CORE.id_tab_type,
10372: x_failed_trips_list OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
10373: x_success_trips_list OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
10374: x_closed_trips_list OUT NOCOPY WSH_UTIL_CORE.id_tab_type)
10375:
10376: IS
10369:
10370:
10371: PROCEDURE validate_trips(p_trip_id_list IN WSH_UTIL_CORE.id_tab_type,
10372: x_failed_trips_list OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
10373: x_success_trips_list OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
10374: x_closed_trips_list OUT NOCOPY WSH_UTIL_CORE.id_tab_type)
10375:
10376: IS
10377:
10370:
10371: PROCEDURE validate_trips(p_trip_id_list IN WSH_UTIL_CORE.id_tab_type,
10372: x_failed_trips_list OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
10373: x_success_trips_list OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
10374: x_closed_trips_list OUT NOCOPY WSH_UTIL_CORE.id_tab_type)
10375:
10376: IS
10377:
10378: CURSOR c_trip_info(c_trip_id NUMBER)
10525: l_service_failed_delv_ids VARCHAR2(32767);
10526: l_closed_trips_delv_ids VARCHAR2(32767);
10527: l_fail_val_dleg_list FTE_ID_TAB_TYPE;
10528: l_action_params FTE_TRIP_RATING_GRP.action_param_rec;
10529: l_trip_id_list WSH_UTIL_CORE.id_tab_type;
10530: l_failed_trips WSH_UTIL_CORE.id_tab_type;
10531: l_success_trips WSH_UTIL_CORE.id_tab_type;
10532: l_temp_trips_tab WSH_UTIL_CORE.id_tab_type;
10533: l_closed_trips WSH_UTIL_CORE.id_tab_type;
10526: l_closed_trips_delv_ids VARCHAR2(32767);
10527: l_fail_val_dleg_list FTE_ID_TAB_TYPE;
10528: l_action_params FTE_TRIP_RATING_GRP.action_param_rec;
10529: l_trip_id_list WSH_UTIL_CORE.id_tab_type;
10530: l_failed_trips WSH_UTIL_CORE.id_tab_type;
10531: l_success_trips WSH_UTIL_CORE.id_tab_type;
10532: l_temp_trips_tab WSH_UTIL_CORE.id_tab_type;
10533: l_closed_trips WSH_UTIL_CORE.id_tab_type;
10534: l_number_of_warnings NUMBER;
10527: l_fail_val_dleg_list FTE_ID_TAB_TYPE;
10528: l_action_params FTE_TRIP_RATING_GRP.action_param_rec;
10529: l_trip_id_list WSH_UTIL_CORE.id_tab_type;
10530: l_failed_trips WSH_UTIL_CORE.id_tab_type;
10531: l_success_trips WSH_UTIL_CORE.id_tab_type;
10532: l_temp_trips_tab WSH_UTIL_CORE.id_tab_type;
10533: l_closed_trips WSH_UTIL_CORE.id_tab_type;
10534: l_number_of_warnings NUMBER;
10535: l_number_of_errors NUMBER;
10528: l_action_params FTE_TRIP_RATING_GRP.action_param_rec;
10529: l_trip_id_list WSH_UTIL_CORE.id_tab_type;
10530: l_failed_trips WSH_UTIL_CORE.id_tab_type;
10531: l_success_trips WSH_UTIL_CORE.id_tab_type;
10532: l_temp_trips_tab WSH_UTIL_CORE.id_tab_type;
10533: l_closed_trips WSH_UTIL_CORE.id_tab_type;
10534: l_number_of_warnings NUMBER;
10535: l_number_of_errors NUMBER;
10536: l_return_status VARCHAR2(32767);
10529: l_trip_id_list WSH_UTIL_CORE.id_tab_type;
10530: l_failed_trips WSH_UTIL_CORE.id_tab_type;
10531: l_success_trips WSH_UTIL_CORE.id_tab_type;
10532: l_temp_trips_tab WSH_UTIL_CORE.id_tab_type;
10533: l_closed_trips WSH_UTIL_CORE.id_tab_type;
10534: l_number_of_warnings NUMBER;
10535: l_number_of_errors NUMBER;
10536: l_return_status VARCHAR2(32767);
10537: l_no_rates_delv_ids VARCHAR2(32767);
10572: THEN
10573: FND_MSG_PUB.initialize;
10574: END IF;
10575:
10576: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
10577:
10578: FTE_FREIGHT_PRICING_UTIL.initialize_logging(x_return_status => l_return_status);
10579:
10580: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10576: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
10577:
10578: FTE_FREIGHT_PRICING_UTIL.initialize_logging(x_return_status => l_return_status);
10579:
10580: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10581: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
10582: x_return_status := l_return_status;
10583: RETURN;
10584: END IF;
10577:
10578: FTE_FREIGHT_PRICING_UTIL.initialize_logging(x_return_status => l_return_status);
10579:
10580: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10581: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
10582: x_return_status := l_return_status;
10583: RETURN;
10584: END IF;
10585: ELSE
10812: x_msg_count => l_msg_count,
10813: x_msg_data => l_msg_data
10814: );
10815: j1 := 0;
10816: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10817: FTE_FREIGHT_PRICING_UTIL.print_msg(p_msg => 'Trip Re-Rating successful for trip_id : '||l_trip_ids(l_index).trip_id);
10818: FOR j1 IN l_all_trips.FIRST..l_all_trips.LAST LOOP
10819: IF l_all_trips(j1).trip_id = l_trip_ids(l_index).trip_id THEN
10820: l_success_list.EXTEND;
10824: l_success_list(l_success_list.LAST) := l_all_trips(j1).delivery_leg_id;
10825: END IF;
10826: END IF;
10827: END LOOP;
10828: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
10829: FTE_FREIGHT_PRICING_UTIL.print_msg(p_msg => 'Trip Re-Rating with Warnings for trip_id : '||l_trip_ids(l_index).trip_id);
10830: x_return_status := l_return_status;
10831:
10832: FND_MSG_PUB.Count_And_Get
10888: FND_MSG_PUB.Delete_Msg ( p_msg_index => null);
10889:
10890: IF l_success_list.COUNT > 0 THEN
10891: IF l_success_list.COUNT = l_dleg_list.COUNT THEN
10892: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
10893: END IF;
10894: END IF;
10895:
10896: IF l_warning_list.COUNT > 0 THEN
10893: END IF;
10894: END IF;
10895:
10896: IF l_warning_list.COUNT > 0 THEN
10897: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10898: IF l_delv_with_multlegs_names IS NOT NULL THEN
10899: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,' Delv with MulipleLegs::= '||l_delv_with_multlegs_names);
10900: FND_MESSAGE.SET_NAME('FTE','FTE_PRC_RERATE_MULTILEG_WARN');
10901: FND_MESSAGE.SET_TOKEN('DEL_NAMES',l_delv_with_multlegs_names);
10931: FND_MESSAGE.SET_TOKEN('LOGFILE',FTE_FREIGHT_PRICING_UTIL.get_log_file_name());
10932: FND_MSG_PUB.ADD;
10933: END IF;
10934: IF l_success_list.COUNT > 0 OR l_warning_list.COUNT > 0 THEN
10935: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10936: ELSE
10937: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10938: END IF;
10939: END IF;
10933: END IF;
10934: IF l_success_list.COUNT > 0 OR l_warning_list.COUNT > 0 THEN
10935: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10936: ELSE
10937: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10938: END IF;
10939: END IF;
10940: FTE_FREIGHT_PRICING_UTIL.print_msg(l_log_level,'x_return_status='||x_return_status);
10941:
10969:
10970: EXCEPTION
10971: WHEN l_delivery_validation_failed THEN
10972: ROLLBACK TO rerate_shipment_online;
10973: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10974: --FND_MSG_PUB.Count_And_Get
10975: -- (
10976: -- p_count => x_msg_count,
10977: -- p_data => x_msg_data,
10983: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
10984: FTE_FREIGHT_PRICING_UTIL.close_logs;
10985: WHEN l_dleg_list_empty THEN
10986: ROLLBACK TO rerate_shipment_online;
10987: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10988: FND_MSG_PUB.Count_And_Get
10989: (
10990: p_count => x_msg_count,
10991: p_data => x_msg_data,
10996: FTE_FREIGHT_PRICING_UTIL.close_logs;
10997:
10998: WHEN l_delv_list_empty THEN
10999: ROLLBACK TO rerate_shipment_online;
11000: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11001: FND_MSG_PUB.Count_And_Get
11002: (
11003: p_count => x_msg_count,
11004: p_data => x_msg_data,
11009: FTE_FREIGHT_PRICING_UTIL.close_logs;
11010:
11011: WHEN l_del_name_mismatch THEN
11012: ROLLBACK TO rerate_shipment_online;
11013: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11014: FND_MSG_PUB.Count_And_Get
11015: (
11016: p_count => x_msg_count,
11017: p_data => x_msg_data,
11021: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
11022: FTE_FREIGHT_PRICING_UTIL.close_logs;
11023: WHEN l_dleg_validation_failed THEN
11024: ROLLBACK TO rerate_shipment_online;
11025: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11026: FND_MSG_PUB.Count_And_Get
11027: (
11028: p_count => x_msg_count,
11029: p_data => x_msg_data,
11032: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_reprice2',FTE_FREIGHT_PRICING_UTIL.G_ERR,'l_dleg_validation_failed');
11033: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_reprice2');
11034: FTE_FREIGHT_PRICING_UTIL.close_logs;
11035: WHEN l_trip_rating_failed THEN
11036: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11037: FND_MSG_PUB.Count_And_Get
11038: (
11039: p_count => x_msg_count,
11040: p_data => x_msg_data,
11044: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_reprice2');
11045: FTE_FREIGHT_PRICING_UTIL.close_logs;
11046: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
11047: ROLLBACK TO rerate_shipment_online;
11048: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11049: FND_MSG_PUB.Count_And_Get
11050: (
11051: p_count => x_msg_count,
11052: p_data => x_msg_data,
11057: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
11058: FTE_FREIGHT_PRICING_UTIL.close_logs;
11059: WHEN others THEN
11060: ROLLBACK TO rerate_shipment_online;
11061: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
11062: FND_MSG_PUB.Count_And_Get
11063: (
11064: p_count => x_msg_count,
11065: p_data => x_msg_data,
11084: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
11085:
11086: BEGIN
11087:
11088: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
11089: IF p_initialized THEN
11090: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
11091: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'delete_fc_temp_pvt','start');
11092: END IF;
11103: END IF;
11104:
11105: EXCEPTION
11106: WHEN others THEN
11107: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
11108: IF p_initialized THEN
11109: FTE_FREIGHT_PRICING_UTIL.set_exception('delete_fc_temp_pvt',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
11110: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
11111: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'delete_fc_temp_pvt');
11130:
11131: l_empty_main_row WSH_FREIGHT_COSTS_PVT.Freight_Cost_Rec_Type;
11132: l_freight_cost_main_row WSH_FREIGHT_COSTS_PVT.Freight_Cost_Rec_Type;
11133: l_freight_cost_main_charge WSH_FREIGHT_COSTS_PVT.Freight_Cost_Rec_Type;
11134: l_price_fc_ids WSH_UTIL_CORE.id_tab_type;
11135: l_rowid VARCHAR2(30);
11136: l_update_rowid VARCHAR2(30);
11137: l_freight_cost_id NUMBER;
11138:
11136: l_update_rowid VARCHAR2(30);
11137: l_freight_cost_id NUMBER;
11138:
11139: BEGIN
11140: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
11141:
11142: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
11143: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,l_api_name);
11144:
11232: p_rowid => l_update_rowid,
11233: p_freight_cost_info => l_freight_cost_main_row,
11234: x_return_status => l_return_status);
11235:
11236: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11237: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11238: ROLLBACK to before_fc_creation;
11239: raise FTE_FREIGHT_PRICING_UTIL.g_update_freight_cost_failed;
11240: END IF;
11233: p_freight_cost_info => l_freight_cost_main_row,
11234: x_return_status => l_return_status);
11235:
11236: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11237: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11238: ROLLBACK to before_fc_creation;
11239: raise FTE_FREIGHT_PRICING_UTIL.g_update_freight_cost_failed;
11240: END IF;
11241: END IF;
11252: x_rowid => l_rowid,
11253: x_freight_cost_id => l_freight_cost_id,
11254: x_return_status => l_return_status);
11255:
11256: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11257: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11258: ROLLBACK to before_fc_creation;
11259: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Base price');
11260: raise FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed;
11253: x_freight_cost_id => l_freight_cost_id,
11254: x_return_status => l_return_status);
11255:
11256: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11257: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11258: ROLLBACK to before_fc_creation;
11259: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Base price');
11260: raise FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed;
11261: END IF;
11321: x_rowid => l_rowid,
11322: x_freight_cost_id => l_freight_cost_id,
11323: x_return_status => l_return_status);
11324:
11325: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11326: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11327: ROLLBACK to before_fc_creation;
11328: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Charge');
11329: raise FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed;
11322: x_freight_cost_id => l_freight_cost_id,
11323: x_return_status => l_return_status);
11324:
11325: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11326: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11327: ROLLBACK to before_fc_creation;
11328: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Charge');
11329: raise FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed;
11330: END IF;
11337: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
11338:
11339: EXCEPTION
11340: WHEN FTE_FREIGHT_PRICING_UTIL.g_no_temp_fc_to_move THEN
11341: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11342: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_no_temp_fc_to_move');
11343: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
11344: WHEN FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed THEN
11345: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11341: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11342: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_no_temp_fc_to_move');
11343: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
11344: WHEN FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed THEN
11345: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11346: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_create_freight_cost_failed');
11347: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
11348: WHEN FTE_FREIGHT_PRICING_UTIL.g_update_freight_cost_failed THEN
11349: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11345: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11346: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_create_freight_cost_failed');
11347: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
11348: WHEN FTE_FREIGHT_PRICING_UTIL.g_update_freight_cost_failed THEN
11349: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11350: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_update_freight_cost_failed');
11351: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
11352: WHEN others THEN
11353: ROLLBACK to before_fc_creation;
11350: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_update_freight_cost_failed');
11351: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
11352: WHEN others THEN
11353: ROLLBACK to before_fc_creation;
11354: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
11355: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
11356: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
11357: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
11358: END;
11376: l_update_rowid VARCHAR2(30);
11377: l_freight_cost_id NUMBER;
11378:
11379: BEGIN
11380: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
11381:
11382: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
11383: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,l_api_name);
11384:
11448: p_rowid => l_update_rowid,
11449: p_freight_cost_info => l_freight_cost_main_row,
11450: x_return_status => l_return_status);
11451:
11452: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11453: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11454: ROLLBACK to before_fc_creation;
11455: raise FTE_FREIGHT_PRICING_UTIL.g_update_freight_cost_failed;
11456: END IF;
11449: p_freight_cost_info => l_freight_cost_main_row,
11450: x_return_status => l_return_status);
11451:
11452: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11453: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11454: ROLLBACK to before_fc_creation;
11455: raise FTE_FREIGHT_PRICING_UTIL.g_update_freight_cost_failed;
11456: END IF;
11457: END IF;
11468: x_rowid => l_rowid,
11469: x_freight_cost_id => l_freight_cost_id,
11470: x_return_status => l_return_status);
11471:
11472: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11473: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11474: ROLLBACK to before_fc_creation;
11475: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Base price');
11476: raise FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed;
11469: x_freight_cost_id => l_freight_cost_id,
11470: x_return_status => l_return_status);
11471:
11472: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11473: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11474: ROLLBACK to before_fc_creation;
11475: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Base price');
11476: raise FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed;
11477: END IF;
11486: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
11487:
11488: EXCEPTION
11489: WHEN FTE_FREIGHT_PRICING_UTIL.g_no_temp_fc_to_move THEN
11490: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11491: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_no_temp_fc_to_move');
11492: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
11493: WHEN FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed THEN
11494: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11490: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11491: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_no_temp_fc_to_move');
11492: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
11493: WHEN FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed THEN
11494: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11495: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_create_freight_cost_failed');
11496: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
11497: WHEN FTE_FREIGHT_PRICING_UTIL.g_update_freight_cost_failed THEN
11498: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11494: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11495: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_create_freight_cost_failed');
11496: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
11497: WHEN FTE_FREIGHT_PRICING_UTIL.g_update_freight_cost_failed THEN
11498: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11499: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_update_freight_cost_failed');
11500: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
11501: WHEN others THEN
11502: ROLLBACK to before_fc_creation;
11499: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_update_freight_cost_failed');
11500: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
11501: WHEN others THEN
11502: ROLLBACK to before_fc_creation;
11503: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
11504: FTE_FREIGHT_PRICING_UTIL.set_exception(l_api_name,FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
11505: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
11506: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,l_api_name);
11507: END;
11562: l_empty_main_row WSH_FREIGHT_COSTS_PVT.Freight_Cost_Rec_Type;
11563: l_freight_cost_main_row WSH_FREIGHT_COSTS_PVT.Freight_Cost_Rec_Type;
11564: l_freight_cost_temp_charge c_move_fc_temp_charge%ROWTYPE;
11565: l_freight_cost_main_charge WSH_FREIGHT_COSTS_PVT.Freight_Cost_Rec_Type;
11566: l_price_fc_ids WSH_UTIL_CORE.id_tab_type;
11567: l_rowid VARCHAR2(30);
11568: l_update_rowid VARCHAR2(30);
11569: l_freight_cost_id NUMBER;
11570: l_return_status VARCHAR2(1);
11572: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
11573:
11574: BEGIN
11575:
11576: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
11577: IF (p_init_prc_log = 'Y') THEN
11578: FTE_FREIGHT_PRICING_UTIL.initialize_logging( p_init_msg_list => p_init_msg_list,
11579: x_return_status => l_return_status );
11580: END IF;
11578: FTE_FREIGHT_PRICING_UTIL.initialize_logging( p_init_msg_list => p_init_msg_list,
11579: x_return_status => l_return_status );
11580: END IF;
11581:
11582: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11583: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11584: x_return_status := l_return_status;
11585: RETURN;
11586: END IF;
11579: x_return_status => l_return_status );
11580: END IF;
11581:
11582: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11583: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11584: x_return_status := l_return_status;
11585: RETURN;
11586: END IF;
11587: ELSE
11623: p_schedule_id=>p_schedule_id,
11624: p_comparison_request_id=>p_request_id,
11625: x_return_status=>l_return_status);
11626:
11627: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11628: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11629: raise FTE_FREIGHT_PRICING_UTIL.g_tl_move_dlv_rec_fail;
11630: END IF;
11631: END IF;
11624: p_comparison_request_id=>p_request_id,
11625: x_return_status=>l_return_status);
11626:
11627: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11628: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11629: raise FTE_FREIGHT_PRICING_UTIL.g_tl_move_dlv_rec_fail;
11630: END IF;
11631: END IF;
11632:
11698: x_rowid => l_rowid,
11699: x_freight_cost_id => l_freight_cost_id,
11700: x_return_status => l_return_status);
11701:
11702: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11703: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11704: ROLLBACK to before_fc_creation;
11705: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Base price');
11706: raise FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed;
11699: x_freight_cost_id => l_freight_cost_id,
11700: x_return_status => l_return_status);
11701:
11702: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11703: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11704: ROLLBACK to before_fc_creation;
11705: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Base price');
11706: raise FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed;
11707: END IF;
11725: p_rowid => l_update_rowid,
11726: p_freight_cost_info => l_freight_cost_main_row,
11727: x_return_status => l_return_status);
11728:
11729: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11730: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11731: ROLLBACK to before_fc_creation;
11732: raise FTE_FREIGHT_PRICING_UTIL.g_update_freight_cost_failed;
11733: END IF;
11726: p_freight_cost_info => l_freight_cost_main_row,
11727: x_return_status => l_return_status);
11728:
11729: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11730: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11731: ROLLBACK to before_fc_creation;
11732: raise FTE_FREIGHT_PRICING_UTIL.g_update_freight_cost_failed;
11733: END IF;
11734: END IF;
11797: x_rowid => l_rowid,
11798: x_freight_cost_id => l_freight_cost_id,
11799: x_return_status => l_return_status);
11800:
11801: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11802: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11803: ROLLBACK to before_fc_creation;
11804: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Charge');
11805: raise FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed;
11798: x_freight_cost_id => l_freight_cost_id,
11799: x_return_status => l_return_status);
11800:
11801: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11802: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11803: ROLLBACK to before_fc_creation;
11804: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Charge');
11805: raise FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed;
11806: END IF;
11832: p_lane_id => p_lane_id,
11833: p_schedule_id => p_schedule_id,
11834: x_return_status => l_return_status);
11835:
11836: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11837: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11838: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'delete_fc_temp failed ');
11839: raise FTE_FREIGHT_PRICING_UTIL.g_delete_fc_temp_failed;
11840: END IF;
11833: p_schedule_id => p_schedule_id,
11834: x_return_status => l_return_status);
11835:
11836: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11837: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11838: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'delete_fc_temp failed ');
11839: raise FTE_FREIGHT_PRICING_UTIL.g_delete_fc_temp_failed;
11840: END IF;
11841: ELSE
11852: EXCEPTION
11853:
11854: WHEN FTE_FREIGHT_PRICING_UTIL.g_tl_move_dlv_rec_fail THEN
11855: ROLLBACK to before_fc_creation;
11856: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11857: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('Move_fc_temp_to_main','g_tl_move_dlv_rec_fail');
11858: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Move_fc_temp_to_main');
11859: IF (p_init_prc_log = 'Y') THEN
11860: FTE_FREIGHT_PRICING_UTIL.close_logs;
11860: FTE_FREIGHT_PRICING_UTIL.close_logs;
11861: END IF;
11862:
11863: WHEN FTE_FREIGHT_PRICING_UTIL.g_no_lanesched_seg THEN
11864: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11865: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('Move_fc_temp_to_main','g_no_lanesched_seg');
11866: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Move_fc_temp_to_main');
11867: IF (p_init_prc_log = 'Y') THEN
11868: FTE_FREIGHT_PRICING_UTIL.close_logs;
11868: FTE_FREIGHT_PRICING_UTIL.close_logs;
11869: END IF;
11870: WHEN FTE_FREIGHT_PRICING_UTIL.g_no_temp_fc_to_move THEN
11871: --ROLLBACK to before_fc_creation;
11872: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11873: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('Move_fc_temp_to_main','g_no_temp_fc_to_move');
11874: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Move_fc_temp_to_main');
11875: IF (p_init_prc_log = 'Y') THEN
11876: FTE_FREIGHT_PRICING_UTIL.close_logs;
11875: IF (p_init_prc_log = 'Y') THEN
11876: FTE_FREIGHT_PRICING_UTIL.close_logs;
11877: END IF;
11878: WHEN FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed THEN
11879: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11880: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('Move_fc_temp_to_main','g_create_freight_cost_failed');
11881: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Move_fc_temp_to_main');
11882: IF (p_init_prc_log = 'Y') THEN
11883: FTE_FREIGHT_PRICING_UTIL.close_logs;
11882: IF (p_init_prc_log = 'Y') THEN
11883: FTE_FREIGHT_PRICING_UTIL.close_logs;
11884: END IF;
11885: WHEN FTE_FREIGHT_PRICING_UTIL.g_update_freight_cost_failed THEN
11886: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11887: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('Move_fc_temp_to_main','g_update_freight_cost_failed');
11888: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Move_fc_temp_to_main');
11889: IF (p_init_prc_log = 'Y') THEN
11890: FTE_FREIGHT_PRICING_UTIL.close_logs;
11889: IF (p_init_prc_log = 'Y') THEN
11890: FTE_FREIGHT_PRICING_UTIL.close_logs;
11891: END IF;
11892: WHEN FTE_FREIGHT_PRICING_UTIL.g_delete_fc_temp_failed THEN
11893: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
11894: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('Move_fc_temp_to_main','g_delete_fc_temp_failed');
11895: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Move_fc_temp_to_main');
11896: IF (p_init_prc_log = 'Y') THEN
11897: FTE_FREIGHT_PRICING_UTIL.close_logs;
11897: FTE_FREIGHT_PRICING_UTIL.close_logs;
11898: END IF;
11899: WHEN others THEN
11900: ROLLBACK to before_fc_creation;
11901: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
11902: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('Move_fc_temp_to_main','g_others');
11903: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
11904: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Move_fc_temp_to_main');
11905: IF (p_init_prc_log = 'Y') THEN
11956: l_freight_cost_temp_row c_move_fc_temp%ROWTYPE;
11957: l_freight_cost_main_row WSH_FREIGHT_COSTS_PVT.Freight_Cost_Rec_Type;
11958: l_freight_cost_temp_charge c_move_fc_temp_charge%ROWTYPE;
11959: l_freight_cost_main_charge WSH_FREIGHT_COSTS_PVT.Freight_Cost_Rec_Type;
11960: l_price_fc_ids WSH_UTIL_CORE.id_tab_type;
11961: l_rowid VARCHAR2(30);
11962: l_update_rowid VARCHAR2(30);
11963: l_dleg_ids DBMS_UTILITY.NUMBER_ARRAY;
11964: l_delivery_id NUMBER;
11970: l_log_level NUMBER := FTE_FREIGHT_PRICING_UTIL.G_DBG;
11971:
11972: BEGIN
11973:
11974: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
11975: IF (p_init_prc_log = 'Y') THEN
11976: FTE_FREIGHT_PRICING_UTIL.initialize_logging( p_init_msg_list => p_init_msg_list,
11977: x_return_status => l_return_status );
11978: END IF;
11976: FTE_FREIGHT_PRICING_UTIL.initialize_logging( p_init_msg_list => p_init_msg_list,
11977: x_return_status => l_return_status );
11978: END IF;
11979:
11980: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11981: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11982: x_return_status := l_return_status;
11983: RETURN;
11984: END IF;
11977: x_return_status => l_return_status );
11978: END IF;
11979:
11980: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11981: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11982: x_return_status := l_return_status;
11983: RETURN;
11984: END IF;
11985: ELSE
12101: x_rowid => l_rowid,
12102: x_freight_cost_id => l_freight_cost_id,
12103: x_return_status => l_return_status);
12104:
12105: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12106: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12107: ROLLBACK to before_fc_creation;
12108: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Base price');
12109: raise FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed;
12102: x_freight_cost_id => l_freight_cost_id,
12103: x_return_status => l_return_status);
12104:
12105: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12106: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12107: ROLLBACK to before_fc_creation;
12108: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Base price');
12109: raise FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed;
12110: END IF;
12128: p_rowid => l_update_rowid,
12129: p_freight_cost_info => l_freight_cost_main_row,
12130: x_return_status => l_return_status);
12131:
12132: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12133: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12134: ROLLBACK to before_fc_creation;
12135: raise FTE_FREIGHT_PRICING_UTIL.g_update_freight_cost_failed;
12136: END IF;
12129: p_freight_cost_info => l_freight_cost_main_row,
12130: x_return_status => l_return_status);
12131:
12132: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12133: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12134: ROLLBACK to before_fc_creation;
12135: raise FTE_FREIGHT_PRICING_UTIL.g_update_freight_cost_failed;
12136: END IF;
12137: END IF;
12215: x_rowid => l_rowid,
12216: x_freight_cost_id => l_freight_cost_id,
12217: x_return_status => l_return_status);
12218:
12219: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12220: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12221: ROLLBACK to before_fc_creation;
12222: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Charge');
12223: raise FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed;
12216: x_freight_cost_id => l_freight_cost_id,
12217: x_return_status => l_return_status);
12218:
12219: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12220: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12221: ROLLBACK to before_fc_creation;
12222: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'Charge');
12223: raise FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed;
12224: END IF;
12251: p_lane_id => p_lane_id,
12252: p_schedule_id => p_schedule_id,
12253: x_return_status => l_return_status);
12254:
12255: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12256: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12257: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'delete_fc_temp failed ');
12258: raise FTE_FREIGHT_PRICING_UTIL.g_delete_fc_temp_failed;
12259: END IF;
12252: p_schedule_id => p_schedule_id,
12253: x_return_status => l_return_status);
12254:
12255: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12256: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12257: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'delete_fc_temp failed ');
12258: raise FTE_FREIGHT_PRICING_UTIL.g_delete_fc_temp_failed;
12259: END IF;
12260: ELSE
12267: END IF;
12268:
12269: EXCEPTION
12270: WHEN FTE_FREIGHT_PRICING_UTIL.g_no_lanesched_seg THEN
12271: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12272: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('Move_fc_temp_to_main','g_no_lanesched_seg');
12273: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Move_fc_temp_to_main');
12274: IF (p_init_prc_log = 'Y') THEN
12275: FTE_FREIGHT_PRICING_UTIL.close_logs;
12275: FTE_FREIGHT_PRICING_UTIL.close_logs;
12276: END IF;
12277: WHEN FTE_FREIGHT_PRICING_UTIL.g_no_temp_fc_to_move THEN
12278: --ROLLBACK to before_fc_creation;
12279: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12280: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('Move_fc_temp_to_main','g_no_temp_fc_to_move');
12281: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Move_fc_temp_to_main');
12282: IF (p_init_prc_log = 'Y') THEN
12283: FTE_FREIGHT_PRICING_UTIL.close_logs;
12282: IF (p_init_prc_log = 'Y') THEN
12283: FTE_FREIGHT_PRICING_UTIL.close_logs;
12284: END IF;
12285: WHEN FTE_FREIGHT_PRICING_UTIL.g_create_freight_cost_failed THEN
12286: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12287: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('Move_fc_temp_to_main','g_create_freight_cost_failed');
12288: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Move_fc_temp_to_main');
12289: IF (p_init_prc_log = 'Y') THEN
12290: FTE_FREIGHT_PRICING_UTIL.close_logs;
12289: IF (p_init_prc_log = 'Y') THEN
12290: FTE_FREIGHT_PRICING_UTIL.close_logs;
12291: END IF;
12292: WHEN FTE_FREIGHT_PRICING_UTIL.g_update_freight_cost_failed THEN
12293: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12294: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('Move_fc_temp_to_main','g_update_freight_cost_failed');
12295: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Move_fc_temp_to_main');
12296: IF (p_init_prc_log = 'Y') THEN
12297: FTE_FREIGHT_PRICING_UTIL.close_logs;
12296: IF (p_init_prc_log = 'Y') THEN
12297: FTE_FREIGHT_PRICING_UTIL.close_logs;
12298: END IF;
12299: WHEN FTE_FREIGHT_PRICING_UTIL.g_delete_fc_temp_failed THEN
12300: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
12301: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('Move_fc_temp_to_main','g_delete_fc_temp_failed');
12302: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Move_fc_temp_to_main');
12303: IF (p_init_prc_log = 'Y') THEN
12304: FTE_FREIGHT_PRICING_UTIL.close_logs;
12304: FTE_FREIGHT_PRICING_UTIL.close_logs;
12305: END IF;
12306: WHEN others THEN
12307: ROLLBACK to before_fc_creation;
12308: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
12309: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('Move_fc_temp_to_main','g_others');
12310: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
12311: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'Move_fc_temp_to_main');
12312: IF (p_init_prc_log = 'Y') THEN
12329:
12330: BEGIN
12331: SAVEPOINT DELETE_FC_TEMP;
12332:
12333: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
12334:
12335: FTE_FREIGHT_PRICING_UTIL.initialize_logging( p_init_msg_list => p_init_msg_list,
12336: x_return_status => l_return_status );
12337:
12334:
12335: FTE_FREIGHT_PRICING_UTIL.initialize_logging( p_init_msg_list => p_init_msg_list,
12336: x_return_status => l_return_status );
12337:
12338: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12339: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12340: l_initialized := FALSE;
12341: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
12342: END IF;
12335: FTE_FREIGHT_PRICING_UTIL.initialize_logging( p_init_msg_list => p_init_msg_list,
12336: x_return_status => l_return_status );
12337:
12338: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12339: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12340: l_initialized := FALSE;
12341: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
12342: END IF;
12343: ELSE
12337:
12338: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12339: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12340: l_initialized := FALSE;
12341: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
12342: END IF;
12343: ELSE
12344: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'Initialize Logging successful ');
12345: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
12351: p_request_id => p_request_id, -- Comparison Request ID to move to main
12352: p_initialized => l_initialized,
12353: x_return_status => l_return_status);
12354:
12355: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12356: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12357: IF l_initialized THEN
12358: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'delete_fc_temp failed ');
12359: END IF;
12352: p_initialized => l_initialized,
12353: x_return_status => l_return_status);
12354:
12355: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12356: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12357: IF l_initialized THEN
12358: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'delete_fc_temp failed ');
12359: END IF;
12360: ROLLBACK TO DELETE_FC_TEMP;
12357: IF l_initialized THEN
12358: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'delete_fc_temp failed ');
12359: END IF;
12360: ROLLBACK TO DELETE_FC_TEMP;
12361: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
12362: END IF;
12363: ELSE
12364: IF l_initialized THEN
12365: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'delete_fc_temp successful ');
12374:
12375: EXCEPTION
12376:
12377: WHEN others THEN
12378: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
12379: IF l_initialized THEN
12380: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('delete_fc_temp','g_others');
12381: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
12382: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'delete_fc_temp');
12414:
12415: PROCEDURE shipment_price_compare_pvt (
12416: p_delivery_id IN NUMBER DEFAULT NULL,
12417: p_trip_id IN NUMBER DEFAULT NULL,
12418: p_lane_id_tab IN WSH_UTIL_CORE.id_tab_type,
12419: p_sched_id_tab IN WSH_UTIL_CORE.id_tab_type,
12420: p_service_lane_tab IN WSH_UTIL_CORE.Column_Tab_Type,
12421: p_service_sched_tab IN WSH_UTIL_CORE.Column_Tab_Type,
12422: p_dep_date IN DATE DEFAULT sysdate,
12415: PROCEDURE shipment_price_compare_pvt (
12416: p_delivery_id IN NUMBER DEFAULT NULL,
12417: p_trip_id IN NUMBER DEFAULT NULL,
12418: p_lane_id_tab IN WSH_UTIL_CORE.id_tab_type,
12419: p_sched_id_tab IN WSH_UTIL_CORE.id_tab_type,
12420: p_service_lane_tab IN WSH_UTIL_CORE.Column_Tab_Type,
12421: p_service_sched_tab IN WSH_UTIL_CORE.Column_Tab_Type,
12422: p_dep_date IN DATE DEFAULT sysdate,
12423: p_arr_date IN DATE DEFAULT sysdate,
12416: p_delivery_id IN NUMBER DEFAULT NULL,
12417: p_trip_id IN NUMBER DEFAULT NULL,
12418: p_lane_id_tab IN WSH_UTIL_CORE.id_tab_type,
12419: p_sched_id_tab IN WSH_UTIL_CORE.id_tab_type,
12420: p_service_lane_tab IN WSH_UTIL_CORE.Column_Tab_Type,
12421: p_service_sched_tab IN WSH_UTIL_CORE.Column_Tab_Type,
12422: p_dep_date IN DATE DEFAULT sysdate,
12423: p_arr_date IN DATE DEFAULT sysdate,
12424: x_sum_lane_price_tab OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
12417: p_trip_id IN NUMBER DEFAULT NULL,
12418: p_lane_id_tab IN WSH_UTIL_CORE.id_tab_type,
12419: p_sched_id_tab IN WSH_UTIL_CORE.id_tab_type,
12420: p_service_lane_tab IN WSH_UTIL_CORE.Column_Tab_Type,
12421: p_service_sched_tab IN WSH_UTIL_CORE.Column_Tab_Type,
12422: p_dep_date IN DATE DEFAULT sysdate,
12423: p_arr_date IN DATE DEFAULT sysdate,
12424: x_sum_lane_price_tab OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
12425: x_sum_lane_price_curr_tab OUT NOCOPY WSH_UTIL_CORE.Column_tab_type,
12420: p_service_lane_tab IN WSH_UTIL_CORE.Column_Tab_Type,
12421: p_service_sched_tab IN WSH_UTIL_CORE.Column_Tab_Type,
12422: p_dep_date IN DATE DEFAULT sysdate,
12423: p_arr_date IN DATE DEFAULT sysdate,
12424: x_sum_lane_price_tab OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
12425: x_sum_lane_price_curr_tab OUT NOCOPY WSH_UTIL_CORE.Column_tab_type,
12426: x_sum_sched_price_tab OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
12427: x_sum_sched_price_curr_tab OUT NOCOPY WSH_UTIL_CORE.Column_tab_type,
12428: x_request_id IN OUT NOCOPY NUMBER,
12421: p_service_sched_tab IN WSH_UTIL_CORE.Column_Tab_Type,
12422: p_dep_date IN DATE DEFAULT sysdate,
12423: p_arr_date IN DATE DEFAULT sysdate,
12424: x_sum_lane_price_tab OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
12425: x_sum_lane_price_curr_tab OUT NOCOPY WSH_UTIL_CORE.Column_tab_type,
12426: x_sum_sched_price_tab OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
12427: x_sum_sched_price_curr_tab OUT NOCOPY WSH_UTIL_CORE.Column_tab_type,
12428: x_request_id IN OUT NOCOPY NUMBER,
12429: x_return_status OUT NOCOPY VARCHAR2 )
12422: p_dep_date IN DATE DEFAULT sysdate,
12423: p_arr_date IN DATE DEFAULT sysdate,
12424: x_sum_lane_price_tab OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
12425: x_sum_lane_price_curr_tab OUT NOCOPY WSH_UTIL_CORE.Column_tab_type,
12426: x_sum_sched_price_tab OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
12427: x_sum_sched_price_curr_tab OUT NOCOPY WSH_UTIL_CORE.Column_tab_type,
12428: x_request_id IN OUT NOCOPY NUMBER,
12429: x_return_status OUT NOCOPY VARCHAR2 )
12430: IS
12423: p_arr_date IN DATE DEFAULT sysdate,
12424: x_sum_lane_price_tab OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
12425: x_sum_lane_price_curr_tab OUT NOCOPY WSH_UTIL_CORE.Column_tab_type,
12426: x_sum_sched_price_tab OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
12427: x_sum_sched_price_curr_tab OUT NOCOPY WSH_UTIL_CORE.Column_tab_type,
12428: x_request_id IN OUT NOCOPY NUMBER,
12429: x_return_status OUT NOCOPY VARCHAR2 )
12430: IS
12431:
12630: BEGIN
12631:
12632: SAVEPOINT SHIPMENT_PRICE_COMPARE_PVT;
12633:
12634: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
12635:
12636: FTE_FREIGHT_PRICING_UTIL.reset_dbg_vars;
12637: FTE_FREIGHT_PRICING_UTIL.set_method(l_log_level,'shipment_price_compare_pvt','start');
12638:
12653: RAISE FND_API.G_EXC_ERROR;
12654: ELSIF (l_return_code = G_RC_REPRICE_NOT_REQUIRED
12655: OR l_return_code = G_RC_NOT_RATE_FREIGHT_TERM
12656: OR l_return_code = G_RC_NOT_RATE_MANIFESTING) THEN
12657: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
12658: raise g_finished_warning;
12659: END IF;
12660:
12661:
12670: RAISE FND_API.G_EXC_ERROR;
12671: ELSIF (l_return_code = G_RC_REPRICE_NOT_REQUIRED
12672: OR l_return_code = G_RC_NOT_RATE_FREIGHT_TERM
12673: OR l_return_code = G_RC_NOT_RATE_MANIFESTING) THEN
12674: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
12675: raise g_finished_warning;
12676: END IF;
12677: END IF;
12678:
12675: raise g_finished_warning;
12676: END IF;
12677: END IF;
12678:
12679: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12680: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12681: raise FTE_FREIGHT_PRICING_UTIL.g_currency_code_failed;
12682: END IF;
12683: END IF;
12676: END IF;
12677: END IF;
12678:
12679: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12680: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12681: raise FTE_FREIGHT_PRICING_UTIL.g_currency_code_failed;
12682: END IF;
12683: END IF;
12684:
12751: flatten_shipment (
12752: x_first_level_rows => l_first_level_rows,
12753: x_return_status => l_return_status );
12754:
12755: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12756: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12757: raise FTE_FREIGHT_PRICING_UTIL.g_flatten_shipment_failed;
12758: END IF;
12759: ELSE
12752: x_first_level_rows => l_first_level_rows,
12753: x_return_status => l_return_status );
12754:
12755: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12756: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12757: raise FTE_FREIGHT_PRICING_UTIL.g_flatten_shipment_failed;
12758: END IF;
12759: ELSE
12760: IF l_first_level_rows.COUNT = 0 THEN
12815: x_return_status => l_return_status ) ;
12816:
12817: FTE_FREIGHT_PRICING_UTIL.print_msg(p_msg => 'After shipment_pricing - p_lane_id = '||p_lane_id_tab(i));
12818: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'l_return_status='||l_return_status);
12819: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12820: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12821: x_sum_lane_price_tab(i) := -1;
12822: x_sum_lane_price_curr_tab(i) := 'NULL';
12823: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'lane: '||p_lane_id_tab(i)||' shipment_pricing ');
12816:
12817: FTE_FREIGHT_PRICING_UTIL.print_msg(p_msg => 'After shipment_pricing - p_lane_id = '||p_lane_id_tab(i));
12818: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'l_return_status='||l_return_status);
12819: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12820: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12821: x_sum_lane_price_tab(i) := -1;
12822: x_sum_lane_price_curr_tab(i) := 'NULL';
12823: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'lane: '||p_lane_id_tab(i)||' shipment_pricing ');
12824: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
12820: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12821: x_sum_lane_price_tab(i) := -1;
12822: x_sum_lane_price_curr_tab(i) := 'NULL';
12823: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'lane: '||p_lane_id_tab(i)||' shipment_pricing ');
12824: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
12825: END IF;
12826: ELSE
12827: FTE_FREIGHT_PRICING_UTIL.print_msg(p_msg => 'Shipment pricing successful for lane : '||p_lane_id_tab(i));
12828:
12863: x_freight_cost_temp_price => l_dummy_fc_temp_price,
12864: x_freight_cost_temp_charge => l_dummy_fc_temp_charge,
12865: x_return_status => l_return_status ) ;
12866:
12867: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12868: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12869: x_sum_sched_price_tab(i) := -1;
12870: x_sum_sched_price_curr_tab(i) := 'NULL';
12871: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'sched: '||p_sched_id_tab(i)||' shipment_pricing ');
12864: x_freight_cost_temp_charge => l_dummy_fc_temp_charge,
12865: x_return_status => l_return_status ) ;
12866:
12867: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12868: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12869: x_sum_sched_price_tab(i) := -1;
12870: x_sum_sched_price_curr_tab(i) := 'NULL';
12871: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'sched: '||p_sched_id_tab(i)||' shipment_pricing ');
12872: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
12868: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12869: x_sum_sched_price_tab(i) := -1;
12870: x_sum_sched_price_curr_tab(i) := 'NULL';
12871: FTE_FREIGHT_PRICING_UTIL.set_location(p_loc => 'sched: '||p_sched_id_tab(i)||' shipment_pricing ');
12872: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
12873: END IF;
12874: ELSE
12875: FTE_FREIGHT_PRICING_UTIL.print_msg(p_msg => 'Shipment pricing successful for sched : '||p_sched_id_tab(i));
12876:
12890: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_compare_pvt');
12891:
12892: EXCEPTION
12893: WHEN g_finished_warning THEN
12894: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
12895: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_compare_pvt');
12896: WHEN FND_API.G_EXC_ERROR THEN
12897: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12898: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_compare_pvt',FTE_FREIGHT_PRICING_UTIL.G_ERR,'FND_API.G_EXC_ERROR');
12893: WHEN g_finished_warning THEN
12894: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
12895: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_compare_pvt');
12896: WHEN FND_API.G_EXC_ERROR THEN
12897: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12898: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_compare_pvt',FTE_FREIGHT_PRICING_UTIL.G_ERR,'FND_API.G_EXC_ERROR');
12899: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_compare_pvt');
12900: WHEN FTE_FREIGHT_PRICING_UTIL.g_delivery_not_found THEN
12901: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12897: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12898: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_compare_pvt',FTE_FREIGHT_PRICING_UTIL.G_ERR,'FND_API.G_EXC_ERROR');
12899: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_compare_pvt');
12900: WHEN FTE_FREIGHT_PRICING_UTIL.g_delivery_not_found THEN
12901: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12902: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_compare_pvt',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_delivery_not_found');
12903: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_compare_pvt');
12904: WHEN FTE_FREIGHT_PRICING_UTIL.g_flatten_shipment_failed THEN
12905: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12901: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12902: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_compare_pvt',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_delivery_not_found');
12903: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_compare_pvt');
12904: WHEN FTE_FREIGHT_PRICING_UTIL.g_flatten_shipment_failed THEN
12905: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12906: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_compare_pvt',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_flatten_shipment_failed');
12907: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_compare_pvt');
12908: WHEN FTE_FREIGHT_PRICING_UTIL.g_empty_delivery THEN
12909: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
12905: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12906: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_compare_pvt',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_flatten_shipment_failed');
12907: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_compare_pvt');
12908: WHEN FTE_FREIGHT_PRICING_UTIL.g_empty_delivery THEN
12909: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
12910: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_compare_pvt',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_empty_delivery');
12911: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_compare_pvt');
12912: WHEN FTE_FREIGHT_PRICING_UTIL.g_missing_service_type THEN
12913: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12909: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
12910: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_compare_pvt',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_empty_delivery');
12911: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_compare_pvt');
12912: WHEN FTE_FREIGHT_PRICING_UTIL.g_missing_service_type THEN
12913: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12914: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_compare_pvt',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_missing_service_type');
12915: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_compare_pvt');
12916: WHEN FTE_FREIGHT_PRICING_UTIL.g_shipment_pricing_failed THEN
12917: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12913: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12914: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_compare_pvt',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_missing_service_type');
12915: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_compare_pvt');
12916: WHEN FTE_FREIGHT_PRICING_UTIL.g_shipment_pricing_failed THEN
12917: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12918: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_compare_pvt',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_shipment_pricing_failed');
12919: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_compare_pvt');
12920: WHEN others THEN
12921: ROLLBACK TO SHIPMENT_PRICE_COMPARE_PVT;
12918: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_compare_pvt',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_shipment_pricing_failed');
12919: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_compare_pvt');
12920: WHEN others THEN
12921: ROLLBACK TO SHIPMENT_PRICE_COMPARE_PVT;
12922: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
12923: FTE_FREIGHT_PRICING_UTIL.set_exception('shipment_price_compare_pvt',FTE_FREIGHT_PRICING_UTIL.G_ERR,'g_others');
12924: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
12925: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_compare_pvt');
12926:
12960: l_temp_wt NUMBER;
12961:
12962: BEGIN
12963:
12964: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
12965:
12966: -- Initialize message list if p_init_msg_list is set to TRUE.
12967:
12968: FTE_FREIGHT_PRICING_UTIL.initialize_logging( p_init_msg_list => p_init_msg_list,
12967:
12968: FTE_FREIGHT_PRICING_UTIL.initialize_logging( p_init_msg_list => p_init_msg_list,
12969: x_return_status => l_return_status );
12970:
12971: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12972: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12973: x_return_status := l_return_status;
12974: RETURN;
12975: END IF;
12968: FTE_FREIGHT_PRICING_UTIL.initialize_logging( p_init_msg_list => p_init_msg_list,
12969: x_return_status => l_return_status );
12970:
12971: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12972: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12973: x_return_status := l_return_status;
12974: RETURN;
12975: END IF;
12976: ELSE
13030: FTE_FREIGHT_PRICING_UTIL.close_logs;
13031:
13032: EXCEPTION
13033: WHEN FTE_FREIGHT_PRICING_UTIL.g_tl_dtl_no_gross_weight THEN
13034: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13035: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('FPA_total_commodity_weight','g_tl_dtl_no_gross_weight');
13036: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'FPA_total_commodity_weight');
13037: FTE_FREIGHT_PRICING_UTIL.close_logs;
13038: WHEN FTE_FREIGHT_PRICING_UTIL.g_weight_uom_not_found THEN
13039: FTE_FREIGHT_PRICING_UTIL.setmsg (p_api =>'FPA_total_commodity_weight',
13040: p_exc =>'g_tl_dtl_no_gross_weight',
13041: p_msg_name =>'FTE_INVALID_DEL_WT_UOM',
13042: p_delivery_id =>p_delivery_id);
13043: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13044: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('FPA_total_commodity_weight','g_weight_uom_not_found');
13045: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'FPA_total_commodity_weight');
13046: FTE_FREIGHT_PRICING_UTIL.close_logs;
13047: WHEN others THEN
13044: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('FPA_total_commodity_weight','g_weight_uom_not_found');
13045: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'FPA_total_commodity_weight');
13046: FTE_FREIGHT_PRICING_UTIL.close_logs;
13047: WHEN others THEN
13048: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
13049: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('FPA_total_commodity_weight','g_others');
13050: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
13051: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'FPA_total_commodity_weight');
13052: FTE_FREIGHT_PRICING_UTIL.close_logs;
13101: l NUMBER;
13102: s NUMBER;
13103:
13104:
13105: l_lane_id_tab WSH_UTIL_CORE.id_tab_type;
13106: l_sched_id_tab WSH_UTIL_CORE.id_tab_type;
13107: l_service_lane_tab WSH_UTIL_CORE.Column_Tab_Type;
13108: l_service_sched_tab WSH_UTIL_CORE.Column_Tab_Type;
13109:
13102: s NUMBER;
13103:
13104:
13105: l_lane_id_tab WSH_UTIL_CORE.id_tab_type;
13106: l_sched_id_tab WSH_UTIL_CORE.id_tab_type;
13107: l_service_lane_tab WSH_UTIL_CORE.Column_Tab_Type;
13108: l_service_sched_tab WSH_UTIL_CORE.Column_Tab_Type;
13109:
13110: l_sum_lane_price_tab WSH_UTIL_CORE.id_tab_type;
13103:
13104:
13105: l_lane_id_tab WSH_UTIL_CORE.id_tab_type;
13106: l_sched_id_tab WSH_UTIL_CORE.id_tab_type;
13107: l_service_lane_tab WSH_UTIL_CORE.Column_Tab_Type;
13108: l_service_sched_tab WSH_UTIL_CORE.Column_Tab_Type;
13109:
13110: l_sum_lane_price_tab WSH_UTIL_CORE.id_tab_type;
13111: l_sum_lane_price_curr_tab WSH_UTIL_CORE.Column_tab_type;
13104:
13105: l_lane_id_tab WSH_UTIL_CORE.id_tab_type;
13106: l_sched_id_tab WSH_UTIL_CORE.id_tab_type;
13107: l_service_lane_tab WSH_UTIL_CORE.Column_Tab_Type;
13108: l_service_sched_tab WSH_UTIL_CORE.Column_Tab_Type;
13109:
13110: l_sum_lane_price_tab WSH_UTIL_CORE.id_tab_type;
13111: l_sum_lane_price_curr_tab WSH_UTIL_CORE.Column_tab_type;
13112: l_sum_sched_price_tab WSH_UTIL_CORE.id_tab_type;
13106: l_sched_id_tab WSH_UTIL_CORE.id_tab_type;
13107: l_service_lane_tab WSH_UTIL_CORE.Column_Tab_Type;
13108: l_service_sched_tab WSH_UTIL_CORE.Column_Tab_Type;
13109:
13110: l_sum_lane_price_tab WSH_UTIL_CORE.id_tab_type;
13111: l_sum_lane_price_curr_tab WSH_UTIL_CORE.Column_tab_type;
13112: l_sum_sched_price_tab WSH_UTIL_CORE.id_tab_type;
13113: l_sum_sched_price_curr_tab WSH_UTIL_CORE.Column_tab_type;
13114:
13107: l_service_lane_tab WSH_UTIL_CORE.Column_Tab_Type;
13108: l_service_sched_tab WSH_UTIL_CORE.Column_Tab_Type;
13109:
13110: l_sum_lane_price_tab WSH_UTIL_CORE.id_tab_type;
13111: l_sum_lane_price_curr_tab WSH_UTIL_CORE.Column_tab_type;
13112: l_sum_sched_price_tab WSH_UTIL_CORE.id_tab_type;
13113: l_sum_sched_price_curr_tab WSH_UTIL_CORE.Column_tab_type;
13114:
13115: l_tl_lane_rows dbms_utility.number_array;
13108: l_service_sched_tab WSH_UTIL_CORE.Column_Tab_Type;
13109:
13110: l_sum_lane_price_tab WSH_UTIL_CORE.id_tab_type;
13111: l_sum_lane_price_curr_tab WSH_UTIL_CORE.Column_tab_type;
13112: l_sum_sched_price_tab WSH_UTIL_CORE.id_tab_type;
13113: l_sum_sched_price_curr_tab WSH_UTIL_CORE.Column_tab_type;
13114:
13115: l_tl_lane_rows dbms_utility.number_array;
13116: l_tl_schedule_rows dbms_utility.number_array;
13109:
13110: l_sum_lane_price_tab WSH_UTIL_CORE.id_tab_type;
13111: l_sum_lane_price_curr_tab WSH_UTIL_CORE.Column_tab_type;
13112: l_sum_sched_price_tab WSH_UTIL_CORE.id_tab_type;
13113: l_sum_sched_price_curr_tab WSH_UTIL_CORE.Column_tab_type;
13114:
13115: l_tl_lane_rows dbms_utility.number_array;
13116: l_tl_schedule_rows dbms_utility.number_array;
13117: l_tl_vehicle_rows dbms_utility.number_array;
13140: BEGIN
13141:
13142: SAVEPOINT SHIPMENT_PRICE_COMPARE;
13143:
13144: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
13145:
13146: IF(p_init_prc_log='Y')
13147: THEN
13148:
13151:
13152: FTE_FREIGHT_PRICING_UTIL.initialize_logging( p_init_msg_list => p_init_msg_list,
13153: x_return_status => l_return_status );
13154:
13155: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13156: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13157: x_return_status := l_return_status;
13158: RETURN;
13159: END IF;
13152: FTE_FREIGHT_PRICING_UTIL.initialize_logging( p_init_msg_list => p_init_msg_list,
13153: x_return_status => l_return_status );
13154:
13155: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13156: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13157: x_return_status := l_return_status;
13158: RETURN;
13159: END IF;
13160: ELSE
13246: x_request_id := l_request_id;
13247:
13248: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'l_return_status='||l_return_status);
13249:
13250: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ) THEN
13251: raise fte_freight_pricing_util.g_unexp_err;
13252: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR ) THEN
13253: --raise fte_freight_pricing_util.g_ship_prc_compare_fail;
13254: --In case of expected errors in shipment_price_compare_pvt
13248: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'l_return_status='||l_return_status);
13249:
13250: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ) THEN
13251: raise fte_freight_pricing_util.g_unexp_err;
13252: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR ) THEN
13253: --raise fte_freight_pricing_util.g_ship_prc_compare_fail;
13254: --In case of expected errors in shipment_price_compare_pvt
13255: ---Allow this procedure to continue to TL if necessary
13256: x_return_status := l_return_status;
13255: ---Allow this procedure to continue to TL if necessary
13256: x_return_status := l_return_status;
13257: l_warn_flag := 'Y';
13258:
13259: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING ) THEN
13260:
13261: x_return_status := l_return_status;
13262: l_warn_flag := 'Y';
13263: END IF;
13280: x_schedule_rows =>l_exploded_schedule_rows,
13281: x_ref_rows =>l_exploded_ref_rows,
13282: x_return_status =>l_return_status);
13283:
13284: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
13285: THEN
13286: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
13287: THEN
13288: raise FTE_FREIGHT_PRICING_UTIL.g_unexp_err;
13282: x_return_status =>l_return_status);
13283:
13284: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
13285: THEN
13286: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
13287: THEN
13288: raise FTE_FREIGHT_PRICING_UTIL.g_unexp_err;
13289: END IF;
13290: END IF;
13315: -- However, we can go more granular, and fail even on certain
13316: -- errors caused in the child procedures
13317:
13318: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>l_return_status='||l_return_status);
13319: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
13320: THEN
13321: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
13322: THEN
13323: raise FTE_FREIGHT_PRICING_UTIL.g_unexp_err;
13317:
13318: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'>>l_return_status='||l_return_status);
13319: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS
13320: THEN
13321: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
13322: THEN
13323: raise FTE_FREIGHT_PRICING_UTIL.g_unexp_err;
13324: ELSE
13325: --In case of expected errors
13519: IF (l_warn_flag = 'Y' ) THEN
13520: -- bug 2762257
13521: FTE_FREIGHT_PRICING_UTIL.set_price_comp_exit_warn;
13522: --Added to ensure return status is warning if l_warn_flag=Y
13523: x_return_status :=WSH_UTIL_CORE.G_RET_STS_WARNING;
13524: END IF;
13525:
13526: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_DBG,'DBg.2');
13527: x_request_id := l_request_id;
13544:
13545:
13546: WHEN FTE_FREIGHT_PRICING_UTIL.g_ship_prc_compare_fail THEN
13547: ROLLBACK; -- TO SHIPMENT_PRICE_COMPARE;
13548: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13549: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_compare');
13550: IF(p_init_prc_log='Y')
13551: THEN
13552: FTE_FREIGHT_PRICING_UTIL.close_logs;
13554:
13555:
13556: WHEN FTE_FREIGHT_PRICING_UTIL.g_unexp_err THEN
13557: ROLLBACK; -- TO SHIPMENT_PRICE_COMPARE;
13558: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
13559: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('shipment_price_compare','g_others');
13560: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_compare');
13561: IF(p_init_prc_log='Y')
13562: THEN
13564: END IF;
13565:
13566: WHEN others THEN
13567: ROLLBACK; -- TO SHIPMENT_PRICE_COMPARE;
13568: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
13569: FTE_FREIGHT_PRICING_UTIL.set_exit_exception('shipment_price_compare','g_others');
13570: FTE_FREIGHT_PRICING_UTIL.print_msg(FTE_FREIGHT_PRICING_UTIL.G_ERR,'Unexpected Error : '||SQLCODE||' : '||SQLERRM);
13571: FTE_FREIGHT_PRICING_UTIL.unset_method(l_log_level,'shipment_price_compare');
13572: IF(p_init_prc_log='Y')