[Home] [Help]
443: x_del_valid_flag := nvl(l_del_valid_flag,'Y');
444:
445: IF (nvl(l_del_valid_flag,'Y') = 'N') THEN
446: --
447: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_SC_CNT_ERROR');
448: IF l_debug_on THEN
449: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
450: END IF;
451:
448: IF l_debug_on THEN
449: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
450: END IF;
451:
452: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
453: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error);
454: --
455: END IF;
456: --
526:
527: wsh_delivery_validations.check_plan( p_del_rows(i), x_return_status);
528:
529: IF (x_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR) OR (x_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
530: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_FIRM_ERROR');
531:
532: IF l_debug_on THEN
533: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
534: END IF;
532: IF l_debug_on THEN
533: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
534: END IF;
535:
536: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
537: wsh_util_core.add_message(x_return_status);
538: l_num_error := l_num_error + 1;
539: goto loop_end;
540: ELSIF (x_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
563: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
564: END IF;
565: ELSIF (p_del_rows.count > 1) THEN
566: IF (l_num_error > 0) OR (l_num_warn > 0) THEN
567: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_FIRM_SUMMARY');
568: FND_MESSAGE.SET_TOKEN('NUM_ERROR',l_num_error);
569: FND_MESSAGE.SET_TOKEN('NUM_WARN',l_num_warn);
570: FND_MESSAGE.SET_TOKEN('NUM_SUCCESS',p_del_rows.count - l_num_error - l_num_warn);
571:
564: END IF;
565: ELSIF (p_del_rows.count > 1) THEN
566: IF (l_num_error > 0) OR (l_num_warn > 0) THEN
567: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_FIRM_SUMMARY');
568: FND_MESSAGE.SET_TOKEN('NUM_ERROR',l_num_error);
569: FND_MESSAGE.SET_TOKEN('NUM_WARN',l_num_warn);
570: FND_MESSAGE.SET_TOKEN('NUM_SUCCESS',p_del_rows.count - l_num_error - l_num_warn);
571:
572: IF (p_del_rows.count = l_num_error) THEN
565: ELSIF (p_del_rows.count > 1) THEN
566: IF (l_num_error > 0) OR (l_num_warn > 0) THEN
567: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_FIRM_SUMMARY');
568: FND_MESSAGE.SET_TOKEN('NUM_ERROR',l_num_error);
569: FND_MESSAGE.SET_TOKEN('NUM_WARN',l_num_warn);
570: FND_MESSAGE.SET_TOKEN('NUM_SUCCESS',p_del_rows.count - l_num_error - l_num_warn);
571:
572: IF (p_del_rows.count = l_num_error) THEN
573: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
566: IF (l_num_error > 0) OR (l_num_warn > 0) THEN
567: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_FIRM_SUMMARY');
568: FND_MESSAGE.SET_TOKEN('NUM_ERROR',l_num_error);
569: FND_MESSAGE.SET_TOKEN('NUM_WARN',l_num_warn);
570: FND_MESSAGE.SET_TOKEN('NUM_SUCCESS',p_del_rows.count - l_num_error - l_num_warn);
571:
572: IF (p_del_rows.count = l_num_error) THEN
573: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
574: ELSE
783: --
784: wsh_delivery_validations.check_plan( p_delivery_ids(i), x_return_status,p_called_for_sc);
785:
786: IF (x_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR) OR (x_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
787: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_PLAN_ERROR');
788: --
789: -- Debug Statements
790: --
791: IF l_debug_on THEN
791: IF l_debug_on THEN
792: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
793: END IF;
794: --
795: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_ids(i)));
796: wsh_util_core.add_message(x_return_status);
797: l_num_error := l_num_error + 1;
798: goto loop_end;
799: ELSIF (x_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
825: WHERE delivery_id = p_delivery_ids(i)
826: FOR UPDATE NOWAIT;
827:
828: IF (SQL%NOTFOUND) THEN
829: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_NOT_FOUND');
830: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
831: wsh_util_core.add_message(x_return_status);
832: l_num_error := l_num_error + 1;
833: goto loop_end;
872: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
873: l_num_warn := l_num_warn + 1;
874: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR OR
875: l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
876: FND_MESSAGE.Set_Name('WSH', 'WSH_PARAM_NOT_DEFINED');
877: FND_MESSAGE.Set_Token('ORGANIZAION_CODE',
878: wsh_util_core.get_org_name(l_organization_id));
879: wsh_util_core.add_message(x_return_status,l_module_name);
880: l_num_error := l_num_error+1;
873: l_num_warn := l_num_warn + 1;
874: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR OR
875: l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
876: FND_MESSAGE.Set_Name('WSH', 'WSH_PARAM_NOT_DEFINED');
877: FND_MESSAGE.Set_Token('ORGANIZAION_CODE',
878: wsh_util_core.get_org_name(l_organization_id));
879: wsh_util_core.add_message(x_return_status,l_module_name);
880: l_num_error := l_num_error+1;
881: goto loop_end;
949: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
950: l_num_warn := l_num_warn + 1;
951: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR OR
952: l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
953: FND_MESSAGE.Set_Name('WSH', 'WSH_PARAM_NOT_DEFINED');
954: FND_MESSAGE.Set_Token('ORGANIZAION_CODE',
955: wsh_util_core.get_org_name(l_organization_id));
956: wsh_util_core.add_message(x_return_status,l_module_name);
957: l_num_error := l_num_error+1;
950: l_num_warn := l_num_warn + 1;
951: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR OR
952: l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
953: FND_MESSAGE.Set_Name('WSH', 'WSH_PARAM_NOT_DEFINED');
954: FND_MESSAGE.Set_Token('ORGANIZAION_CODE',
955: wsh_util_core.get_org_name(l_organization_id));
956: wsh_util_core.add_message(x_return_status,l_module_name);
957: l_num_error := l_num_error+1;
958: goto end_of_loop;
998: END IF;
999: -- log exception
1000: IF p_caller = 'WSH_DLMG' THEN
1001: -- csun deliveryMerge (warning or error)
1002: FND_MESSAGE.SET_NAME('WSH', 'WSH_PLAN_DELIVERY_FAIL');
1003: FND_MESSAGE.SET_TOKEN('DELIVERY_ID' , to_char(p_delivery_ids(i)));
1004: l_exception_message := FND_MESSAGE.Get;
1005:
1006: l_exception_id := NULL;
999: -- log exception
1000: IF p_caller = 'WSH_DLMG' THEN
1001: -- csun deliveryMerge (warning or error)
1002: FND_MESSAGE.SET_NAME('WSH', 'WSH_PLAN_DELIVERY_FAIL');
1003: FND_MESSAGE.SET_TOKEN('DELIVERY_ID' , to_char(p_delivery_ids(i)));
1004: l_exception_message := FND_MESSAGE.Get;
1005:
1006: l_exception_id := NULL;
1007: wsh_xc_util.log_exception(
1000: IF p_caller = 'WSH_DLMG' THEN
1001: -- csun deliveryMerge (warning or error)
1002: FND_MESSAGE.SET_NAME('WSH', 'WSH_PLAN_DELIVERY_FAIL');
1003: FND_MESSAGE.SET_TOKEN('DELIVERY_ID' , to_char(p_delivery_ids(i)));
1004: l_exception_message := FND_MESSAGE.Get;
1005:
1006: l_exception_id := NULL;
1007: wsh_xc_util.log_exception(
1008: p_api_version => 1.0,
1035: -- prepare to plan the delivery
1036: wsh_delivery_validations.check_plan( p_delivery_ids(i), x_return_status,p_called_for_sc);
1037:
1038: IF (x_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR) OR (x_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
1039: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_PLAN_ERROR');
1040: --
1041: -- Debug Statements
1042: --
1043: IF l_debug_on THEN
1043: IF l_debug_on THEN
1044: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
1045: END IF;
1046: --
1047: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_ids(i)));
1048: wsh_util_core.add_message(x_return_status);
1049: l_num_error := l_num_error + 1;
1050: goto end_of_loop;
1051: ELSIF (x_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
1121: END IF;
1122: -- log exception
1123: IF p_caller = 'WSH_DLMG' THEN
1124: -- csun deliveryMerge (warning or error)
1125: FND_MESSAGE.SET_NAME('WSH', 'WSH_PLAN_DELIVERY_FAIL');
1126: FND_MESSAGE.SET_TOKEN('DELIVERY_ID' , to_char(p_delivery_ids(i)));
1127: l_exception_message := FND_MESSAGE.Get;
1128:
1129: l_exception_id := NULL;
1122: -- log exception
1123: IF p_caller = 'WSH_DLMG' THEN
1124: -- csun deliveryMerge (warning or error)
1125: FND_MESSAGE.SET_NAME('WSH', 'WSH_PLAN_DELIVERY_FAIL');
1126: FND_MESSAGE.SET_TOKEN('DELIVERY_ID' , to_char(p_delivery_ids(i)));
1127: l_exception_message := FND_MESSAGE.Get;
1128:
1129: l_exception_id := NULL;
1130: wsh_xc_util.log_exception(
1123: IF p_caller = 'WSH_DLMG' THEN
1124: -- csun deliveryMerge (warning or error)
1125: FND_MESSAGE.SET_NAME('WSH', 'WSH_PLAN_DELIVERY_FAIL');
1126: FND_MESSAGE.SET_TOKEN('DELIVERY_ID' , to_char(p_delivery_ids(i)));
1127: l_exception_message := FND_MESSAGE.Get;
1128:
1129: l_exception_id := NULL;
1130: wsh_xc_util.log_exception(
1131: p_api_version => 1.0,
1160: -- prepare to plan the delivery
1161: wsh_delivery_validations.check_plan( p_delivery_ids(i), x_return_status,p_called_for_sc);
1162:
1163: IF (x_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR) OR (x_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
1164: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_PLAN_ERROR');
1165: --
1166: -- Debug Statements
1167: --
1168: IF l_debug_on THEN
1168: IF l_debug_on THEN
1169: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
1170: END IF;
1171: --
1172: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_ids(i)));
1173: wsh_util_core.add_message(x_return_status);
1174: l_num_error := l_num_error + 1;
1175: goto end_of_loop;
1176: ELSIF (x_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
1232: -- prepare to plan the delivery
1233: wsh_delivery_validations.check_plan( p_delivery_ids(i), x_return_status,p_called_for_sc);
1234:
1235: IF (x_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR) OR (x_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
1236: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_PLAN_ERROR');
1237: --
1238: -- Debug Statements
1239: --
1240: IF l_debug_on THEN
1240: IF l_debug_on THEN
1241: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
1242: END IF;
1243: --
1244: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_ids(i)));
1245: wsh_util_core.add_message(x_return_status);
1246: l_num_error := l_num_error + 1;
1247: goto end_of_loop;
1248: ELSIF (x_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
1367: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1368: END IF;
1369: ELSIF (p_delivery_ids.count > 1) THEN
1370: IF (l_num_error > 0) OR (l_num_warn > 0) THEN
1371: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_PLAN_SUMMARY');
1372: FND_MESSAGE.SET_TOKEN('NUM_ERROR',l_num_error);
1373: FND_MESSAGE.SET_TOKEN('NUM_WARN',l_num_warn);
1374: FND_MESSAGE.SET_TOKEN('NUM_SUCCESS',p_delivery_ids.count - l_num_error - l_num_warn);
1375:
1368: END IF;
1369: ELSIF (p_delivery_ids.count > 1) THEN
1370: IF (l_num_error > 0) OR (l_num_warn > 0) THEN
1371: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_PLAN_SUMMARY');
1372: FND_MESSAGE.SET_TOKEN('NUM_ERROR',l_num_error);
1373: FND_MESSAGE.SET_TOKEN('NUM_WARN',l_num_warn);
1374: FND_MESSAGE.SET_TOKEN('NUM_SUCCESS',p_delivery_ids.count - l_num_error - l_num_warn);
1375:
1376: IF (p_delivery_ids.count = l_num_error) THEN
1369: ELSIF (p_delivery_ids.count > 1) THEN
1370: IF (l_num_error > 0) OR (l_num_warn > 0) THEN
1371: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_PLAN_SUMMARY');
1372: FND_MESSAGE.SET_TOKEN('NUM_ERROR',l_num_error);
1373: FND_MESSAGE.SET_TOKEN('NUM_WARN',l_num_warn);
1374: FND_MESSAGE.SET_TOKEN('NUM_SUCCESS',p_delivery_ids.count - l_num_error - l_num_warn);
1375:
1376: IF (p_delivery_ids.count = l_num_error) THEN
1377: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1370: IF (l_num_error > 0) OR (l_num_warn > 0) THEN
1371: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_PLAN_SUMMARY');
1372: FND_MESSAGE.SET_TOKEN('NUM_ERROR',l_num_error);
1373: FND_MESSAGE.SET_TOKEN('NUM_WARN',l_num_warn);
1374: FND_MESSAGE.SET_TOKEN('NUM_SUCCESS',p_delivery_ids.count - l_num_error - l_num_warn);
1375:
1376: IF (p_delivery_ids.count = l_num_error) THEN
1377: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1378: ELSE
1398:
1399: WHEN invalid_caller THEN
1400: rollback to before_adjust_planned_flag;
1401: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1402: FND_MESSAGE.Set_Name('WSH', 'WSH_ADJUST_PLANNED_CALLER');
1403: wsh_util_core.add_message(x_return_status,l_module_name);
1404:
1405: IF l_debug_on THEN
1406: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:invalid_caller');
1408:
1409: WHEN invalid_event THEN
1410: rollback to before_adjust_planned_flag;
1411: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1412: FND_MESSAGE.Set_Name('WSH', 'WSH_ADJUST_PLANNED_EVENT');
1413: wsh_util_core.add_message(x_return_status,l_module_name);
1414:
1415: IF l_debug_on THEN
1416: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:invalid_appending_limit');
1449: CLOSE c_get_line_status_in_delivery;
1450: END IF;
1451:
1452: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1453: FND_MESSAGE.Set_Name('WSH', 'WSH_DLVY_LOCK_FAILED');
1454: FND_MESSAGE.Set_Token('ENTITY_NAME',to_char(l_delivery_id));
1455: wsh_util_core.add_message(x_return_status,l_module_name);
1456:
1457: wsh_util_core.default_handler('WSH_NEW_DELIVERY_ACTIONS.ADJUST_PLANNED_FLAG',l_module_name);
1450: END IF;
1451:
1452: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1453: FND_MESSAGE.Set_Name('WSH', 'WSH_DLVY_LOCK_FAILED');
1454: FND_MESSAGE.Set_Token('ENTITY_NAME',to_char(l_delivery_id));
1455: wsh_util_core.add_message(x_return_status,l_module_name);
1456:
1457: wsh_util_core.default_handler('WSH_NEW_DELIVERY_ACTIONS.ADJUST_PLANNED_FLAG',l_module_name);
1458: IF l_debug_on THEN
1628: --
1629: wsh_delivery_validations.check_unplan( p_del_rows(i), x_return_status);
1630:
1631: IF (x_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR) OR (x_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
1632: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_UNPLAN_ERROR');
1633: --
1634: -- Debug Statements
1635: --
1636: IF l_debug_on THEN
1636: IF l_debug_on THEN
1637: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
1638: END IF;
1639: --
1640: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
1641: wsh_util_core.add_message(x_return_status);
1642: l_num_error := l_num_error + 1;
1643: ELSE
1644:
1670: SET planned_flag = l_planned_flag_false --bugfix 3778944
1671: WHERE delivery_id = p_del_rows(i);
1672:
1673: IF (SQL%NOTFOUND) THEN
1674: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_NOT_FOUND');
1675: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1676: wsh_util_core.add_message(x_return_status);
1677: l_num_error := l_num_error + 1;
1678: END IF;
1690: ELSIF (p_del_rows.count > 1) THEN
1691:
1692: IF (l_num_error > 0) THEN
1693:
1694: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_UNPLAN_SUMMARY');
1695: FND_MESSAGE.SET_TOKEN('NUM_ERROR',l_num_error);
1696: FND_MESSAGE.SET_TOKEN('NUM_SUCCESS',p_del_rows.count - l_num_error);
1697:
1698: IF (p_del_rows.count = l_num_error) THEN
1691:
1692: IF (l_num_error > 0) THEN
1693:
1694: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_UNPLAN_SUMMARY');
1695: FND_MESSAGE.SET_TOKEN('NUM_ERROR',l_num_error);
1696: FND_MESSAGE.SET_TOKEN('NUM_SUCCESS',p_del_rows.count - l_num_error);
1697:
1698: IF (p_del_rows.count = l_num_error) THEN
1699: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1692: IF (l_num_error > 0) THEN
1693:
1694: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_UNPLAN_SUMMARY');
1695: FND_MESSAGE.SET_TOKEN('NUM_ERROR',l_num_error);
1696: FND_MESSAGE.SET_TOKEN('NUM_SUCCESS',p_del_rows.count - l_num_error);
1697:
1698: IF (p_del_rows.count = l_num_error) THEN
1699: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1700: ELSE
1817: OPEN get_ledger_id(l_organization_id);
1818: FETCH get_ledger_id INTO l_ledger_id;
1819:
1820: IF (get_ledger_id%NOTFOUND) THEN
1821: FND_MESSAGE.SET_NAME('WSH','WSH_LEDGER_ID_NOT_FOUND');
1822: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1823: wsh_util_core.add_message(x_return_status);
1824: CLOSE get_ledger_id; -- bug 2045315
1825: --
1856: WSH_DEBUG_SV.logmsg(l_module_name, 'Null ship Method, so do not create BOL');
1857: --
1858: END IF;
1859: --
1860: FND_MESSAGE.SET_NAME('WSH','WSH_BOL_NULL_SHIP_METHOD_ERROR');
1861: FND_MESSAGE.SET_TOKEN('TRIP_NAME', l_trip_name);
1862: x_return_status := wsh_util_core.g_ret_sts_error;
1863: wsh_util_core.add_message(x_return_status);
1864: --
1857: --
1858: END IF;
1859: --
1860: FND_MESSAGE.SET_NAME('WSH','WSH_BOL_NULL_SHIP_METHOD_ERROR');
1861: FND_MESSAGE.SET_TOKEN('TRIP_NAME', l_trip_name);
1862: x_return_status := wsh_util_core.g_ret_sts_error;
1863: wsh_util_core.add_message(x_return_status);
1864: --
1865: RAISE wsh_create_document_error;
2039: OPEN get_ledger_id(l_organization_id);
2040: FETCH get_ledger_id INTO l_ledger_id;
2041:
2042: IF (get_ledger_id%NOTFOUND) THEN
2043: FND_MESSAGE.SET_NAME('WSH','WSH_LEDGER_ID_NOT_FOUND');
2044: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2045: wsh_util_core.add_message(x_return_status);
2046: CLOSE get_ledger_id; -- bug 2045315
2047: --
3189:
3190: -- bug 2778035
3191: IF p_action_flag IS NULL
3192: OR p_action_flag NOT IN ('S', 'B', 'L', 'T', 'A', 'C', 'O') THEN
3193: FND_MESSAGE.SET_NAME('WSH', 'WSH_INVALID_SC_ACTION_FLAG');
3194: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error);
3195: RAISE FND_API.G_EXC_ERROR;
3196: END IF;
3197: -- bug 2778035
3297: WSH_DEBUG_SV.log(l_module_name,'l_empty_container',l_empty_container);
3298: WSH_DEBUG_SV.log(l_module_name,'Empty Container',l_cont_name);
3299: END IF;
3300:
3301: FND_MESSAGE.SET_NAME('WSH','WSH_EMPTY_CONTAINER');
3302: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
3303: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_delivery_name);
3304: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3305: l_num_warn := l_num_warn + 1;
3298: WSH_DEBUG_SV.log(l_module_name,'Empty Container',l_cont_name);
3299: END IF;
3300:
3301: FND_MESSAGE.SET_NAME('WSH','WSH_EMPTY_CONTAINER');
3302: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
3303: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_delivery_name);
3304: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3305: l_num_warn := l_num_warn + 1;
3306: wsh_util_core.add_message(x_return_status,l_module_name);
3299: END IF;
3300:
3301: FND_MESSAGE.SET_NAME('WSH','WSH_EMPTY_CONTAINER');
3302: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
3303: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_delivery_name);
3304: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3305: l_num_warn := l_num_warn + 1;
3306: wsh_util_core.add_message(x_return_status,l_module_name);
3307: END LOOP;
3481: WSH_DEBUG_SV.log(l_module_name,'Return Status after calling WSH_INTERFACE_EXT_GRP.OTM_PRE_SHIP_CONFIRM', l_return_status);
3482: END IF;
3483:
3484: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
3485: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CONFIRM_ERROR');
3486: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_delivery_name);
3487:
3488: WSH_UTIL_CORE.add_message(l_return_status, l_module_name);
3489:
3482: END IF;
3483:
3484: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
3485: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CONFIRM_ERROR');
3486: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_delivery_name);
3487:
3488: WSH_UTIL_CORE.add_message(l_return_status, l_module_name);
3489:
3490: l_num_error := l_num_error + 1 ;
3511: WSH_DEBUG_SV.log(l_module_name,'ship method passed in ship confirm', p_ship_method);
3512: WSH_DEBUG_SV.logmsg(l_module_name,'ship method not allowed to change for otm trip');
3513: END IF;
3514:
3515: FND_MESSAGE.SET_NAME('WSH', 'WSH_OTM_SHIP_CONFIRM_ERROR');
3516: FND_MESSAGE.SET_TOKEN('DELIVERY_NAME', l_delivery_name);
3517:
3518: WSH_UTIL_CORE.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR, l_module_name);
3519: l_num_error := l_num_error + 1;
3512: WSH_DEBUG_SV.logmsg(l_module_name,'ship method not allowed to change for otm trip');
3513: END IF;
3514:
3515: FND_MESSAGE.SET_NAME('WSH', 'WSH_OTM_SHIP_CONFIRM_ERROR');
3516: FND_MESSAGE.SET_TOKEN('DELIVERY_NAME', l_delivery_name);
3517:
3518: WSH_UTIL_CORE.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR, l_module_name);
3519: l_num_error := l_num_error + 1;
3520: GOTO loop_end;
3555: -- a. If delivery is confirmed , skip it and go to next.
3556: IF (l_del_status_code = 'CO') THEN
3557: -- Although the name of this message looks like its an error , we are not
3558: -- really erroring out here.
3559: FND_MESSAGE.SET_NAME('WSH','WSH_SHIP_CONFIRM_ERROR');
3560: --
3561: -- Debug Statements
3562: --
3563: IF l_debug_on THEN
3563: IF l_debug_on THEN
3564: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3565: END IF;
3566: --
3567: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
3568: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_SUCCESS);
3569: goto loop_end ;
3570: END IF;
3571:
3571:
3572: --b. If delivery is neither OPEN nor PACKED , then set WARNING and go to next one
3573:
3574: IF NOT ( (l_del_status_code IN ('OP', 'PA', 'SA'))) THEN -- sperera 940/945
3575: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CONFIRM_MULTI_ERROR');
3576: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3577: l_num_warn := l_num_warn + 1;
3578: wsh_util_core.add_message(x_return_status);
3579: goto loop_end ;
3589: FETCH get_freight INTO l_freight_code;
3590:
3591: IF (get_freight%NOTFOUND) THEN
3592: CLOSE get_freight;
3593: fnd_message.set_name('WSH','WSH_INVALID_FREIGHT_CODE');
3594: --
3595: -- Debug Statements
3596: --
3597: IF l_debug_on THEN
3597: IF l_debug_on THEN
3598: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3599: END IF;
3600: --
3601: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
3602: FND_MESSAGE.SET_TOKEN('SHIP_METHOD',l_ship_method_code);
3603: FND_MESSAGE.SET_TOKEN('ORG_ID',l_organization_id);
3604: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_WARNING);
3605: x_return_Status := WSH_UTIL_CORE.G_RET_STS_WARNING ;
3598: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3599: END IF;
3600: --
3601: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
3602: FND_MESSAGE.SET_TOKEN('SHIP_METHOD',l_ship_method_code);
3603: FND_MESSAGE.SET_TOKEN('ORG_ID',l_organization_id);
3604: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_WARNING);
3605: x_return_Status := WSH_UTIL_CORE.G_RET_STS_WARNING ;
3606: l_num_warn := l_num_warn + 1 ;
3599: END IF;
3600: --
3601: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
3602: FND_MESSAGE.SET_TOKEN('SHIP_METHOD',l_ship_method_code);
3603: FND_MESSAGE.SET_TOKEN('ORG_ID',l_organization_id);
3604: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_WARNING);
3605: x_return_Status := WSH_UTIL_CORE.G_RET_STS_WARNING ;
3606: l_num_warn := l_num_warn + 1 ;
3607: ELSE
3615: IF (l_initial_pickup_date(i) IS NULL)
3616: OR (l_ultimate_dropoff_date(i) IS NULL) THEN
3617:
3618: IF p_action_flag NOT IN ('C','O') THEN --{
3619: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_DATES_NULL');
3620: --
3621: -- Debug Statements
3622: --
3623: IF l_debug_on THEN
3623: IF l_debug_on THEN
3624: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3625: END IF;
3626: --
3627: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
3628: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3629: wsh_util_core.add_message(x_return_status);
3630:
3631: l_num_warn := l_num_warn + 1;
3654: p_primary_id => p_del_rows(i),
3655: x_return_status => x_return_status);
3656:
3657: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
3658: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CONFIRM_ERROR');
3659: --
3660: -- Debug Statements
3661: --
3662: IF l_debug_on THEN
3662: IF l_debug_on THEN
3663: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3664: END IF;
3665: --
3666: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
3667: wsh_util_core.add_message(x_return_status);
3668: if ( x_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR ) then
3669: l_num_error := l_num_error + 1 ;
3670: goto loop_end ;
3684: WSH_DEBUG_SV.log(l_module_name,'x_return_status after calling validate_del_containers', x_return_status);
3685: END IF;
3686:
3687: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
3688: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CONFIRM_ERROR');
3689: --
3690: -- Debug Statements
3691: --
3692: IF l_debug_on THEN
3692: IF l_debug_on THEN
3693: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3694: END IF;
3695: --
3696: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
3697: wsh_util_core.add_message(x_return_status);
3698: END IF;
3699: --
3700: IF (nvl(l_del_valid_flag,'Y') = 'N') THEN
3744: p_init_msg_list => 'F',
3745: p_api_version => 1.0, -- Bugfix 3561335
3746: p_delivery_ids => l_wms_delivery_id);
3747: IF ( l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS ) THEN
3748: FND_MESSAGE.SET_NAME('WSH','WSH_INTG_ERROR');
3749: FND_MESSAGE.SET_TOKEN('API_NAME', 'WMS_SHIPPING_PUB.DEL_WSTT_RECS_BY_DELIVERY_ID');
3750: FND_MESSAGE.SET_TOKEN('MSG_TEXT', l_msg_data);
3751: x_return_status := l_return_status;
3752: wsh_util_core.add_message(x_return_status);
3745: p_api_version => 1.0, -- Bugfix 3561335
3746: p_delivery_ids => l_wms_delivery_id);
3747: IF ( l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS ) THEN
3748: FND_MESSAGE.SET_NAME('WSH','WSH_INTG_ERROR');
3749: FND_MESSAGE.SET_TOKEN('API_NAME', 'WMS_SHIPPING_PUB.DEL_WSTT_RECS_BY_DELIVERY_ID');
3750: FND_MESSAGE.SET_TOKEN('MSG_TEXT', l_msg_data);
3751: x_return_status := l_return_status;
3752: wsh_util_core.add_message(x_return_status);
3753: IF ( l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR OR
3746: p_delivery_ids => l_wms_delivery_id);
3747: IF ( l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS ) THEN
3748: FND_MESSAGE.SET_NAME('WSH','WSH_INTG_ERROR');
3749: FND_MESSAGE.SET_TOKEN('API_NAME', 'WMS_SHIPPING_PUB.DEL_WSTT_RECS_BY_DELIVERY_ID');
3750: FND_MESSAGE.SET_TOKEN('MSG_TEXT', l_msg_data);
3751: x_return_status := l_return_status;
3752: wsh_util_core.add_message(x_return_status);
3753: IF ( l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR OR
3754: l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
3789: l_num_warn := l_num_warn + 1 ;
3790: END IF;
3791: END IF;
3792:
3793: l_entity_name:=FND_MESSAGE.GET_STRING('WSH','WSH_DELIVERY');
3794: l_exc_beh_error:=FND_MESSAGE.GET_STRING('WSH','WSH_MESSAGE_TYPE_ERROR');
3795: l_exc_beh_warn:=FND_MESSAGE.GET_STRING('WSH','WSH_MESSAGE_TYPE_WARNING');
3796:
3797: FOR exp_cnt in 1..l_exceptions_tab.COUNT LOOP
3790: END IF;
3791: END IF;
3792:
3793: l_entity_name:=FND_MESSAGE.GET_STRING('WSH','WSH_DELIVERY');
3794: l_exc_beh_error:=FND_MESSAGE.GET_STRING('WSH','WSH_MESSAGE_TYPE_ERROR');
3795: l_exc_beh_warn:=FND_MESSAGE.GET_STRING('WSH','WSH_MESSAGE_TYPE_WARNING');
3796:
3797: FOR exp_cnt in 1..l_exceptions_tab.COUNT LOOP
3798: IF l_exceptions_tab(exp_cnt).exception_behavior = 'ERROR' THEN
3791: END IF;
3792:
3793: l_entity_name:=FND_MESSAGE.GET_STRING('WSH','WSH_DELIVERY');
3794: l_exc_beh_error:=FND_MESSAGE.GET_STRING('WSH','WSH_MESSAGE_TYPE_ERROR');
3795: l_exc_beh_warn:=FND_MESSAGE.GET_STRING('WSH','WSH_MESSAGE_TYPE_WARNING');
3796:
3797: FOR exp_cnt in 1..l_exceptions_tab.COUNT LOOP
3798: IF l_exceptions_tab(exp_cnt).exception_behavior = 'ERROR' THEN
3799: IF l_exceptions_tab(exp_cnt).entity_name = 'DELIVERY' THEN
3796:
3797: FOR exp_cnt in 1..l_exceptions_tab.COUNT LOOP
3798: IF l_exceptions_tab(exp_cnt).exception_behavior = 'ERROR' THEN
3799: IF l_exceptions_tab(exp_cnt).entity_name = 'DELIVERY' THEN
3800: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_ENTITY');
3801: ELSE
3802: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
3803: END IF;
3804: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',l_entity_name);
3798: IF l_exceptions_tab(exp_cnt).exception_behavior = 'ERROR' THEN
3799: IF l_exceptions_tab(exp_cnt).entity_name = 'DELIVERY' THEN
3800: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_ENTITY');
3801: ELSE
3802: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
3803: END IF;
3804: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',l_entity_name);
3805: FND_MESSAGE.SET_TOKEN('ENTITY_ID',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
3806: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR',l_exc_beh_error);
3800: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_ENTITY');
3801: ELSE
3802: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
3803: END IF;
3804: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',l_entity_name);
3805: FND_MESSAGE.SET_TOKEN('ENTITY_ID',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
3806: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR',l_exc_beh_error);
3807: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3808: wsh_util_core.add_message(x_return_status);
3801: ELSE
3802: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
3803: END IF;
3804: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',l_entity_name);
3805: FND_MESSAGE.SET_TOKEN('ENTITY_ID',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
3806: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR',l_exc_beh_error);
3807: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3808: wsh_util_core.add_message(x_return_status);
3809: l_num_error := l_num_error + 1 ;
3802: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
3803: END IF;
3804: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',l_entity_name);
3805: FND_MESSAGE.SET_TOKEN('ENTITY_ID',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
3806: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR',l_exc_beh_error);
3807: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3808: wsh_util_core.add_message(x_return_status);
3809: l_num_error := l_num_error + 1 ;
3810: goto confirm_error_no_msg;
3809: l_num_error := l_num_error + 1 ;
3810: goto confirm_error_no_msg;
3811: ELSIF l_exceptions_tab(exp_cnt).exception_behavior = 'WARNING' THEN
3812: IF l_exceptions_tab(exp_cnt).entity_name = 'DELIVERY' THEN
3813: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_ENTITY');
3814: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',l_entity_name);
3815: FND_MESSAGE.SET_TOKEN('ENTITY_ID',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
3816: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR',l_exc_beh_warn);
3817: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3810: goto confirm_error_no_msg;
3811: ELSIF l_exceptions_tab(exp_cnt).exception_behavior = 'WARNING' THEN
3812: IF l_exceptions_tab(exp_cnt).entity_name = 'DELIVERY' THEN
3813: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_ENTITY');
3814: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',l_entity_name);
3815: FND_MESSAGE.SET_TOKEN('ENTITY_ID',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
3816: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR',l_exc_beh_warn);
3817: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3818: wsh_util_core.add_message(x_return_status);
3811: ELSIF l_exceptions_tab(exp_cnt).exception_behavior = 'WARNING' THEN
3812: IF l_exceptions_tab(exp_cnt).entity_name = 'DELIVERY' THEN
3813: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_ENTITY');
3814: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',l_entity_name);
3815: FND_MESSAGE.SET_TOKEN('ENTITY_ID',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
3816: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR',l_exc_beh_warn);
3817: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3818: wsh_util_core.add_message(x_return_status);
3819: l_num_warn := l_num_warn + 1 ;
3812: IF l_exceptions_tab(exp_cnt).entity_name = 'DELIVERY' THEN
3813: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_ENTITY');
3814: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',l_entity_name);
3815: FND_MESSAGE.SET_TOKEN('ENTITY_ID',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
3816: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR',l_exc_beh_warn);
3817: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3818: wsh_util_core.add_message(x_return_status);
3819: l_num_warn := l_num_warn + 1 ;
3820: ELSIF NOT (l_exp_logged) THEN
3817: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3818: wsh_util_core.add_message(x_return_status);
3819: l_num_warn := l_num_warn + 1 ;
3820: ELSIF NOT (l_exp_logged) THEN
3821: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
3822: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',l_entity_name);
3823: FND_MESSAGE.SET_TOKEN('ENTITY_ID',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
3824: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR',l_exc_beh_warn);
3825: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3818: wsh_util_core.add_message(x_return_status);
3819: l_num_warn := l_num_warn + 1 ;
3820: ELSIF NOT (l_exp_logged) THEN
3821: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
3822: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',l_entity_name);
3823: FND_MESSAGE.SET_TOKEN('ENTITY_ID',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
3824: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR',l_exc_beh_warn);
3825: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3826: l_exp_logged := TRUE;
3819: l_num_warn := l_num_warn + 1 ;
3820: ELSIF NOT (l_exp_logged) THEN
3821: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
3822: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',l_entity_name);
3823: FND_MESSAGE.SET_TOKEN('ENTITY_ID',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
3824: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR',l_exc_beh_warn);
3825: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3826: l_exp_logged := TRUE;
3827: wsh_util_core.add_message(x_return_status);
3820: ELSIF NOT (l_exp_logged) THEN
3821: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
3822: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',l_entity_name);
3823: FND_MESSAGE.SET_TOKEN('ENTITY_ID',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
3824: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR',l_exc_beh_warn);
3825: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3826: l_exp_logged := TRUE;
3827: wsh_util_core.add_message(x_return_status);
3828: l_num_warn := l_num_warn + 1 ;
3877: -- Added l_source_line_id for the Consolidation of BO Delivery Details project
3878:
3879: IF detail_info%NOTFOUND AND l_lines_in_delivery = 0 THEN
3880: CLOSE detail_info;
3881: FND_MESSAGE.SET_NAME('WSH','WSH_EMPTY_DELIVERY');
3882: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_delivery_name);
3883: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3884: wsh_util_core.add_message(x_return_status);
3885: goto confirm_error_no_msg;
3878:
3879: IF detail_info%NOTFOUND AND l_lines_in_delivery = 0 THEN
3880: CLOSE detail_info;
3881: FND_MESSAGE.SET_NAME('WSH','WSH_EMPTY_DELIVERY');
3882: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_delivery_name);
3883: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3884: wsh_util_core.add_message(x_return_status);
3885: goto confirm_error_no_msg;
3886: END IF;
3918: IF l_debug_on THEN
3919: WSH_DEBUG_SV.logmsg(l_module_name, 'EXCEPTIONS EXIST FOR DELIVERY DETAIL ' || L_DELIVERY_DETAIL_ID|| ' , DURING SHIP CONFIRM' );
3920: END IF;
3921: --
3922: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_DET');
3923: FND_MESSAGE.SET_TOKEN('DEL_DET_ID', to_char(l_delivery_detail_id));
3924: IF l_severity_present IN ('H','M') THEN
3925: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3926: wsh_util_core.add_message(x_return_status);
3919: WSH_DEBUG_SV.logmsg(l_module_name, 'EXCEPTIONS EXIST FOR DELIVERY DETAIL ' || L_DELIVERY_DETAIL_ID|| ' , DURING SHIP CONFIRM' );
3920: END IF;
3921: --
3922: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_DET');
3923: FND_MESSAGE.SET_TOKEN('DEL_DET_ID', to_char(l_delivery_detail_id));
3924: IF l_severity_present IN ('H','M') THEN
3925: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3926: wsh_util_core.add_message(x_return_status);
3927: goto confirm_error;
3955: IF l_debug_on THEN
3956: WSH_DEBUG_SV.logmsg(l_module_name, 'EXCEPTIONS EXIST FOR CONTAINER ' || L_CONTAINER_ID|| ' , DURING SHIP CONFIRM' );
3957: END IF;
3958: --
3959: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_DET');
3960: FND_MESSAGE.SET_TOKEN('DEL_DET_ID', to_char(l_container_id));
3961: IF l_severity_present IN ('H','M') THEN
3962: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3963: wsh_util_core.add_message(x_return_status);
3956: WSH_DEBUG_SV.logmsg(l_module_name, 'EXCEPTIONS EXIST FOR CONTAINER ' || L_CONTAINER_ID|| ' , DURING SHIP CONFIRM' );
3957: END IF;
3958: --
3959: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_DET');
3960: FND_MESSAGE.SET_TOKEN('DEL_DET_ID', to_char(l_container_id));
3961: IF l_severity_present IN ('H','M') THEN
3962: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3963: wsh_util_core.add_message(x_return_status);
3964: CLOSE Get_Containers;
4040: p_action_flag = 'C' OR
4041: l_cycle_quantity > 0)
4042: ) THEN
4043: l_source_code_flag := 'Y';
4044: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_SHIP_MODE');
4045: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4046: wsh_util_core.add_message(x_return_status);
4047: l_num_error := l_num_error + 1;
4048: CLOSE detail_info;
4059:
4060: EXCEPTION
4061: WHEN record_locked THEN
4062: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4063: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_LOCK_ERR');
4064: wsh_util_core.add_message(x_return_status);
4065: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4066: CLOSE detail_info;
4067: goto confirm_error;
4069: RAISE;
4070: END;
4071:
4072: IF (l_released_status NOT IN ('X', 'Y')) THEN
4073: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_DETAILS_UNRELEASED');
4074: -- Bug 2713285
4075: -- for cancelling or unassigning the lines from delivery thru Batch process
4076: IF l_batch_id IS NULL THEN
4077: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4103: ELSE
4104: -- check for inspection_flag
4105:
4106: IF ( l_inspection_flag = 'R') then
4107: FND_MESSAGE.SET_NAME('WSH','WSH_INSPECTION');
4108: --
4109: -- Debug Statements
4110: --
4111: IF l_debug_on THEN
4111: IF l_debug_on THEN
4112: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4113: END IF;
4114: --
4115: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
4116: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4117: wsh_util_core.add_message(x_return_status);
4118: l_num_warn := l_num_warn + 1;
4119:
4166: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_FLEXFIELD_UTILS.VALIDATE_DFF validation failed for delivery detail(s)',WSH_DEBUG_SV.C_PROC_LEVEL);
4167: END IF;
4168: --
4169: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4170: l_token := FND_MESSAGE.Get_String('WSH', 'WSH_DETAIL_DFF_TITLE');
4171:
4172: FND_MESSAGE.Set_Name('WSH', 'WSH_DFF_DETAIL_EMPTY');
4173: FND_MESSAGE.Set_Token('DFF_TITLE', l_token);
4174: FND_MESSAGE.Set_Token('DETAIL_IDS', l_invalid_details);
4168: --
4169: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4170: l_token := FND_MESSAGE.Get_String('WSH', 'WSH_DETAIL_DFF_TITLE');
4171:
4172: FND_MESSAGE.Set_Name('WSH', 'WSH_DFF_DETAIL_EMPTY');
4173: FND_MESSAGE.Set_Token('DFF_TITLE', l_token);
4174: FND_MESSAGE.Set_Token('DETAIL_IDS', l_invalid_details);
4175: WSH_UTIL_CORE.Add_Message(x_return_status);
4176:
4169: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4170: l_token := FND_MESSAGE.Get_String('WSH', 'WSH_DETAIL_DFF_TITLE');
4171:
4172: FND_MESSAGE.Set_Name('WSH', 'WSH_DFF_DETAIL_EMPTY');
4173: FND_MESSAGE.Set_Token('DFF_TITLE', l_token);
4174: FND_MESSAGE.Set_Token('DETAIL_IDS', l_invalid_details);
4175: WSH_UTIL_CORE.Add_Message(x_return_status);
4176:
4177: IF ( x_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING ) THEN
4170: l_token := FND_MESSAGE.Get_String('WSH', 'WSH_DETAIL_DFF_TITLE');
4171:
4172: FND_MESSAGE.Set_Name('WSH', 'WSH_DFF_DETAIL_EMPTY');
4173: FND_MESSAGE.Set_Token('DFF_TITLE', l_token);
4174: FND_MESSAGE.Set_Token('DETAIL_IDS', l_invalid_details);
4175: WSH_UTIL_CORE.Add_Message(x_return_status);
4176:
4177: IF ( x_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING ) THEN
4178: l_num_warn := l_num_warn;
4203: x_msg_count => l_msg_count,
4204: x_msg_data => l_msg_data
4205: );
4206: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
4207: FND_MESSAGE.SET_NAME('WSH','WSH_INTG_ERROR');
4208: FND_MESSAGE.SET_TOKEN('API_NAME', 'WMS_SHIPPING_LPN_UTILS_PUB.UPDATE_LPN_CONTEXT');
4209: FND_MESSAGE.SET_TOKEN('MSG_TEXT', l_msg_data);
4210: x_return_status := l_return_status;
4211: wsh_util_core.add_message(x_return_status);
4204: x_msg_data => l_msg_data
4205: );
4206: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
4207: FND_MESSAGE.SET_NAME('WSH','WSH_INTG_ERROR');
4208: FND_MESSAGE.SET_TOKEN('API_NAME', 'WMS_SHIPPING_LPN_UTILS_PUB.UPDATE_LPN_CONTEXT');
4209: FND_MESSAGE.SET_TOKEN('MSG_TEXT', l_msg_data);
4210: x_return_status := l_return_status;
4211: wsh_util_core.add_message(x_return_status);
4212: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR OR
4205: );
4206: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
4207: FND_MESSAGE.SET_NAME('WSH','WSH_INTG_ERROR');
4208: FND_MESSAGE.SET_TOKEN('API_NAME', 'WMS_SHIPPING_LPN_UTILS_PUB.UPDATE_LPN_CONTEXT');
4209: FND_MESSAGE.SET_TOKEN('MSG_TEXT', l_msg_data);
4210: x_return_status := l_return_status;
4211: wsh_util_core.add_message(x_return_status);
4212: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR OR
4213: l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
4279: x_msg_count => l_msg_count,
4280: x_msg_data => l_msg_data
4281: );
4282: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
4283: FND_MESSAGE.SET_NAME('WSH','WSH_INTG_ERROR');
4284: FND_MESSAGE.SET_TOKEN('API_NAME', 'WMS_SHIPPING_LPN_UTILS_PUB.UPDATE_LPN_CONTEXT');
4285: FND_MESSAGE.SET_TOKEN('MSG_TEXT', l_msg_data);
4286: x_return_status := l_return_status;
4287: wsh_util_core.add_message(x_return_status);
4280: x_msg_data => l_msg_data
4281: );
4282: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
4283: FND_MESSAGE.SET_NAME('WSH','WSH_INTG_ERROR');
4284: FND_MESSAGE.SET_TOKEN('API_NAME', 'WMS_SHIPPING_LPN_UTILS_PUB.UPDATE_LPN_CONTEXT');
4285: FND_MESSAGE.SET_TOKEN('MSG_TEXT', l_msg_data);
4286: x_return_status := l_return_status;
4287: wsh_util_core.add_message(x_return_status);
4288: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR OR
4281: );
4282: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
4283: FND_MESSAGE.SET_NAME('WSH','WSH_INTG_ERROR');
4284: FND_MESSAGE.SET_TOKEN('API_NAME', 'WMS_SHIPPING_LPN_UTILS_PUB.UPDATE_LPN_CONTEXT');
4285: FND_MESSAGE.SET_TOKEN('MSG_TEXT', l_msg_data);
4286: x_return_status := l_return_status;
4287: wsh_util_core.add_message(x_return_status);
4288: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR OR
4289: l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
4495:
4496: -- Bug 2713285
4497: -- for cancelling any line in delivery thru Batch process
4498: IF l_batch_id IS NOT NULL THEN
4499: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CANCEL_DET_ERROR');
4500: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4501: wsh_util_core.add_message(x_return_status);
4502: l_num_error := l_num_error + 1;
4503: goto confirm_error_no_msg;
4755: raise ship_confirm_error;
4756: /* H integration: 945 check detail wrudge */
4757: ELSIF l_shp_dd_source(dd_count) = 'WSH' THEN
4758: /* new message: WSH_DEL_WSH_LINE_ERROR, token DEL_NAME */
4759: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_WSH_LINE_ERROR');
4760: --
4761: -- Debug Statements
4762: --
4763: IF l_debug_on THEN
4763: IF l_debug_on THEN
4764: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4765: END IF;
4766: --
4767: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(l_delivery_id));
4768: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR);
4769: l_num_error := l_num_error + 1;
4770: goto confirm_error_no_msg;
4771: ELSE
4774: -- thru batch process
4775: IF l_batch_id IS NOT NULL THEN
4776: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4777: IF l_inv_controls_rec.details_required_flag='Y' THEN --Bug 3773225
4778: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_DETAILS_REQUIRED');
4779: wsh_util_core.add_message(x_return_status);
4780: ELSIF l_inv_controls_rec.invalid_material_status_flag='Y' THEN --Material Status Impact
4781: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_MATERIAL_STATUS');
4782: wsh_util_core.add_message(x_return_status);
4777: IF l_inv_controls_rec.details_required_flag='Y' THEN --Bug 3773225
4778: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_DETAILS_REQUIRED');
4779: wsh_util_core.add_message(x_return_status);
4780: ELSIF l_inv_controls_rec.invalid_material_status_flag='Y' THEN --Material Status Impact
4781: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_MATERIAL_STATUS');
4782: wsh_util_core.add_message(x_return_status);
4783: END IF;
4784: l_num_error := l_num_error + 1;
4785: goto confirm_error_no_msg;
4967: WSH_DEBUG_SV.log(l_module_name,'g_missing_inv_severity - '|| g_missing_inv_severity);
4968: END IF;
4969:
4970: If g_missing_inv_severity = 'E' then
4971: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_DETAILS_INV_CONTROLS');
4972: FND_MESSAGE.Set_Token('DETAIL_IDS', l_inv_ctrl_dd_ids);
4973: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4974: wsh_util_core.add_message(x_return_status);
4975: WSH_NEW_DELIVERY_ACTIONS.g_error_level := 'E';
4968: END IF;
4969:
4970: If g_missing_inv_severity = 'E' then
4971: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_DETAILS_INV_CONTROLS');
4972: FND_MESSAGE.Set_Token('DETAIL_IDS', l_inv_ctrl_dd_ids);
4973: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4974: wsh_util_core.add_message(x_return_status);
4975: WSH_NEW_DELIVERY_ACTIONS.g_error_level := 'E';
4976: l_num_error := l_num_error + 1;
4975: WSH_NEW_DELIVERY_ACTIONS.g_error_level := 'E';
4976: l_num_error := l_num_error + 1;
4977: goto confirm_error_no_msg;
4978: Else
4979: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_DETAILS_INV_CONTROLS');
4980: FND_MESSAGE.Set_Token('DETAIL_IDS', l_inv_ctrl_dd_ids);
4981: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4982: wsh_util_core.add_message(x_return_status);
4983: WSH_NEW_DELIVERY_ACTIONS.g_error_level := 'E';
4976: l_num_error := l_num_error + 1;
4977: goto confirm_error_no_msg;
4978: Else
4979: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_DETAILS_INV_CONTROLS');
4980: FND_MESSAGE.Set_Token('DETAIL_IDS', l_inv_ctrl_dd_ids);
4981: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4982: wsh_util_core.add_message(x_return_status);
4983: WSH_NEW_DELIVERY_ACTIONS.g_error_level := 'E';
4984: End If;
4999: WSH_DEBUG_SV.log(l_module_name,'g_missing_inv_severity - '|| g_missing_inv_severity);
5000: END IF;
5001:
5002: If g_missing_inv_severity = 'E' then
5003: FND_MESSAGE.SET_NAME('WSH','WSH_DETAILS_MATERIAL_STATUS');
5004: FND_MESSAGE.Set_Token('DETAIL_IDS', l_inv_material_dd_ids);
5005: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5006: wsh_util_core.add_message(x_return_status);
5007: WSH_NEW_DELIVERY_ACTIONS.g_error_level := 'E';
5000: END IF;
5001:
5002: If g_missing_inv_severity = 'E' then
5003: FND_MESSAGE.SET_NAME('WSH','WSH_DETAILS_MATERIAL_STATUS');
5004: FND_MESSAGE.Set_Token('DETAIL_IDS', l_inv_material_dd_ids);
5005: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5006: wsh_util_core.add_message(x_return_status);
5007: WSH_NEW_DELIVERY_ACTIONS.g_error_level := 'E';
5008: l_num_error := l_num_error + 1;
5007: WSH_NEW_DELIVERY_ACTIONS.g_error_level := 'E';
5008: l_num_error := l_num_error + 1;
5009: goto confirm_error_no_msg;
5010: Else
5011: FND_MESSAGE.SET_NAME('WSH','WSH_DETAILS_MATERIAL_STATUS');
5012: FND_MESSAGE.Set_Token('DETAIL_IDS', l_inv_material_dd_ids);
5013: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
5014: wsh_util_core.add_message(x_return_status);
5015: WSH_NEW_DELIVERY_ACTIONS.g_error_level := 'E';
5008: l_num_error := l_num_error + 1;
5009: goto confirm_error_no_msg;
5010: Else
5011: FND_MESSAGE.SET_NAME('WSH','WSH_DETAILS_MATERIAL_STATUS');
5012: FND_MESSAGE.Set_Token('DETAIL_IDS', l_inv_material_dd_ids);
5013: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
5014: wsh_util_core.add_message(x_return_status);
5015: WSH_NEW_DELIVERY_ACTIONS.g_error_level := 'E';
5016: End If;
5226: x_return_status => l_return_status);
5227:
5228: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
5229: /* new message: WSH_DEL_CANCEL_DET_ERROR, token DEL_NAME */
5230: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CANCEL_DET_ERROR');
5231: --
5232: -- Debug Statements
5233: --
5234: IF l_debug_on THEN
5234: IF l_debug_on THEN
5235: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5236: END IF;
5237: --
5238: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
5239: x_return_status := l_return_status;
5240: wsh_util_core.add_message(x_return_status);
5241: l_num_error := l_num_error + 1 ;
5242: goto loop_end;
5302: );
5303:
5304:
5305: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
5306: FND_MESSAGE.Set_Name('WSH', 'WSH_PARAM_NOT_DEFINED');
5307: --
5308: -- Debug Statements
5309: --
5310: IF l_debug_on THEN
5310: IF l_debug_on THEN
5311: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_ORG_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5312: END IF;
5313: --
5314: FND_MESSAGE.Set_Token('ORGANIZAION_CODE',
5315: wsh_util_core.get_org_name(l_organization_id));
5316: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5317: wsh_util_core.add_message(x_return_status);
5318: WSH_NEW_DELIVERY_ACTIONS.g_error_level := 'E';
5490: WSH_DEBUG_SV.logmsg(l_module_name,'Gross '||l_gross_weight||' Volume '||l_volume||' Fill basis '||l_param_info.percent_fill_basis_flag);
5491: END IF;
5492:
5493: IF (l_param_info.percent_fill_basis_flag = 'W' and l_gross_weight is NULL) THEN
5494: FND_MESSAGE.SET_NAME('WSH','WSH_NULL_WV');
5495: IF l_debug_on THEN
5496: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5497: END IF;
5498: --
5495: IF l_debug_on THEN
5496: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5497: END IF;
5498: --
5499: FND_MESSAGE.SET_TOKEN('ENTITY_TYPE','Delivery');
5500: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
5501: FND_MESSAGE.SET_TOKEN('WV','Weight');
5502: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
5503: wsh_util_core.add_message(x_return_status);
5496: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5497: END IF;
5498: --
5499: FND_MESSAGE.SET_TOKEN('ENTITY_TYPE','Delivery');
5500: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
5501: FND_MESSAGE.SET_TOKEN('WV','Weight');
5502: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
5503: wsh_util_core.add_message(x_return_status);
5504: l_num_warn := l_num_warn + 1;
5497: END IF;
5498: --
5499: FND_MESSAGE.SET_TOKEN('ENTITY_TYPE','Delivery');
5500: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
5501: FND_MESSAGE.SET_TOKEN('WV','Weight');
5502: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
5503: wsh_util_core.add_message(x_return_status);
5504: l_num_warn := l_num_warn + 1;
5505: END IF;
5504: l_num_warn := l_num_warn + 1;
5505: END IF;
5506:
5507: IF (l_param_info.percent_fill_basis_flag = 'V' and l_volume is NULL) THEN
5508: FND_MESSAGE.SET_NAME('WSH','WSH_NULL_WV');
5509: IF l_debug_on THEN
5510: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5511: END IF;
5512: --
5509: IF l_debug_on THEN
5510: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5511: END IF;
5512: --
5513: FND_MESSAGE.SET_TOKEN('ENTITY_TYPE','Delivery');
5514: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
5515: FND_MESSAGE.SET_TOKEN('WV','Volume');
5516: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
5517: wsh_util_core.add_message(x_return_status);
5510: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5511: END IF;
5512: --
5513: FND_MESSAGE.SET_TOKEN('ENTITY_TYPE','Delivery');
5514: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
5515: FND_MESSAGE.SET_TOKEN('WV','Volume');
5516: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
5517: wsh_util_core.add_message(x_return_status);
5518: l_num_warn := l_num_warn + 1;
5511: END IF;
5512: --
5513: FND_MESSAGE.SET_TOKEN('ENTITY_TYPE','Delivery');
5514: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
5515: FND_MESSAGE.SET_TOKEN('WV','Volume');
5516: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
5517: wsh_util_core.add_message(x_return_status);
5518: l_num_warn := l_num_warn + 1;
5519: END IF;
5635: ** Error should rollback and not continue processing this delivery.
5636: */
5637: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
5638:
5639: FND_MESSAGE.SET_NAME('WSH','WSH_SHIP_CONFIRM_ERROR');
5640: --
5641: -- Debug Statements
5642: --
5643: IF l_debug_on THEN
5643: IF l_debug_on THEN
5644: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5645: END IF;
5646: --
5647: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
5648: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
5649: wsh_util_core.add_message(x_return_status);
5650: goto confirm_error_no_msg;
5651:
5653: -- Bug 2711786
5654: -- for ship set,but this would include other validations done in
5655: -- check_confirm API like for SMC also
5656: IF l_batch_id IS NOT NULL THEN
5657: -- FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CANCEL_DET_ERROR');
5658: -- x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5659: -- wsh_util_core.add_message(x_return_status);
5660: l_num_error := l_num_error + 1;
5661: goto confirm_error_no_msg;
5721: THEN
5722: l_num_error := l_num_error + 1;
5723: goto loop_end;
5724: ELSE
5725: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CREATE_PACK_SLIP_ERROR');
5726: --
5727: -- Debug Statements
5728: --
5729: IF l_debug_on THEN
5729: IF l_debug_on THEN
5730: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5731: END IF;
5732: --
5733: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
5734: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
5735: wsh_util_core.add_message(x_return_status);
5736: l_num_warn := l_num_warn + 1;
5737: END IF;
5832: wsh_debug_sv.logmsg(l_module_name,'all lines errored in compatibility check');
5833: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5834: END IF;
5835:
5836: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_COMP_FAILED');
5837: FND_MESSAGE.SET_TOKEN('DEL_ID',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
5838: x_return_status := l_return_status;
5839: wsh_util_core.add_message(x_return_status);
5840: goto confirm_error;
5833: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5834: END IF;
5835:
5836: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_COMP_FAILED');
5837: FND_MESSAGE.SET_TOKEN('DEL_ID',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
5838: x_return_status := l_return_status;
5839: wsh_util_core.add_message(x_return_status);
5840: goto confirm_error;
5841: ELSE
5874:
5875: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS)
5876: THEN
5877: x_return_status := l_return_status;
5878: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_AUTOCREATE_TRIP_ERROR');
5879:
5880: IF l_debug_on THEN
5881: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5882: END IF;
5880: IF l_debug_on THEN
5881: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5882: END IF;
5883: --
5884: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
5885: wsh_util_core.add_message(x_return_status);
5886: goto confirm_error;
5887: END IF;
5888: END IF;
5979: IF l_debug_on THEN
5980: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit wsh_trips_pvt.get_name',WSH_DEBUG_SV.C_PROC_LEVEL);
5981: END IF;
5982:
5983: FND_MESSAGE.SET_NAME('WSH','WSH_TRIP_COMP_FAILED');
5984: FND_MESSAGE.SET_TOKEN('TRIP_ID',wsh_trips_pvt.get_name(l_cc_fail_ids(1)));
5985: x_return_status := l_return_status;
5986: wsh_util_core.add_message(x_return_status);
5987: goto confirm_error;
5980: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit wsh_trips_pvt.get_name',WSH_DEBUG_SV.C_PROC_LEVEL);
5981: END IF;
5982:
5983: FND_MESSAGE.SET_NAME('WSH','WSH_TRIP_COMP_FAILED');
5984: FND_MESSAGE.SET_TOKEN('TRIP_ID',wsh_trips_pvt.get_name(l_cc_fail_ids(1)));
5985: x_return_status := l_return_status;
5986: wsh_util_core.add_message(x_return_status);
5987: goto confirm_error;
5988: ELSE
6018: CLOSE get_del_first_trip;
6019:
6020: IF l_del_first_trip IS NULL THEN
6021:
6022: FND_MESSAGE.SET_NAME('WSH','WSH_TRIP_NOT_FOUND');
6023: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6024: wsh_util_core.add_message(x_return_status);
6025: goto confirm_error;
6026:
6045: EXCEPTION
6046:
6047: WHEN app_exception.application_exception OR app_exception.record_lock_exception THEN
6048: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6049: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_STOP_TRIP_LOCK');
6050: FND_MESSAGE.SET_TOKEN('DLVY_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
6051: wsh_util_core.add_message(x_return_status);
6052: goto confirm_error;
6053:
6046:
6047: WHEN app_exception.application_exception OR app_exception.record_lock_exception THEN
6048: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6049: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_STOP_TRIP_LOCK');
6050: FND_MESSAGE.SET_TOKEN('DLVY_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
6051: wsh_util_core.add_message(x_return_status);
6052: goto confirm_error;
6053:
6054: END;
6060: carrier_id = l_carrier_rec.carrier_id
6061: WHERE trip_id = l_del_first_trip;
6062:
6063: IF (SQL%NOTFOUND) THEN
6064: FND_MESSAGE.SET_NAME('WSH','WSH_TRIP_NOT_FOUND');
6065: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6066: wsh_util_core.add_message(x_return_status);
6067: goto confirm_error;
6068: END IF;
6180: wsh_debug_sv.logmsg(l_module_name,'all lines errored in compatibility check');
6181: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
6182: END IF;
6183:
6184: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_COMP_FAILED');
6185: FND_MESSAGE.SET_TOKEN('DEL_ID',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
6186: x_return_status := l_return_status;
6187: wsh_util_core.add_message(x_return_status);
6188: goto confirm_error;
6181: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
6182: END IF;
6183:
6184: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_COMP_FAILED');
6185: FND_MESSAGE.SET_TOKEN('DEL_ID',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
6186: x_return_status := l_return_status;
6187: wsh_util_core.add_message(x_return_status);
6188: goto confirm_error;
6189: ELSE
6222: carrier_id = l_carrier_rec.carrier_id
6223: WHERE trip_id = l_trip_id;
6224:
6225: IF (SQL%NOTFOUND) THEN
6226: FND_MESSAGE.SET_NAME('WSH','WSH_TRIP_NOT_FOUND');
6227: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6228: wsh_util_core.add_message(x_return_status);
6229: goto confirm_error;
6230: END IF;
6298: l_itm_stops_tab(l_dropoff_stop_id) := 'Y';
6299:
6300: l_close_confirm_flag := 'F';
6301:
6302: FND_MESSAGE.SET_NAME('WSH','WSH_EXP_COMPL_SCRN_REQD');
6303: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_delivery_name);
6304: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_SUCCESS);
6305:
6306: ELSE
6299:
6300: l_close_confirm_flag := 'F';
6301:
6302: FND_MESSAGE.SET_NAME('WSH','WSH_EXP_COMPL_SCRN_REQD');
6303: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_delivery_name);
6304: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_SUCCESS);
6305:
6306: ELSE
6307:
6318: OPEN get_del_first_trip(p_del_rows(i));
6319: FETCH get_del_first_trip into l_first_trip_id;
6320: CLOSE get_del_first_trip;
6321: IF l_first_trip_id IS NULL THEN
6322: FND_MESSAGE.SET_NAME('WSH','WSH_TRIP_NOT_FOUND');
6323: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6324: wsh_util_core.add_message(x_return_status);
6325: goto confirm_error;
6326: END IF;
6364: IF l_inbound_stops_exists THEN
6365: OPEN get_trip_name_csr (l_first_trip_id);
6366: FETCH get_trip_name_csr INTO l_stops_trip_name;
6367: CLOSE get_trip_name_csr;
6368: FND_MESSAGE.SET_NAME('WSH','WSH_PREV_IB_STOPS_NOT_CLOSED');
6369: FND_MESSAGE.SET_TOKEN('TRIP_NAME', l_stops_trip_name);
6370: FND_MESSAGE.SET_TOKEN('STOP_NAME_LIST', l_stop_name_list);
6371: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
6372: wsh_util_core.add_message(x_return_status);
6365: OPEN get_trip_name_csr (l_first_trip_id);
6366: FETCH get_trip_name_csr INTO l_stops_trip_name;
6367: CLOSE get_trip_name_csr;
6368: FND_MESSAGE.SET_NAME('WSH','WSH_PREV_IB_STOPS_NOT_CLOSED');
6369: FND_MESSAGE.SET_TOKEN('TRIP_NAME', l_stops_trip_name);
6370: FND_MESSAGE.SET_TOKEN('STOP_NAME_LIST', l_stop_name_list);
6371: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
6372: wsh_util_core.add_message(x_return_status);
6373: END IF;
6366: FETCH get_trip_name_csr INTO l_stops_trip_name;
6367: CLOSE get_trip_name_csr;
6368: FND_MESSAGE.SET_NAME('WSH','WSH_PREV_IB_STOPS_NOT_CLOSED');
6369: FND_MESSAGE.SET_TOKEN('TRIP_NAME', l_stops_trip_name);
6370: FND_MESSAGE.SET_TOKEN('STOP_NAME_LIST', l_stop_name_list);
6371: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
6372: wsh_util_core.add_message(x_return_status);
6373: END IF;
6374: --} bugfix 3925963
6421: /* H integration: 940/945 WSH wrudge */
6422: -- we should get warning only if user doesn't expect to do unassign all.
6423: IF p_action_flag NOT IN ('C', 'O') AND l_unassign_dds.count > 0 THEN
6424:
6425: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CONFIRM_UNASSIGN_ALL');
6426: --
6427: -- Debug Statements
6428: --
6429: IF l_debug_on THEN
6429: IF l_debug_on THEN
6430: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
6431: END IF;
6432: --
6433: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
6434: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
6435: wsh_util_core.add_message(x_return_status);
6436: WSH_NEW_DELIVERY_ACTIONS.g_error_level := 'E';
6437: l_num_warn := l_num_warn + 1;
6503: goto loop_end;
6504:
6505: <
6506:
6507: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CONFIRM_ERROR');
6508: --
6509: -- Debug Statements
6510: --
6511: IF l_debug_on THEN
6511: IF l_debug_on THEN
6512: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
6513: END IF;
6514: --
6515: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
6516: wsh_util_core.add_message(x_return_status);
6517:
6518: /* H integration: 940/945 wrudge */
6519: <
6747: ELSE
6748: --Bug 3685366
6749: l_dummy_doc_set(1).bol_error_flag:='Y';
6750: --
6751: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CREATE_BOL_ERROR');
6752: --
6753: -- Debug Statements
6754: --
6755: IF l_debug_on THEN
6756: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
6757: END IF;
6758: --
6759:
6760: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(u_del_rows(i)));
6761: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
6762: wsh_util_core.add_message(x_return_status);
6763: l_num_warn := l_num_warn + 1;
6764: END IF;
6784: -- Bug 3685366
6785: l_dummy_doc_set(1).bol_error_flag:='Y';
6786: --
6787:
6788: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CREATE_BOL_ERROR');
6789: --
6790: -- Debug Statements
6791: --
6792:
6793: IF l_debug_on THEN
6794: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
6795: END IF;
6796: --
6797: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(u_del_rows(i)));
6798: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
6799: wsh_util_core.add_message(x_return_status);
6800: l_num_warn := l_num_warn + 1;
6801: END IF;
6857: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
6858: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
6859: l_num_error := l_num_error + 1;
6860: ELSE
6861: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_DOC_SUB_ERROR');
6862: --
6863: -- Debug Statements
6864: --
6865: IF l_debug_on THEN
6865: IF l_debug_on THEN
6866: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
6867: END IF;
6868: --
6869: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(u_del_rows(i)));
6870: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
6871: wsh_util_core.add_message(x_return_status);
6872: l_num_warn := l_num_warn + 1;
6873: END IF;
6902: ELSE
6903: IF l_debug_on THEN
6904: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
6905: END IF;
6906: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(u_del_rows(i)));
6907: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
6908: wsh_util_core.add_message(x_return_status);
6909: l_num_warn := l_num_warn + 1;
6910: END IF;
7097: itemkey => u_del_rows(l_ctr),
7098: aname => 'ACTUAL_DATE',
7099: avalue => P_ACTUAL_DEP_DATE);
7100:
7101: FND_MESSAGE.SET_NAME('WSH','WSH_WF_SCPOD_LAUNCHED');
7102: FND_MESSAGE.Set_Token('DEL_NAME',wsh_new_deliveries_pvt.get_name(u_del_rows(l_ctr)));
7103: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_SUCCESS,l_module_name);
7104:
7105: END IF;
7098: aname => 'ACTUAL_DATE',
7099: avalue => P_ACTUAL_DEP_DATE);
7100:
7101: FND_MESSAGE.SET_NAME('WSH','WSH_WF_SCPOD_LAUNCHED');
7102: FND_MESSAGE.Set_Token('DEL_NAME',wsh_new_deliveries_pvt.get_name(u_del_rows(l_ctr)));
7103: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_SUCCESS,l_module_name);
7104:
7105: END IF;
7106: END LOOP;
7147: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
7148: l_num_error := l_num_error + 1;
7149: ELSE
7150: /* new message: WSH_DEL_OUTBOUND_FAILED, token DEL_NAME */
7151: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_OUTBOUND_FAILED');
7152: --
7153: -- Debug Statements
7154: --
7155: IF l_debug_on THEN
7155: IF l_debug_on THEN
7156: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
7157: END IF;
7158: --
7159: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
7160: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
7161: wsh_util_core.add_message(x_return_status);
7162: l_num_warn := l_num_warn + 1;
7163: END IF;
7253:
7254: -- 20. set summary messages for warnings and errors
7255:
7256: IF (l_num_error > 0) THEN
7257: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CONFIRM_WARNING');
7258: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7259: wsh_util_core.add_message(x_return_status);
7260: rollback to savepoint start_ship_confirm_delivery;
7261:
7263:
7264: -- Set Message as Number of Deliveries as Confirmed, In-Transit and Closed
7265: IF ( l_close_del_cnt <> 0 ) THEN
7266:
7267: FND_MESSAGE.SET_NAME('WSH','WSH_CL_DELIVERIES');
7268: FND_MESSAGE.SET_TOKEN('CL_DEL',l_close_del_cnt);
7269: wsh_util_core.add_message(x_return_status);
7270:
7271: END IF;
7264: -- Set Message as Number of Deliveries as Confirmed, In-Transit and Closed
7265: IF ( l_close_del_cnt <> 0 ) THEN
7266:
7267: FND_MESSAGE.SET_NAME('WSH','WSH_CL_DELIVERIES');
7268: FND_MESSAGE.SET_TOKEN('CL_DEL',l_close_del_cnt);
7269: wsh_util_core.add_message(x_return_status);
7270:
7271: END IF;
7272:
7271: END IF;
7272:
7273: IF (l_confirm_del_cnt <> 0) THEN
7274:
7275: FND_MESSAGE.SET_NAME('WSH','WSH_CO_DELIVERIES');
7276: FND_MESSAGE.SET_TOKEN('CO_DEL',l_confirm_del_cnt);
7277: wsh_util_core.add_message(x_return_status);
7278:
7279: END IF;
7272:
7273: IF (l_confirm_del_cnt <> 0) THEN
7274:
7275: FND_MESSAGE.SET_NAME('WSH','WSH_CO_DELIVERIES');
7276: FND_MESSAGE.SET_TOKEN('CO_DEL',l_confirm_del_cnt);
7277: wsh_util_core.add_message(x_return_status);
7278:
7279: END IF;
7280:
7278:
7279: END IF;
7280:
7281: if (l_num_warn > 0) THEN
7282: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CONFIRM_WARNING');
7283: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
7284: wsh_util_core.add_message(x_return_status);
7285: elsif (p_del_rows.count > 1) THEN
7286: -- bug 2523074 (frontported bug 2508132):
7286: -- bug 2523074 (frontported bug 2508132):
7287: -- if multiple deliveries are processed, show summary message,
7288: -- so that the user does not think the first message (e.g.,
7289: -- request number) applies to all deliveries.
7290: FND_MESSAGE.SET_NAME('WSH', 'WSH_DEL_CONFIRM_SUCCESS');
7291: wsh_util_core.add_message(x_return_status);
7292: else
7293: FND_MESSAGE.SET_NAME('WSH', 'WSH_ONE_DEL_CONFIRM_SUCCESS');
7294: wsh_util_core.add_message(x_return_status);
7289: -- request number) applies to all deliveries.
7290: FND_MESSAGE.SET_NAME('WSH', 'WSH_DEL_CONFIRM_SUCCESS');
7291: wsh_util_core.add_message(x_return_status);
7292: else
7293: FND_MESSAGE.SET_NAME('WSH', 'WSH_ONE_DEL_CONFIRM_SUCCESS');
7294: wsh_util_core.add_message(x_return_status);
7295: end if;
7296: END IF;
7297:
7336: IF (get_delivery_name%ISOPEN) THEN
7337: CLOSE get_delivery_name;
7338: END IF;
7339:
7340: FND_MESSAGE.SET_NAME('WSH','WSH_SHIP_CONFIRM_ERROR');
7341: --
7342: -- Debug Statements
7343: --
7344: IF l_debug_on THEN
7344: IF l_debug_on THEN
7345: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
7346: END IF;
7347: --
7348: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(l_delivery_id));
7349: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7350: wsh_util_core.add_message(x_return_status);
7351: WSH_UTIL_CORE.Store_Msg_In_Table (p_store_flag => FALSE,
7352: x_msg_rec_count => l_msg_rec_count,
7369: IF (get_delivery_name%ISOPEN) THEN
7370: CLOSE get_delivery_name;
7371: END IF;
7372:
7373: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_LOCK_ERR');
7374: wsh_util_core.add_message(x_return_status);
7375: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7376: WSH_UTIL_CORE.Store_Msg_In_Table (p_store_flag => FALSE,
7377: x_msg_rec_count => l_msg_rec_count,
7751: --
7752: IF (SQL%NOTFOUND)
7753: THEN
7754: --{
7755: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_NOT_FOUND');
7756: l_num_errors := l_num_errors + 1;
7757: wsh_util_core.add_message(x_return_status,l_module_name);
7758: --}
7759: ELSE
8031: RETURNING organization_id INTO l_org_id;
8032: --
8033: IF (SQL%NOTFOUND)
8034: THEN
8035: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_NOT_FOUND');
8036: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR);
8037: RAISE FND_API.G_EXC_ERROR;
8038: END IF;
8039: --
8342: --
8343: -- J-IB-NPARIKH---{
8344: IF (del_status%NOTFOUND)
8345: THEN
8346: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_NOT_FOUND');
8347: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
8348: --CLOSE del_status;
8349: l_num_errors := l_num_errors + 1;
8350: RAISE FND_API.G_EXC_ERROR;
8604: last_update_login = l_login_id
8605: where delivery_id = p_del_rows(i);
8606:
8607: IF (SQL%NOTFOUND) THEN
8608: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_NOT_FOUND');
8609: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR);
8610: l_num_errors := l_num_errors + 1;
8611: RAISE FND_API.G_EXC_ERROR;
8612: END IF;
8661: THEN
8662: --{
8663: ROLLBACK TO dlvy_chg_status_sp;
8664: --
8665: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CHANGE_STATUS_ERROR');
8666: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_name);
8667: --
8668: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
8669: --}
8662: --{
8663: ROLLBACK TO dlvy_chg_status_sp;
8664: --
8665: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CHANGE_STATUS_ERROR');
8666: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_name);
8667: --
8668: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
8669: --}
8670: WHEN wsh_util_core.g_exc_warning
8671: THEN
8672: --{
8673: ROLLBACK TO dlvy_chg_status_sp;
8674: --
8675: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CHANGE_STATUS_ERROR');
8676: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_name);
8677: --
8678: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_WARNING,l_module_name);
8679: --}
8672: --{
8673: ROLLBACK TO dlvy_chg_status_sp;
8674: --
8675: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CHANGE_STATUS_ERROR');
8676: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_name);
8677: --
8678: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_WARNING,l_module_name);
8679: --}
8680: --}
8699: x_return_status := l_return_status;
8700: --
8701: IF p_del_rows.count > 1
8702: THEN
8703: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CHANGE_STATUS_SUMMARY');
8704: FND_MESSAGE.SET_TOKEN('NUM_SUCCESS',l_num_dels_processed);
8705: FND_MESSAGE.SET_TOKEN('NUM_ERROR',p_del_rows.count - l_num_dels_processed);
8706: wsh_util_core.add_message(l_return_status,l_module_name);
8707: END IF;
8700: --
8701: IF p_del_rows.count > 1
8702: THEN
8703: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CHANGE_STATUS_SUMMARY');
8704: FND_MESSAGE.SET_TOKEN('NUM_SUCCESS',l_num_dels_processed);
8705: FND_MESSAGE.SET_TOKEN('NUM_ERROR',p_del_rows.count - l_num_dels_processed);
8706: wsh_util_core.add_message(l_return_status,l_module_name);
8707: END IF;
8708: --
8701: IF p_del_rows.count > 1
8702: THEN
8703: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CHANGE_STATUS_SUMMARY');
8704: FND_MESSAGE.SET_TOKEN('NUM_SUCCESS',l_num_dels_processed);
8705: FND_MESSAGE.SET_TOKEN('NUM_ERROR',p_del_rows.count - l_num_dels_processed);
8706: wsh_util_core.add_message(l_return_status,l_module_name);
8707: END IF;
8708: --
8709: -- Debug Statements
8845: IF (delivery_info%NOTFOUND) THEN
8846: CLOSE delivery_info;
8847:
8848: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8849: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_NOT_FOUND');
8850: wsh_util_core.add_message(x_return_status);
8851:
8852:
8853: IF l_debug_on THEN
8902:
8903: IF (SQL%NOTFOUND) THEN
8904: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8905:
8906: FND_MESSAGE.SET_NAME('WSH','WSH_LEG_NOT_FOUND');
8907: wsh_util_core.add_message(x_return_status);
8908:
8909: IF l_debug_on THEN
8910: WSH_DEBUG_SV.pop(l_module_name);
8920: IF (pickup_delivery_legs%FOUND) THEN
8921: CLOSE pickup_delivery_legs;
8922:
8923: IF (p_insert_msg) THEN
8924: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_MULTIPLE_LEGS');
8925: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
8926: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR);
8927: END IF;
8928:
8921: CLOSE pickup_delivery_legs;
8922:
8923: IF (p_insert_msg) THEN
8924: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_MULTIPLE_LEGS');
8925: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
8926: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR);
8927: END IF;
8928:
8929: IF l_debug_on THEN
8939: CLOSE dropoff_delivery_legs;
8940:
8941: IF (l_count > 1) THEN
8942: IF (p_insert_msg) THEN
8943: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_MULTIPLE_LEGS');
8944: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
8945: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR);
8946: END IF;
8947:
8940:
8941: IF (l_count > 1) THEN
8942: IF (p_insert_msg) THEN
8943: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_MULTIPLE_LEGS');
8944: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
8945: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR);
8946: END IF;
8947:
8948: IF l_debug_on THEN
8959:
8960: IF (l_seq_num <> l_leg_count) THEN
8961:
8962: IF (p_insert_msg) THEN
8963: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_INVALID_FLOW');
8964: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
8965: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR);
8966: END IF;
8967: --
8960: IF (l_seq_num <> l_leg_count) THEN
8961:
8962: IF (p_insert_msg) THEN
8963: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_INVALID_FLOW');
8964: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
8965: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR);
8966: END IF;
8967: --
8968: IF l_debug_on THEN
8976: IF (l_final_dropoff <> l_dropoff_location_id) THEN
8977: x_leg_complete := 'NW';
8978:
8979: IF (p_insert_msg) THEN
8980: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_NO_ULTIMATE_DROPOFF');
8981: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
8982: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR);
8983: END IF;
8984: RETURN;
8977: x_leg_complete := 'NW';
8978:
8979: IF (p_insert_msg) THEN
8980: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_NO_ULTIMATE_DROPOFF');
8981: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
8982: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR);
8983: END IF;
8984: RETURN;
8985: END IF;
9270: IF (loading_order%NOTFOUND) OR (l_order_flag IS NULL) THEN
9271: IF (loading_order%ISOPEN) THEN
9272: CLOSE loading_order;
9273: END IF;
9274: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_INV_LOADING_ORDER');
9275: --
9276: -- Debug Statements
9277: --
9278: IF l_debug_on THEN
9278: IF l_debug_on THEN
9279: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
9280: END IF;
9281: --
9282: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
9283: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9284: wsh_util_core.add_message(x_return_status);
9285: l_num_error := l_num_error + 1;
9286: goto loop_end;
9343: IF (l_cnt = 0) THEN
9344: IF (continfo_cv%ISOPEN) THEN
9345: CLOSE continfo_cv;
9346: END IF;
9347: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_LOAD_SEQ_LINE_ERROR');
9348: --
9349: -- Debug Statements
9350: --
9351: IF l_debug_on THEN
9351: IF l_debug_on THEN
9352: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
9353: END IF;
9354: --
9355: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
9356: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9357: wsh_util_core.add_message(x_return_status);
9358: l_num_error := l_num_error + 1;
9359: EXIT;
9365:
9366: END LOOP;
9367:
9368: IF (l_cont_cnt = 0) THEN
9369: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_LOAD_SEQ_CONT_ERROR');
9370: --
9371: -- Debug Statements
9372: --
9373: IF l_debug_on THEN
9373: IF l_debug_on THEN
9374: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
9375: END IF;
9376: --
9377: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
9378: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9379: wsh_util_core.add_message(x_return_status);
9380: l_num_error := l_num_error + 1;
9381: END IF;
9391: END LOOP;
9392:
9393: IF (p_del_rows.count > 1) THEN
9394: IF (l_num_error > 0) THEN
9395: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_LOAD_SEQ_SUMMARY');
9396: FND_MESSAGE.SET_TOKEN('NUM_ERROR',l_num_error);
9397: FND_MESSAGE.SET_TOKEN('NUM_SUCCESS',p_del_rows.count - l_num_error);
9398:
9399: IF (p_del_rows.count = l_num_error) THEN
9392:
9393: IF (p_del_rows.count > 1) THEN
9394: IF (l_num_error > 0) THEN
9395: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_LOAD_SEQ_SUMMARY');
9396: FND_MESSAGE.SET_TOKEN('NUM_ERROR',l_num_error);
9397: FND_MESSAGE.SET_TOKEN('NUM_SUCCESS',p_del_rows.count - l_num_error);
9398:
9399: IF (p_del_rows.count = l_num_error) THEN
9400: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9393: IF (p_del_rows.count > 1) THEN
9394: IF (l_num_error > 0) THEN
9395: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_LOAD_SEQ_SUMMARY');
9396: FND_MESSAGE.SET_TOKEN('NUM_ERROR',l_num_error);
9397: FND_MESSAGE.SET_TOKEN('NUM_SUCCESS',p_del_rows.count - l_num_error);
9398:
9399: IF (p_del_rows.count = l_num_error) THEN
9400: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9401: ELSE
9658: --{
9659: --
9660: -- Delivery id is mandatory input
9661: --
9662: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
9663: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'p_delivery_id');
9664: RAISE FND_API.G_EXC_ERROR;
9665: --}
9666: END IF;
9659: --
9660: -- Delivery id is mandatory input
9661: --
9662: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
9663: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'p_delivery_id');
9664: RAISE FND_API.G_EXC_ERROR;
9665: --}
9666: END IF;
9667: --
9676: --{
9677: --
9678: -- Raise error for invalid Delivery id
9679: --
9680: fnd_message.SET_name('WSH', 'WSH_DET_INVALID_DEL');
9681: RAISE FND_API.G_EXC_ERROR;
9682: --}
9683: END IF;
9684: --
9871: IF (SQL%NOTFOUND)
9872: THEN
9873: --{
9874: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9875: fnd_message.SET_name('WSH', 'WSH_DET_INVALID_DEL');
9876: RAISE FND_API.G_EXC_ERROR;
9877: --}
9878: END IF;
9879: --
9909: IF (SQL%NOTFOUND)
9910: THEN
9911: --{
9912: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9913: fnd_message.SET_name('WSH', 'WSH_DET_INVALID_DEL');
9914: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_error,l_module_name);
9915: --}
9916: END IF;
9917: --
9929: END IF;
9930: WHEN e_locked THEN
9931: x_return_status := wsh_util_core.g_ret_sts_error;
9932:
9933: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_LOCK_FAILED');
9934: FND_MESSAGE.SET_TOKEN('ENTITY_NAME', l_name);
9935: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_error,l_module_name);
9936: --
9937: IF l_debug_on
9930: WHEN e_locked THEN
9931: x_return_status := wsh_util_core.g_ret_sts_error;
9932:
9933: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_LOCK_FAILED');
9934: FND_MESSAGE.SET_TOKEN('ENTITY_NAME', l_name);
9935: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_error,l_module_name);
9936: --
9937: IF l_debug_on
9938: THEN
10065: --{
10066: --
10067: -- Delivery id is required field
10068: --
10069: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
10070: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'p_delivery_id');
10071: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_error,l_module_name);
10072: --
10073: RAISE FND_API.G_EXC_ERROR;
10066: --
10067: -- Delivery id is required field
10068: --
10069: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
10070: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'p_delivery_id');
10071: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_error,l_module_name);
10072: --
10073: RAISE FND_API.G_EXC_ERROR;
10074: --}
10081: --
10082: IF l_dlvy_rec.initial_pickup_location_id IS NULL
10083: THEN
10084: --{
10085: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_NOT_EXIST');
10086: FND_MESSAGE.SET_TOKEN('DELIVERY_ID', p_delivery_id);
10087: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_error,l_module_name);
10088: --
10089: RAISE FND_API.G_EXC_ERROR;
10082: IF l_dlvy_rec.initial_pickup_location_id IS NULL
10083: THEN
10084: --{
10085: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_NOT_EXIST');
10086: FND_MESSAGE.SET_TOKEN('DELIVERY_ID', p_delivery_id);
10087: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_error,l_module_name);
10088: --
10089: RAISE FND_API.G_EXC_ERROR;
10090: --}
10282: --}
10283: END IF;
10284: --
10285: --
10286: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_PU_LOCN_UPDATE');
10287: FND_MESSAGE.SET_TOKEN('DELIVERY_NAME', pickup_dlvy_rec.name);
10288: FND_MESSAGE.SET_TOKEN('LOCATION_NAME', l_location_name);
10289: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_warning,l_module_name);
10290: l_num_warnings := l_num_warnings + 1;
10283: END IF;
10284: --
10285: --
10286: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_PU_LOCN_UPDATE');
10287: FND_MESSAGE.SET_TOKEN('DELIVERY_NAME', pickup_dlvy_rec.name);
10288: FND_MESSAGE.SET_TOKEN('LOCATION_NAME', l_location_name);
10289: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_warning,l_module_name);
10290: l_num_warnings := l_num_warnings + 1;
10291: --}
10284: --
10285: --
10286: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_PU_LOCN_UPDATE');
10287: FND_MESSAGE.SET_TOKEN('DELIVERY_NAME', pickup_dlvy_rec.name);
10288: FND_MESSAGE.SET_TOKEN('LOCATION_NAME', l_location_name);
10289: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_warning,l_module_name);
10290: l_num_warnings := l_num_warnings + 1;
10291: --}
10292: END LOOP;
10777: -- Delivery is not assoociated with a site.
10778: IF l_debug_on THEN
10779: wsh_debug_sv.logmsg(l_module_name, 'Delivery is not assoociated with a site');
10780: END IF;
10781: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_NO_SITE');
10782: FND_MESSAGE.Set_Token('DELIVERY',p_delivery_id);
10783: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10784: WSH_UTIL_CORE.add_message(x_return_status);
10785:
10778: IF l_debug_on THEN
10779: wsh_debug_sv.logmsg(l_module_name, 'Delivery is not assoociated with a site');
10780: END IF;
10781: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_NO_SITE');
10782: FND_MESSAGE.Set_Token('DELIVERY',p_delivery_id);
10783: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10784: WSH_UTIL_CORE.add_message(x_return_status);
10785:
10786: IF l_debug_on THEN
10792: -- Delivery is associated with multiple sites
10793: IF l_debug_on THEN
10794: wsh_debug_sv.logmsg(l_module_name, 'Delivery is not assoociated with multiple sites');
10795: END IF;
10796: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_MULT_SITE');
10797: FND_MESSAGE.Set_Token('DELIVERY',p_delivery_id);
10798: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10799: WSH_UTIL_CORE.add_message(x_return_status);
10800:
10793: IF l_debug_on THEN
10794: wsh_debug_sv.logmsg(l_module_name, 'Delivery is not assoociated with multiple sites');
10795: END IF;
10796: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_MULT_SITE');
10797: FND_MESSAGE.Set_Token('DELIVERY',p_delivery_id);
10798: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10799: WSH_UTIL_CORE.add_message(x_return_status);
10800:
10801: IF l_debug_on THEN
10914: IF l_debug_on THEN
10915: wsh_debug_sv.logmsg(l_module_name, 'Location not associated with a customer');
10916: END IF;
10917: -- Location not associated with a customer.
10918: FND_MESSAGE.SET_NAME('WSH','WSH_CUST_NO_LOC');
10919: FND_MESSAGE.SET_TOKEN('DELIVERY',p_delivery_id);
10920: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10921: WSH_UTIL_CORE.add_message(x_return_status);
10922:
10915: wsh_debug_sv.logmsg(l_module_name, 'Location not associated with a customer');
10916: END IF;
10917: -- Location not associated with a customer.
10918: FND_MESSAGE.SET_NAME('WSH','WSH_CUST_NO_LOC');
10919: FND_MESSAGE.SET_TOKEN('DELIVERY',p_delivery_id);
10920: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10921: WSH_UTIL_CORE.add_message(x_return_status);
10922:
10923: IF l_debug_on THEN
10927: -- Location associated with a multiple customers.
10928: IF l_debug_on THEN
10929: wsh_debug_sv.logmsg(l_module_name, 'Location associated with multiple customers');
10930: END IF;
10931: FND_MESSAGE.SET_NAME('WSH','WSH_CUST_MULT_LOC');
10932: FND_MESSAGE.SET_TOKEN('DELIVERY',p_delivery_id);
10933: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10934: WSH_UTIL_CORE.add_message(x_return_status);
10935:
10928: IF l_debug_on THEN
10929: wsh_debug_sv.logmsg(l_module_name, 'Location associated with multiple customers');
10930: END IF;
10931: FND_MESSAGE.SET_NAME('WSH','WSH_CUST_MULT_LOC');
10932: FND_MESSAGE.SET_TOKEN('DELIVERY',p_delivery_id);
10933: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10934: WSH_UTIL_CORE.add_message(x_return_status);
10935:
10936: IF l_debug_on THEN
11965: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID_TAB.COUNT',p_delivery_id_tab.COUNT);
11966:
11967: END IF;
11968:
11969: FND_MESSAGE.SET_NAME('WSH','WSH_FTE_CS_INVALID_INPUT');
11970: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11971: WSH_UTIL_CORE.add_message(x_return_status);
11972: --
11973: -- Debug Statements
12079: -- Changed planned delivery to an ERROR from a WARNING
12080: --
12081: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12082: x_return_message := WSH_UTIL_CORE.G_RET_STS_ERROR;
12083: FND_MESSAGE.Set_Name('WSH', 'WSH_FTE_CS_PLAN_DEL');
12084: FND_MESSAGE.Set_Token('DELIVERY_ID',l_dlvy_info_rec.l_delivery_id);
12085: wsh_util_core.add_message(x_return_status);
12086: --
12087: -- Debug Statements
12080: --
12081: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12082: x_return_message := WSH_UTIL_CORE.G_RET_STS_ERROR;
12083: FND_MESSAGE.Set_Name('WSH', 'WSH_FTE_CS_PLAN_DEL');
12084: FND_MESSAGE.Set_Token('DELIVERY_ID',l_dlvy_info_rec.l_delivery_id);
12085: wsh_util_core.add_message(x_return_status);
12086: --
12087: -- Debug Statements
12088: --
12099:
12100: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12101: x_return_message := WSH_UTIL_CORE.G_RET_STS_ERROR;
12102: IF (substr(p_caller,1,3) = 'FTE') THEN
12103: FND_MESSAGE.Set_Name('WSH','WSH_FTE_CS_TRIP_MANY_FTE');
12104: ELSE
12105: FND_MESSAGE.Set_Name('WSH','WSH_FTE_CS_TRIP_MANY');
12106: END IF;
12107: FND_MESSAGE.Set_Token('DELIVERY_ID',l_dlvy_info_rec.l_delivery_id);
12101: x_return_message := WSH_UTIL_CORE.G_RET_STS_ERROR;
12102: IF (substr(p_caller,1,3) = 'FTE') THEN
12103: FND_MESSAGE.Set_Name('WSH','WSH_FTE_CS_TRIP_MANY_FTE');
12104: ELSE
12105: FND_MESSAGE.Set_Name('WSH','WSH_FTE_CS_TRIP_MANY');
12106: END IF;
12107: FND_MESSAGE.Set_Token('DELIVERY_ID',l_dlvy_info_rec.l_delivery_id);
12108: wsh_util_core.add_message(x_return_status);
12109:
12103: FND_MESSAGE.Set_Name('WSH','WSH_FTE_CS_TRIP_MANY_FTE');
12104: ELSE
12105: FND_MESSAGE.Set_Name('WSH','WSH_FTE_CS_TRIP_MANY');
12106: END IF;
12107: FND_MESSAGE.Set_Token('DELIVERY_ID',l_dlvy_info_rec.l_delivery_id);
12108: wsh_util_core.add_message(x_return_status);
12109:
12110: IF l_debug_on THEN
12111: WSH_DEBUG_SV.logmsg(l_module_name,'DELIVERY '||l_dlvy_info_rec.l_delivery_id||' IS ASSIGNED TO MANY TRIPS, CARRIER SELECTION IS NOT ALLOWED' );
12116:
12117: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12118: x_return_message := WSH_UTIL_CORE.G_RET_STS_ERROR;
12119: IF (substr(p_caller,1,3) = 'FTE') THEN
12120: FND_MESSAGE.Set_Name('WSH','WSH_FTE_CS_TRIP_SHARED_FTE');
12121: ELSE
12122: FND_MESSAGE.Set_Name('WSH', 'WSH_FTE_CS_TRIP_SHARED');
12123: END IF;
12124:
12118: x_return_message := WSH_UTIL_CORE.G_RET_STS_ERROR;
12119: IF (substr(p_caller,1,3) = 'FTE') THEN
12120: FND_MESSAGE.Set_Name('WSH','WSH_FTE_CS_TRIP_SHARED_FTE');
12121: ELSE
12122: FND_MESSAGE.Set_Name('WSH', 'WSH_FTE_CS_TRIP_SHARED');
12123: END IF;
12124:
12125: FND_MESSAGE.Set_Token('DELIVERY_ID',l_dlvy_info_rec.l_delivery_id);
12126: wsh_util_core.add_message(x_return_status);
12121: ELSE
12122: FND_MESSAGE.Set_Name('WSH', 'WSH_FTE_CS_TRIP_SHARED');
12123: END IF;
12124:
12125: FND_MESSAGE.Set_Token('DELIVERY_ID',l_dlvy_info_rec.l_delivery_id);
12126: wsh_util_core.add_message(x_return_status);
12127:
12128: IF l_debug_on THEN
12129: WSH_DEBUG_SV.logmsg(l_module_name, 'DELIVERY '||l_dlvy_info_rec.l_delivery_id||' IS ASSIGNED TO A SHARED TRIP, CARRIER SELECTION IS NOT ALLOWED' );
12135: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12136: x_return_message := WSH_UTIL_CORE.G_RET_STS_ERROR;
12137:
12138: IF (substr(p_caller,1,3) = 'FTE') THEN
12139: FND_MESSAGE.Set_Name('WSH','WSH_FTE_CS_TRIP_HAS_LANE_FTE');
12140: ELSE
12141: FND_MESSAGE.Set_Name('WSH', 'WSH_FTE_CS_TRIP_HAS_LANE');
12142: END IF;
12143: FND_MESSAGE.Set_Token('DELIVERY_ID',l_dlvy_info_rec.l_delivery_id);
12137:
12138: IF (substr(p_caller,1,3) = 'FTE') THEN
12139: FND_MESSAGE.Set_Name('WSH','WSH_FTE_CS_TRIP_HAS_LANE_FTE');
12140: ELSE
12141: FND_MESSAGE.Set_Name('WSH', 'WSH_FTE_CS_TRIP_HAS_LANE');
12142: END IF;
12143: FND_MESSAGE.Set_Token('DELIVERY_ID',l_dlvy_info_rec.l_delivery_id);
12144: wsh_util_core.add_message(x_return_status);
12145:
12139: FND_MESSAGE.Set_Name('WSH','WSH_FTE_CS_TRIP_HAS_LANE_FTE');
12140: ELSE
12141: FND_MESSAGE.Set_Name('WSH', 'WSH_FTE_CS_TRIP_HAS_LANE');
12142: END IF;
12143: FND_MESSAGE.Set_Token('DELIVERY_ID',l_dlvy_info_rec.l_delivery_id);
12144: wsh_util_core.add_message(x_return_status);
12145:
12146: IF l_debug_on THEN
12147: WSH_DEBUG_SV.logmsg(l_module_name, 'DELIVERY '||l_dlvy_info_rec.l_delivery_id||' IS ASSIGNED TO A TRIP WITH SERVICE, CARRIER SELECTION IS NOT ALLOWED' );
12219: WSH_DEBUG_SV.logmsg(l_module_name,'Return Status after get_default_uoms'||l_return_status);
12220: END IF;
12221:
12222: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
12223: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_NO_UOM');
12224: FND_MESSAGE.SET_TOKEN('DELIVERY',l_dlvy_info_tab(i).l_delivery_id);
12225: WSH_UTIL_CORE.add_message(l_return_status);
12226: l_carrier_sel_entity_tab.DELETE(l_cnt);
12227: GOTO dlvy_nextpass;
12220: END IF;
12221:
12222: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
12223: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_NO_UOM');
12224: FND_MESSAGE.SET_TOKEN('DELIVERY',l_dlvy_info_tab(i).l_delivery_id);
12225: WSH_UTIL_CORE.add_message(l_return_status);
12226: l_carrier_sel_entity_tab.DELETE(l_cnt);
12227: GOTO dlvy_nextpass;
12228: END IF;
12297:
12298: l_cnt := l_cnt+1;
12299:
12300: ELSE
12301: FND_MESSAGE.SET_NAME('WSH','WSH_FTE_CS_DLVY_CONTENT');
12302: FND_MESSAGE.SET_TOKEN('DELIVERY',l_dlvy_info_tab(i).l_delivery_id);
12303: WSH_UTIL_CORE.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR);
12304: END IF;
12305:
12298: l_cnt := l_cnt+1;
12299:
12300: ELSE
12301: FND_MESSAGE.SET_NAME('WSH','WSH_FTE_CS_DLVY_CONTENT');
12302: FND_MESSAGE.SET_TOKEN('DELIVERY',l_dlvy_info_tab(i).l_delivery_id);
12303: WSH_UTIL_CORE.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR);
12304: END IF;
12305:
12306: <
12312: IF l_debug_on THEN
12313: wsh_debug_sv.logmsg(l_module_name, 'None of the selected deliveries have been found as eligible for Carrier Selection');
12314: END IF;
12315: -- All deliveries are content.
12316: FND_MESSAGE.SET_NAME('WSH','WSH_FTE_CS_DLVY_ALL_CONTENT');
12317: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12318: WSH_UTIL_CORE.add_message(x_return_status);
12319: IF l_debug_on THEN
12320: WSH_DEBUG_SV.pop(l_module_name);
12538: --}
12539: ELSE -- for the case when delivery is already attached to trip, l_trip_id IS NOT NULL
12540: --{
12541: IF l_trip_rank_seq is NOT NULL THEN
12542: FND_MESSAGE.SET_NAME('WSH','WSH_FTE_CS_UPD_TRIP_RANK_LIST');
12543: FND_MESSAGE.SET_TOKEN('TRIPID',l_trip_id);
12544: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
12545: WSH_UTIL_CORE.add_message(x_return_status);
12546: END IF;
12539: ELSE -- for the case when delivery is already attached to trip, l_trip_id IS NOT NULL
12540: --{
12541: IF l_trip_rank_seq is NOT NULL THEN
12542: FND_MESSAGE.SET_NAME('WSH','WSH_FTE_CS_UPD_TRIP_RANK_LIST');
12543: FND_MESSAGE.SET_TOKEN('TRIPID',l_trip_id);
12544: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
12545: WSH_UTIL_CORE.add_message(x_return_status);
12546: END IF;
12547:
12659: IF l_trip_id IS NOT NULL THEN
12660: --{
12661: -- if delivery is already assigned to trip and multileg route to be created as per rule results
12662: -- show error;
12663: FND_MESSAGE.SET_NAME('WSH','WSH_FTE_CS_DEL_MLEG_ASG_TRIP');
12664: FND_MESSAGE.SET_TOKEN('DELIVERY_ID',l_delivery_id);
12665: FND_MESSAGE.SET_TOKEN('TRIP_ID',l_trip_id);
12666: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12667: WSH_UTIL_CORE.add_message(x_return_status);
12660: --{
12661: -- if delivery is already assigned to trip and multileg route to be created as per rule results
12662: -- show error;
12663: FND_MESSAGE.SET_NAME('WSH','WSH_FTE_CS_DEL_MLEG_ASG_TRIP');
12664: FND_MESSAGE.SET_TOKEN('DELIVERY_ID',l_delivery_id);
12665: FND_MESSAGE.SET_TOKEN('TRIP_ID',l_trip_id);
12666: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12667: WSH_UTIL_CORE.add_message(x_return_status);
12668:
12661: -- if delivery is already assigned to trip and multileg route to be created as per rule results
12662: -- show error;
12663: FND_MESSAGE.SET_NAME('WSH','WSH_FTE_CS_DEL_MLEG_ASG_TRIP');
12664: FND_MESSAGE.SET_TOKEN('DELIVERY_ID',l_delivery_id);
12665: FND_MESSAGE.SET_TOKEN('TRIP_ID',l_trip_id);
12666: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12667: WSH_UTIL_CORE.add_message(x_return_status);
12668:
12669: l_cs_result_tab(rec_cnt) := NULL;
12674: --}
12675: ELSIF p_caller = 'WSH_AUTO_CREATE_DEL_TRIP' AND l_skip_rtng_rule_ac_trip = 'Y' THEN
12676: --{
12677: IF l_delivery_id <> l_prev_delivery_id THEN
12678: FND_MESSAGE.SET_NAME('WSH','WSH_FTE_CS_MULTILEG');
12679: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12680: WSH_UTIL_CORE.add_message(x_return_status);
12681: END IF;
12682:
13272:
13273: EXCEPTION
13274: WHEN OTHERS THEN
13275: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13276: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_LOCK_FAILED');
13277: FND_MESSAGE.Set_Token('DEL_NAME', WSH_NEW_DELIVERIES_PVT.Get_Name(l_valid_children_tab(i)));
13278: WSH_UTIL_CORE.Add_Message(x_return_status);
13279: --
13280: -- Debug Statements
13273: EXCEPTION
13274: WHEN OTHERS THEN
13275: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13276: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_LOCK_FAILED');
13277: FND_MESSAGE.Set_Token('DEL_NAME', WSH_NEW_DELIVERIES_PVT.Get_Name(l_valid_children_tab(i)));
13278: WSH_UTIL_CORE.Add_Message(x_return_status);
13279: --
13280: -- Debug Statements
13281: --
13494:
13495: EXCEPTION
13496: WHEN OTHERS THEN
13497: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13498: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_LOCK_FAILED');
13499: FND_MESSAGE.Set_Token('DEL_NAME', WSH_NEW_DELIVERIES_PVT.Get_Name(l_valid_children_tab(i)));
13500: WSH_UTIL_CORE.Add_Message(x_return_status);
13501: --
13502: -- Debug Statements
13495: EXCEPTION
13496: WHEN OTHERS THEN
13497: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13498: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_LOCK_FAILED');
13499: FND_MESSAGE.Set_Token('DEL_NAME', WSH_NEW_DELIVERIES_PVT.Get_Name(l_valid_children_tab(i)));
13500: WSH_UTIL_CORE.Add_Message(x_return_status);
13501: --
13502: -- Debug Statements
13503: --
13558:
13559: IF l_valid_children_tab.count < p_del_tab.count THEN
13560:
13561: -- Not all deliveries were assigned to parent.
13562: FND_MESSAGE.SET_NAME('WSH', 'WSH_PARTIAL_CONSOL_ASSIGN');
13563: FND_MESSAGE.SET_TOKEN('DEL_COUNT', 'l_valid_children_tab.count');
13564: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
13565: l_num_warnings := l_num_warnings + 1;
13566: END IF;
13559: IF l_valid_children_tab.count < p_del_tab.count THEN
13560:
13561: -- Not all deliveries were assigned to parent.
13562: FND_MESSAGE.SET_NAME('WSH', 'WSH_PARTIAL_CONSOL_ASSIGN');
13563: FND_MESSAGE.SET_TOKEN('DEL_COUNT', 'l_valid_children_tab.count');
13564: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
13565: l_num_warnings := l_num_warnings + 1;
13566: END IF;
13567:
13624: END IF;
13625: IF c_check_valid_child%ISOPEN THEN
13626: CLOSE c_check_valid_child;
13627: END IF;
13628: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_TRIP');
13629: WSH_UTIL_CORE.Add_Message(x_return_status);
13630: --
13631: -- Debug Statements
13632: --
13652: END IF;
13653: IF c_check_valid_child%ISOPEN THEN
13654: CLOSE c_check_valid_child;
13655: END IF;
13656: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_DECONSOL_POINT');
13657: WSH_UTIL_CORE.Add_Message(x_return_status);
13658: --
13659: -- Debug Statements
13660: --
13680: END IF;
13681: IF c_check_valid_child%ISOPEN THEN
13682: CLOSE c_check_valid_child;
13683: END IF;
13684: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CHILDREN');
13685: WSH_UTIL_CORE.Add_Message(x_return_status);
13686: --
13687: -- Debug Statements
13688: --
13708: IF c_check_valid_child%ISOPEN THEN
13709: CLOSE c_check_valid_child;
13710: END IF;
13711: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13712: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_PARENT');
13713: WSH_UTIL_CORE.Add_Message(x_return_status);
13714: --
13715: -- Debug Statements
13716: --
13737: IF c_check_valid_child%ISOPEN THEN
13738: CLOSE c_check_valid_child;
13739: END IF;
13740: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13741: FND_MESSAGE.SET_NAME('WSH','WSH_FAIL_ASSIGN_DEL_TO_CONSOL');
13742: WSH_UTIL_CORE.Add_Message(x_return_status);
13743: --
13744: -- Debug Statements
13745: --
13950: OPEN check_consol_lpns(l_assigned_dels_tab(i));
13951: FETCH check_consol_lpns INTO l_consol_lpn_dummy;
13952: IF check_consol_lpns%FOUND THEN
13953: CLOSE check_consol_lpns;
13954: FND_MESSAGE.SET_NAME('WSH','WSH_FAIL_UNASSIGN_DEL_LPN');
13955: FND_MESSAGE.SET_TOKEN('DELIVERY_NAME', WSH_NEW_DELIVERIES_PVT.Get_Name(l_assigned_dels_tab(i)));
13956: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13957: wsh_util_core.add_message(l_return_status, l_module_name);
13958: wsh_util_core.api_post_call
13951: FETCH check_consol_lpns INTO l_consol_lpn_dummy;
13952: IF check_consol_lpns%FOUND THEN
13953: CLOSE check_consol_lpns;
13954: FND_MESSAGE.SET_NAME('WSH','WSH_FAIL_UNASSIGN_DEL_LPN');
13955: FND_MESSAGE.SET_TOKEN('DELIVERY_NAME', WSH_NEW_DELIVERIES_PVT.Get_Name(l_assigned_dels_tab(i)));
13956: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13957: wsh_util_core.add_message(l_return_status, l_module_name);
13958: wsh_util_core.api_post_call
13959: (
13987:
13988: EXCEPTION
13989: WHEN OTHERS THEN
13990: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13991: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_LOCK_FAILED');
13992: FND_MESSAGE.Set_Token('DEL_NAME', WSH_NEW_DELIVERIES_PVT.Get_Name(l_assigned_dels_tab(i)));
13993: WSH_UTIL_CORE.Add_Message(x_return_status);
13994: --
13995: -- Debug Statements
13988: EXCEPTION
13989: WHEN OTHERS THEN
13990: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13991: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_LOCK_FAILED');
13992: FND_MESSAGE.Set_Token('DEL_NAME', WSH_NEW_DELIVERIES_PVT.Get_Name(l_assigned_dels_tab(i)));
13993: WSH_UTIL_CORE.Add_Message(x_return_status);
13994: --
13995: -- Debug Statements
13996: --
14057:
14058: EXCEPTION
14059: WHEN OTHERS THEN
14060: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
14061: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_DEL_LEG_LOCK');
14062: FND_MESSAGE.Set_Token('DEL_NAME', WSH_NEW_DELIVERIES_PVT.Get_Name(l_assigned_dels_tab(i)));
14063: WSH_UTIL_CORE.Add_Message(x_return_status);
14064: --
14065: -- Debug Statements
14058: EXCEPTION
14059: WHEN OTHERS THEN
14060: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
14061: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_DEL_LEG_LOCK');
14062: FND_MESSAGE.Set_Token('DEL_NAME', WSH_NEW_DELIVERIES_PVT.Get_Name(l_assigned_dels_tab(i)));
14063: WSH_UTIL_CORE.Add_Message(x_return_status);
14064: --
14065: -- Debug Statements
14066: --
14211: --
14212:
14213: WHEN WSH_NO_OPEN_CHILD_DELIVERIES THEN
14214: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
14215: FND_MESSAGE.SET_NAME('WSH','WSH_NO_OPEN_DELIVERIES');
14216: WSH_UTIL_CORE.Add_Message(x_return_status);
14217: --
14218: -- Debug Statements
14219: --
14225: --
14226:
14227: WHEN WSH_INVALID_CHILD_DELIVERIES THEN
14228: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
14229: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CHILD_DELIVERIES');
14230: WSH_UTIL_CORE.Add_Message(x_return_status);
14231: --
14232: -- Debug Statements
14233: --
14483: END LOOP;
14484: EXCEPTION
14485: WHEN OTHERS THEN
14486: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
14487: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_LOCK_FAILED');
14488: FND_MESSAGE.Set_Token('ENTITY_NAME', WSH_NEW_DELIVERIES_PVT.Get_Name(l_co_consol_del_tab(l_lock_index)));
14489: WSH_UTIL_CORE.Add_Message(x_return_status);
14490: --
14491: -- Debug Statements
14484: EXCEPTION
14485: WHEN OTHERS THEN
14486: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
14487: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_LOCK_FAILED');
14488: FND_MESSAGE.Set_Token('ENTITY_NAME', WSH_NEW_DELIVERIES_PVT.Get_Name(l_co_consol_del_tab(l_lock_index)));
14489: WSH_UTIL_CORE.Add_Message(x_return_status);
14490: --
14491: -- Debug Statements
14492: --