[Home] [Help]
514: --
515: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
516:
517: IF (p_delivery_status = 'IT') THEN
518: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_ASSIGN_TR_DEL_IT');
519: --
520: -- Debug Statements
521: --
522: IF l_debug_on THEN
522: IF l_debug_on THEN
523: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
524: END IF;
525: --
526: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
527: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
528: wsh_util_core.add_message(x_return_status);
529: END IF;
530:
592: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
593:
594: IF (rel_num <> 0) AND (unrel_num > 0) THEN
595:
596: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CONFIRM_ERROR');
597: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
598: wsh_util_core.add_message(x_return_status);
599:
600: END IF;
662: --
663: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
664:
665: IF (p_unpacked_flag) THEN
666: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_PACK_ITEMS_UNPACKED');
667: --
668: -- Debug Statements
669: --
670: IF l_debug_on THEN
670: IF l_debug_on THEN
671: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
672: END IF;
673: --
674: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
675: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
676: wsh_util_core.add_message(x_return_status);
677: END IF;
678:
743:
744: IF (p_cont_exists_flag) THEN
745:
746: IF (p_overfilled_flag) THEN
747: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CONT_OVERPACKED');
748: --
749: -- Debug Statements
750: --
751: IF l_debug_on THEN
751: IF l_debug_on THEN
752: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
753: END IF;
754: --
755: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
756: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
757: wsh_util_core.add_message(x_return_status);
758: END IF;
759:
824:
825: IF (p_cont_exists_flag) THEN
826:
827: IF (p_underfilled_flag) THEN
828: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CONT_UNDERPACKED');
829: --
830: -- Debug Statements
831: --
832: IF l_debug_on THEN
832: IF l_debug_on THEN
833: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
834: END IF;
835: --
836: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
837: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
838: wsh_util_core.add_message(x_return_status);
839:
840: END IF;
905: --
906: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
907:
908: IF (p_final_dropoff_id <> p_ultimate_dropoff_id) THEN
909: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_NO_ULTIMATE_DROPOFF');
910: --
911: -- Debug Statements
912: --
913: IF l_debug_on THEN
913: IF l_debug_on THEN
914: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
915: END IF;
916: --
917: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
918: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
919: wsh_util_core.add_message(x_return_status);
920: END IF;
921:
1064: END IF;
1065:
1066: IF (l_return_code IN (1,2,3,4)) AND (l_suggest_ship_date <> p_ship_date) THEN
1067: IF (p_update_flag <> 'Y') THEN
1068: FND_MESSAGE.SET_NAME('WSH','WSH_CAL_SHIP_DATE_ALT');
1069: ELSE
1070: FND_MESSAGE.SET_NAME('WSH','WSH_CAL_SHIP_DATE_ALT_UPDATE');
1071: END IF;
1072: --
1066: IF (l_return_code IN (1,2,3,4)) AND (l_suggest_ship_date <> p_ship_date) THEN
1067: IF (p_update_flag <> 'Y') THEN
1068: FND_MESSAGE.SET_NAME('WSH','WSH_CAL_SHIP_DATE_ALT');
1069: ELSE
1070: FND_MESSAGE.SET_NAME('WSH','WSH_CAL_SHIP_DATE_ALT_UPDATE');
1071: END IF;
1072: --
1073: -- Debug Statements
1074: --
1075: IF l_debug_on THEN
1076: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
1077: END IF;
1078: --
1079: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_entity_id));
1080: FND_MESSAGE.SET_TOKEN('SHIP',fnd_date.date_to_chardate(p_ship_date,calendar_aware=>FND_DATE.calendar_aware_alt));
1081: FND_MESSAGE.SET_TOKEN('SUGGESTED',fnd_date.date_to_chardate(l_suggest_ship_date,calendar_aware=>FND_DATE.calendar_aware_alt));
1082: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1083: wsh_util_core.add_message(x_return_status);
1076: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
1077: END IF;
1078: --
1079: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_entity_id));
1080: FND_MESSAGE.SET_TOKEN('SHIP',fnd_date.date_to_chardate(p_ship_date,calendar_aware=>FND_DATE.calendar_aware_alt));
1081: FND_MESSAGE.SET_TOKEN('SUGGESTED',fnd_date.date_to_chardate(l_suggest_ship_date,calendar_aware=>FND_DATE.calendar_aware_alt));
1082: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1083: wsh_util_core.add_message(x_return_status);
1084: END IF;
1077: END IF;
1078: --
1079: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_entity_id));
1080: FND_MESSAGE.SET_TOKEN('SHIP',fnd_date.date_to_chardate(p_ship_date,calendar_aware=>FND_DATE.calendar_aware_alt));
1081: FND_MESSAGE.SET_TOKEN('SUGGESTED',fnd_date.date_to_chardate(l_suggest_ship_date,calendar_aware=>FND_DATE.calendar_aware_alt));
1082: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1083: wsh_util_core.add_message(x_return_status);
1084: END IF;
1085: --Bug 8687915 :Handling Return codes appropriately.
1092: --Bug 8687915: If drop_off date has changed due to a change in 'pick_up' date and NOT due to 'RCV Calendar'
1093: -- message should NOT talk about Rcv calendar.
1094: IF l_suggest_ship_date <> p_ship_date and l_suggest_receive_date = l_temp_suggest_receive_date THEN
1095: IF (p_update_flag <> 'Y') THEN
1096: FND_MESSAGE.SET_NAME('WSH','WSH_REC_DATE_ALT');
1097: ELSE
1098: FND_MESSAGE.SET_NAME('WSH','WSH_REC_DATE_ALT_UPDATE');
1099: END IF;
1100: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_entity_id));
1094: IF l_suggest_ship_date <> p_ship_date and l_suggest_receive_date = l_temp_suggest_receive_date THEN
1095: IF (p_update_flag <> 'Y') THEN
1096: FND_MESSAGE.SET_NAME('WSH','WSH_REC_DATE_ALT');
1097: ELSE
1098: FND_MESSAGE.SET_NAME('WSH','WSH_REC_DATE_ALT_UPDATE');
1099: END IF;
1100: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_entity_id));
1101: FND_MESSAGE.SET_TOKEN('RECEIVE',fnd_date.date_to_chardate(p_receive_date,calendar_aware=>FND_DATE.calendar_aware_alt));
1102: FND_MESSAGE.SET_TOKEN('SUGGESTED',fnd_date.date_to_chardate(l_suggest_receive_date,calendar_aware=>FND_DATE.calendar_aware_alt));
1096: FND_MESSAGE.SET_NAME('WSH','WSH_REC_DATE_ALT');
1097: ELSE
1098: FND_MESSAGE.SET_NAME('WSH','WSH_REC_DATE_ALT_UPDATE');
1099: END IF;
1100: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_entity_id));
1101: FND_MESSAGE.SET_TOKEN('RECEIVE',fnd_date.date_to_chardate(p_receive_date,calendar_aware=>FND_DATE.calendar_aware_alt));
1102: FND_MESSAGE.SET_TOKEN('SUGGESTED',fnd_date.date_to_chardate(l_suggest_receive_date,calendar_aware=>FND_DATE.calendar_aware_alt));
1103: ELSE
1104: IF (p_update_flag <> 'Y') THEN
1097: ELSE
1098: FND_MESSAGE.SET_NAME('WSH','WSH_REC_DATE_ALT_UPDATE');
1099: END IF;
1100: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_entity_id));
1101: FND_MESSAGE.SET_TOKEN('RECEIVE',fnd_date.date_to_chardate(p_receive_date,calendar_aware=>FND_DATE.calendar_aware_alt));
1102: FND_MESSAGE.SET_TOKEN('SUGGESTED',fnd_date.date_to_chardate(l_suggest_receive_date,calendar_aware=>FND_DATE.calendar_aware_alt));
1103: ELSE
1104: IF (p_update_flag <> 'Y') THEN
1105: FND_MESSAGE.SET_NAME('WSH','WSH_CAL_REC_DATE_ALT');
1098: FND_MESSAGE.SET_NAME('WSH','WSH_REC_DATE_ALT_UPDATE');
1099: END IF;
1100: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_entity_id));
1101: FND_MESSAGE.SET_TOKEN('RECEIVE',fnd_date.date_to_chardate(p_receive_date,calendar_aware=>FND_DATE.calendar_aware_alt));
1102: FND_MESSAGE.SET_TOKEN('SUGGESTED',fnd_date.date_to_chardate(l_suggest_receive_date,calendar_aware=>FND_DATE.calendar_aware_alt));
1103: ELSE
1104: IF (p_update_flag <> 'Y') THEN
1105: FND_MESSAGE.SET_NAME('WSH','WSH_CAL_REC_DATE_ALT');
1106: ELSE
1101: FND_MESSAGE.SET_TOKEN('RECEIVE',fnd_date.date_to_chardate(p_receive_date,calendar_aware=>FND_DATE.calendar_aware_alt));
1102: FND_MESSAGE.SET_TOKEN('SUGGESTED',fnd_date.date_to_chardate(l_suggest_receive_date,calendar_aware=>FND_DATE.calendar_aware_alt));
1103: ELSE
1104: IF (p_update_flag <> 'Y') THEN
1105: FND_MESSAGE.SET_NAME('WSH','WSH_CAL_REC_DATE_ALT');
1106: ELSE
1107: FND_MESSAGE.SET_NAME('WSH','WSH_CAL_REC_DATE_ALT_UPDATE');
1108: END IF;
1109: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_entity_id));
1103: ELSE
1104: IF (p_update_flag <> 'Y') THEN
1105: FND_MESSAGE.SET_NAME('WSH','WSH_CAL_REC_DATE_ALT');
1106: ELSE
1107: FND_MESSAGE.SET_NAME('WSH','WSH_CAL_REC_DATE_ALT_UPDATE');
1108: END IF;
1109: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_entity_id));
1110: --Bug 8687915: Passing the date validated against Receiving Calendar, instead of p_recv_date.
1111: FND_MESSAGE.SET_TOKEN('RECEIVE',fnd_date.date_to_chardate(l_temp_suggest_receive_date,calendar_aware=>FND_DATE.calendar_aware_alt));
1105: FND_MESSAGE.SET_NAME('WSH','WSH_CAL_REC_DATE_ALT');
1106: ELSE
1107: FND_MESSAGE.SET_NAME('WSH','WSH_CAL_REC_DATE_ALT_UPDATE');
1108: END IF;
1109: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_entity_id));
1110: --Bug 8687915: Passing the date validated against Receiving Calendar, instead of p_recv_date.
1111: FND_MESSAGE.SET_TOKEN('RECEIVE',fnd_date.date_to_chardate(l_temp_suggest_receive_date,calendar_aware=>FND_DATE.calendar_aware_alt));
1112: FND_MESSAGE.SET_TOKEN('SUGGESTED',fnd_date.date_to_chardate(l_suggest_receive_date,calendar_aware=>FND_DATE.calendar_aware_alt));
1113: END IF;
1107: FND_MESSAGE.SET_NAME('WSH','WSH_CAL_REC_DATE_ALT_UPDATE');
1108: END IF;
1109: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_entity_id));
1110: --Bug 8687915: Passing the date validated against Receiving Calendar, instead of p_recv_date.
1111: FND_MESSAGE.SET_TOKEN('RECEIVE',fnd_date.date_to_chardate(l_temp_suggest_receive_date,calendar_aware=>FND_DATE.calendar_aware_alt));
1112: FND_MESSAGE.SET_TOKEN('SUGGESTED',fnd_date.date_to_chardate(l_suggest_receive_date,calendar_aware=>FND_DATE.calendar_aware_alt));
1113: END IF;
1114: --
1115: -- Debug Statements
1108: END IF;
1109: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_entity_id));
1110: --Bug 8687915: Passing the date validated against Receiving Calendar, instead of p_recv_date.
1111: FND_MESSAGE.SET_TOKEN('RECEIVE',fnd_date.date_to_chardate(l_temp_suggest_receive_date,calendar_aware=>FND_DATE.calendar_aware_alt));
1112: FND_MESSAGE.SET_TOKEN('SUGGESTED',fnd_date.date_to_chardate(l_suggest_receive_date,calendar_aware=>FND_DATE.calendar_aware_alt));
1113: END IF;
1114: --
1115: -- Debug Statements
1116: --
1122: wsh_util_core.add_message(x_return_status);
1123: END IF;
1124:
1125: IF (l_return_code = 6) THEN
1126: FND_MESSAGE.SET_NAME('WSH','WSH_CAL_INV_DATES');
1127: --
1128: -- Debug Statements
1129: --
1130: IF l_debug_on THEN
1130: IF l_debug_on THEN
1131: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
1132: END IF;
1133: --
1134: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_entity_id));
1135: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1136: wsh_util_core.add_message(x_return_status);
1137: END IF;
1138:
1301: l_delivery_type;
1302:
1303: IF (delivery_info%NOTFOUND) THEN
1304: CLOSE delivery_info;
1305: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_NOT_FOUND');
1306: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1307: wsh_util_core.add_message(x_return_status);
1308: --
1309: -- Debug Statements
1354: FETCH delivery_details INTO l_detail_id;
1355:
1356: IF (delivery_details%NOTFOUND) THEN
1357: CLOSE delivery_details;
1358: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_NO_DETAILS');
1359: --
1360: -- Debug Statements
1361: --
1362: IF l_debug_on THEN
1362: IF l_debug_on THEN
1363: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
1364: END IF;
1365: --
1366: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
1367: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1368: wsh_util_core.add_message(x_return_status);
1369: --
1370: -- Debug Statements
1412: RETURN;
1413: END IF;
1414:
1415: IF NOT (l_valid_flag) THEN
1416: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_SMC_INCOMPLETE');
1417: IF l_debug_on THEN
1418: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
1419: END IF;
1420: --
1417: IF l_debug_on THEN
1418: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
1419: END IF;
1420: --
1421: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
1422: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1423: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status);
1424: END IF;
1425:
1444: RETURN;
1445: END IF;
1446:
1447: IF NOT (l_valid_flag) THEN
1448: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_SHIP_SET_INCOMPLETE');
1449:
1450: -- Bug 2429632 Added a Delivery Name Token to the above error message
1451: --
1452: -- Debug Statements
1454: IF l_debug_on THEN
1455: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
1456: END IF;
1457: --
1458: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
1459: -- End Bug 2429632
1460:
1461: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1462: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status);
1570: END IF;
1571: --
1572: EXCEPTION
1573: WHEN NO_FREIGHT_CODE THEN
1574: fnd_message.set_name('WSH','WSH_FREIGHT_CODE_NOT_FOUND');
1575: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR);
1576: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1577: --
1578: -- Debug Statements
1656: FETCH delivery_status INTO l_status_code, l_planned_flag,l_shipment_direction;
1657:
1658: IF (delivery_status%NOTFOUND) THEN
1659: CLOSE delivery_status;
1660: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_NOT_FOUND');
1661: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1662: wsh_util_core.add_message(x_return_status);
1663: --
1664: -- Debug Statements
1778:
1779: Check_Plan( l_delivery_id, x_return_status);
1780:
1781: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1782: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_PLAN_ERROR');
1783: --
1784: -- Debug Statements
1785: --
1786: IF l_debug_on THEN
1786: IF l_debug_on THEN
1787: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
1788: END IF;
1789: --
1790: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(l_delivery_id));
1791: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1792: wsh_util_core.add_message(x_return_status);
1793: --
1794: -- Debug Statements
1800: RETURN;
1801: END IF;
1802:
1803: IF (l_gr_weight IS NULL) or (l_gr_weight = 0) or (l_wt_uom IS NULL) THEN
1804: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_LT_WT_VOL_MISSING');
1805: --
1806: -- Debug Statements
1807: --
1808: IF l_debug_on THEN
1808: IF l_debug_on THEN
1809: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
1810: END IF;
1811: --
1812: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(l_delivery_id));
1813: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1814: wsh_util_core.add_message(x_return_status);
1815: --
1816: -- Debug Statements
1822: RETURN;
1823: END IF;
1824:
1825: IF (l_volume IS NULL) or (l_volume = 0) or (l_vol_uom IS NULL) THEN
1826: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_LT_WT_VOL_MISSING');
1827: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1828: wsh_util_core.add_message(x_return_status);
1829: ELSE
1830: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2171: RETURN;
2172: END IF;
2173:
2174: IF (l_group_by_attr.ship_method = 'Y') AND (l_trip_ship_method <> l_del_ship_method) THEN
2175: FND_MESSAGE.SET_NAME('WSH','WSH_TRIP_SHIP_METHOD_NOT_SAME');
2176: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2177: wsh_util_core.add_message(x_return_status);
2178: END IF;
2179:
2276:
2277:
2278:
2279: WHEN invalid_del_trip_shipmethod THEN
2280: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_ASSIGN_TR_SHIP');
2281: --
2282: -- Debug Statements
2283: --
2284: IF l_debug_on THEN
2284: IF l_debug_on THEN
2285: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2286: END IF;
2287: --
2288: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2289: --
2290: -- Debug Statements
2291: --
2292: IF l_debug_on THEN
2292: IF l_debug_on THEN
2293: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2294: END IF;
2295: --
2296: FND_MESSAGE.SET_TOKEN('TRIP_NAME',wsh_trips_pvt.get_name(p_trip_id));
2297: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2298: wsh_util_core.add_message(x_return_status);
2299:
2300: --
2305: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:INVALID_DEL_TRIP_SHIPMETHOD');
2306: END IF;
2307: --
2308: WHEN invalid_tripshipmethod_del_org THEN
2309: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_ASSIGN_TR_SM_ORG');
2310: --
2311: -- Debug Statements
2312: --
2313: IF l_debug_on THEN
2313: IF l_debug_on THEN
2314: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2315: END IF;
2316: --
2317: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2318: --
2319: -- Debug Statements
2320: --
2321: IF l_debug_on THEN
2321: IF l_debug_on THEN
2322: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2323: END IF;
2324: --
2325: FND_MESSAGE.SET_TOKEN('TRIP_NAME',wsh_trips_pvt.get_name(p_trip_id));
2326: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2327: wsh_util_core.add_message(x_return_status);
2328:
2329: --
2334: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:INVALID_TRIPSHIPMETHOD_DEL_ORG');
2335: END IF;
2336: --
2337: WHEN invalid_status THEN
2338: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_ASSIGN_TR_STATUS');
2339: --
2340: -- Debug Statements
2341: --
2342: IF l_debug_on THEN
2342: IF l_debug_on THEN
2343: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2344: END IF;
2345: --
2346: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2347: --
2348: -- Debug Statements
2349: --
2350: IF l_debug_on THEN
2350: IF l_debug_on THEN
2351: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2352: END IF;
2353: --
2354: FND_MESSAGE.SET_TOKEN('TRIP_NAME',wsh_trips_pvt.get_name(p_trip_id));
2355: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2356: wsh_util_core.add_message(x_return_status);
2357:
2358: --
2364: END IF;
2365: --
2366:
2367: WHEN trip_firm THEN
2368: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_ASSIGN_TR_FIRM');
2369: IF l_debug_on THEN
2370: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2371: END IF;
2372: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2368: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_ASSIGN_TR_FIRM');
2369: IF l_debug_on THEN
2370: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2371: END IF;
2372: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2373: IF l_debug_on THEN
2374: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2375: END IF;
2376: FND_MESSAGE.SET_TOKEN('TRIP_NAME',wsh_trips_pvt.get_name(p_trip_id));
2372: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2373: IF l_debug_on THEN
2374: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2375: END IF;
2376: FND_MESSAGE.SET_TOKEN('TRIP_NAME',wsh_trips_pvt.get_name(p_trip_id));
2377: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2378: wsh_util_core.add_message(x_return_status);
2379: IF l_debug_on THEN
2380: WSH_DEBUG_SV.logmsg(l_module_name,'TRIP_FIRM exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2380: WSH_DEBUG_SV.logmsg(l_module_name,'TRIP_FIRM exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2381: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:TRIP_FIRM');
2382: END IF;
2383: WHEN trip_diffignore THEN
2384: FND_MESSAGE.SET_NAME('WSH','WSH_DELASSIGNTR_IGNORE');
2385: IF l_debug_on THEN
2386: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2387: END IF;
2388: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2384: FND_MESSAGE.SET_NAME('WSH','WSH_DELASSIGNTR_IGNORE');
2385: IF l_debug_on THEN
2386: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2387: END IF;
2388: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2389: IF l_debug_on THEN
2390: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2391: END IF;
2392: FND_MESSAGE.SET_TOKEN('TRIP_NAME',wsh_trips_pvt.get_name(p_trip_id));
2388: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2389: IF l_debug_on THEN
2390: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2391: END IF;
2392: FND_MESSAGE.SET_TOKEN('TRIP_NAME',wsh_trips_pvt.get_name(p_trip_id));
2393: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2394: wsh_util_core.add_message(x_return_status);
2395: IF l_debug_on THEN
2396: WSH_DEBUG_SV.logmsg(l_module_name,'TRIP_DIFFIGNORE exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2481:
2482: CLOSE delivery_status;
2483:
2484: IF (l_del_status = 'CL') THEN
2485: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_ASSIGN_TR_STATUS');
2486: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2487: wsh_util_core.add_message(x_return_status);
2488: --
2489: -- Debug Statements
2526:
2527: CLOSE trip_status;
2528:
2529: IF (l_trip_status = 'CL') THEN
2530: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_ASSIGN_TR_STATUS');
2531: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2532: wsh_util_core.add_message(x_return_status);
2533: --
2534: -- Debug Statements
2654: RETURN;
2655: END IF;
2656:
2657: IF (l_del_status NOT IN ('OP', 'SA')) THEN -- sperera 940/945
2658: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_NOT_OP_PA_STATUS');
2659: --
2660: -- Debug Statements
2661: --
2662: IF l_debug_on THEN
2662: IF l_debug_on THEN
2663: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2664: END IF;
2665: --
2666: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2667: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2668: wsh_util_core.add_message(x_return_status);
2669: --
2670: -- Debug Statements
2686: EXIT WHEN detail_info%NOTFOUND;
2687:
2688: --IF (detail_info%FOUND) THEN
2689: IF (l_container_id IS NULL) THEN
2690: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_PACK_ITEMS_UNPACKED');
2691: --
2692: -- Debug Statements
2693: --
2694: IF l_debug_on THEN
2694: IF l_debug_on THEN
2695: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2696: END IF;
2697: --
2698: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2699: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2700: wsh_util_core.add_message(x_return_status);
2701: --
2702: -- Debug Statements
2718: wsh_wv_utils.check_fill_pc( p_container_instance_id => l_container_id,
2719: x_fill_status => l_fill_status,
2720: x_return_status => l_return_status);
2721: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2722: -- FND_MESSAGE.SET_NAME('WSH','Error-in-fill-percent');
2723: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2724: -- wsh_util_core.add_message(x_return_status);
2725: ELSIF (l_fill_status = 'U') THEN
2726: l_underfilled_flag := TRUE;
2735: END LOOP;
2736: CLOSE detail_info;
2737:
2738: IF (l_overfilled_flag) THEN
2739: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CONT_OVERPACKED');
2740: --
2741: -- Debug Statements
2742: --
2743: IF l_debug_on THEN
2743: IF l_debug_on THEN
2744: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2745: END IF;
2746: --
2747: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2748: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2749: wsh_util_core.add_message(x_return_status);
2750: END IF;
2751:
2749: wsh_util_core.add_message(x_return_status);
2750: END IF;
2751:
2752: IF (l_underfilled_flag) THEN
2753: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CONT_UNDERPACKED');
2754: --
2755: -- Debug Statements
2756: --
2757: IF l_debug_on THEN
2757: IF l_debug_on THEN
2758: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2759: END IF;
2760: --
2761: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2762: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2763: wsh_util_core.add_message(x_return_status);
2764: END IF;
2765:
2764: END IF;
2765:
2766: --IF (l_container_id IS NULL) THEN
2767: IF (l_count_detail = 0) THEN /*Bug #1701366 Issue 3 */
2768: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_NO_DETAILS');
2769: --
2770: -- Debug Statements
2771: --
2772: IF l_debug_on THEN
2772: IF l_debug_on THEN
2773: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2774: END IF;
2775: --
2776: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
2777: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2778: wsh_util_core.add_message(x_return_status);
2779: --
2780: -- Debug Statements
3441: RETURN;
3442: END IF;
3443:
3444: IF NOT (l_valid_flag) THEN
3445: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_SMC_INCOMPLETE');
3446: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
3447:
3448: IF l_debug_on THEN
3449: WSH_DEBUG_SV.log(l_module_name,'g_break_smc_severity',g_break_smc_severity);
3442: END IF;
3443:
3444: IF NOT (l_valid_flag) THEN
3445: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_SMC_INCOMPLETE');
3446: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
3447:
3448: IF l_debug_on THEN
3449: WSH_DEBUG_SV.log(l_module_name,'g_break_smc_severity',g_break_smc_severity);
3450: END IF;
3498: RETURN;
3499: END IF;
3500:
3501: IF NOT (l_valid_flag) THEN
3502: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_SHIP_SET_INCOMPLETE');
3503: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
3504:
3505: IF l_debug_on THEN
3506: WSH_DEBUG_SV.log(l_module_name,'g_break_ship_set_severity',g_break_ship_set_severity);
3499: END IF;
3500:
3501: IF NOT (l_valid_flag) THEN
3502: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_SHIP_SET_INCOMPLETE');
3503: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
3504:
3505: IF l_debug_on THEN
3506: WSH_DEBUG_SV.log(l_module_name,'g_break_ship_set_severity',g_break_ship_set_severity);
3507: END IF;
3691:
3692: CLOSE delivery_status;
3693:
3694: IF (l_del_status <> 'CO') AND (l_del_status <> 'PA') AND (l_del_status <> 'OP') THEN
3695: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_NOT_CO_PA_STATUS');
3696: --
3697: -- Debug Statements
3698: --
3699: IF l_debug_on THEN
3699: IF l_debug_on THEN
3700: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3701: END IF;
3702: --
3703: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
3704: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3705: wsh_util_core.add_message(x_return_status);
3706: --
3707: -- Debug Statements
3807:
3808: CLOSE delivery_status;
3809:
3810: IF (l_del_status <> 'CO') THEN
3811: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_NOT_CONFIRMED');
3812: --
3813: -- Debug Statements
3814: --
3815: IF l_debug_on THEN
3815: IF l_debug_on THEN
3816: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3817: END IF;
3818: --
3819: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
3820: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3821: wsh_util_core.add_message(x_return_status);
3822: --
3823: -- Debug Statements
3842:
3843: CLOSE stop_status;
3844:
3845: IF (l_stop_status <> 'CL') THEN
3846: FND_MESSAGE.SET_NAME('WSH','First-pickup-stop-not-closed');
3847: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3848: wsh_util_core.add_message(x_return_status);
3849: RETURN;
3850: END IF;
4383: --
4384: -- Delivery associated with stops which are not closed
4385: -- Cannot close delivery.
4386: --
4387: FND_MESSAGE.SET_NAME('WSH', 'WSH_DLVY_NO_CLOSE_OPEN_STOP');
4388: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(p_in_rec.delivery_id));
4389: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR, l_module_name);
4390: RAISE wsh_util_core.e_not_allowed;
4391: END IF;
4384: -- Delivery associated with stops which are not closed
4385: -- Cannot close delivery.
4386: --
4387: FND_MESSAGE.SET_NAME('WSH', 'WSH_DLVY_NO_CLOSE_OPEN_STOP');
4388: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(p_in_rec.delivery_id));
4389: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR, l_module_name);
4390: RAISE wsh_util_core.e_not_allowed;
4391: END IF;
4392: CLOSE stops_not_closed;
4400: --
4401: -- POD not received
4402: -- Cannot close delivery.
4403: --
4404: FND_MESSAGE.SET_NAME('WSH', 'WSH_DLVY_NO_CLOSE_POD');
4405: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(p_in_rec.delivery_id));
4406: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR, l_module_name);
4407: RAISE wsh_util_core.e_not_allowed;
4408: END IF;
4401: -- POD not received
4402: -- Cannot close delivery.
4403: --
4404: FND_MESSAGE.SET_NAME('WSH', 'WSH_DLVY_NO_CLOSE_POD');
4405: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(p_in_rec.delivery_id));
4406: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR, l_module_name);
4407: RAISE wsh_util_core.e_not_allowed;
4408: END IF;
4409: --
4425: --
4426: -- Delivery has lines
4427: -- Cannot close delivery.
4428: --
4429: FND_MESSAGE.SET_NAME('WSH', 'WSH_DLVY_NO_CLOSE_DETAIL');
4430: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(p_in_rec.delivery_id));
4431: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR, l_module_name);
4432: RAISE wsh_util_core.e_not_allowed;
4433:
4426: -- Delivery has lines
4427: -- Cannot close delivery.
4428: --
4429: FND_MESSAGE.SET_NAME('WSH', 'WSH_DLVY_NO_CLOSE_DETAIL');
4430: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(p_in_rec.delivery_id));
4431: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR, l_module_name);
4432: RAISE wsh_util_core.e_not_allowed;
4433:
4434: END IF;
4445: --
4446: -- Delivery has legs
4447: -- Cannot close delivery.
4448: --
4449: FND_MESSAGE.SET_NAME('WSH', 'WSH_DLVY_NO_CLOSE_LEGS');
4450: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(p_in_rec.delivery_id));
4451: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR, l_module_name);
4452:
4453: RAISE wsh_util_core.e_not_allowed;
4446: -- Delivery has legs
4447: -- Cannot close delivery.
4448: --
4449: FND_MESSAGE.SET_NAME('WSH', 'WSH_DLVY_NO_CLOSE_LEGS');
4450: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(p_in_rec.delivery_id));
4451: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR, l_module_name);
4452:
4453: RAISE wsh_util_core.e_not_allowed;
4454: END IF;
4468: --
4469: IF shared_stops_csr%FOUND
4470: THEN
4471: --CLOSE shared_stops_csr;
4472: FND_MESSAGE.SET_NAME('WSH', 'WSH_DLVY_NO_CLOSE_SHR_STOPS');
4473: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(p_in_rec.delivery_id));
4474: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR, l_module_name);
4475: RAISE wsh_util_core.e_not_allowed;
4476: END IF;
4469: IF shared_stops_csr%FOUND
4470: THEN
4471: --CLOSE shared_stops_csr;
4472: FND_MESSAGE.SET_NAME('WSH', 'WSH_DLVY_NO_CLOSE_SHR_STOPS');
4473: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(p_in_rec.delivery_id));
4474: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR, l_module_name);
4475: RAISE wsh_util_core.e_not_allowed;
4476: END IF;
4477: --
4509: END IF;
4510: FOR exp_cnt in 1..l_exceptions_tab.COUNT LOOP
4511: IF l_exceptions_tab(exp_cnt).exception_behavior = 'ERROR' THEN
4512: IF l_exceptions_tab(exp_cnt).entity_name = 'DELIVERY' THEN
4513: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_ENTITY');
4514: ELSE
4515: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
4516: END IF;
4517: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
4511: IF l_exceptions_tab(exp_cnt).exception_behavior = 'ERROR' THEN
4512: IF l_exceptions_tab(exp_cnt).entity_name = 'DELIVERY' THEN
4513: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_ENTITY');
4514: ELSE
4515: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
4516: END IF;
4517: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
4518: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
4519: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Error');
4513: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_ENTITY');
4514: ELSE
4515: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
4516: END IF;
4517: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
4518: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
4519: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Error');
4520: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4521: wsh_util_core.add_message(x_return_status);
4514: ELSE
4515: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
4516: END IF;
4517: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
4518: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
4519: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Error');
4520: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4521: wsh_util_core.add_message(x_return_status);
4522: l_num_warnings := l_num_warnings + 1 ;
4515: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
4516: END IF;
4517: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
4518: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
4519: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Error');
4520: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4521: wsh_util_core.add_message(x_return_status);
4522: l_num_warnings := l_num_warnings + 1 ;
4523: RAISE wsh_util_core.e_not_allowed;
4522: l_num_warnings := l_num_warnings + 1 ;
4523: RAISE wsh_util_core.e_not_allowed;
4524: ELSIF l_exceptions_tab(exp_cnt).exception_behavior = 'WARNING' THEN
4525: IF l_exceptions_tab(exp_cnt).entity_name = 'DELIVERY' THEN
4526: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_ENTITY');
4527: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
4528: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
4529: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Warning');
4530: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4523: RAISE wsh_util_core.e_not_allowed;
4524: ELSIF l_exceptions_tab(exp_cnt).exception_behavior = 'WARNING' THEN
4525: IF l_exceptions_tab(exp_cnt).entity_name = 'DELIVERY' THEN
4526: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_ENTITY');
4527: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
4528: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
4529: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Warning');
4530: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4531: wsh_util_core.add_message(x_return_status);
4524: ELSIF l_exceptions_tab(exp_cnt).exception_behavior = 'WARNING' THEN
4525: IF l_exceptions_tab(exp_cnt).entity_name = 'DELIVERY' THEN
4526: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_ENTITY');
4527: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
4528: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
4529: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Warning');
4530: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4531: wsh_util_core.add_message(x_return_status);
4532: l_num_warnings := l_num_warnings + 1 ;
4525: IF l_exceptions_tab(exp_cnt).entity_name = 'DELIVERY' THEN
4526: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_ENTITY');
4527: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
4528: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
4529: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Warning');
4530: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4531: wsh_util_core.add_message(x_return_status);
4532: l_num_warnings := l_num_warnings + 1 ;
4533: l_exp_warning := TRUE;
4531: wsh_util_core.add_message(x_return_status);
4532: l_num_warnings := l_num_warnings + 1 ;
4533: l_exp_warning := TRUE;
4534: ELSIF NOT (l_exp_logged) THEN
4535: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
4536: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
4537: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
4538: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Warning');
4539: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4532: l_num_warnings := l_num_warnings + 1 ;
4533: l_exp_warning := TRUE;
4534: ELSIF NOT (l_exp_logged) THEN
4535: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
4536: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
4537: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
4538: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Warning');
4539: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4540: l_exp_logged := TRUE;
4533: l_exp_warning := TRUE;
4534: ELSIF NOT (l_exp_logged) THEN
4535: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
4536: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
4537: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
4538: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Warning');
4539: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4540: l_exp_logged := TRUE;
4541: wsh_util_core.add_message(x_return_status);
4534: ELSIF NOT (l_exp_logged) THEN
4535: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
4536: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
4537: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
4538: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Warning');
4539: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4540: l_exp_logged := TRUE;
4541: wsh_util_core.add_message(x_return_status);
4542: l_num_warnings := l_num_warnings + 1 ;
4761: END IF;
4762: --
4763:
4764: IF (l_del_status = 'CL') OR (l_del_status = 'CO') THEN
4765: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_DELETE_ERROR');
4766: --
4767: -- Debug Statements
4768: --
4769: IF l_debug_on THEN
4769: IF l_debug_on THEN
4770: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4771: END IF;
4772: --
4773: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
4774: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4775: wsh_util_core.add_message(x_return_status);
4776: END IF;
4777: --
4780: -- Routing response is sent for delivery, cannot be deleted.
4781: --
4782: IF l_routingResponseId IS NOT NULL
4783: THEN
4784: FND_MESSAGE.SET_NAME('WSH','WSH_IB_DELETE_DELIVERY');
4785: --
4786: -- Debug Statements
4787: --
4788: IF l_debug_on THEN
4788: IF l_debug_on THEN
4789: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4790: END IF;
4791: --
4792: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
4793: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4794: wsh_util_core.add_message(x_return_status);
4795: END IF;
4796: --} --J-IB-NPARIKH
4799: l_flag := 'Y';
4800: END LOOP;
4801:
4802: IF (l_flag = 'Y') THEN
4803: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_DETAILS_UNASSIGNED');
4804: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(p_delivery_id));
4805: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4806: wsh_util_core.add_message(x_return_status);
4807: END IF;
4800: END LOOP;
4801:
4802: IF (l_flag = 'Y') THEN
4803: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_DETAILS_UNASSIGNED');
4804: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(p_delivery_id));
4805: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4806: wsh_util_core.add_message(x_return_status);
4807: END IF;
4808:
4812: l_flag := 'Y';
4813: END LOOP;
4814:
4815: IF (l_flag = 'Y') and l_delivery_type = 'STANDARD' THEN
4816: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_DELETE_WITH_LEGS');
4817: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4818: --
4819: -- Debug Statements
4820: --
4821: IF l_debug_on THEN
4822: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4823: END IF;
4824: --
4825: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(p_delivery_id));
4826: wsh_util_core.add_message(x_return_status);
4827: END IF;
4828:
4829: -- 3. Checks if freight costs exist for the delivery and locks them
4832: l_flag := 'Y';
4833: END LOOP;
4834:
4835: IF (l_flag = 'Y') THEN
4836: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_DELETE_WITH_FC');
4837: --
4838: -- Debug Statements
4839: --
4840: IF l_debug_on THEN
4840: IF l_debug_on THEN
4841: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4842: END IF;
4843: --
4844: FND_MESSAGE.SET_TOKEN('DEL_NAME', wsh_new_deliveries_pvt.get_name(p_delivery_id));
4845: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4846: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status);
4847: END IF;
4848:
4872: IF (freight_costs_exist%ISOPEN) THEN
4873: CLOSE freight_costs_exist;
4874: END IF;
4875:
4876: FND_MESSAGE.SET_NAME('WSH','WSH_OTM_DEL_DELETE_ERROR');
4877: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4878: WSH_UTIL_CORE.add_message(x_return_status,l_module_name);
4879:
4880: IF l_debug_on THEN
4902: END IF;
4903:
4904: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4905:
4906: FND_MESSAGE.Set_Name('WSH', 'WSH_NO_LOCK');
4907: wsh_util_core.add_message(x_return_status,l_module_name);
4908:
4909:
4910: IF l_debug_on THEN
5016:
5017: CLOSE delivery_status;
5018:
5019: IF (l_del_status <> 'OP') AND (l_del_status <> 'PA') THEN
5020: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_NOT_OP_PA_STATUS');
5021: --
5022: -- Debug Statements
5023: --
5024: IF l_debug_on THEN
5024: IF l_debug_on THEN
5025: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5026: END IF;
5027: --
5028: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
5029: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5030: wsh_util_core.add_message(x_return_status);
5031: --
5032: -- Debug Statements
5071: FETCH detail_info INTO l_detail_num;
5072: CLOSE detail_info;
5073:
5074: IF (l_detail_num <> 0) AND (l_detail_num IS NOT NULL) THEN
5075: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CHANGE_SH_M_ERROR');
5076: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5077: wsh_util_core.add_message(x_return_status);
5078: END IF;
5079: END IF;
5615: --
5616: EXCEPTION
5617: WHEN e_all_disabled THEN --3509004:public api changes
5618: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5619: FND_MESSAGE.SET_NAME('WSH','WSH_ALL_COLS_DISABLED');
5620: FND_MESSAGE.Set_Token('ENTITY_ID',p_delivery_id);
5621: wsh_util_core.add_message(x_return_status,l_module_name);
5622: IF l_debug_on THEN
5623: -- Nothing is updateable
5616: EXCEPTION
5617: WHEN e_all_disabled THEN --3509004:public api changes
5618: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5619: FND_MESSAGE.SET_NAME('WSH','WSH_ALL_COLS_DISABLED');
5620: FND_MESSAGE.Set_Token('ENTITY_ID',p_delivery_id);
5621: wsh_util_core.add_message(x_return_status,l_module_name);
5622: IF l_debug_on THEN
5623: -- Nothing is updateable
5624: WSH_DEBUG_SV.pop(l_module_name,'e_all_disabled');
5626:
5627:
5628: WHEN wsh_dp_no_entity THEN
5629: x_return_status := FND_API.G_RET_STS_ERROR;
5630: FND_MESSAGE.SET_NAME('WSH', 'WSH_DP_NO_ENTITY');
5631: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status);
5632: WSH_UTIL_CORE.get_messages('Y', l_msg_summary, l_msg_details, x_msg_count);
5633: IF x_msg_count > 1 then
5634: x_msg_data := l_msg_summary || l_msg_details;
5645: END IF;
5646: --
5647: WHEN wsh_inv_list_type THEN
5648: x_return_status := FND_API.G_RET_STS_ERROR;
5649: FND_MESSAGE.SET_NAME('WSH', 'WSH_INV_LIST_TYPE');
5650: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status);
5651: WSH_UTIL_CORE.get_messages('Y', l_msg_summary, l_msg_details, x_msg_count);
5652: IF x_msg_count > 1 then
5653: x_msg_data := l_msg_summary || l_msg_details;
6084: l_total_quantities.expected_quantity := l_total_quantities.expected_quantity
6085: + l_bad_quantities.expected_quantity;
6086: ELSE
6087: CLOSE c_total_line_quantities;
6088: FND_MESSAGE.SET_NAME('WSH','WSH_DATA_CORRUPTION');
6089: WSH_UTIL_CORE.ADD_MESSAGE(FND_API.G_RET_STS_ERROR);
6090: raise others ;
6091: END IF;
6092:
6173: IF l_source_line_set_id IS NULL THEN
6174: IF l_source_header_type_name is NOT NULL THEN
6175: -- muom
6176: IF l_flag = 'P' THEN
6177: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOLERANCE_EXCEEDED');
6178: ELSE
6179: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOLERANCE_EXCEEDED2');
6180: END IF;
6181: FND_MESSAGE.SET_TOKEN('ORDER_TYPE',l_source_header_type_name);
6175: -- muom
6176: IF l_flag = 'P' THEN
6177: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOLERANCE_EXCEEDED');
6178: ELSE
6179: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOLERANCE_EXCEEDED2');
6180: END IF;
6181: FND_MESSAGE.SET_TOKEN('ORDER_TYPE',l_source_header_type_name);
6182: ELSE
6183: -- muom
6177: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOLERANCE_EXCEEDED');
6178: ELSE
6179: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOLERANCE_EXCEEDED2');
6180: END IF;
6181: FND_MESSAGE.SET_TOKEN('ORDER_TYPE',l_source_header_type_name);
6182: ELSE
6183: -- muom
6184: IF l_flag = 'P' THEN
6185: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOLERANCE_EXCEEDED_OR');
6181: FND_MESSAGE.SET_TOKEN('ORDER_TYPE',l_source_header_type_name);
6182: ELSE
6183: -- muom
6184: IF l_flag = 'P' THEN
6185: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOLERANCE_EXCEEDED_OR');
6186: ELSE
6187: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOLERANCE_EXCEEDED_OR2');
6188: END IF;
6189: END IF;
6183: -- muom
6184: IF l_flag = 'P' THEN
6185: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOLERANCE_EXCEEDED_OR');
6186: ELSE
6187: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOLERANCE_EXCEEDED_OR2');
6188: END IF;
6189: END IF;
6190: ELSE
6191: IF l_source_header_type_name is NOT NULL THEN
6190: ELSE
6191: IF l_source_header_type_name is NOT NULL THEN
6192: -- muom
6193: IF l_flag = 'P' THEN
6194: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOLERANCE_EXCEED_LS');
6195: ELSE
6196: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOLERANCE_EXCEED_LS2');
6197: END IF;
6198: FND_MESSAGE.SET_TOKEN('ORDER_TYPE',l_source_header_type_name);
6192: -- muom
6193: IF l_flag = 'P' THEN
6194: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOLERANCE_EXCEED_LS');
6195: ELSE
6196: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOLERANCE_EXCEED_LS2');
6197: END IF;
6198: FND_MESSAGE.SET_TOKEN('ORDER_TYPE',l_source_header_type_name);
6199: ELSE
6200: -- muom
6194: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOLERANCE_EXCEED_LS');
6195: ELSE
6196: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOLERANCE_EXCEED_LS2');
6197: END IF;
6198: FND_MESSAGE.SET_TOKEN('ORDER_TYPE',l_source_header_type_name);
6199: ELSE
6200: -- muom
6201: IF l_flag = 'P' THEN
6202: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOLERANCE_EXCEED_LS_OR');
6198: FND_MESSAGE.SET_TOKEN('ORDER_TYPE',l_source_header_type_name);
6199: ELSE
6200: -- muom
6201: IF l_flag = 'P' THEN
6202: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOLERANCE_EXCEED_LS_OR');
6203: ELSE
6204: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOLERANCE_EXCEED_LS_O2');
6205: END IF;
6206: END IF;
6200: -- muom
6201: IF l_flag = 'P' THEN
6202: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOLERANCE_EXCEED_LS_OR');
6203: ELSE
6204: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOLERANCE_EXCEED_LS_O2');
6205: END IF;
6206: END IF;
6207: END IF;
6208: --
6211: IF l_debug_on THEN
6212: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
6213: END IF;
6214: --
6215: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
6216: FND_MESSAGE.SET_TOKEN('ORDER_NUMBER',l_source_header_number);
6217: FND_MESSAGE.SET_TOKEN('SOURCE_SYSTEM',l_source_system);
6218: FND_MESSAGE.SET_TOKEN('LINE_NUM',ltrim( rtrim ( l_source_line_number )) );
6219: -- muom
6212: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
6213: END IF;
6214: --
6215: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
6216: FND_MESSAGE.SET_TOKEN('ORDER_NUMBER',l_source_header_number);
6217: FND_MESSAGE.SET_TOKEN('SOURCE_SYSTEM',l_source_system);
6218: FND_MESSAGE.SET_TOKEN('LINE_NUM',ltrim( rtrim ( l_source_line_number )) );
6219: -- muom
6220: IF l_flag = 'P' THEN
6213: END IF;
6214: --
6215: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
6216: FND_MESSAGE.SET_TOKEN('ORDER_NUMBER',l_source_header_number);
6217: FND_MESSAGE.SET_TOKEN('SOURCE_SYSTEM',l_source_system);
6218: FND_MESSAGE.SET_TOKEN('LINE_NUM',ltrim( rtrim ( l_source_line_number )) );
6219: -- muom
6220: IF l_flag = 'P' THEN
6221: FND_MESSAGE.SET_TOKEN('MAX_QTY',x_max_quantity);
6214: --
6215: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
6216: FND_MESSAGE.SET_TOKEN('ORDER_NUMBER',l_source_header_number);
6217: FND_MESSAGE.SET_TOKEN('SOURCE_SYSTEM',l_source_system);
6218: FND_MESSAGE.SET_TOKEN('LINE_NUM',ltrim( rtrim ( l_source_line_number )) );
6219: -- muom
6220: IF l_flag = 'P' THEN
6221: FND_MESSAGE.SET_TOKEN('MAX_QTY',x_max_quantity);
6222: ELSE
6217: FND_MESSAGE.SET_TOKEN('SOURCE_SYSTEM',l_source_system);
6218: FND_MESSAGE.SET_TOKEN('LINE_NUM',ltrim( rtrim ( l_source_line_number )) );
6219: -- muom
6220: IF l_flag = 'P' THEN
6221: FND_MESSAGE.SET_TOKEN('MAX_QTY',x_max_quantity);
6222: ELSE
6223: FND_MESSAGE.SET_TOKEN('MAX_QTY',x_max_quantity2);
6224: END IF;
6225:
6219: -- muom
6220: IF l_flag = 'P' THEN
6221: FND_MESSAGE.SET_TOKEN('MAX_QTY',x_max_quantity);
6222: ELSE
6223: FND_MESSAGE.SET_TOKEN('MAX_QTY',x_max_quantity2);
6224: END IF;
6225:
6226: -- muom
6227: ELSIF (l_flag = 'P' and x_max_quantity < 0) OR (l_flag = 'S' and x_max_quantity2 < 0) THEN
6230: -- on line being in a set or not.
6231: -- muom
6232: IF l_flag = 'P' THEN
6233: IF l_source_line_set_id IS NULL THEN
6234: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOL_EXCEEDED_REVIEW');
6235: ELSE
6236: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOL_EXCEED_REVIEW_LS');
6237: END IF;
6238: ELSE
6232: IF l_flag = 'P' THEN
6233: IF l_source_line_set_id IS NULL THEN
6234: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOL_EXCEEDED_REVIEW');
6235: ELSE
6236: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOL_EXCEED_REVIEW_LS');
6237: END IF;
6238: ELSE
6239: IF l_source_line_set_id IS NULL THEN
6240: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOL_EXCEEDED_REVIEW2');
6236: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOL_EXCEED_REVIEW_LS');
6237: END IF;
6238: ELSE
6239: IF l_source_line_set_id IS NULL THEN
6240: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOL_EXCEEDED_REVIEW2');
6241: ELSE
6242: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOL_EXCEED_REVIEW_LS2');
6243: END IF;
6244: END IF;
6238: ELSE
6239: IF l_source_line_set_id IS NULL THEN
6240: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOL_EXCEEDED_REVIEW2');
6241: ELSE
6242: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_TOL_EXCEED_REVIEW_LS2');
6243: END IF;
6244: END IF;
6245: --
6246: -- Debug Statements
6248: IF l_debug_on THEN
6249: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
6250: END IF;
6251: --
6252: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
6253: FND_MESSAGE.SET_TOKEN('ORDER_NUMBER',l_source_header_number);
6254: FND_MESSAGE.SET_TOKEN('SOURCE_SYSTEM',l_source_system);
6255: FND_MESSAGE.SET_TOKEN('ORDER_TYPE',l_source_header_type_name);
6256: FND_MESSAGE.SET_TOKEN('LINE_NUM',ltrim( rtrim ( l_source_line_number )) );
6249: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
6250: END IF;
6251: --
6252: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
6253: FND_MESSAGE.SET_TOKEN('ORDER_NUMBER',l_source_header_number);
6254: FND_MESSAGE.SET_TOKEN('SOURCE_SYSTEM',l_source_system);
6255: FND_MESSAGE.SET_TOKEN('ORDER_TYPE',l_source_header_type_name);
6256: FND_MESSAGE.SET_TOKEN('LINE_NUM',ltrim( rtrim ( l_source_line_number )) );
6257: -- muom
6250: END IF;
6251: --
6252: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
6253: FND_MESSAGE.SET_TOKEN('ORDER_NUMBER',l_source_header_number);
6254: FND_MESSAGE.SET_TOKEN('SOURCE_SYSTEM',l_source_system);
6255: FND_MESSAGE.SET_TOKEN('ORDER_TYPE',l_source_header_type_name);
6256: FND_MESSAGE.SET_TOKEN('LINE_NUM',ltrim( rtrim ( l_source_line_number )) );
6257: -- muom
6258: IF l_flag = 'P' THEN
6251: --
6252: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
6253: FND_MESSAGE.SET_TOKEN('ORDER_NUMBER',l_source_header_number);
6254: FND_MESSAGE.SET_TOKEN('SOURCE_SYSTEM',l_source_system);
6255: FND_MESSAGE.SET_TOKEN('ORDER_TYPE',l_source_header_type_name);
6256: FND_MESSAGE.SET_TOKEN('LINE_NUM',ltrim( rtrim ( l_source_line_number )) );
6257: -- muom
6258: IF l_flag = 'P' THEN
6259: FND_MESSAGE.SET_TOKEN('MAX_QTY',l_line_max_quantity);
6252: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
6253: FND_MESSAGE.SET_TOKEN('ORDER_NUMBER',l_source_header_number);
6254: FND_MESSAGE.SET_TOKEN('SOURCE_SYSTEM',l_source_system);
6255: FND_MESSAGE.SET_TOKEN('ORDER_TYPE',l_source_header_type_name);
6256: FND_MESSAGE.SET_TOKEN('LINE_NUM',ltrim( rtrim ( l_source_line_number )) );
6257: -- muom
6258: IF l_flag = 'P' THEN
6259: FND_MESSAGE.SET_TOKEN('MAX_QTY',l_line_max_quantity);
6260: ELSE
6255: FND_MESSAGE.SET_TOKEN('ORDER_TYPE',l_source_header_type_name);
6256: FND_MESSAGE.SET_TOKEN('LINE_NUM',ltrim( rtrim ( l_source_line_number )) );
6257: -- muom
6258: IF l_flag = 'P' THEN
6259: FND_MESSAGE.SET_TOKEN('MAX_QTY',l_line_max_quantity);
6260: ELSE
6261: FND_MESSAGE.SET_TOKEN('MAX_QTY',l_line_max_quantity2);
6262: END IF;
6263:
6257: -- muom
6258: IF l_flag = 'P' THEN
6259: FND_MESSAGE.SET_TOKEN('MAX_QTY',l_line_max_quantity);
6260: ELSE
6261: FND_MESSAGE.SET_TOKEN('MAX_QTY',l_line_max_quantity2);
6262: END IF;
6263:
6264: END IF;
6265:
6829: --
6830: )
6831: THEN
6832: IF l_dlvy_actions_tab(k).message_name IS NOT NULL THEN
6833: FND_MESSAGE.SET_NAME('WSH',l_dlvy_actions_tab(k).message_name);
6834: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error);
6835: END IF;
6836: raise e_record_ineligible;
6837: exit;
7175: WHEN e_record_ineligible THEN
7176: x_error_ids(x_error_ids.count +1) := p_dlvy_rec_tab(j).delivery_id;
7177: IF p_caller = 'WSH_PUB' or p_caller like 'FTE%' OR
7178: p_caller = 'WSH_TRCON' THEN
7179: FND_MESSAGE.SET_NAME('WSH','WSH_DELIVERY_ACTION_INELIGIBLE');
7180: FND_MESSAGE.Set_Token('DEL_NAME',wsh_new_deliveries_pvt.get_name(x_error_ids(x_error_ids.count)));
7181: FND_MESSAGE.Set_Token('ACTION',wsh_util_core.get_action_meaning('DLVY',p_action));
7182: wsh_util_core.add_message('E',l_module_name);
7183: END IF;
7176: x_error_ids(x_error_ids.count +1) := p_dlvy_rec_tab(j).delivery_id;
7177: IF p_caller = 'WSH_PUB' or p_caller like 'FTE%' OR
7178: p_caller = 'WSH_TRCON' THEN
7179: FND_MESSAGE.SET_NAME('WSH','WSH_DELIVERY_ACTION_INELIGIBLE');
7180: FND_MESSAGE.Set_Token('DEL_NAME',wsh_new_deliveries_pvt.get_name(x_error_ids(x_error_ids.count)));
7181: FND_MESSAGE.Set_Token('ACTION',wsh_util_core.get_action_meaning('DLVY',p_action));
7182: wsh_util_core.add_message('E',l_module_name);
7183: END IF;
7184: WHEN e_tp_record_ineligible THEN
7177: IF p_caller = 'WSH_PUB' or p_caller like 'FTE%' OR
7178: p_caller = 'WSH_TRCON' THEN
7179: FND_MESSAGE.SET_NAME('WSH','WSH_DELIVERY_ACTION_INELIGIBLE');
7180: FND_MESSAGE.Set_Token('DEL_NAME',wsh_new_deliveries_pvt.get_name(x_error_ids(x_error_ids.count)));
7181: FND_MESSAGE.Set_Token('ACTION',wsh_util_core.get_action_meaning('DLVY',p_action));
7182: wsh_util_core.add_message('E',l_module_name);
7183: END IF;
7184: WHEN e_tp_record_ineligible THEN
7185: x_error_ids(x_error_ids.count +1) := p_dlvy_rec_tab(j).delivery_id;
7184: WHEN e_tp_record_ineligible THEN
7185: x_error_ids(x_error_ids.count +1) := p_dlvy_rec_tab(j).delivery_id;
7186: IF p_caller = 'WSH_PUB' or p_caller like 'FTE%' OR
7187: p_caller = 'WSH_TRCON' THEN
7188: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_ASSIGN_FIRMTRIP_ERROR');
7189: FND_MESSAGE.Set_Token('DEL_NAME',wsh_new_deliveries_pvt.get_name(x_error_ids(x_error_ids.count)));
7190: FND_MESSAGE.Set_Token('TRIP_NAME',wsh_trips_pvt.get_name(p_tripid));
7191: wsh_util_core.add_message('E',l_module_name);
7192: END IF;
7185: x_error_ids(x_error_ids.count +1) := p_dlvy_rec_tab(j).delivery_id;
7186: IF p_caller = 'WSH_PUB' or p_caller like 'FTE%' OR
7187: p_caller = 'WSH_TRCON' THEN
7188: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_ASSIGN_FIRMTRIP_ERROR');
7189: FND_MESSAGE.Set_Token('DEL_NAME',wsh_new_deliveries_pvt.get_name(x_error_ids(x_error_ids.count)));
7190: FND_MESSAGE.Set_Token('TRIP_NAME',wsh_trips_pvt.get_name(p_tripid));
7191: wsh_util_core.add_message('E',l_module_name);
7192: END IF;
7193: WHEN e_scpod_wf_inprogress THEN --/== Workflow Changes
7186: IF p_caller = 'WSH_PUB' or p_caller like 'FTE%' OR
7187: p_caller = 'WSH_TRCON' THEN
7188: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_ASSIGN_FIRMTRIP_ERROR');
7189: FND_MESSAGE.Set_Token('DEL_NAME',wsh_new_deliveries_pvt.get_name(x_error_ids(x_error_ids.count)));
7190: FND_MESSAGE.Set_Token('TRIP_NAME',wsh_trips_pvt.get_name(p_tripid));
7191: wsh_util_core.add_message('E',l_module_name);
7192: END IF;
7193: WHEN e_scpod_wf_inprogress THEN --/== Workflow Changes
7194: x_error_ids(x_error_ids.count +1) := p_dlvy_rec_tab(j).delivery_id;
7193: WHEN e_scpod_wf_inprogress THEN --/== Workflow Changes
7194: x_error_ids(x_error_ids.count +1) := p_dlvy_rec_tab(j).delivery_id;
7195: IF p_caller = 'WSH_PUB' or p_caller like 'FTE%' OR
7196: p_caller = 'WSH_TRCON' THEN
7197: FND_MESSAGE.SET_NAME('WSH','WSH_WF_DEL_ACTION_INELIGIBLE');
7198: FND_MESSAGE.Set_Token('DEL_NAME',wsh_new_deliveries_pvt.get_name(x_error_ids(x_error_ids.count)));
7199: FND_MESSAGE.Set_Token('ACTION',wsh_util_core.get_action_meaning('DLVY',p_action));
7200: wsh_util_core.add_message('E',l_module_name); --==/
7201: END IF;
7194: x_error_ids(x_error_ids.count +1) := p_dlvy_rec_tab(j).delivery_id;
7195: IF p_caller = 'WSH_PUB' or p_caller like 'FTE%' OR
7196: p_caller = 'WSH_TRCON' THEN
7197: FND_MESSAGE.SET_NAME('WSH','WSH_WF_DEL_ACTION_INELIGIBLE');
7198: FND_MESSAGE.Set_Token('DEL_NAME',wsh_new_deliveries_pvt.get_name(x_error_ids(x_error_ids.count)));
7199: FND_MESSAGE.Set_Token('ACTION',wsh_util_core.get_action_meaning('DLVY',p_action));
7200: wsh_util_core.add_message('E',l_module_name); --==/
7201: END IF;
7202:
7195: IF p_caller = 'WSH_PUB' or p_caller like 'FTE%' OR
7196: p_caller = 'WSH_TRCON' THEN
7197: FND_MESSAGE.SET_NAME('WSH','WSH_WF_DEL_ACTION_INELIGIBLE');
7198: FND_MESSAGE.Set_Token('DEL_NAME',wsh_new_deliveries_pvt.get_name(x_error_ids(x_error_ids.count)));
7199: FND_MESSAGE.Set_Token('ACTION',wsh_util_core.get_action_meaning('DLVY',p_action));
7200: wsh_util_core.add_message('E',l_module_name); --==/
7201: END IF;
7202:
7203: END;
7207: IF (x_valid_ids.COUNT = 0 ) THEN
7208: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7209: --
7210: IF NOT (l_caller LIKE 'FTE%' OR l_caller = 'WSH_PUB') THEN
7211: FND_MESSAGE.SET_NAME('WSH','WSH_ACTION_ENABLED');
7212: wsh_util_core.add_message(x_return_status,l_module_name);
7213: END IF;
7214: --
7215: ELSIF (x_valid_ids.COUNT = p_dlvy_rec_tab.COUNT) THEN
7217: ELSIF (x_valid_ids.COUNT < p_dlvy_rec_tab.COUNT ) THEN
7218: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
7219: --
7220: IF NOT (l_caller LIKE 'FTE%' OR l_caller = 'WSH_PUB') THEN
7221: FND_MESSAGE.SET_NAME('WSH','WSH_ACTION_ENABLED_WARN');
7222: wsh_util_core.add_message(x_return_status,l_module_name);
7223: END IF;
7224: --
7225: ELSE
7225: ELSE
7226: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7227: --
7228: IF NOT (l_caller LIKE 'FTE%' OR l_caller = 'WSH_PUB') THEN
7229: FND_MESSAGE.SET_NAME('WSH','WSH_ACTION_ENABLED');
7230: wsh_util_core.add_message(x_return_status,l_module_name);
7231: END IF;
7232: --
7233: END IF;
9945: CLOSE c_tbl_rec;
9946: END IF;
9947:
9948: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9949: FND_MESSAGE.SET_NAME('WSH','WSH_ALL_COLS_DISABLED');
9950: FND_MESSAGE.Set_Token('ENTITY_ID',p_delivery_rec.delivery_id);
9951: wsh_util_core.add_message(x_return_status,l_module_name);
9952: IF l_debug_on THEN
9953: -- Nothing is updateable
9946: END IF;
9947:
9948: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9949: FND_MESSAGE.SET_NAME('WSH','WSH_ALL_COLS_DISABLED');
9950: FND_MESSAGE.Set_Token('ENTITY_ID',p_delivery_rec.delivery_id);
9951: wsh_util_core.add_message(x_return_status,l_module_name);
9952: IF l_debug_on THEN
9953: -- Nothing is updateable
9954: WSH_DEBUG_SV.pop(l_module_name,'e_all_disabled');
9968: CLOSE c_tbl_rec;
9969: END IF;
9970:
9971: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9972: FND_MESSAGE.SET_NAME('WSH','WSH_BAD_FIELD_NAME');
9973: FND_MESSAGE.Set_Token('FIELD_NAME',l_field_name);
9974: wsh_util_core.add_message(x_return_status,l_module_name);
9975: IF l_debug_on THEN
9976: WSH_DEBUG_SV.log(l_module_name,'Bad field name passed to the list:'
9969: END IF;
9970:
9971: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9972: FND_MESSAGE.SET_NAME('WSH','WSH_BAD_FIELD_NAME');
9973: FND_MESSAGE.Set_Token('FIELD_NAME',l_field_name);
9974: wsh_util_core.add_message(x_return_status,l_module_name);
9975: IF l_debug_on THEN
9976: WSH_DEBUG_SV.log(l_module_name,'Bad field name passed to the list:'
9977: ,l_field_name);
10520: x_vol_nullify_flag := FALSE;
10521: open l_del_org_csr;
10522: Fetch l_del_org_csr into l_organization_id, l_wt_uom_code, l_vol_uom_code;
10523: IF l_del_org_csr%NOTFOUND THEN
10524: FND_MESSAGE.SET_NAME('WSH', 'WSH_INVALID_DELIVERY_ID');
10525: x_return_status := wsh_util_core.g_ret_sts_error;
10526: wsh_util_core.add_message(x_return_status,l_module_name);
10527: close l_del_org_csr;
10528: RAISE FND_API.G_EXC_ERROR;
10914: END IF;
10915: l_loc_description := wsh_util_core.get_location_description
10916: (p_location_id => p_pickup_location_id,
10917: p_format => 'NEW UI CODE');
10918: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_DUP_PICKUP_LOCATION');
10919: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_del_name);
10920: FND_MESSAGE.SET_TOKEN('TRIP_NAME',l_trip_name);
10921: FND_MESSAGE.SET_TOKEN('PICKUP_LOC',l_loc_description);
10922: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10915: l_loc_description := wsh_util_core.get_location_description
10916: (p_location_id => p_pickup_location_id,
10917: p_format => 'NEW UI CODE');
10918: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_DUP_PICKUP_LOCATION');
10919: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_del_name);
10920: FND_MESSAGE.SET_TOKEN('TRIP_NAME',l_trip_name);
10921: FND_MESSAGE.SET_TOKEN('PICKUP_LOC',l_loc_description);
10922: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10923: wsh_util_core.add_message(x_return_status);
10916: (p_location_id => p_pickup_location_id,
10917: p_format => 'NEW UI CODE');
10918: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_DUP_PICKUP_LOCATION');
10919: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_del_name);
10920: FND_MESSAGE.SET_TOKEN('TRIP_NAME',l_trip_name);
10921: FND_MESSAGE.SET_TOKEN('PICKUP_LOC',l_loc_description);
10922: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10923: wsh_util_core.add_message(x_return_status);
10924: RAISE FND_API.G_EXC_ERROR;
10917: p_format => 'NEW UI CODE');
10918: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_DUP_PICKUP_LOCATION');
10919: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_del_name);
10920: FND_MESSAGE.SET_TOKEN('TRIP_NAME',l_trip_name);
10921: FND_MESSAGE.SET_TOKEN('PICKUP_LOC',l_loc_description);
10922: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10923: wsh_util_core.add_message(x_return_status);
10924: RAISE FND_API.G_EXC_ERROR;
10925: END IF;
10935: END IF;
10936: l_loc_description := wsh_util_core.get_location_description
10937: (p_location_id => p_dropoff_location_id,
10938: p_format => 'NEW UI CODE');
10939: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_DUP_DROPOFF_LOCATION');
10940: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_del_name);
10941: FND_MESSAGE.SET_TOKEN('TRIP_NAME',l_trip_name);
10942: FND_MESSAGE.SET_TOKEN('DROPOFF_LOC',l_loc_description);
10943: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10936: l_loc_description := wsh_util_core.get_location_description
10937: (p_location_id => p_dropoff_location_id,
10938: p_format => 'NEW UI CODE');
10939: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_DUP_DROPOFF_LOCATION');
10940: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_del_name);
10941: FND_MESSAGE.SET_TOKEN('TRIP_NAME',l_trip_name);
10942: FND_MESSAGE.SET_TOKEN('DROPOFF_LOC',l_loc_description);
10943: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10944: wsh_util_core.add_message(x_return_status);
10937: (p_location_id => p_dropoff_location_id,
10938: p_format => 'NEW UI CODE');
10939: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_DUP_DROPOFF_LOCATION');
10940: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_del_name);
10941: FND_MESSAGE.SET_TOKEN('TRIP_NAME',l_trip_name);
10942: FND_MESSAGE.SET_TOKEN('DROPOFF_LOC',l_loc_description);
10943: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10944: wsh_util_core.add_message(x_return_status);
10945: RAISE FND_API.G_EXC_ERROR;
10938: p_format => 'NEW UI CODE');
10939: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_DUP_DROPOFF_LOCATION');
10940: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_del_name);
10941: FND_MESSAGE.SET_TOKEN('TRIP_NAME',l_trip_name);
10942: FND_MESSAGE.SET_TOKEN('DROPOFF_LOC',l_loc_description);
10943: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10944: wsh_util_core.add_message(x_return_status);
10945: RAISE FND_API.G_EXC_ERROR;
10946: END IF;
11180: END IF;
11181:
11182: IF p_action_type = 'SHIP_CONFIRM' THEN
11183: l_exception_name := 'WSH_SC_REQ_EXPORT_COMPL';
11184: l_msg := FND_MESSAGE.Get_String('WSH', 'WSH_SC_ITM_REQD');
11185: ELSE
11186: l_exception_name := 'WSH_PR_REQ_EXPORT_COMPL';
11187: l_msg := FND_MESSAGE.Get_String('WSH', 'WSH_PR_ITM_REQD');
11188: END IF;
11183: l_exception_name := 'WSH_SC_REQ_EXPORT_COMPL';
11184: l_msg := FND_MESSAGE.Get_String('WSH', 'WSH_SC_ITM_REQD');
11185: ELSE
11186: l_exception_name := 'WSH_PR_REQ_EXPORT_COMPL';
11187: l_msg := FND_MESSAGE.Get_String('WSH', 'WSH_PR_ITM_REQD');
11188: END IF;
11189:
11190: IF l_debug_on THEN
11191: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit wsh_xc_util.log_exception',WSH_DEBUG_SV.C_PROC_LEVEL);
11453: --{
11454: IF p_in_rec.put_messages
11455: THEN
11456: --{
11457: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_INTRANSIT_ERROR');
11458: FND_MESSAGE.SET_TOKEN('DEL_NAME',p_in_rec.name);
11459: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
11460: --}
11461: END IF;
11454: IF p_in_rec.put_messages
11455: THEN
11456: --{
11457: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_INTRANSIT_ERROR');
11458: FND_MESSAGE.SET_TOKEN('DEL_NAME',p_in_rec.name);
11459: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
11460: --}
11461: END IF;
11462: --
11489: END IF;
11490: FOR exp_cnt in 1..l_exceptions_tab.COUNT LOOP
11491: IF l_exceptions_tab(exp_cnt).exception_behavior = 'ERROR' THEN
11492: IF l_exceptions_tab(exp_cnt).entity_name = 'DELIVERY' THEN
11493: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_ENTITY');
11494: ELSE
11495: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
11496: END IF;
11497: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
11491: IF l_exceptions_tab(exp_cnt).exception_behavior = 'ERROR' THEN
11492: IF l_exceptions_tab(exp_cnt).entity_name = 'DELIVERY' THEN
11493: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_ENTITY');
11494: ELSE
11495: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
11496: END IF;
11497: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
11498: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
11499: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Error');
11493: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_ENTITY');
11494: ELSE
11495: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
11496: END IF;
11497: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
11498: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
11499: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Error');
11500: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11501: wsh_util_core.add_message(x_return_status);
11494: ELSE
11495: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
11496: END IF;
11497: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
11498: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
11499: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Error');
11500: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11501: wsh_util_core.add_message(x_return_status);
11502: l_num_warnings := l_num_warnings + 1 ;
11495: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
11496: END IF;
11497: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
11498: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
11499: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Error');
11500: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11501: wsh_util_core.add_message(x_return_status);
11502: l_num_warnings := l_num_warnings + 1 ;
11503: RAISE wsh_util_core.e_not_allowed;
11502: l_num_warnings := l_num_warnings + 1 ;
11503: RAISE wsh_util_core.e_not_allowed;
11504: ELSIF l_exceptions_tab(exp_cnt).exception_behavior = 'WARNING' THEN
11505: IF l_exceptions_tab(exp_cnt).entity_name = 'DELIVERY' THEN
11506: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_ENTITY');
11507: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
11508: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
11509: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Warning');
11510: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
11503: RAISE wsh_util_core.e_not_allowed;
11504: ELSIF l_exceptions_tab(exp_cnt).exception_behavior = 'WARNING' THEN
11505: IF l_exceptions_tab(exp_cnt).entity_name = 'DELIVERY' THEN
11506: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_ENTITY');
11507: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
11508: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
11509: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Warning');
11510: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
11511: wsh_util_core.add_message(x_return_status);
11504: ELSIF l_exceptions_tab(exp_cnt).exception_behavior = 'WARNING' THEN
11505: IF l_exceptions_tab(exp_cnt).entity_name = 'DELIVERY' THEN
11506: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_ENTITY');
11507: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
11508: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
11509: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Warning');
11510: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
11511: wsh_util_core.add_message(x_return_status);
11512: l_num_warnings := l_num_warnings + 1 ;
11505: IF l_exceptions_tab(exp_cnt).entity_name = 'DELIVERY' THEN
11506: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_ENTITY');
11507: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
11508: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
11509: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Warning');
11510: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
11511: wsh_util_core.add_message(x_return_status);
11512: l_num_warnings := l_num_warnings + 1 ;
11513: l_exp_warning := TRUE;
11511: wsh_util_core.add_message(x_return_status);
11512: l_num_warnings := l_num_warnings + 1 ;
11513: l_exp_warning := TRUE;
11514: ELSIF NOT (l_exp_logged) THEN
11515: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
11516: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
11517: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
11518: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Warning');
11519: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
11512: l_num_warnings := l_num_warnings + 1 ;
11513: l_exp_warning := TRUE;
11514: ELSIF NOT (l_exp_logged) THEN
11515: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
11516: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
11517: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
11518: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Warning');
11519: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
11520: l_exp_logged := TRUE;
11513: l_exp_warning := TRUE;
11514: ELSIF NOT (l_exp_logged) THEN
11515: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
11516: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
11517: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
11518: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Warning');
11519: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
11520: l_exp_logged := TRUE;
11521: wsh_util_core.add_message(x_return_status);
11514: ELSIF NOT (l_exp_logged) THEN
11515: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
11516: FND_MESSAGE.SET_TOKEN('ENTITY_NAME','Delivery');
11517: FND_MESSAGE.SET_TOKEN('ENTITY_ID',l_exceptions_tab(exp_cnt).entity_id);
11518: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR','Warning');
11519: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
11520: l_exp_logged := TRUE;
11521: wsh_util_core.add_message(x_return_status);
11522: l_num_warnings := l_num_warnings + 1 ;
11705: --
11706: IF dlvy_csr%NOTFOUND
11707: THEN
11708: --{
11709: FND_MESSAGE.SET_NAME('WSH', 'WSH_INVALID_DELIVERY');
11710: FND_MESSAGE.SET_TOKEN('DELIVERY_ID',p_delivery_id);
11711: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR, l_module_name);
11712: --CLOSE dlvy_csr;
11713: RAISE FND_API.G_EXC_ERROR;
11706: IF dlvy_csr%NOTFOUND
11707: THEN
11708: --{
11709: FND_MESSAGE.SET_NAME('WSH', 'WSH_INVALID_DELIVERY');
11710: FND_MESSAGE.SET_TOKEN('DELIVERY_ID',p_delivery_id);
11711: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR, l_module_name);
11712: --CLOSE dlvy_csr;
11713: RAISE FND_API.G_EXC_ERROR;
11714: --}
13118: IF c_get_delivery_info%ISOPEN THEN
13119: CLOSE c_get_delivery_info;
13120: END IF;
13121:
13122: FND_MESSAGE.Set_Name('WSH','WSH_DEL_NOT_FOUND');
13123: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13124: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status,l_module_name);
13125: --
13126: IF l_debug_on THEN