[Home] [Help]
509: --
510: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
511:
512: IF (p_delivery_status = 'IT') THEN
513: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_ASSIGN_TR_DEL_IT');
514: --
515: -- Debug Statements
516: --
517: IF l_debug_on THEN
517: IF l_debug_on THEN
518: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
519: END IF;
520: --
521: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
522: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
523: wsh_util_core.add_message(x_return_status);
524: END IF;
525:
587: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
588:
589: IF (rel_num <> 0) AND (unrel_num > 0) THEN
590:
591: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CONFIRM_ERROR');
592: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
593: wsh_util_core.add_message(x_return_status);
594:
595: END IF;
657: --
658: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
659:
660: IF (p_unpacked_flag) THEN
661: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_PACK_ITEMS_UNPACKED');
662: --
663: -- Debug Statements
664: --
665: IF l_debug_on THEN
665: IF l_debug_on THEN
666: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
667: END IF;
668: --
669: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
670: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
671: wsh_util_core.add_message(x_return_status);
672: END IF;
673:
738:
739: IF (p_cont_exists_flag) THEN
740:
741: IF (p_overfilled_flag) THEN
742: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CONT_OVERPACKED');
743: --
744: -- Debug Statements
745: --
746: IF l_debug_on THEN
746: IF l_debug_on THEN
747: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
748: END IF;
749: --
750: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
751: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
752: wsh_util_core.add_message(x_return_status);
753: END IF;
754:
819:
820: IF (p_cont_exists_flag) THEN
821:
822: IF (p_underfilled_flag) THEN
823: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CONT_UNDERPACKED');
824: --
825: -- Debug Statements
826: --
827: IF l_debug_on THEN
827: IF l_debug_on THEN
828: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
829: END IF;
830: --
831: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
832: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
833: wsh_util_core.add_message(x_return_status);
834:
835: END IF;
900: --
901: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
902:
903: IF (p_final_dropoff_id <> p_ultimate_dropoff_id) THEN
904: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_NO_ULTIMATE_DROPOFF');
905: --
906: -- Debug Statements
907: --
908: IF l_debug_on THEN
908: IF l_debug_on THEN
909: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
910: END IF;
911: --
912: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
913: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
914: wsh_util_core.add_message(x_return_status);
915: END IF;
916:
1058: END IF;
1059:
1060: IF (l_return_code IN (1,2,3,4)) AND (l_suggest_ship_date <> p_ship_date) THEN
1061: IF (p_update_flag <> 'Y') THEN
1062: FND_MESSAGE.SET_NAME('WSH','WSH_CAL_SHIP_DATE_ALT');
1063: ELSE
1064: FND_MESSAGE.SET_NAME('WSH','WSH_CAL_SHIP_DATE_ALT_UPDATE');
1065: END IF;
1066: --
1060: IF (l_return_code IN (1,2,3,4)) AND (l_suggest_ship_date <> p_ship_date) THEN
1061: IF (p_update_flag <> 'Y') THEN
1062: FND_MESSAGE.SET_NAME('WSH','WSH_CAL_SHIP_DATE_ALT');
1063: ELSE
1064: FND_MESSAGE.SET_NAME('WSH','WSH_CAL_SHIP_DATE_ALT_UPDATE');
1065: END IF;
1066: --
1067: -- Debug Statements
1068: --
1069: IF l_debug_on THEN
1070: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
1071: END IF;
1072: --
1073: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_entity_id));
1074: FND_MESSAGE.SET_TOKEN('SHIP',fnd_date.date_to_chardate(p_ship_date));
1075: FND_MESSAGE.SET_TOKEN('SUGGESTED',fnd_date.date_to_chardate(l_suggest_ship_date));
1076: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1077: wsh_util_core.add_message(x_return_status);
1070: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
1071: END IF;
1072: --
1073: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_entity_id));
1074: FND_MESSAGE.SET_TOKEN('SHIP',fnd_date.date_to_chardate(p_ship_date));
1075: FND_MESSAGE.SET_TOKEN('SUGGESTED',fnd_date.date_to_chardate(l_suggest_ship_date));
1076: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1077: wsh_util_core.add_message(x_return_status);
1078: END IF;
1071: END IF;
1072: --
1073: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_entity_id));
1074: FND_MESSAGE.SET_TOKEN('SHIP',fnd_date.date_to_chardate(p_ship_date));
1075: FND_MESSAGE.SET_TOKEN('SUGGESTED',fnd_date.date_to_chardate(l_suggest_ship_date));
1076: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1077: wsh_util_core.add_message(x_return_status);
1078: END IF;
1079:
1078: END IF;
1079:
1080: IF (l_return_code IN (1,2,3,5)) AND (l_suggest_receive_date <> p_receive_date) THEN
1081: IF (p_update_flag <> 'Y') THEN
1082: FND_MESSAGE.SET_NAME('WSH','WSH_CAL_REC_DATE_ALT');
1083: ELSE
1084: FND_MESSAGE.SET_NAME('WSH','WSH_CAL_REC_DATE_ALT_UPDATE');
1085: END IF;
1086: --
1080: IF (l_return_code IN (1,2,3,5)) AND (l_suggest_receive_date <> p_receive_date) THEN
1081: IF (p_update_flag <> 'Y') THEN
1082: FND_MESSAGE.SET_NAME('WSH','WSH_CAL_REC_DATE_ALT');
1083: ELSE
1084: FND_MESSAGE.SET_NAME('WSH','WSH_CAL_REC_DATE_ALT_UPDATE');
1085: END IF;
1086: --
1087: -- Debug Statements
1088: --
1089: IF l_debug_on THEN
1090: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
1091: END IF;
1092: --
1093: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_entity_id));
1094: FND_MESSAGE.SET_TOKEN('RECEIVE',fnd_date.date_to_chardate(p_receive_date));
1095: FND_MESSAGE.SET_TOKEN('SUGGESTED',fnd_date.date_to_chardate(l_suggest_receive_date));
1096: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1097: wsh_util_core.add_message(x_return_status);
1090: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
1091: END IF;
1092: --
1093: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_entity_id));
1094: FND_MESSAGE.SET_TOKEN('RECEIVE',fnd_date.date_to_chardate(p_receive_date));
1095: FND_MESSAGE.SET_TOKEN('SUGGESTED',fnd_date.date_to_chardate(l_suggest_receive_date));
1096: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1097: wsh_util_core.add_message(x_return_status);
1098: END IF;
1091: END IF;
1092: --
1093: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_entity_id));
1094: FND_MESSAGE.SET_TOKEN('RECEIVE',fnd_date.date_to_chardate(p_receive_date));
1095: FND_MESSAGE.SET_TOKEN('SUGGESTED',fnd_date.date_to_chardate(l_suggest_receive_date));
1096: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1097: wsh_util_core.add_message(x_return_status);
1098: END IF;
1099:
1097: wsh_util_core.add_message(x_return_status);
1098: END IF;
1099:
1100: IF (l_return_code = 6) THEN
1101: FND_MESSAGE.SET_NAME('WSH','WSH_CAL_INV_DATES');
1102: --
1103: -- Debug Statements
1104: --
1105: IF l_debug_on THEN
1105: IF l_debug_on THEN
1106: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
1107: END IF;
1108: --
1109: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_entity_id));
1110: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1111: wsh_util_core.add_message(x_return_status);
1112: END IF;
1113:
1274: l_delivery_type;
1275:
1276: IF (delivery_info%NOTFOUND) THEN
1277: CLOSE delivery_info;
1278: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_NOT_FOUND');
1279: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1280: wsh_util_core.add_message(x_return_status);
1281: --
1282: -- Debug Statements
1327: FETCH delivery_details INTO l_detail_id;
1328:
1329: IF (delivery_details%NOTFOUND) THEN
1330: CLOSE delivery_details;
1331: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_NO_DETAILS');
1332: --
1333: -- Debug Statements
1334: --
1335: IF l_debug_on THEN
1335: IF l_debug_on THEN
1336: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
1337: END IF;
1338: --
1339: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
1340: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1341: wsh_util_core.add_message(x_return_status);
1342: --
1343: -- Debug Statements
1385: RETURN;
1386: END IF;
1387:
1388: IF NOT (l_valid_flag) THEN
1389: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_SMC_INCOMPLETE');
1390: IF l_debug_on THEN
1391: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
1392: END IF;
1393: --
1390: IF l_debug_on THEN
1391: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
1392: END IF;
1393: --
1394: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
1395: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1396: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status);
1397: END IF;
1398:
1417: RETURN;
1418: END IF;
1419:
1420: IF NOT (l_valid_flag) THEN
1421: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_SHIP_SET_INCOMPLETE');
1422:
1423: -- Bug 2429632 Added a Delivery Name Token to the above error message
1424: --
1425: -- Debug Statements
1427: IF l_debug_on THEN
1428: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
1429: END IF;
1430: --
1431: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
1432: -- End Bug 2429632
1433:
1434: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1435: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status);
1530: END IF;
1531: --
1532: EXCEPTION
1533: WHEN NO_FREIGHT_CODE THEN
1534: fnd_message.set_name('WSH','WSH_FREIGHT_CODE_NOT_FOUND');
1535: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR);
1536: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1537: --
1538: -- Debug Statements
1616: FETCH delivery_status INTO l_status_code, l_planned_flag,l_shipment_direction;
1617:
1618: IF (delivery_status%NOTFOUND) THEN
1619: CLOSE delivery_status;
1620: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_NOT_FOUND');
1621: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1622: wsh_util_core.add_message(x_return_status);
1623: --
1624: -- Debug Statements
1738:
1739: Check_Plan( l_delivery_id, x_return_status);
1740:
1741: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1742: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_PLAN_ERROR');
1743: --
1744: -- Debug Statements
1745: --
1746: IF l_debug_on THEN
1746: IF l_debug_on THEN
1747: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
1748: END IF;
1749: --
1750: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(l_delivery_id));
1751: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1752: wsh_util_core.add_message(x_return_status);
1753: --
1754: -- Debug Statements
1760: RETURN;
1761: END IF;
1762:
1763: IF (l_gr_weight IS NULL) or (l_gr_weight = 0) or (l_wt_uom IS NULL) THEN
1764: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_LT_WT_VOL_MISSING');
1765: --
1766: -- Debug Statements
1767: --
1768: IF l_debug_on THEN
1768: IF l_debug_on THEN
1769: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
1770: END IF;
1771: --
1772: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(l_delivery_id));
1773: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1774: wsh_util_core.add_message(x_return_status);
1775: --
1776: -- Debug Statements
1782: RETURN;
1783: END IF;
1784:
1785: IF (l_volume IS NULL) or (l_volume = 0) or (l_vol_uom IS NULL) THEN
1786: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_LT_WT_VOL_MISSING');
1787: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1788: wsh_util_core.add_message(x_return_status);
1789: ELSE
1790: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2131: RETURN;
2132: END IF;
2133:
2134: IF (l_group_by_attr.ship_method = 'Y') AND (l_trip_ship_method <> l_del_ship_method) THEN
2135: FND_MESSAGE.SET_NAME('WSH','WSH_TRIP_SHIP_METHOD_NOT_SAME');
2136: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2137: wsh_util_core.add_message(x_return_status);
2138: END IF;
2139:
2236:
2237:
2238:
2239: WHEN invalid_del_trip_shipmethod THEN
2240: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_ASSIGN_TR_SHIP');
2241: --
2242: -- Debug Statements
2243: --
2244: IF l_debug_on THEN
2244: IF l_debug_on THEN
2245: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2246: END IF;
2247: --
2248: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2249: --
2250: -- Debug Statements
2251: --
2252: IF l_debug_on THEN
2252: IF l_debug_on THEN
2253: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2254: END IF;
2255: --
2256: FND_MESSAGE.SET_TOKEN('TRIP_NAME',wsh_trips_pvt.get_name(p_trip_id));
2257: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2258: wsh_util_core.add_message(x_return_status);
2259:
2260: --
2265: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:INVALID_DEL_TRIP_SHIPMETHOD');
2266: END IF;
2267: --
2268: WHEN invalid_tripshipmethod_del_org THEN
2269: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_ASSIGN_TR_SM_ORG');
2270: --
2271: -- Debug Statements
2272: --
2273: IF l_debug_on THEN
2273: IF l_debug_on THEN
2274: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2275: END IF;
2276: --
2277: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2278: --
2279: -- Debug Statements
2280: --
2281: IF l_debug_on THEN
2281: IF l_debug_on THEN
2282: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2283: END IF;
2284: --
2285: FND_MESSAGE.SET_TOKEN('TRIP_NAME',wsh_trips_pvt.get_name(p_trip_id));
2286: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2287: wsh_util_core.add_message(x_return_status);
2288:
2289: --
2294: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:INVALID_TRIPSHIPMETHOD_DEL_ORG');
2295: END IF;
2296: --
2297: WHEN invalid_status THEN
2298: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_ASSIGN_TR_STATUS');
2299: --
2300: -- Debug Statements
2301: --
2302: IF l_debug_on THEN
2302: IF l_debug_on THEN
2303: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2304: END IF;
2305: --
2306: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2307: --
2308: -- Debug Statements
2309: --
2310: IF l_debug_on THEN
2310: IF l_debug_on THEN
2311: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2312: END IF;
2313: --
2314: FND_MESSAGE.SET_TOKEN('TRIP_NAME',wsh_trips_pvt.get_name(p_trip_id));
2315: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2316: wsh_util_core.add_message(x_return_status);
2317:
2318: --
2324: END IF;
2325: --
2326:
2327: WHEN trip_firm THEN
2328: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_ASSIGN_TR_FIRM');
2329: IF l_debug_on THEN
2330: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2331: END IF;
2332: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2328: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_ASSIGN_TR_FIRM');
2329: IF l_debug_on THEN
2330: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2331: END IF;
2332: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2333: IF l_debug_on THEN
2334: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2335: END IF;
2336: FND_MESSAGE.SET_TOKEN('TRIP_NAME',wsh_trips_pvt.get_name(p_trip_id));
2332: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2333: IF l_debug_on THEN
2334: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2335: END IF;
2336: FND_MESSAGE.SET_TOKEN('TRIP_NAME',wsh_trips_pvt.get_name(p_trip_id));
2337: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2338: wsh_util_core.add_message(x_return_status);
2339: IF l_debug_on THEN
2340: WSH_DEBUG_SV.logmsg(l_module_name,'TRIP_FIRM exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2340: WSH_DEBUG_SV.logmsg(l_module_name,'TRIP_FIRM exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2341: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:TRIP_FIRM');
2342: END IF;
2343: WHEN trip_diffignore THEN
2344: FND_MESSAGE.SET_NAME('WSH','WSH_DELASSIGNTR_IGNORE');
2345: IF l_debug_on THEN
2346: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2347: END IF;
2348: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2344: FND_MESSAGE.SET_NAME('WSH','WSH_DELASSIGNTR_IGNORE');
2345: IF l_debug_on THEN
2346: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2347: END IF;
2348: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2349: IF l_debug_on THEN
2350: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2351: END IF;
2352: FND_MESSAGE.SET_TOKEN('TRIP_NAME',wsh_trips_pvt.get_name(p_trip_id));
2348: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2349: IF l_debug_on THEN
2350: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2351: END IF;
2352: FND_MESSAGE.SET_TOKEN('TRIP_NAME',wsh_trips_pvt.get_name(p_trip_id));
2353: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2354: wsh_util_core.add_message(x_return_status);
2355: IF l_debug_on THEN
2356: WSH_DEBUG_SV.logmsg(l_module_name,'TRIP_DIFFIGNORE exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2441:
2442: CLOSE delivery_status;
2443:
2444: IF (l_del_status = 'CL') THEN
2445: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_ASSIGN_TR_STATUS');
2446: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2447: wsh_util_core.add_message(x_return_status);
2448: --
2449: -- Debug Statements
2486:
2487: CLOSE trip_status;
2488:
2489: IF (l_trip_status = 'CL') THEN
2490: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_ASSIGN_TR_STATUS');
2491: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2492: wsh_util_core.add_message(x_return_status);
2493: --
2494: -- Debug Statements
2614: RETURN;
2615: END IF;
2616:
2617: IF (l_del_status NOT IN ('OP', 'SA')) THEN -- sperera 940/945
2618: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_NOT_OP_PA_STATUS');
2619: --
2620: -- Debug Statements
2621: --
2622: IF l_debug_on THEN
2622: IF l_debug_on THEN
2623: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2624: END IF;
2625: --
2626: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2627: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2628: wsh_util_core.add_message(x_return_status);
2629: --
2630: -- Debug Statements
2646: EXIT WHEN detail_info%NOTFOUND;
2647:
2648: --IF (detail_info%FOUND) THEN
2649: IF (l_container_id IS NULL) THEN
2650: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_PACK_ITEMS_UNPACKED');
2651: --
2652: -- Debug Statements
2653: --
2654: IF l_debug_on THEN
2654: IF l_debug_on THEN
2655: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2656: END IF;
2657: --
2658: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2659: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2660: wsh_util_core.add_message(x_return_status);
2661: --
2662: -- Debug Statements
2678: wsh_wv_utils.check_fill_pc( p_container_instance_id => l_container_id,
2679: x_fill_status => l_fill_status,
2680: x_return_status => l_return_status);
2681: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2682: -- FND_MESSAGE.SET_NAME('WSH','Error-in-fill-percent');
2683: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2684: -- wsh_util_core.add_message(x_return_status);
2685: ELSIF (l_fill_status = 'U') THEN
2686: l_underfilled_flag := TRUE;
2695: END LOOP;
2696: CLOSE detail_info;
2697:
2698: IF (l_overfilled_flag) THEN
2699: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CONT_OVERPACKED');
2700: --
2701: -- Debug Statements
2702: --
2703: IF l_debug_on THEN
2703: IF l_debug_on THEN
2704: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2705: END IF;
2706: --
2707: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2708: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2709: wsh_util_core.add_message(x_return_status);
2710: END IF;
2711:
2709: wsh_util_core.add_message(x_return_status);
2710: END IF;
2711:
2712: IF (l_underfilled_flag) THEN
2713: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CONT_UNDERPACKED');
2714: --
2715: -- Debug Statements
2716: --
2717: IF l_debug_on THEN
2717: IF l_debug_on THEN
2718: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2719: END IF;
2720: --
2721: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2722: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2723: wsh_util_core.add_message(x_return_status);
2724: END IF;
2725:
2724: END IF;
2725:
2726: --IF (l_container_id IS NULL) THEN
2727: IF (l_count_detail = 0) THEN /*Bug #1701366 Issue 3 */
2728: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_NO_DETAILS');
2729: --
2730: -- Debug Statements
2731: --
2732: IF l_debug_on THEN
2732: IF l_debug_on THEN
2733: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2734: END IF;
2735: --
2736: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2737: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2738: wsh_util_core.add_message(x_return_status);
2739: --
2740: -- Debug Statements
3365: RETURN;
3366: END IF;
3367:
3368: IF NOT (l_valid_flag) THEN
3369: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_SMC_INCOMPLETE');
3370: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
3371:
3372: IF l_debug_on THEN
3373: WSH_DEBUG_SV.log(l_module_name,'g_break_smc_severity',g_break_smc_severity);
3366: END IF;
3367:
3368: IF NOT (l_valid_flag) THEN
3369: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_SMC_INCOMPLETE');
3370: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
3371:
3372: IF l_debug_on THEN
3373: WSH_DEBUG_SV.log(l_module_name,'g_break_smc_severity',g_break_smc_severity);
3374: END IF;
3422: RETURN;
3423: END IF;
3424:
3425: IF NOT (l_valid_flag) THEN
3426: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_SHIP_SET_INCOMPLETE');
3427: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
3428:
3429: IF l_debug_on THEN
3430: WSH_DEBUG_SV.log(l_module_name,'g_break_ship_set_severity',g_break_ship_set_severity);
3423: END IF;
3424:
3425: IF NOT (l_valid_flag) THEN
3426: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_SHIP_SET_INCOMPLETE');
3427: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
3428:
3429: IF l_debug_on THEN
3430: WSH_DEBUG_SV.log(l_module_name,'g_break_ship_set_severity',g_break_ship_set_severity);
3431: END IF;
3601:
3602: CLOSE delivery_status;
3603:
3604: IF (l_del_status <> 'CO') AND (l_del_status <> 'PA') AND (l_del_status <> 'OP') THEN
3605: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_NOT_CO_PA_STATUS');
3606: --
3607: -- Debug Statements
3608: --
3609: IF l_debug_on THEN
3609: IF l_debug_on THEN
3610: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3611: END IF;
3612: --
3613: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
3614: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3615: wsh_util_core.add_message(x_return_status);
3616: --
3617: -- Debug Statements
3717:
3718: CLOSE delivery_status;
3719:
3720: IF (l_del_status <> 'CO') THEN
3721: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_NOT_CONFIRMED');
3722: --
3723: -- Debug Statements
3724: --
3725: IF l_debug_on THEN
3725: IF l_debug_on THEN
3726: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3727: END IF;
3728: --
3729: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
3730: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3731: wsh_util_core.add_message(x_return_status);
3732: --
3733: -- Debug Statements
3752:
3753: CLOSE stop_status;
3754:
3755: IF (l_stop_status <> 'CL') THEN
3756: FND_MESSAGE.SET_NAME('WSH','First-pickup-stop-not-closed');
3757: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3758: wsh_util_core.add_message(x_return_status);
3759: RETURN;
3760: END IF;
4293: --
4294: -- Delivery associated with stops which are not closed
4295: -- Cannot close delivery.
4296: --
4297: FND_MESSAGE.SET_NAME('WSH', 'WSH_DLVY_NO_CLOSE_OPEN_STOP');
4298: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(p_in_rec.delivery_id));
4299: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR, l_module_name);
4300: RAISE wsh_util_core.e_not_allowed;
4301: END IF;
4294: -- Delivery associated with stops which are not closed
4295: -- Cannot close delivery.
4296: --
4297: FND_MESSAGE.SET_NAME('WSH', 'WSH_DLVY_NO_CLOSE_OPEN_STOP');
4298: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(p_in_rec.delivery_id));
4299: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR, l_module_name);
4300: RAISE wsh_util_core.e_not_allowed;
4301: END IF;
4302: CLOSE stops_not_closed;
4310: --
4311: -- POD not received
4312: -- Cannot close delivery.
4313: --
4314: FND_MESSAGE.SET_NAME('WSH', 'WSH_DLVY_NO_CLOSE_POD');
4315: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(p_in_rec.delivery_id));
4316: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR, l_module_name);
4317: RAISE wsh_util_core.e_not_allowed;
4318: END IF;
4311: -- POD not received
4312: -- Cannot close delivery.
4313: --
4314: FND_MESSAGE.SET_NAME('WSH', 'WSH_DLVY_NO_CLOSE_POD');
4315: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(p_in_rec.delivery_id));
4316: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR, l_module_name);
4317: RAISE wsh_util_core.e_not_allowed;
4318: END IF;
4319: --
4335: --
4336: -- Delivery has lines
4337: -- Cannot close delivery.
4338: --
4339: FND_MESSAGE.SET_NAME('WSH', 'WSH_DLVY_NO_CLOSE_DETAIL');
4340: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(p_in_rec.delivery_id));
4341: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR, l_module_name);
4342: RAISE wsh_util_core.e_not_allowed;
4343:
4336: -- Delivery has lines
4337: -- Cannot close delivery.
4338: --
4339: FND_MESSAGE.SET_NAME('WSH', 'WSH_DLVY_NO_CLOSE_DETAIL');
4340: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(p_in_rec.delivery_id));
4341: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR, l_module_name);
4342: RAISE wsh_util_core.e_not_allowed;
4343:
4344: END IF;
4355: --
4356: -- Delivery has legs
4357: -- Cannot close delivery.
4358: --
4359: FND_MESSAGE.SET_NAME('WSH', 'WSH_DLVY_NO_CLOSE_LEGS');
4360: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(p_in_rec.delivery_id));
4361: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR, l_module_name);
4362:
4363: RAISE wsh_util_core.e_not_allowed;
4356: -- Delivery has legs
4357: -- Cannot close delivery.
4358: --
4359: FND_MESSAGE.SET_NAME('WSH', 'WSH_DLVY_NO_CLOSE_LEGS');
4360: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(p_in_rec.delivery_id));
4361: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR, l_module_name);
4362:
4363: RAISE wsh_util_core.e_not_allowed;
4364: END IF;
4378: --
4379: IF shared_stops_csr%FOUND
4380: THEN
4381: --CLOSE shared_stops_csr;
4382: FND_MESSAGE.SET_NAME('WSH', 'WSH_DLVY_NO_CLOSE_SHR_STOPS');
4383: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(p_in_rec.delivery_id));
4384: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR, l_module_name);
4385: RAISE wsh_util_core.e_not_allowed;
4386: END IF;
4379: IF shared_stops_csr%FOUND
4380: THEN
4381: --CLOSE shared_stops_csr;
4382: FND_MESSAGE.SET_NAME('WSH', 'WSH_DLVY_NO_CLOSE_SHR_STOPS');
4383: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(p_in_rec.delivery_id));
4384: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR, l_module_name);
4385: RAISE wsh_util_core.e_not_allowed;
4386: END IF;
4387: --
4419: END IF;
4420: FOR exp_cnt in 1..l_exceptions_tab.COUNT LOOP
4421: IF l_exceptions_tab(exp_cnt).exception_behavior = 'ERROR' THEN
4422: IF l_exceptions_tab(exp_cnt).entity_name = 'DELIVERY' THEN
4423: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_ENTITY');
4424: ELSE
4425: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
4426: END IF;
4427: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
4421: IF l_exceptions_tab(exp_cnt).exception_behavior = 'ERROR' THEN
4422: IF l_exceptions_tab(exp_cnt).entity_name = 'DELIVERY' THEN
4423: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_ENTITY');
4424: ELSE
4425: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
4426: END IF;
4427: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
4428: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
4429: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Error');
4423: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_ENTITY');
4424: ELSE
4425: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
4426: END IF;
4427: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
4428: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
4429: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Error');
4430: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4431: wsh_util_core.add_message(x_return_status);
4424: ELSE
4425: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
4426: END IF;
4427: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
4428: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
4429: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Error');
4430: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4431: wsh_util_core.add_message(x_return_status);
4432: l_num_warnings := l_num_warnings + 1 ;
4425: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
4426: END IF;
4427: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
4428: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
4429: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Error');
4430: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4431: wsh_util_core.add_message(x_return_status);
4432: l_num_warnings := l_num_warnings + 1 ;
4433: RAISE wsh_util_core.e_not_allowed;
4432: l_num_warnings := l_num_warnings + 1 ;
4433: RAISE wsh_util_core.e_not_allowed;
4434: ELSIF l_exceptions_tab(exp_cnt).exception_behavior = 'WARNING' THEN
4435: IF l_exceptions_tab(exp_cnt).entity_name = 'DELIVERY' THEN
4436: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_ENTITY');
4437: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
4438: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
4439: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Warning');
4440: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4433: RAISE wsh_util_core.e_not_allowed;
4434: ELSIF l_exceptions_tab(exp_cnt).exception_behavior = 'WARNING' THEN
4435: IF l_exceptions_tab(exp_cnt).entity_name = 'DELIVERY' THEN
4436: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_ENTITY');
4437: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
4438: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
4439: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Warning');
4440: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4441: wsh_util_core.add_message(x_return_status);
4434: ELSIF l_exceptions_tab(exp_cnt).exception_behavior = 'WARNING' THEN
4435: IF l_exceptions_tab(exp_cnt).entity_name = 'DELIVERY' THEN
4436: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_ENTITY');
4437: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
4438: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
4439: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Warning');
4440: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4441: wsh_util_core.add_message(x_return_status);
4442: l_num_warnings := l_num_warnings + 1 ;
4435: IF l_exceptions_tab(exp_cnt).entity_name = 'DELIVERY' THEN
4436: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_ENTITY');
4437: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
4438: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
4439: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Warning');
4440: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4441: wsh_util_core.add_message(x_return_status);
4442: l_num_warnings := l_num_warnings + 1 ;
4443: l_exp_warning := TRUE;
4441: wsh_util_core.add_message(x_return_status);
4442: l_num_warnings := l_num_warnings + 1 ;
4443: l_exp_warning := TRUE;
4444: ELSIF NOT (l_exp_logged) THEN
4445: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
4446: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
4447: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
4448: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Warning');
4449: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4442: l_num_warnings := l_num_warnings + 1 ;
4443: l_exp_warning := TRUE;
4444: ELSIF NOT (l_exp_logged) THEN
4445: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
4446: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
4447: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
4448: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Warning');
4449: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4450: l_exp_logged := TRUE;
4443: l_exp_warning := TRUE;
4444: ELSIF NOT (l_exp_logged) THEN
4445: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
4446: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
4447: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
4448: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Warning');
4449: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4450: l_exp_logged := TRUE;
4451: wsh_util_core.add_message(x_return_status);
4444: ELSIF NOT (l_exp_logged) THEN
4445: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
4446: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
4447: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
4448: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Warning');
4449: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4450: l_exp_logged := TRUE;
4451: wsh_util_core.add_message(x_return_status);
4452: l_num_warnings := l_num_warnings + 1 ;
4671: END IF;
4672: --
4673:
4674: IF (l_del_status = 'CL') OR (l_del_status = 'CO') THEN
4675: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_DELETE_ERROR');
4676: --
4677: -- Debug Statements
4678: --
4679: IF l_debug_on THEN
4679: IF l_debug_on THEN
4680: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4681: END IF;
4682: --
4683: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
4684: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4685: wsh_util_core.add_message(x_return_status);
4686: END IF;
4687: --
4690: -- Routing response is sent for delivery, cannot be deleted.
4691: --
4692: IF l_routingResponseId IS NOT NULL
4693: THEN
4694: FND_MESSAGE.SET_NAME('WSH','WSH_IB_DELETE_DELIVERY');
4695: --
4696: -- Debug Statements
4697: --
4698: IF l_debug_on THEN
4698: IF l_debug_on THEN
4699: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4700: END IF;
4701: --
4702: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
4703: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4704: wsh_util_core.add_message(x_return_status);
4705: END IF;
4706: --} --J-IB-NPARIKH
4709: l_flag := 'Y';
4710: END LOOP;
4711:
4712: IF (l_flag = 'Y') THEN
4713: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_DETAILS_UNASSIGNED');
4714: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(p_delivery_id));
4715: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4716: wsh_util_core.add_message(x_return_status);
4717: END IF;
4710: END LOOP;
4711:
4712: IF (l_flag = 'Y') THEN
4713: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_DETAILS_UNASSIGNED');
4714: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(p_delivery_id));
4715: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4716: wsh_util_core.add_message(x_return_status);
4717: END IF;
4718:
4722: l_flag := 'Y';
4723: END LOOP;
4724:
4725: IF (l_flag = 'Y') and l_delivery_type = 'STANDARD' THEN
4726: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_DELETE_WITH_LEGS');
4727: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4728: --
4729: -- Debug Statements
4730: --
4731: IF l_debug_on THEN
4732: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4733: END IF;
4734: --
4735: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(p_delivery_id));
4736: wsh_util_core.add_message(x_return_status);
4737: END IF;
4738:
4739: -- 3. Checks if freight costs exist for the delivery and locks them
4742: l_flag := 'Y';
4743: END LOOP;
4744:
4745: IF (l_flag = 'Y') THEN
4746: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_DELETE_WITH_FC');
4747: --
4748: -- Debug Statements
4749: --
4750: IF l_debug_on THEN
4750: IF l_debug_on THEN
4751: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4752: END IF;
4753: --
4754: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(p_delivery_id));
4755: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4756: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status);
4757: END IF;
4758:
4782: IF (freight_costs_exist%ISOPEN) THEN
4783: CLOSE freight_costs_exist;
4784: END IF;
4785:
4786: FND_MESSAGE.SET_NAME('WSH','WSH_OTM_DEL_DELETE_ERROR');
4787: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4788: WSH_UTIL_CORE.add_message(x_return_status,l_module_name);
4789:
4790: IF l_debug_on THEN
4812: END IF;
4813:
4814: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4815:
4816: FND_MESSAGE.Set_Name('WSH', 'WSH_NO_LOCK');
4817: wsh_util_core.add_message(x_return_status,l_module_name);
4818:
4819:
4820: IF l_debug_on THEN
4926:
4927: CLOSE delivery_status;
4928:
4929: IF (l_del_status <> 'OP') AND (l_del_status <> 'PA') THEN
4930: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_NOT_OP_PA_STATUS');
4931: --
4932: -- Debug Statements
4933: --
4934: IF l_debug_on THEN
4934: IF l_debug_on THEN
4935: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4936: END IF;
4937: --
4938: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
4939: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4940: wsh_util_core.add_message(x_return_status);
4941: --
4942: -- Debug Statements
4981: FETCH detail_info INTO l_detail_num;
4982: CLOSE detail_info;
4983:
4984: IF (l_detail_num <> 0) AND (l_detail_num IS NOT NULL) THEN
4985: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CHANGE_SH_M_ERROR');
4986: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4987: wsh_util_core.add_message(x_return_status);
4988: END IF;
4989: END IF;
5512: --
5513: EXCEPTION
5514: WHEN e_all_disabled THEN --3509004:public api changes
5515: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5516: FND_MESSAGE.SET_NAME('WSH','WSH_ALL_COLS_DISABLED');
5517: FND_MESSAGE.Set_Token('ENTITY_ID',p_delivery_id);
5518: wsh_util_core.add_message(x_return_status,l_module_name);
5519: IF l_debug_on THEN
5520: -- Nothing is updateable
5513: EXCEPTION
5514: WHEN e_all_disabled THEN --3509004:public api changes
5515: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5516: FND_MESSAGE.SET_NAME('WSH','WSH_ALL_COLS_DISABLED');
5517: FND_MESSAGE.Set_Token('ENTITY_ID',p_delivery_id);
5518: wsh_util_core.add_message(x_return_status,l_module_name);
5519: IF l_debug_on THEN
5520: -- Nothing is updateable
5521: WSH_DEBUG_SV.pop(l_module_name,'e_all_disabled');
5523:
5524:
5525: WHEN wsh_dp_no_entity THEN
5526: x_return_status := FND_API.G_RET_STS_ERROR;
5527: FND_MESSAGE.SET_NAME('WSH', 'WSH_DP_NO_ENTITY');
5528: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status);
5529: WSH_UTIL_CORE.get_messages('Y', l_msg_summary, l_msg_details, x_msg_count);
5530: IF x_msg_count > 1 then
5531: x_msg_data := l_msg_summary || l_msg_details;
5542: END IF;
5543: --
5544: WHEN wsh_inv_list_type THEN
5545: x_return_status := FND_API.G_RET_STS_ERROR;
5546: FND_MESSAGE.SET_NAME('WSH', 'WSH_INV_LIST_TYPE');
5547: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status);
5548: WSH_UTIL_CORE.get_messages('Y', l_msg_summary, l_msg_details, x_msg_count);
5549: IF x_msg_count > 1 then
5550: x_msg_data := l_msg_summary || l_msg_details;
5978: l_total_quantities.expected_quantity := l_total_quantities.expected_quantity
5979: + l_bad_quantities.expected_quantity;
5980: ELSE
5981: CLOSE c_total_line_quantities;
5982: FND_MESSAGE.SET_NAME('WSH','WSH_DATA_CORRUPTION');
5983: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR);
5984: raise others ;
5985: END IF;
5986:
6052:
6053: -- Changes for Bug# 3836415
6054: IF l_source_line_set_id IS NULL THEN
6055: IF l_source_header_type_name is NOT NULL THEN
6056: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOLERANCE_EXCEEDED');
6057: FND_MESSAGE.SET_TOKEN('ORDER_TYPE',l_source_header_type_name);
6058: ELSE
6059: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOLERANCE_EXCEEDED_OR');
6060: END IF;
6053: -- Changes for Bug# 3836415
6054: IF l_source_line_set_id IS NULL THEN
6055: IF l_source_header_type_name is NOT NULL THEN
6056: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOLERANCE_EXCEEDED');
6057: FND_MESSAGE.SET_TOKEN('ORDER_TYPE',l_source_header_type_name);
6058: ELSE
6059: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOLERANCE_EXCEEDED_OR');
6060: END IF;
6061: ELSE
6055: IF l_source_header_type_name is NOT NULL THEN
6056: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOLERANCE_EXCEEDED');
6057: FND_MESSAGE.SET_TOKEN('ORDER_TYPE',l_source_header_type_name);
6058: ELSE
6059: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOLERANCE_EXCEEDED_OR');
6060: END IF;
6061: ELSE
6062: IF l_source_header_type_name is NOT NULL THEN
6063: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOLERANCE_EXCEED_LS');
6059: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOLERANCE_EXCEEDED_OR');
6060: END IF;
6061: ELSE
6062: IF l_source_header_type_name is NOT NULL THEN
6063: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOLERANCE_EXCEED_LS');
6064: FND_MESSAGE.SET_TOKEN('ORDER_TYPE',l_source_header_type_name);
6065: ELSE
6066: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOLERANCE_EXCEED_LS_OR');
6067: END IF;
6060: END IF;
6061: ELSE
6062: IF l_source_header_type_name is NOT NULL THEN
6063: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOLERANCE_EXCEED_LS');
6064: FND_MESSAGE.SET_TOKEN('ORDER_TYPE',l_source_header_type_name);
6065: ELSE
6066: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOLERANCE_EXCEED_LS_OR');
6067: END IF;
6068: END IF;
6062: IF l_source_header_type_name is NOT NULL THEN
6063: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOLERANCE_EXCEED_LS');
6064: FND_MESSAGE.SET_TOKEN('ORDER_TYPE',l_source_header_type_name);
6065: ELSE
6066: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOLERANCE_EXCEED_LS_OR');
6067: END IF;
6068: END IF;
6069: --
6070: -- Debug Statements
6072: IF l_debug_on THEN
6073: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
6074: END IF;
6075: --
6076: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
6077: FND_MESSAGE.SET_TOKEN('ORDER_NUMBER',l_source_header_number);
6078: FND_MESSAGE.SET_TOKEN('SOURCE_SYSTEM',l_source_system);
6079: FND_MESSAGE.SET_TOKEN('LINE_NUM',ltrim( rtrim ( l_source_line_number )) );
6080: FND_MESSAGE.SET_TOKEN('MAX_QTY',x_max_quantity);
6073: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
6074: END IF;
6075: --
6076: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
6077: FND_MESSAGE.SET_TOKEN('ORDER_NUMBER',l_source_header_number);
6078: FND_MESSAGE.SET_TOKEN('SOURCE_SYSTEM',l_source_system);
6079: FND_MESSAGE.SET_TOKEN('LINE_NUM',ltrim( rtrim ( l_source_line_number )) );
6080: FND_MESSAGE.SET_TOKEN('MAX_QTY',x_max_quantity);
6081:
6074: END IF;
6075: --
6076: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
6077: FND_MESSAGE.SET_TOKEN('ORDER_NUMBER',l_source_header_number);
6078: FND_MESSAGE.SET_TOKEN('SOURCE_SYSTEM',l_source_system);
6079: FND_MESSAGE.SET_TOKEN('LINE_NUM',ltrim( rtrim ( l_source_line_number )) );
6080: FND_MESSAGE.SET_TOKEN('MAX_QTY',x_max_quantity);
6081:
6082: ELSE
6075: --
6076: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
6077: FND_MESSAGE.SET_TOKEN('ORDER_NUMBER',l_source_header_number);
6078: FND_MESSAGE.SET_TOKEN('SOURCE_SYSTEM',l_source_system);
6079: FND_MESSAGE.SET_TOKEN('LINE_NUM',ltrim( rtrim ( l_source_line_number )) );
6080: FND_MESSAGE.SET_TOKEN('MAX_QTY',x_max_quantity);
6081:
6082: ELSE
6083:
6076: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
6077: FND_MESSAGE.SET_TOKEN('ORDER_NUMBER',l_source_header_number);
6078: FND_MESSAGE.SET_TOKEN('SOURCE_SYSTEM',l_source_system);
6079: FND_MESSAGE.SET_TOKEN('LINE_NUM',ltrim( rtrim ( l_source_line_number )) );
6080: FND_MESSAGE.SET_TOKEN('MAX_QTY',x_max_quantity);
6081:
6082: ELSE
6083:
6084: -- bug : choose appropriate message based
6083:
6084: -- bug : choose appropriate message based
6085: -- on line being in a set or not.
6086: IF l_source_line_set_id IS NULL THEN
6087: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOL_EXCEEDED_REVIEW');
6088: ELSE
6089: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOL_EXCEED_REVIEW_LS');
6090: END IF;
6091: --
6085: -- on line being in a set or not.
6086: IF l_source_line_set_id IS NULL THEN
6087: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOL_EXCEEDED_REVIEW');
6088: ELSE
6089: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOL_EXCEED_REVIEW_LS');
6090: END IF;
6091: --
6092: -- Debug Statements
6093: --
6094: IF l_debug_on THEN
6095: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
6096: END IF;
6097: --
6098: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
6099: FND_MESSAGE.SET_TOKEN('ORDER_NUMBER',l_source_header_number);
6100: FND_MESSAGE.SET_TOKEN('SOURCE_SYSTEM',l_source_system);
6101: FND_MESSAGE.SET_TOKEN('ORDER_TYPE',l_source_header_type_name);
6102: FND_MESSAGE.SET_TOKEN('LINE_NUM',ltrim( rtrim ( l_source_line_number )) );
6095: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
6096: END IF;
6097: --
6098: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
6099: FND_MESSAGE.SET_TOKEN('ORDER_NUMBER',l_source_header_number);
6100: FND_MESSAGE.SET_TOKEN('SOURCE_SYSTEM',l_source_system);
6101: FND_MESSAGE.SET_TOKEN('ORDER_TYPE',l_source_header_type_name);
6102: FND_MESSAGE.SET_TOKEN('LINE_NUM',ltrim( rtrim ( l_source_line_number )) );
6103: FND_MESSAGE.SET_TOKEN('MAX_QTY',l_line_max_quantity);
6096: END IF;
6097: --
6098: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
6099: FND_MESSAGE.SET_TOKEN('ORDER_NUMBER',l_source_header_number);
6100: FND_MESSAGE.SET_TOKEN('SOURCE_SYSTEM',l_source_system);
6101: FND_MESSAGE.SET_TOKEN('ORDER_TYPE',l_source_header_type_name);
6102: FND_MESSAGE.SET_TOKEN('LINE_NUM',ltrim( rtrim ( l_source_line_number )) );
6103: FND_MESSAGE.SET_TOKEN('MAX_QTY',l_line_max_quantity);
6104:
6097: --
6098: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
6099: FND_MESSAGE.SET_TOKEN('ORDER_NUMBER',l_source_header_number);
6100: FND_MESSAGE.SET_TOKEN('SOURCE_SYSTEM',l_source_system);
6101: FND_MESSAGE.SET_TOKEN('ORDER_TYPE',l_source_header_type_name);
6102: FND_MESSAGE.SET_TOKEN('LINE_NUM',ltrim( rtrim ( l_source_line_number )) );
6103: FND_MESSAGE.SET_TOKEN('MAX_QTY',l_line_max_quantity);
6104:
6105: END IF;
6098: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
6099: FND_MESSAGE.SET_TOKEN('ORDER_NUMBER',l_source_header_number);
6100: FND_MESSAGE.SET_TOKEN('SOURCE_SYSTEM',l_source_system);
6101: FND_MESSAGE.SET_TOKEN('ORDER_TYPE',l_source_header_type_name);
6102: FND_MESSAGE.SET_TOKEN('LINE_NUM',ltrim( rtrim ( l_source_line_number )) );
6103: FND_MESSAGE.SET_TOKEN('MAX_QTY',l_line_max_quantity);
6104:
6105: END IF;
6106:
6099: FND_MESSAGE.SET_TOKEN('ORDER_NUMBER',l_source_header_number);
6100: FND_MESSAGE.SET_TOKEN('SOURCE_SYSTEM',l_source_system);
6101: FND_MESSAGE.SET_TOKEN('ORDER_TYPE',l_source_header_type_name);
6102: FND_MESSAGE.SET_TOKEN('LINE_NUM',ltrim( rtrim ( l_source_line_number )) );
6103: FND_MESSAGE.SET_TOKEN('MAX_QTY',l_line_max_quantity);
6104:
6105: END IF;
6106:
6107: x_return_status := FND_API.G_RET_STS_ERROR;
6654: --
6655: )
6656: THEN
6657: IF l_dlvy_actions_tab(k).message_name IS NOT NULL THEN
6658: FND_MESSAGE.SET_NAME('WSH',l_dlvy_actions_tab(k).message_name);
6659: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error);
6660: END IF;
6661: raise e_record_ineligible;
6662: exit;
6975: WHEN e_record_ineligible THEN
6976: x_error_ids(x_error_ids.count +1) := p_dlvy_rec_tab(j).delivery_id;
6977: IF p_caller = 'WSH_PUB' or p_caller like 'FTE%' OR
6978: p_caller = 'WSH_TRCON' THEN
6979: FND_MESSAGE.SET_NAME('WSH','WSH_DELIVERY_ACTION_INELIGIBLE');
6980: FND_MESSAGE.Set_Token('DEL_NAME',wsh_new_deliveries_pvt.get_name(x_error_ids(x_error_ids.count)));
6981: FND_MESSAGE.Set_Token('ACTION',wsh_util_core.get_action_meaning('DLVY',p_action));
6982: wsh_util_core.add_message('E',l_module_name);
6983: END IF;
6976: x_error_ids(x_error_ids.count +1) := p_dlvy_rec_tab(j).delivery_id;
6977: IF p_caller = 'WSH_PUB' or p_caller like 'FTE%' OR
6978: p_caller = 'WSH_TRCON' THEN
6979: FND_MESSAGE.SET_NAME('WSH','WSH_DELIVERY_ACTION_INELIGIBLE');
6980: FND_MESSAGE.Set_Token('DEL_NAME',wsh_new_deliveries_pvt.get_name(x_error_ids(x_error_ids.count)));
6981: FND_MESSAGE.Set_Token('ACTION',wsh_util_core.get_action_meaning('DLVY',p_action));
6982: wsh_util_core.add_message('E',l_module_name);
6983: END IF;
6984: WHEN e_tp_record_ineligible THEN
6977: IF p_caller = 'WSH_PUB' or p_caller like 'FTE%' OR
6978: p_caller = 'WSH_TRCON' THEN
6979: FND_MESSAGE.SET_NAME('WSH','WSH_DELIVERY_ACTION_INELIGIBLE');
6980: FND_MESSAGE.Set_Token('DEL_NAME',wsh_new_deliveries_pvt.get_name(x_error_ids(x_error_ids.count)));
6981: FND_MESSAGE.Set_Token('ACTION',wsh_util_core.get_action_meaning('DLVY',p_action));
6982: wsh_util_core.add_message('E',l_module_name);
6983: END IF;
6984: WHEN e_tp_record_ineligible THEN
6985: x_error_ids(x_error_ids.count +1) := p_dlvy_rec_tab(j).delivery_id;
6984: WHEN e_tp_record_ineligible THEN
6985: x_error_ids(x_error_ids.count +1) := p_dlvy_rec_tab(j).delivery_id;
6986: IF p_caller = 'WSH_PUB' or p_caller like 'FTE%' OR
6987: p_caller = 'WSH_TRCON' THEN
6988: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_ASSIGN_FIRMTRIP_ERROR');
6989: FND_MESSAGE.Set_Token('DEL_NAME',wsh_new_deliveries_pvt.get_name(x_error_ids(x_error_ids.count)));
6990: FND_MESSAGE.Set_Token('TRIP_NAME',wsh_trips_pvt.get_name(p_tripid));
6991: wsh_util_core.add_message('E',l_module_name);
6992: END IF;
6985: x_error_ids(x_error_ids.count +1) := p_dlvy_rec_tab(j).delivery_id;
6986: IF p_caller = 'WSH_PUB' or p_caller like 'FTE%' OR
6987: p_caller = 'WSH_TRCON' THEN
6988: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_ASSIGN_FIRMTRIP_ERROR');
6989: FND_MESSAGE.Set_Token('DEL_NAME',wsh_new_deliveries_pvt.get_name(x_error_ids(x_error_ids.count)));
6990: FND_MESSAGE.Set_Token('TRIP_NAME',wsh_trips_pvt.get_name(p_tripid));
6991: wsh_util_core.add_message('E',l_module_name);
6992: END IF;
6993: WHEN e_scpod_wf_inprogress THEN --/== Workflow Changes
6986: IF p_caller = 'WSH_PUB' or p_caller like 'FTE%' OR
6987: p_caller = 'WSH_TRCON' THEN
6988: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_ASSIGN_FIRMTRIP_ERROR');
6989: FND_MESSAGE.Set_Token('DEL_NAME',wsh_new_deliveries_pvt.get_name(x_error_ids(x_error_ids.count)));
6990: FND_MESSAGE.Set_Token('TRIP_NAME',wsh_trips_pvt.get_name(p_tripid));
6991: wsh_util_core.add_message('E',l_module_name);
6992: END IF;
6993: WHEN e_scpod_wf_inprogress THEN --/== Workflow Changes
6994: x_error_ids(x_error_ids.count +1) := p_dlvy_rec_tab(j).delivery_id;
6993: WHEN e_scpod_wf_inprogress THEN --/== Workflow Changes
6994: x_error_ids(x_error_ids.count +1) := p_dlvy_rec_tab(j).delivery_id;
6995: IF p_caller = 'WSH_PUB' or p_caller like 'FTE%' OR
6996: p_caller = 'WSH_TRCON' THEN
6997: FND_MESSAGE.SET_NAME('WSH','WSH_WF_DEL_ACTION_INELIGIBLE');
6998: FND_MESSAGE.Set_Token('DEL_NAME',wsh_new_deliveries_pvt.get_name(x_error_ids(x_error_ids.count)));
6999: FND_MESSAGE.Set_Token('ACTION',wsh_util_core.get_action_meaning('DLVY',p_action));
7000: wsh_util_core.add_message('E',l_module_name); --==/
7001: END IF;
6994: x_error_ids(x_error_ids.count +1) := p_dlvy_rec_tab(j).delivery_id;
6995: IF p_caller = 'WSH_PUB' or p_caller like 'FTE%' OR
6996: p_caller = 'WSH_TRCON' THEN
6997: FND_MESSAGE.SET_NAME('WSH','WSH_WF_DEL_ACTION_INELIGIBLE');
6998: FND_MESSAGE.Set_Token('DEL_NAME',wsh_new_deliveries_pvt.get_name(x_error_ids(x_error_ids.count)));
6999: FND_MESSAGE.Set_Token('ACTION',wsh_util_core.get_action_meaning('DLVY',p_action));
7000: wsh_util_core.add_message('E',l_module_name); --==/
7001: END IF;
7002:
6995: IF p_caller = 'WSH_PUB' or p_caller like 'FTE%' OR
6996: p_caller = 'WSH_TRCON' THEN
6997: FND_MESSAGE.SET_NAME('WSH','WSH_WF_DEL_ACTION_INELIGIBLE');
6998: FND_MESSAGE.Set_Token('DEL_NAME',wsh_new_deliveries_pvt.get_name(x_error_ids(x_error_ids.count)));
6999: FND_MESSAGE.Set_Token('ACTION',wsh_util_core.get_action_meaning('DLVY',p_action));
7000: wsh_util_core.add_message('E',l_module_name); --==/
7001: END IF;
7002:
7003: END;
7007: IF (x_valid_ids.COUNT = 0 ) THEN
7008: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7009: --
7010: IF NOT (l_caller LIKE 'FTE%' OR l_caller = 'WSH_PUB') THEN
7011: FND_MESSAGE.SET_NAME('WSH','WSH_ACTION_ENABLED');
7012: wsh_util_core.add_message(x_return_status,l_module_name);
7013: END IF;
7014: --
7015: ELSIF (x_valid_ids.COUNT = p_dlvy_rec_tab.COUNT) THEN
7017: ELSIF (x_valid_ids.COUNT < p_dlvy_rec_tab.COUNT ) THEN
7018: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
7019: --
7020: IF NOT (l_caller LIKE 'FTE%' OR l_caller = 'WSH_PUB') THEN
7021: FND_MESSAGE.SET_NAME('WSH','WSH_ACTION_ENABLED_WARN');
7022: wsh_util_core.add_message(x_return_status,l_module_name);
7023: END IF;
7024: --
7025: ELSE
7025: ELSE
7026: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7027: --
7028: IF NOT (l_caller LIKE 'FTE%' OR l_caller = 'WSH_PUB') THEN
7029: FND_MESSAGE.SET_NAME('WSH','WSH_ACTION_ENABLED');
7030: wsh_util_core.add_message(x_return_status,l_module_name);
7031: END IF;
7032: --
7033: END IF;
9691: CLOSE c_tbl_rec;
9692: END IF;
9693:
9694: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9695: FND_MESSAGE.SET_NAME('WSH','WSH_ALL_COLS_DISABLED');
9696: FND_MESSAGE.Set_Token('ENTITY_ID',p_delivery_rec.delivery_id);
9697: wsh_util_core.add_message(x_return_status,l_module_name);
9698: IF l_debug_on THEN
9699: -- Nothing is updateable
9692: END IF;
9693:
9694: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9695: FND_MESSAGE.SET_NAME('WSH','WSH_ALL_COLS_DISABLED');
9696: FND_MESSAGE.Set_Token('ENTITY_ID',p_delivery_rec.delivery_id);
9697: wsh_util_core.add_message(x_return_status,l_module_name);
9698: IF l_debug_on THEN
9699: -- Nothing is updateable
9700: WSH_DEBUG_SV.pop(l_module_name,'e_all_disabled');
9714: CLOSE c_tbl_rec;
9715: END IF;
9716:
9717: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9718: FND_MESSAGE.SET_NAME('WSH','WSH_BAD_FIELD_NAME');
9719: FND_MESSAGE.Set_Token('FIELD_NAME',l_field_name);
9720: wsh_util_core.add_message(x_return_status,l_module_name);
9721: IF l_debug_on THEN
9722: WSH_DEBUG_SV.log(l_module_name,'Bad field name passed to the list:'
9715: END IF;
9716:
9717: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9718: FND_MESSAGE.SET_NAME('WSH','WSH_BAD_FIELD_NAME');
9719: FND_MESSAGE.Set_Token('FIELD_NAME',l_field_name);
9720: wsh_util_core.add_message(x_return_status,l_module_name);
9721: IF l_debug_on THEN
9722: WSH_DEBUG_SV.log(l_module_name,'Bad field name passed to the list:'
9723: ,l_field_name);
10261: x_vol_nullify_flag := FALSE;
10262: open l_del_org_csr;
10263: Fetch l_del_org_csr into l_organization_id, l_wt_uom_code, l_vol_uom_code;
10264: IF l_del_org_csr%NOTFOUND THEN
10265: FND_MESSAGE.SET_NAME('WSH', 'WSH_INVALID_DELIVERY_ID');
10266: x_return_status := wsh_util_core.g_ret_sts_error;
10267: wsh_util_core.add_message(x_return_status,l_module_name);
10268: close l_del_org_csr;
10269: RAISE FND_API.G_EXC_ERROR;
10642: END IF;
10643: l_loc_description := wsh_util_core.get_location_description
10644: (p_location_id => p_pickup_location_id,
10645: p_format => 'NEW UI CODE');
10646: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_DUP_PICKUP_LOCATION');
10647: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_del_name);
10648: FND_MESSAGE.SET_TOKEN('TRIP_NAME',l_trip_name);
10649: FND_MESSAGE.SET_TOKEN('PICKUP_LOC',l_loc_description);
10650: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10643: l_loc_description := wsh_util_core.get_location_description
10644: (p_location_id => p_pickup_location_id,
10645: p_format => 'NEW UI CODE');
10646: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_DUP_PICKUP_LOCATION');
10647: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_del_name);
10648: FND_MESSAGE.SET_TOKEN('TRIP_NAME',l_trip_name);
10649: FND_MESSAGE.SET_TOKEN('PICKUP_LOC',l_loc_description);
10650: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10651: wsh_util_core.add_message(x_return_status);
10644: (p_location_id => p_pickup_location_id,
10645: p_format => 'NEW UI CODE');
10646: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_DUP_PICKUP_LOCATION');
10647: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_del_name);
10648: FND_MESSAGE.SET_TOKEN('TRIP_NAME',l_trip_name);
10649: FND_MESSAGE.SET_TOKEN('PICKUP_LOC',l_loc_description);
10650: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10651: wsh_util_core.add_message(x_return_status);
10652: RAISE FND_API.G_EXC_ERROR;
10645: p_format => 'NEW UI CODE');
10646: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_DUP_PICKUP_LOCATION');
10647: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_del_name);
10648: FND_MESSAGE.SET_TOKEN('TRIP_NAME',l_trip_name);
10649: FND_MESSAGE.SET_TOKEN('PICKUP_LOC',l_loc_description);
10650: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10651: wsh_util_core.add_message(x_return_status);
10652: RAISE FND_API.G_EXC_ERROR;
10653: END IF;
10663: END IF;
10664: l_loc_description := wsh_util_core.get_location_description
10665: (p_location_id => p_dropoff_location_id,
10666: p_format => 'NEW UI CODE');
10667: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_DUP_DROPOFF_LOCATION');
10668: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_del_name);
10669: FND_MESSAGE.SET_TOKEN('TRIP_NAME',l_trip_name);
10670: FND_MESSAGE.SET_TOKEN('DROPOFF_LOC',l_loc_description);
10671: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10664: l_loc_description := wsh_util_core.get_location_description
10665: (p_location_id => p_dropoff_location_id,
10666: p_format => 'NEW UI CODE');
10667: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_DUP_DROPOFF_LOCATION');
10668: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_del_name);
10669: FND_MESSAGE.SET_TOKEN('TRIP_NAME',l_trip_name);
10670: FND_MESSAGE.SET_TOKEN('DROPOFF_LOC',l_loc_description);
10671: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10672: wsh_util_core.add_message(x_return_status);
10665: (p_location_id => p_dropoff_location_id,
10666: p_format => 'NEW UI CODE');
10667: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_DUP_DROPOFF_LOCATION');
10668: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_del_name);
10669: FND_MESSAGE.SET_TOKEN('TRIP_NAME',l_trip_name);
10670: FND_MESSAGE.SET_TOKEN('DROPOFF_LOC',l_loc_description);
10671: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10672: wsh_util_core.add_message(x_return_status);
10673: RAISE FND_API.G_EXC_ERROR;
10666: p_format => 'NEW UI CODE');
10667: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_DUP_DROPOFF_LOCATION');
10668: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_del_name);
10669: FND_MESSAGE.SET_TOKEN('TRIP_NAME',l_trip_name);
10670: FND_MESSAGE.SET_TOKEN('DROPOFF_LOC',l_loc_description);
10671: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10672: wsh_util_core.add_message(x_return_status);
10673: RAISE FND_API.G_EXC_ERROR;
10674: END IF;
10908: END IF;
10909:
10910: IF p_action_type = 'SHIP_CONFIRM' THEN
10911: l_exception_name := 'WSH_SC_REQ_EXPORT_COMPL';
10912: l_msg := FND_MESSAGE.Get_String('WSH', 'WSH_SC_ITM_REQD');
10913: ELSE
10914: l_exception_name := 'WSH_PR_REQ_EXPORT_COMPL';
10915: l_msg := FND_MESSAGE.Get_String('WSH', 'WSH_PR_ITM_REQD');
10916: END IF;
10911: l_exception_name := 'WSH_SC_REQ_EXPORT_COMPL';
10912: l_msg := FND_MESSAGE.Get_String('WSH', 'WSH_SC_ITM_REQD');
10913: ELSE
10914: l_exception_name := 'WSH_PR_REQ_EXPORT_COMPL';
10915: l_msg := FND_MESSAGE.Get_String('WSH', 'WSH_PR_ITM_REQD');
10916: END IF;
10917:
10918: IF l_debug_on THEN
10919: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit wsh_xc_util.log_exception',WSH_DEBUG_SV.C_PROC_LEVEL);
11181: --{
11182: IF p_in_rec.put_messages
11183: THEN
11184: --{
11185: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_INTRANSIT_ERROR');
11186: FND_MESSAGE.SET_TOKEN('DEL_NAME',p_in_rec.name);
11187: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
11188: --}
11189: END IF;
11182: IF p_in_rec.put_messages
11183: THEN
11184: --{
11185: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_INTRANSIT_ERROR');
11186: FND_MESSAGE.SET_TOKEN('DEL_NAME',p_in_rec.name);
11187: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
11188: --}
11189: END IF;
11190: --
11217: END IF;
11218: FOR exp_cnt in 1..l_exceptions_tab.COUNT LOOP
11219: IF l_exceptions_tab(exp_cnt).exception_behavior = 'ERROR' THEN
11220: IF l_exceptions_tab(exp_cnt).entity_name = 'DELIVERY' THEN
11221: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_ENTITY');
11222: ELSE
11223: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
11224: END IF;
11225: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
11219: IF l_exceptions_tab(exp_cnt).exception_behavior = 'ERROR' THEN
11220: IF l_exceptions_tab(exp_cnt).entity_name = 'DELIVERY' THEN
11221: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_ENTITY');
11222: ELSE
11223: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
11224: END IF;
11225: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
11226: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
11227: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Error');
11221: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_ENTITY');
11222: ELSE
11223: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
11224: END IF;
11225: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
11226: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
11227: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Error');
11228: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11229: wsh_util_core.add_message(x_return_status);
11222: ELSE
11223: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
11224: END IF;
11225: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
11226: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
11227: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Error');
11228: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11229: wsh_util_core.add_message(x_return_status);
11230: l_num_warnings := l_num_warnings + 1 ;
11223: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
11224: END IF;
11225: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
11226: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
11227: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Error');
11228: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11229: wsh_util_core.add_message(x_return_status);
11230: l_num_warnings := l_num_warnings + 1 ;
11231: RAISE wsh_util_core.e_not_allowed;
11230: l_num_warnings := l_num_warnings + 1 ;
11231: RAISE wsh_util_core.e_not_allowed;
11232: ELSIF l_exceptions_tab(exp_cnt).exception_behavior = 'WARNING' THEN
11233: IF l_exceptions_tab(exp_cnt).entity_name = 'DELIVERY' THEN
11234: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_ENTITY');
11235: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
11236: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
11237: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Warning');
11238: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
11231: RAISE wsh_util_core.e_not_allowed;
11232: ELSIF l_exceptions_tab(exp_cnt).exception_behavior = 'WARNING' THEN
11233: IF l_exceptions_tab(exp_cnt).entity_name = 'DELIVERY' THEN
11234: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_ENTITY');
11235: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
11236: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
11237: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Warning');
11238: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
11239: wsh_util_core.add_message(x_return_status);
11232: ELSIF l_exceptions_tab(exp_cnt).exception_behavior = 'WARNING' THEN
11233: IF l_exceptions_tab(exp_cnt).entity_name = 'DELIVERY' THEN
11234: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_ENTITY');
11235: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
11236: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
11237: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Warning');
11238: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
11239: wsh_util_core.add_message(x_return_status);
11240: l_num_warnings := l_num_warnings + 1 ;
11233: IF l_exceptions_tab(exp_cnt).entity_name = 'DELIVERY' THEN
11234: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_ENTITY');
11235: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
11236: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
11237: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Warning');
11238: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
11239: wsh_util_core.add_message(x_return_status);
11240: l_num_warnings := l_num_warnings + 1 ;
11241: l_exp_warning := TRUE;
11239: wsh_util_core.add_message(x_return_status);
11240: l_num_warnings := l_num_warnings + 1 ;
11241: l_exp_warning := TRUE;
11242: ELSIF NOT (l_exp_logged) THEN
11243: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
11244: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
11245: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
11246: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Warning');
11247: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
11240: l_num_warnings := l_num_warnings + 1 ;
11241: l_exp_warning := TRUE;
11242: ELSIF NOT (l_exp_logged) THEN
11243: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
11244: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
11245: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
11246: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Warning');
11247: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
11248: l_exp_logged := TRUE;
11241: l_exp_warning := TRUE;
11242: ELSIF NOT (l_exp_logged) THEN
11243: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
11244: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
11245: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
11246: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Warning');
11247: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
11248: l_exp_logged := TRUE;
11249: wsh_util_core.add_message(x_return_status);
11242: ELSIF NOT (l_exp_logged) THEN
11243: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
11244: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
11245: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
11246: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Warning');
11247: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
11248: l_exp_logged := TRUE;
11249: wsh_util_core.add_message(x_return_status);
11250: l_num_warnings := l_num_warnings + 1 ;
11433: --
11434: IF dlvy_csr%NOTFOUND
11435: THEN
11436: --{
11437: FND_MESSAGE.SET_NAME('WSH', 'WSH_INVALID_DELIVERY');
11438: FND_MESSAGE.SET_TOKEN('DELIVERY_ID',p_delivery_id);
11439: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR, l_module_name);
11440: --CLOSE dlvy_csr;
11441: RAISE FND_API.G_EXC_ERROR;
11434: IF dlvy_csr%NOTFOUND
11435: THEN
11436: --{
11437: FND_MESSAGE.SET_NAME('WSH', 'WSH_INVALID_DELIVERY');
11438: FND_MESSAGE.SET_TOKEN('DELIVERY_ID',p_delivery_id);
11439: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR, l_module_name);
11440: --CLOSE dlvy_csr;
11441: RAISE FND_API.G_EXC_ERROR;
11442: --}
12837: IF c_get_delivery_info%ISOPEN THEN
12838: CLOSE c_get_delivery_info;
12839: END IF;
12840:
12841: FND_MESSAGE.Set_Name('WSH','WSH_DEL_NOT_FOUND');
12842: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12843: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status,l_module_name);
12844: --
12845: IF l_debug_on THEN