[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: --
3141:
3142: -- bug 2778035
3143: IF p_action_flag IS NULL
3144: OR p_action_flag NOT IN ('S', 'B', 'L', 'T', 'A', 'C', 'O') THEN
3145: FND_MESSAGE.SET_NAME('WSH', 'WSH_INVALID_SC_ACTION_FLAG');
3146: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error);
3147: RAISE FND_API.G_EXC_ERROR;
3148: END IF;
3149: -- bug 2778035
3249: WSH_DEBUG_SV.log(l_module_name,'l_empty_container',l_empty_container);
3250: WSH_DEBUG_SV.log(l_module_name,'Empty Container',l_cont_name);
3251: END IF;
3252:
3253: FND_MESSAGE.SET_NAME('WSH','WSH_EMPTY_CONTAINER');
3254: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
3255: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_delivery_name);
3256: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3257: l_num_warn := l_num_warn + 1;
3250: WSH_DEBUG_SV.log(l_module_name,'Empty Container',l_cont_name);
3251: END IF;
3252:
3253: FND_MESSAGE.SET_NAME('WSH','WSH_EMPTY_CONTAINER');
3254: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
3255: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_delivery_name);
3256: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3257: l_num_warn := l_num_warn + 1;
3258: wsh_util_core.add_message(x_return_status,l_module_name);
3251: END IF;
3252:
3253: FND_MESSAGE.SET_NAME('WSH','WSH_EMPTY_CONTAINER');
3254: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
3255: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_delivery_name);
3256: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3257: l_num_warn := l_num_warn + 1;
3258: wsh_util_core.add_message(x_return_status,l_module_name);
3259: END LOOP;
3428: WSH_DEBUG_SV.log(l_module_name,'Return Status after calling WSH_INTERFACE_EXT_GRP.OTM_PRE_SHIP_CONFIRM', l_return_status);
3429: END IF;
3430:
3431: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
3432: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CONFIRM_ERROR');
3433: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_delivery_name);
3434:
3435: WSH_UTIL_CORE.add_message(l_return_status, l_module_name);
3436:
3429: END IF;
3430:
3431: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
3432: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CONFIRM_ERROR');
3433: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_delivery_name);
3434:
3435: WSH_UTIL_CORE.add_message(l_return_status, l_module_name);
3436:
3437: l_num_error := l_num_error + 1 ;
3458: WSH_DEBUG_SV.log(l_module_name,'ship method passed in ship confirm', p_ship_method);
3459: WSH_DEBUG_SV.logmsg(l_module_name,'ship method not allowed to change for otm trip');
3460: END IF;
3461:
3462: FND_MESSAGE.SET_NAME('WSH', 'WSH_OTM_SHIP_CONFIRM_ERROR');
3463: FND_MESSAGE.SET_TOKEN('DELIVERY_NAME', l_delivery_name);
3464:
3465: WSH_UTIL_CORE.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR, l_module_name);
3466: l_num_error := l_num_error + 1;
3459: WSH_DEBUG_SV.logmsg(l_module_name,'ship method not allowed to change for otm trip');
3460: END IF;
3461:
3462: FND_MESSAGE.SET_NAME('WSH', 'WSH_OTM_SHIP_CONFIRM_ERROR');
3463: FND_MESSAGE.SET_TOKEN('DELIVERY_NAME', l_delivery_name);
3464:
3465: WSH_UTIL_CORE.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR, l_module_name);
3466: l_num_error := l_num_error + 1;
3467: GOTO loop_end;
3502: -- a. If delivery is confirmed , skip it and go to next.
3503: IF (l_del_status_code = 'CO') THEN
3504: -- Although the name of this message looks like its an error , we are not
3505: -- really erroring out here.
3506: FND_MESSAGE.SET_NAME('WSH','WSH_SHIP_CONFIRM_ERROR');
3507: --
3508: -- Debug Statements
3509: --
3510: IF l_debug_on THEN
3510: IF l_debug_on THEN
3511: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3512: END IF;
3513: --
3514: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
3515: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_SUCCESS);
3516: goto loop_end ;
3517: END IF;
3518:
3518:
3519: --b. If delivery is neither OPEN nor PACKED , then set WARNING and go to next one
3520:
3521: IF NOT ( (l_del_status_code IN ('OP', 'PA', 'SA'))) THEN -- sperera 940/945
3522: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CONFIRM_MULTI_ERROR');
3523: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3524: l_num_warn := l_num_warn + 1;
3525: wsh_util_core.add_message(x_return_status);
3526: goto loop_end ;
3536: FETCH get_freight INTO l_freight_code;
3537:
3538: IF (get_freight%NOTFOUND) THEN
3539: CLOSE get_freight;
3540: fnd_message.set_name('WSH','WSH_INVALID_FREIGHT_CODE');
3541: --
3542: -- Debug Statements
3543: --
3544: IF l_debug_on THEN
3544: IF l_debug_on THEN
3545: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3546: END IF;
3547: --
3548: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
3549: FND_MESSAGE.SET_TOKEN('SHIP_METHOD',l_ship_method_code);
3550: FND_MESSAGE.SET_TOKEN('ORG_ID',l_organization_id);
3551: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_WARNING);
3552: x_return_Status := WSH_UTIL_CORE.G_RET_STS_WARNING ;
3545: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3546: END IF;
3547: --
3548: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
3549: FND_MESSAGE.SET_TOKEN('SHIP_METHOD',l_ship_method_code);
3550: FND_MESSAGE.SET_TOKEN('ORG_ID',l_organization_id);
3551: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_WARNING);
3552: x_return_Status := WSH_UTIL_CORE.G_RET_STS_WARNING ;
3553: l_num_warn := l_num_warn + 1 ;
3546: END IF;
3547: --
3548: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
3549: FND_MESSAGE.SET_TOKEN('SHIP_METHOD',l_ship_method_code);
3550: FND_MESSAGE.SET_TOKEN('ORG_ID',l_organization_id);
3551: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_WARNING);
3552: x_return_Status := WSH_UTIL_CORE.G_RET_STS_WARNING ;
3553: l_num_warn := l_num_warn + 1 ;
3554: ELSE
3562: IF (l_initial_pickup_date(i) IS NULL)
3563: OR (l_ultimate_dropoff_date(i) IS NULL) THEN
3564:
3565: IF p_action_flag NOT IN ('C','O') THEN --{
3566: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_DATES_NULL');
3567: --
3568: -- Debug Statements
3569: --
3570: IF l_debug_on THEN
3570: IF l_debug_on THEN
3571: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3572: END IF;
3573: --
3574: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
3575: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3576: wsh_util_core.add_message(x_return_status);
3577:
3578: l_num_warn := l_num_warn + 1;
3601: p_primary_id => p_del_rows(i),
3602: x_return_status => x_return_status);
3603:
3604: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
3605: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CONFIRM_ERROR');
3606: --
3607: -- Debug Statements
3608: --
3609: IF l_debug_on THEN
3609: IF l_debug_on THEN
3610: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3611: END IF;
3612: --
3613: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
3614: wsh_util_core.add_message(x_return_status);
3615: if ( x_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR ) then
3616: l_num_error := l_num_error + 1 ;
3617: goto loop_end ;
3631: WSH_DEBUG_SV.log(l_module_name,'x_return_status after calling validate_del_containers', x_return_status);
3632: END IF;
3633:
3634: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
3635: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CONFIRM_ERROR');
3636: --
3637: -- Debug Statements
3638: --
3639: IF l_debug_on THEN
3639: IF l_debug_on THEN
3640: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3641: END IF;
3642: --
3643: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
3644: wsh_util_core.add_message(x_return_status);
3645: END IF;
3646: --
3647: IF (nvl(l_del_valid_flag,'Y') = 'N') THEN
3691: p_init_msg_list => 'F',
3692: p_api_version => 1.0, -- Bugfix 3561335
3693: p_delivery_ids => l_wms_delivery_id);
3694: IF ( l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS ) THEN
3695: FND_MESSAGE.SET_NAME('WSH','WSH_INTG_ERROR');
3696: FND_MESSAGE.SET_TOKEN('API_NAME', 'WMS_SHIPPING_PUB.DEL_WSTT_RECS_BY_DELIVERY_ID');
3697: FND_MESSAGE.SET_TOKEN('MSG_TEXT', l_msg_data);
3698: x_return_status := l_return_status;
3699: wsh_util_core.add_message(x_return_status);
3692: p_api_version => 1.0, -- Bugfix 3561335
3693: p_delivery_ids => l_wms_delivery_id);
3694: IF ( l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS ) THEN
3695: FND_MESSAGE.SET_NAME('WSH','WSH_INTG_ERROR');
3696: FND_MESSAGE.SET_TOKEN('API_NAME', 'WMS_SHIPPING_PUB.DEL_WSTT_RECS_BY_DELIVERY_ID');
3697: FND_MESSAGE.SET_TOKEN('MSG_TEXT', l_msg_data);
3698: x_return_status := l_return_status;
3699: wsh_util_core.add_message(x_return_status);
3700: IF ( l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR OR
3693: p_delivery_ids => l_wms_delivery_id);
3694: IF ( l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS ) THEN
3695: FND_MESSAGE.SET_NAME('WSH','WSH_INTG_ERROR');
3696: FND_MESSAGE.SET_TOKEN('API_NAME', 'WMS_SHIPPING_PUB.DEL_WSTT_RECS_BY_DELIVERY_ID');
3697: FND_MESSAGE.SET_TOKEN('MSG_TEXT', l_msg_data);
3698: x_return_status := l_return_status;
3699: wsh_util_core.add_message(x_return_status);
3700: IF ( l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR OR
3701: l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
3736: l_num_warn := l_num_warn + 1 ;
3737: END IF;
3738: END IF;
3739:
3740: l_entity_name:=FND_MESSAGE.GET_STRING('WSH','WSH_DELIVERY');
3741: l_exc_beh_error:=FND_MESSAGE.GET_STRING('WSH','WSH_MESSAGE_TYPE_ERROR');
3742: l_exc_beh_warn:=FND_MESSAGE.GET_STRING('WSH','WSH_MESSAGE_TYPE_WARNING');
3743:
3744: FOR exp_cnt in 1..l_exceptions_tab.COUNT LOOP
3737: END IF;
3738: END IF;
3739:
3740: l_entity_name:=FND_MESSAGE.GET_STRING('WSH','WSH_DELIVERY');
3741: l_exc_beh_error:=FND_MESSAGE.GET_STRING('WSH','WSH_MESSAGE_TYPE_ERROR');
3742: l_exc_beh_warn:=FND_MESSAGE.GET_STRING('WSH','WSH_MESSAGE_TYPE_WARNING');
3743:
3744: FOR exp_cnt in 1..l_exceptions_tab.COUNT LOOP
3745: IF l_exceptions_tab(exp_cnt).exception_behavior = 'ERROR' THEN
3738: END IF;
3739:
3740: l_entity_name:=FND_MESSAGE.GET_STRING('WSH','WSH_DELIVERY');
3741: l_exc_beh_error:=FND_MESSAGE.GET_STRING('WSH','WSH_MESSAGE_TYPE_ERROR');
3742: l_exc_beh_warn:=FND_MESSAGE.GET_STRING('WSH','WSH_MESSAGE_TYPE_WARNING');
3743:
3744: FOR exp_cnt in 1..l_exceptions_tab.COUNT LOOP
3745: IF l_exceptions_tab(exp_cnt).exception_behavior = 'ERROR' THEN
3746: IF l_exceptions_tab(exp_cnt).entity_name = 'DELIVERY' THEN
3743:
3744: FOR exp_cnt in 1..l_exceptions_tab.COUNT LOOP
3745: IF l_exceptions_tab(exp_cnt).exception_behavior = 'ERROR' THEN
3746: IF l_exceptions_tab(exp_cnt).entity_name = 'DELIVERY' THEN
3747: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_ENTITY');
3748: ELSE
3749: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
3750: END IF;
3751: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',l_entity_name);
3745: IF l_exceptions_tab(exp_cnt).exception_behavior = 'ERROR' THEN
3746: IF l_exceptions_tab(exp_cnt).entity_name = 'DELIVERY' THEN
3747: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_ENTITY');
3748: ELSE
3749: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
3750: END IF;
3751: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',l_entity_name);
3752: FND_MESSAGE.SET_TOKEN('ENTITY_ID',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
3753: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR',l_exc_beh_error);
3747: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_ENTITY');
3748: ELSE
3749: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
3750: END IF;
3751: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',l_entity_name);
3752: FND_MESSAGE.SET_TOKEN('ENTITY_ID',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
3753: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR',l_exc_beh_error);
3754: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3755: wsh_util_core.add_message(x_return_status);
3748: ELSE
3749: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
3750: END IF;
3751: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',l_entity_name);
3752: FND_MESSAGE.SET_TOKEN('ENTITY_ID',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
3753: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR',l_exc_beh_error);
3754: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3755: wsh_util_core.add_message(x_return_status);
3756: l_num_error := l_num_error + 1 ;
3749: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
3750: END IF;
3751: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',l_entity_name);
3752: FND_MESSAGE.SET_TOKEN('ENTITY_ID',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
3753: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR',l_exc_beh_error);
3754: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3755: wsh_util_core.add_message(x_return_status);
3756: l_num_error := l_num_error + 1 ;
3757: goto confirm_error_no_msg;
3756: l_num_error := l_num_error + 1 ;
3757: goto confirm_error_no_msg;
3758: ELSIF l_exceptions_tab(exp_cnt).exception_behavior = 'WARNING' THEN
3759: IF l_exceptions_tab(exp_cnt).entity_name = 'DELIVERY' THEN
3760: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_ENTITY');
3761: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',l_entity_name);
3762: FND_MESSAGE.SET_TOKEN('ENTITY_ID',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
3763: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR',l_exc_beh_warn);
3764: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3757: goto confirm_error_no_msg;
3758: ELSIF l_exceptions_tab(exp_cnt).exception_behavior = 'WARNING' THEN
3759: IF l_exceptions_tab(exp_cnt).entity_name = 'DELIVERY' THEN
3760: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_ENTITY');
3761: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',l_entity_name);
3762: FND_MESSAGE.SET_TOKEN('ENTITY_ID',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
3763: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR',l_exc_beh_warn);
3764: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3765: wsh_util_core.add_message(x_return_status);
3758: ELSIF l_exceptions_tab(exp_cnt).exception_behavior = 'WARNING' THEN
3759: IF l_exceptions_tab(exp_cnt).entity_name = 'DELIVERY' THEN
3760: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_ENTITY');
3761: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',l_entity_name);
3762: FND_MESSAGE.SET_TOKEN('ENTITY_ID',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
3763: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR',l_exc_beh_warn);
3764: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3765: wsh_util_core.add_message(x_return_status);
3766: l_num_warn := l_num_warn + 1 ;
3759: IF l_exceptions_tab(exp_cnt).entity_name = 'DELIVERY' THEN
3760: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_ENTITY');
3761: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',l_entity_name);
3762: FND_MESSAGE.SET_TOKEN('ENTITY_ID',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
3763: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR',l_exc_beh_warn);
3764: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3765: wsh_util_core.add_message(x_return_status);
3766: l_num_warn := l_num_warn + 1 ;
3767: ELSIF NOT (l_exp_logged) THEN
3764: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3765: wsh_util_core.add_message(x_return_status);
3766: l_num_warn := l_num_warn + 1 ;
3767: ELSIF NOT (l_exp_logged) THEN
3768: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
3769: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',l_entity_name);
3770: FND_MESSAGE.SET_TOKEN('ENTITY_ID',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
3771: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR',l_exc_beh_warn);
3772: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3765: wsh_util_core.add_message(x_return_status);
3766: l_num_warn := l_num_warn + 1 ;
3767: ELSIF NOT (l_exp_logged) THEN
3768: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
3769: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',l_entity_name);
3770: FND_MESSAGE.SET_TOKEN('ENTITY_ID',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
3771: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR',l_exc_beh_warn);
3772: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3773: l_exp_logged := TRUE;
3766: l_num_warn := l_num_warn + 1 ;
3767: ELSIF NOT (l_exp_logged) THEN
3768: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
3769: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',l_entity_name);
3770: FND_MESSAGE.SET_TOKEN('ENTITY_ID',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
3771: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR',l_exc_beh_warn);
3772: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3773: l_exp_logged := TRUE;
3774: wsh_util_core.add_message(x_return_status);
3767: ELSIF NOT (l_exp_logged) THEN
3768: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_CONTENTS');
3769: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',l_entity_name);
3770: FND_MESSAGE.SET_TOKEN('ENTITY_ID',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
3771: FND_MESSAGE.SET_TOKEN('EXCEPTION_BEHAVIOR',l_exc_beh_warn);
3772: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3773: l_exp_logged := TRUE;
3774: wsh_util_core.add_message(x_return_status);
3775: l_num_warn := l_num_warn + 1 ;
3824: -- Added l_source_line_id for the Consolidation of BO Delivery Details project
3825:
3826: IF detail_info%NOTFOUND AND l_lines_in_delivery = 0 THEN
3827: CLOSE detail_info;
3828: FND_MESSAGE.SET_NAME('WSH','WSH_EMPTY_DELIVERY');
3829: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_delivery_name);
3830: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3831: wsh_util_core.add_message(x_return_status);
3832: goto confirm_error_no_msg;
3825:
3826: IF detail_info%NOTFOUND AND l_lines_in_delivery = 0 THEN
3827: CLOSE detail_info;
3828: FND_MESSAGE.SET_NAME('WSH','WSH_EMPTY_DELIVERY');
3829: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_delivery_name);
3830: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3831: wsh_util_core.add_message(x_return_status);
3832: goto confirm_error_no_msg;
3833: END IF;
3865: IF l_debug_on THEN
3866: WSH_DEBUG_SV.logmsg(l_module_name, 'EXCEPTIONS EXIST FOR DELIVERY DETAIL ' || L_DELIVERY_DETAIL_ID|| ' , DURING SHIP CONFIRM' );
3867: END IF;
3868: --
3869: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_DET');
3870: FND_MESSAGE.SET_TOKEN('DEL_DET_ID', to_char(l_delivery_detail_id));
3871: IF l_severity_present IN ('H','M') THEN
3872: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3873: wsh_util_core.add_message(x_return_status);
3866: WSH_DEBUG_SV.logmsg(l_module_name, 'EXCEPTIONS EXIST FOR DELIVERY DETAIL ' || L_DELIVERY_DETAIL_ID|| ' , DURING SHIP CONFIRM' );
3867: END IF;
3868: --
3869: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_DET');
3870: FND_MESSAGE.SET_TOKEN('DEL_DET_ID', to_char(l_delivery_detail_id));
3871: IF l_severity_present IN ('H','M') THEN
3872: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3873: wsh_util_core.add_message(x_return_status);
3874: goto confirm_error;
3902: IF l_debug_on THEN
3903: WSH_DEBUG_SV.logmsg(l_module_name, 'EXCEPTIONS EXIST FOR CONTAINER ' || L_CONTAINER_ID|| ' , DURING SHIP CONFIRM' );
3904: END IF;
3905: --
3906: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_DET');
3907: FND_MESSAGE.SET_TOKEN('DEL_DET_ID', to_char(l_container_id));
3908: IF l_severity_present IN ('H','M') THEN
3909: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3910: wsh_util_core.add_message(x_return_status);
3903: WSH_DEBUG_SV.logmsg(l_module_name, 'EXCEPTIONS EXIST FOR CONTAINER ' || L_CONTAINER_ID|| ' , DURING SHIP CONFIRM' );
3904: END IF;
3905: --
3906: FND_MESSAGE.SET_NAME('WSH','WSH_XC_EXIST_DET');
3907: FND_MESSAGE.SET_TOKEN('DEL_DET_ID', to_char(l_container_id));
3908: IF l_severity_present IN ('H','M') THEN
3909: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3910: wsh_util_core.add_message(x_return_status);
3911: CLOSE Get_Containers;
3987: p_action_flag = 'C' OR
3988: l_cycle_quantity > 0)
3989: ) THEN
3990: l_source_code_flag := 'Y';
3991: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_SHIP_MODE');
3992: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3993: wsh_util_core.add_message(x_return_status);
3994: l_num_error := l_num_error + 1;
3995: CLOSE detail_info;
4006:
4007: EXCEPTION
4008: WHEN record_locked THEN
4009: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4010: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_LOCK_ERR');
4011: wsh_util_core.add_message(x_return_status);
4012: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4013: CLOSE detail_info;
4014: goto confirm_error;
4016: RAISE;
4017: END;
4018:
4019: IF (l_released_status NOT IN ('X', 'Y')) THEN
4020: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_DETAILS_UNRELEASED');
4021: -- Bug 2713285
4022: -- for cancelling or unassigning the lines from delivery thru Batch process
4023: IF l_batch_id IS NULL THEN
4024: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4050: ELSE
4051: -- check for inspection_flag
4052:
4053: IF ( l_inspection_flag = 'R') then
4054: FND_MESSAGE.SET_NAME('WSH','WSH_INSPECTION');
4055: --
4056: -- Debug Statements
4057: --
4058: IF l_debug_on THEN
4058: IF l_debug_on THEN
4059: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4060: END IF;
4061: --
4062: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
4063: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4064: wsh_util_core.add_message(x_return_status);
4065: l_num_warn := l_num_warn + 1;
4066:
4109: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_FLEXFIELD_UTILS.VALIDATE_DFF validation failed for delivery detail(s)',WSH_DEBUG_SV.C_PROC_LEVEL);
4110: END IF;
4111: --
4112: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4113: l_token := FND_MESSAGE.Get_String('WSH', 'WSH_DETAIL_DFF_TITLE');
4114:
4115: FND_MESSAGE.Set_Name('WSH', 'WSH_DFF_DETAIL_EMPTY');
4116: FND_MESSAGE.Set_Token('DFF_TITLE', l_token);
4117: FND_MESSAGE.Set_Token('DETAIL_IDS', l_invalid_details);
4111: --
4112: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4113: l_token := FND_MESSAGE.Get_String('WSH', 'WSH_DETAIL_DFF_TITLE');
4114:
4115: FND_MESSAGE.Set_Name('WSH', 'WSH_DFF_DETAIL_EMPTY');
4116: FND_MESSAGE.Set_Token('DFF_TITLE', l_token);
4117: FND_MESSAGE.Set_Token('DETAIL_IDS', l_invalid_details);
4118: WSH_UTIL_CORE.Add_Message(x_return_status);
4119:
4112: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4113: l_token := FND_MESSAGE.Get_String('WSH', 'WSH_DETAIL_DFF_TITLE');
4114:
4115: FND_MESSAGE.Set_Name('WSH', 'WSH_DFF_DETAIL_EMPTY');
4116: FND_MESSAGE.Set_Token('DFF_TITLE', l_token);
4117: FND_MESSAGE.Set_Token('DETAIL_IDS', l_invalid_details);
4118: WSH_UTIL_CORE.Add_Message(x_return_status);
4119:
4120: IF ( x_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING ) THEN
4113: l_token := FND_MESSAGE.Get_String('WSH', 'WSH_DETAIL_DFF_TITLE');
4114:
4115: FND_MESSAGE.Set_Name('WSH', 'WSH_DFF_DETAIL_EMPTY');
4116: FND_MESSAGE.Set_Token('DFF_TITLE', l_token);
4117: FND_MESSAGE.Set_Token('DETAIL_IDS', l_invalid_details);
4118: WSH_UTIL_CORE.Add_Message(x_return_status);
4119:
4120: IF ( x_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING ) THEN
4121: l_num_warn := l_num_warn;
4146: x_msg_count => l_msg_count,
4147: x_msg_data => l_msg_data
4148: );
4149: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
4150: FND_MESSAGE.SET_NAME('WSH','WSH_INTG_ERROR');
4151: FND_MESSAGE.SET_TOKEN('API_NAME', 'WMS_SHIPPING_LPN_UTILS_PUB.UPDATE_LPN_CONTEXT');
4152: FND_MESSAGE.SET_TOKEN('MSG_TEXT', l_msg_data);
4153: x_return_status := l_return_status;
4154: wsh_util_core.add_message(x_return_status);
4147: x_msg_data => l_msg_data
4148: );
4149: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
4150: FND_MESSAGE.SET_NAME('WSH','WSH_INTG_ERROR');
4151: FND_MESSAGE.SET_TOKEN('API_NAME', 'WMS_SHIPPING_LPN_UTILS_PUB.UPDATE_LPN_CONTEXT');
4152: FND_MESSAGE.SET_TOKEN('MSG_TEXT', l_msg_data);
4153: x_return_status := l_return_status;
4154: wsh_util_core.add_message(x_return_status);
4155: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR OR
4148: );
4149: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
4150: FND_MESSAGE.SET_NAME('WSH','WSH_INTG_ERROR');
4151: FND_MESSAGE.SET_TOKEN('API_NAME', 'WMS_SHIPPING_LPN_UTILS_PUB.UPDATE_LPN_CONTEXT');
4152: FND_MESSAGE.SET_TOKEN('MSG_TEXT', l_msg_data);
4153: x_return_status := l_return_status;
4154: wsh_util_core.add_message(x_return_status);
4155: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR OR
4156: l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
4221: x_msg_count => l_msg_count,
4222: x_msg_data => l_msg_data
4223: );
4224: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
4225: FND_MESSAGE.SET_NAME('WSH','WSH_INTG_ERROR');
4226: FND_MESSAGE.SET_TOKEN('API_NAME', 'WMS_SHIPPING_LPN_UTILS_PUB.UPDATE_LPN_CONTEXT');
4227: FND_MESSAGE.SET_TOKEN('MSG_TEXT', l_msg_data);
4228: x_return_status := l_return_status;
4229: wsh_util_core.add_message(x_return_status);
4222: x_msg_data => l_msg_data
4223: );
4224: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
4225: FND_MESSAGE.SET_NAME('WSH','WSH_INTG_ERROR');
4226: FND_MESSAGE.SET_TOKEN('API_NAME', 'WMS_SHIPPING_LPN_UTILS_PUB.UPDATE_LPN_CONTEXT');
4227: FND_MESSAGE.SET_TOKEN('MSG_TEXT', l_msg_data);
4228: x_return_status := l_return_status;
4229: wsh_util_core.add_message(x_return_status);
4230: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR OR
4223: );
4224: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
4225: FND_MESSAGE.SET_NAME('WSH','WSH_INTG_ERROR');
4226: FND_MESSAGE.SET_TOKEN('API_NAME', 'WMS_SHIPPING_LPN_UTILS_PUB.UPDATE_LPN_CONTEXT');
4227: FND_MESSAGE.SET_TOKEN('MSG_TEXT', l_msg_data);
4228: x_return_status := l_return_status;
4229: wsh_util_core.add_message(x_return_status);
4230: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR OR
4231: l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
4425:
4426: -- Bug 2713285
4427: -- for cancelling any line in delivery thru Batch process
4428: IF l_batch_id IS NOT NULL THEN
4429: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CANCEL_DET_ERROR');
4430: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4431: wsh_util_core.add_message(x_return_status);
4432: l_num_error := l_num_error + 1;
4433: goto confirm_error_no_msg;
4671: raise ship_confirm_error;
4672: /* H integration: 945 check detail wrudge */
4673: ELSIF l_shp_dd_source(dd_count) = 'WSH' THEN
4674: /* new message: WSH_DEL_WSH_LINE_ERROR, token DEL_NAME */
4675: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_WSH_LINE_ERROR');
4676: --
4677: -- Debug Statements
4678: --
4679: IF l_debug_on THEN
4679: IF l_debug_on THEN
4680: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4681: END IF;
4682: --
4683: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(l_delivery_id));
4684: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR);
4685: l_num_error := l_num_error + 1;
4686: goto confirm_error_no_msg;
4687: ELSE
4690: -- thru batch process
4691: IF l_batch_id IS NOT NULL THEN
4692: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4693: IF l_inv_controls_rec.details_required_flag='Y' THEN --Bug 3773225
4694: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_DETAILS_REQUIRED');
4695: wsh_util_core.add_message(x_return_status);
4696: ELSIF l_inv_controls_rec.invalid_material_status_flag='Y' THEN --Material Status Impact
4697: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_MATERIAL_STATUS');
4698: wsh_util_core.add_message(x_return_status);
4693: IF l_inv_controls_rec.details_required_flag='Y' THEN --Bug 3773225
4694: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_DETAILS_REQUIRED');
4695: wsh_util_core.add_message(x_return_status);
4696: ELSIF l_inv_controls_rec.invalid_material_status_flag='Y' THEN --Material Status Impact
4697: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_MATERIAL_STATUS');
4698: wsh_util_core.add_message(x_return_status);
4699: END IF;
4700: l_num_error := l_num_error + 1;
4701: goto confirm_error_no_msg;
4883: WSH_DEBUG_SV.log(l_module_name,'g_missing_inv_severity - '|| g_missing_inv_severity);
4884: END IF;
4885:
4886: If g_missing_inv_severity = 'E' then
4887: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_DETAILS_INV_CONTROLS');
4888: FND_MESSAGE.Set_Token('DETAIL_IDS', l_inv_ctrl_dd_ids);
4889: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4890: wsh_util_core.add_message(x_return_status);
4891: WSH_NEW_DELIVERY_ACTIONS.g_error_level := 'E';
4884: END IF;
4885:
4886: If g_missing_inv_severity = 'E' then
4887: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_DETAILS_INV_CONTROLS');
4888: FND_MESSAGE.Set_Token('DETAIL_IDS', l_inv_ctrl_dd_ids);
4889: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4890: wsh_util_core.add_message(x_return_status);
4891: WSH_NEW_DELIVERY_ACTIONS.g_error_level := 'E';
4892: l_num_error := l_num_error + 1;
4891: WSH_NEW_DELIVERY_ACTIONS.g_error_level := 'E';
4892: l_num_error := l_num_error + 1;
4893: goto confirm_error_no_msg;
4894: Else
4895: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_DETAILS_INV_CONTROLS');
4896: FND_MESSAGE.Set_Token('DETAIL_IDS', l_inv_ctrl_dd_ids);
4897: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4898: wsh_util_core.add_message(x_return_status);
4899: WSH_NEW_DELIVERY_ACTIONS.g_error_level := 'E';
4892: l_num_error := l_num_error + 1;
4893: goto confirm_error_no_msg;
4894: Else
4895: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_DETAILS_INV_CONTROLS');
4896: FND_MESSAGE.Set_Token('DETAIL_IDS', l_inv_ctrl_dd_ids);
4897: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4898: wsh_util_core.add_message(x_return_status);
4899: WSH_NEW_DELIVERY_ACTIONS.g_error_level := 'E';
4900: End If;
4915: WSH_DEBUG_SV.log(l_module_name,'g_missing_inv_severity - '|| g_missing_inv_severity);
4916: END IF;
4917:
4918: If g_missing_inv_severity = 'E' then
4919: FND_MESSAGE.SET_NAME('WSH','WSH_DETAILS_MATERIAL_STATUS');
4920: FND_MESSAGE.Set_Token('DETAIL_IDS', l_inv_material_dd_ids);
4921: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4922: wsh_util_core.add_message(x_return_status);
4923: WSH_NEW_DELIVERY_ACTIONS.g_error_level := 'E';
4916: END IF;
4917:
4918: If g_missing_inv_severity = 'E' then
4919: FND_MESSAGE.SET_NAME('WSH','WSH_DETAILS_MATERIAL_STATUS');
4920: FND_MESSAGE.Set_Token('DETAIL_IDS', l_inv_material_dd_ids);
4921: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4922: wsh_util_core.add_message(x_return_status);
4923: WSH_NEW_DELIVERY_ACTIONS.g_error_level := 'E';
4924: l_num_error := l_num_error + 1;
4923: WSH_NEW_DELIVERY_ACTIONS.g_error_level := 'E';
4924: l_num_error := l_num_error + 1;
4925: goto confirm_error_no_msg;
4926: Else
4927: FND_MESSAGE.SET_NAME('WSH','WSH_DETAILS_MATERIAL_STATUS');
4928: FND_MESSAGE.Set_Token('DETAIL_IDS', l_inv_material_dd_ids);
4929: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4930: wsh_util_core.add_message(x_return_status);
4931: WSH_NEW_DELIVERY_ACTIONS.g_error_level := 'E';
4924: l_num_error := l_num_error + 1;
4925: goto confirm_error_no_msg;
4926: Else
4927: FND_MESSAGE.SET_NAME('WSH','WSH_DETAILS_MATERIAL_STATUS');
4928: FND_MESSAGE.Set_Token('DETAIL_IDS', l_inv_material_dd_ids);
4929: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4930: wsh_util_core.add_message(x_return_status);
4931: WSH_NEW_DELIVERY_ACTIONS.g_error_level := 'E';
4932: End If;
5142: x_return_status => l_return_status);
5143:
5144: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
5145: /* new message: WSH_DEL_CANCEL_DET_ERROR, token DEL_NAME */
5146: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CANCEL_DET_ERROR');
5147: --
5148: -- Debug Statements
5149: --
5150: IF l_debug_on THEN
5150: IF l_debug_on THEN
5151: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5152: END IF;
5153: --
5154: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
5155: x_return_status := l_return_status;
5156: wsh_util_core.add_message(x_return_status);
5157: l_num_error := l_num_error + 1 ;
5158: goto loop_end;
5218: );
5219:
5220:
5221: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
5222: FND_MESSAGE.Set_Name('WSH', 'WSH_PARAM_NOT_DEFINED');
5223: --
5224: -- Debug Statements
5225: --
5226: IF l_debug_on THEN
5226: IF l_debug_on THEN
5227: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_ORG_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5228: END IF;
5229: --
5230: FND_MESSAGE.Set_Token('ORGANIZAION_CODE',
5231: wsh_util_core.get_org_name(l_organization_id));
5232: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5233: wsh_util_core.add_message(x_return_status);
5234: WSH_NEW_DELIVERY_ACTIONS.g_error_level := 'E';
5389: WSH_DEBUG_SV.logmsg(l_module_name,'Gross '||l_gross_weight||' Volume '||l_volume||' Fill basis '||l_param_info.percent_fill_basis_flag);
5390: END IF;
5391:
5392: IF (l_param_info.percent_fill_basis_flag = 'W' and l_gross_weight is NULL) THEN
5393: FND_MESSAGE.SET_NAME('WSH','WSH_NULL_WV');
5394: IF l_debug_on THEN
5395: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5396: END IF;
5397: --
5394: IF l_debug_on THEN
5395: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5396: END IF;
5397: --
5398: FND_MESSAGE.SET_TOKEN('ENTITY_TYPE','Delivery');
5399: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
5400: FND_MESSAGE.SET_TOKEN('WV','Weight');
5401: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
5402: wsh_util_core.add_message(x_return_status);
5395: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5396: END IF;
5397: --
5398: FND_MESSAGE.SET_TOKEN('ENTITY_TYPE','Delivery');
5399: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
5400: FND_MESSAGE.SET_TOKEN('WV','Weight');
5401: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
5402: wsh_util_core.add_message(x_return_status);
5403: l_num_warn := l_num_warn + 1;
5396: END IF;
5397: --
5398: FND_MESSAGE.SET_TOKEN('ENTITY_TYPE','Delivery');
5399: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
5400: FND_MESSAGE.SET_TOKEN('WV','Weight');
5401: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
5402: wsh_util_core.add_message(x_return_status);
5403: l_num_warn := l_num_warn + 1;
5404: END IF;
5403: l_num_warn := l_num_warn + 1;
5404: END IF;
5405:
5406: IF (l_param_info.percent_fill_basis_flag = 'V' and l_volume is NULL) THEN
5407: FND_MESSAGE.SET_NAME('WSH','WSH_NULL_WV');
5408: IF l_debug_on THEN
5409: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5410: END IF;
5411: --
5408: IF l_debug_on THEN
5409: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5410: END IF;
5411: --
5412: FND_MESSAGE.SET_TOKEN('ENTITY_TYPE','Delivery');
5413: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
5414: FND_MESSAGE.SET_TOKEN('WV','Volume');
5415: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
5416: wsh_util_core.add_message(x_return_status);
5409: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5410: END IF;
5411: --
5412: FND_MESSAGE.SET_TOKEN('ENTITY_TYPE','Delivery');
5413: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
5414: FND_MESSAGE.SET_TOKEN('WV','Volume');
5415: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
5416: wsh_util_core.add_message(x_return_status);
5417: l_num_warn := l_num_warn + 1;
5410: END IF;
5411: --
5412: FND_MESSAGE.SET_TOKEN('ENTITY_TYPE','Delivery');
5413: FND_MESSAGE.SET_TOKEN('ENTITY_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
5414: FND_MESSAGE.SET_TOKEN('WV','Volume');
5415: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
5416: wsh_util_core.add_message(x_return_status);
5417: l_num_warn := l_num_warn + 1;
5418: END IF;
5534: ** Error should rollback and not continue processing this delivery.
5535: */
5536: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
5537:
5538: FND_MESSAGE.SET_NAME('WSH','WSH_SHIP_CONFIRM_ERROR');
5539: --
5540: -- Debug Statements
5541: --
5542: IF l_debug_on THEN
5542: IF l_debug_on THEN
5543: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5544: END IF;
5545: --
5546: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
5547: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
5548: wsh_util_core.add_message(x_return_status);
5549: goto confirm_error_no_msg;
5550:
5552: -- Bug 2711786
5553: -- for ship set,but this would include other validations done in
5554: -- check_confirm API like for SMC also
5555: IF l_batch_id IS NOT NULL THEN
5556: -- FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CANCEL_DET_ERROR');
5557: -- x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5558: -- wsh_util_core.add_message(x_return_status);
5559: l_num_error := l_num_error + 1;
5560: goto confirm_error_no_msg;
5620: THEN
5621: l_num_error := l_num_error + 1;
5622: goto loop_end;
5623: ELSE
5624: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CREATE_PACK_SLIP_ERROR');
5625: --
5626: -- Debug Statements
5627: --
5628: IF l_debug_on THEN
5628: IF l_debug_on THEN
5629: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5630: END IF;
5631: --
5632: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
5633: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
5634: wsh_util_core.add_message(x_return_status);
5635: l_num_warn := l_num_warn + 1;
5636: END IF;
5731: wsh_debug_sv.logmsg(l_module_name,'all lines errored in compatibility check');
5732: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5733: END IF;
5734:
5735: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_COMP_FAILED');
5736: FND_MESSAGE.SET_TOKEN('DEL_ID',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
5737: x_return_status := l_return_status;
5738: wsh_util_core.add_message(x_return_status);
5739: goto confirm_error;
5732: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5733: END IF;
5734:
5735: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_COMP_FAILED');
5736: FND_MESSAGE.SET_TOKEN('DEL_ID',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
5737: x_return_status := l_return_status;
5738: wsh_util_core.add_message(x_return_status);
5739: goto confirm_error;
5740: ELSE
5773:
5774: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS)
5775: THEN
5776: x_return_status := l_return_status;
5777: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_AUTOCREATE_TRIP_ERROR');
5778:
5779: IF l_debug_on THEN
5780: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5781: END IF;
5779: IF l_debug_on THEN
5780: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5781: END IF;
5782: --
5783: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
5784: wsh_util_core.add_message(x_return_status);
5785: goto confirm_error;
5786: END IF;
5787: END IF;
5878: IF l_debug_on THEN
5879: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit wsh_trips_pvt.get_name',WSH_DEBUG_SV.C_PROC_LEVEL);
5880: END IF;
5881:
5882: FND_MESSAGE.SET_NAME('WSH','WSH_TRIP_COMP_FAILED');
5883: FND_MESSAGE.SET_TOKEN('TRIP_ID',wsh_trips_pvt.get_name(l_cc_fail_ids(1)));
5884: x_return_status := l_return_status;
5885: wsh_util_core.add_message(x_return_status);
5886: goto confirm_error;
5879: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit wsh_trips_pvt.get_name',WSH_DEBUG_SV.C_PROC_LEVEL);
5880: END IF;
5881:
5882: FND_MESSAGE.SET_NAME('WSH','WSH_TRIP_COMP_FAILED');
5883: FND_MESSAGE.SET_TOKEN('TRIP_ID',wsh_trips_pvt.get_name(l_cc_fail_ids(1)));
5884: x_return_status := l_return_status;
5885: wsh_util_core.add_message(x_return_status);
5886: goto confirm_error;
5887: ELSE
5917: CLOSE get_del_first_trip;
5918:
5919: IF l_del_first_trip IS NULL THEN
5920:
5921: FND_MESSAGE.SET_NAME('WSH','WSH_TRIP_NOT_FOUND');
5922: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5923: wsh_util_core.add_message(x_return_status);
5924: goto confirm_error;
5925:
5944: EXCEPTION
5945:
5946: WHEN app_exception.application_exception OR app_exception.record_lock_exception THEN
5947: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5948: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_STOP_TRIP_LOCK');
5949: FND_MESSAGE.SET_TOKEN('DLVY_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
5950: wsh_util_core.add_message(x_return_status);
5951: goto confirm_error;
5952:
5945:
5946: WHEN app_exception.application_exception OR app_exception.record_lock_exception THEN
5947: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5948: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_STOP_TRIP_LOCK');
5949: FND_MESSAGE.SET_TOKEN('DLVY_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
5950: wsh_util_core.add_message(x_return_status);
5951: goto confirm_error;
5952:
5953: END;
5959: carrier_id = l_carrier_rec.carrier_id
5960: WHERE trip_id = l_del_first_trip;
5961:
5962: IF (SQL%NOTFOUND) THEN
5963: FND_MESSAGE.SET_NAME('WSH','WSH_TRIP_NOT_FOUND');
5964: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5965: wsh_util_core.add_message(x_return_status);
5966: goto confirm_error;
5967: END IF;
6079: wsh_debug_sv.logmsg(l_module_name,'all lines errored in compatibility check');
6080: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
6081: END IF;
6082:
6083: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_COMP_FAILED');
6084: FND_MESSAGE.SET_TOKEN('DEL_ID',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
6085: x_return_status := l_return_status;
6086: wsh_util_core.add_message(x_return_status);
6087: goto confirm_error;
6080: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
6081: END IF;
6082:
6083: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_COMP_FAILED');
6084: FND_MESSAGE.SET_TOKEN('DEL_ID',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
6085: x_return_status := l_return_status;
6086: wsh_util_core.add_message(x_return_status);
6087: goto confirm_error;
6088: ELSE
6121: carrier_id = l_carrier_rec.carrier_id
6122: WHERE trip_id = l_trip_id;
6123:
6124: IF (SQL%NOTFOUND) THEN
6125: FND_MESSAGE.SET_NAME('WSH','WSH_TRIP_NOT_FOUND');
6126: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6127: wsh_util_core.add_message(x_return_status);
6128: goto confirm_error;
6129: END IF;
6158: l_itm_stops_tab(l_dropoff_stop_id) := 'Y';
6159:
6160: l_close_confirm_flag := 'F';
6161:
6162: FND_MESSAGE.SET_NAME('WSH','WSH_EXP_COMPL_SCRN_REQD');
6163: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_delivery_name);
6164: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_SUCCESS);
6165:
6166: ELSE
6159:
6160: l_close_confirm_flag := 'F';
6161:
6162: FND_MESSAGE.SET_NAME('WSH','WSH_EXP_COMPL_SCRN_REQD');
6163: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_delivery_name);
6164: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_SUCCESS);
6165:
6166: ELSE
6167:
6178: OPEN get_del_first_trip(p_del_rows(i));
6179: FETCH get_del_first_trip into l_first_trip_id;
6180: CLOSE get_del_first_trip;
6181: IF l_first_trip_id IS NULL THEN
6182: FND_MESSAGE.SET_NAME('WSH','WSH_TRIP_NOT_FOUND');
6183: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6184: wsh_util_core.add_message(x_return_status);
6185: goto confirm_error;
6186: END IF;
6224: IF l_inbound_stops_exists THEN
6225: OPEN get_trip_name_csr (l_first_trip_id);
6226: FETCH get_trip_name_csr INTO l_stops_trip_name;
6227: CLOSE get_trip_name_csr;
6228: FND_MESSAGE.SET_NAME('WSH','WSH_PREV_IB_STOPS_NOT_CLOSED');
6229: FND_MESSAGE.SET_TOKEN('TRIP_NAME', l_stops_trip_name);
6230: FND_MESSAGE.SET_TOKEN('STOP_NAME_LIST', l_stop_name_list);
6231: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
6232: wsh_util_core.add_message(x_return_status);
6225: OPEN get_trip_name_csr (l_first_trip_id);
6226: FETCH get_trip_name_csr INTO l_stops_trip_name;
6227: CLOSE get_trip_name_csr;
6228: FND_MESSAGE.SET_NAME('WSH','WSH_PREV_IB_STOPS_NOT_CLOSED');
6229: FND_MESSAGE.SET_TOKEN('TRIP_NAME', l_stops_trip_name);
6230: FND_MESSAGE.SET_TOKEN('STOP_NAME_LIST', l_stop_name_list);
6231: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
6232: wsh_util_core.add_message(x_return_status);
6233: END IF;
6226: FETCH get_trip_name_csr INTO l_stops_trip_name;
6227: CLOSE get_trip_name_csr;
6228: FND_MESSAGE.SET_NAME('WSH','WSH_PREV_IB_STOPS_NOT_CLOSED');
6229: FND_MESSAGE.SET_TOKEN('TRIP_NAME', l_stops_trip_name);
6230: FND_MESSAGE.SET_TOKEN('STOP_NAME_LIST', l_stop_name_list);
6231: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
6232: wsh_util_core.add_message(x_return_status);
6233: END IF;
6234: --} bugfix 3925963
6281: /* H integration: 940/945 WSH wrudge */
6282: -- we should get warning only if user doesn't expect to do unassign all.
6283: IF p_action_flag NOT IN ('C', 'O') AND l_unassign_dds.count > 0 THEN
6284:
6285: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CONFIRM_UNASSIGN_ALL');
6286: --
6287: -- Debug Statements
6288: --
6289: IF l_debug_on THEN
6289: IF l_debug_on THEN
6290: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
6291: END IF;
6292: --
6293: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
6294: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
6295: wsh_util_core.add_message(x_return_status);
6296: WSH_NEW_DELIVERY_ACTIONS.g_error_level := 'E';
6297: l_num_warn := l_num_warn + 1;
6363: goto loop_end;
6364:
6365: <
6366:
6367: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CONFIRM_ERROR');
6368: --
6369: -- Debug Statements
6370: --
6371: IF l_debug_on THEN
6371: IF l_debug_on THEN
6372: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
6373: END IF;
6374: --
6375: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
6376: wsh_util_core.add_message(x_return_status);
6377:
6378: /* H integration: 940/945 wrudge */
6379: <
6607: ELSE
6608: --Bug 3685366
6609: l_dummy_doc_set(1).bol_error_flag:='Y';
6610: --
6611: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CREATE_BOL_ERROR');
6612: --
6613: -- Debug Statements
6614: --
6615: IF l_debug_on THEN
6616: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
6617: END IF;
6618: --
6619:
6620: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(u_del_rows(i)));
6621: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
6622: wsh_util_core.add_message(x_return_status);
6623: l_num_warn := l_num_warn + 1;
6624: END IF;
6644: -- Bug 3685366
6645: l_dummy_doc_set(1).bol_error_flag:='Y';
6646: --
6647:
6648: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CREATE_BOL_ERROR');
6649: --
6650: -- Debug Statements
6651: --
6652:
6653: IF l_debug_on THEN
6654: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
6655: END IF;
6656: --
6657: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(u_del_rows(i)));
6658: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
6659: wsh_util_core.add_message(x_return_status);
6660: l_num_warn := l_num_warn + 1;
6661: END IF;
6717: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
6718: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
6719: l_num_error := l_num_error + 1;
6720: ELSE
6721: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_DOC_SUB_ERROR');
6722: --
6723: -- Debug Statements
6724: --
6725: IF l_debug_on THEN
6725: IF l_debug_on THEN
6726: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
6727: END IF;
6728: --
6729: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(u_del_rows(i)));
6730: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
6731: wsh_util_core.add_message(x_return_status);
6732: l_num_warn := l_num_warn + 1;
6733: END IF;
6762: ELSE
6763: IF l_debug_on THEN
6764: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
6765: END IF;
6766: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(u_del_rows(i)));
6767: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
6768: wsh_util_core.add_message(x_return_status);
6769: l_num_warn := l_num_warn + 1;
6770: END IF;
6957: itemkey => u_del_rows(l_ctr),
6958: aname => 'ACTUAL_DATE',
6959: avalue => P_ACTUAL_DEP_DATE);
6960:
6961: FND_MESSAGE.SET_NAME('WSH','WSH_WF_SCPOD_LAUNCHED');
6962: FND_MESSAGE.Set_Token('DEL_NAME',wsh_new_deliveries_pvt.get_name(u_del_rows(l_ctr)));
6963: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_SUCCESS,l_module_name);
6964:
6965: END IF;
6958: aname => 'ACTUAL_DATE',
6959: avalue => P_ACTUAL_DEP_DATE);
6960:
6961: FND_MESSAGE.SET_NAME('WSH','WSH_WF_SCPOD_LAUNCHED');
6962: FND_MESSAGE.Set_Token('DEL_NAME',wsh_new_deliveries_pvt.get_name(u_del_rows(l_ctr)));
6963: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_SUCCESS,l_module_name);
6964:
6965: END IF;
6966: END LOOP;
7007: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
7008: l_num_error := l_num_error + 1;
7009: ELSE
7010: /* new message: WSH_DEL_OUTBOUND_FAILED, token DEL_NAME */
7011: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_OUTBOUND_FAILED');
7012: --
7013: -- Debug Statements
7014: --
7015: IF l_debug_on THEN
7015: IF l_debug_on THEN
7016: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
7017: END IF;
7018: --
7019: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
7020: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
7021: wsh_util_core.add_message(x_return_status);
7022: l_num_warn := l_num_warn + 1;
7023: END IF;
7113:
7114: -- 20. set summary messages for warnings and errors
7115:
7116: IF (l_num_error > 0) THEN
7117: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CONFIRM_WARNING');
7118: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7119: wsh_util_core.add_message(x_return_status);
7120: rollback to savepoint start_ship_confirm_delivery;
7121:
7123:
7124: -- Set Message as Number of Deliveries as Confirmed, In-Transit and Closed
7125: IF ( l_close_del_cnt <> 0 ) THEN
7126:
7127: FND_MESSAGE.SET_NAME('WSH','WSH_CL_DELIVERIES');
7128: FND_MESSAGE.SET_TOKEN('CL_DEL',l_close_del_cnt);
7129: wsh_util_core.add_message(x_return_status);
7130:
7131: END IF;
7124: -- Set Message as Number of Deliveries as Confirmed, In-Transit and Closed
7125: IF ( l_close_del_cnt <> 0 ) THEN
7126:
7127: FND_MESSAGE.SET_NAME('WSH','WSH_CL_DELIVERIES');
7128: FND_MESSAGE.SET_TOKEN('CL_DEL',l_close_del_cnt);
7129: wsh_util_core.add_message(x_return_status);
7130:
7131: END IF;
7132:
7131: END IF;
7132:
7133: IF (l_confirm_del_cnt <> 0) THEN
7134:
7135: FND_MESSAGE.SET_NAME('WSH','WSH_CO_DELIVERIES');
7136: FND_MESSAGE.SET_TOKEN('CO_DEL',l_confirm_del_cnt);
7137: wsh_util_core.add_message(x_return_status);
7138:
7139: END IF;
7132:
7133: IF (l_confirm_del_cnt <> 0) THEN
7134:
7135: FND_MESSAGE.SET_NAME('WSH','WSH_CO_DELIVERIES');
7136: FND_MESSAGE.SET_TOKEN('CO_DEL',l_confirm_del_cnt);
7137: wsh_util_core.add_message(x_return_status);
7138:
7139: END IF;
7140:
7138:
7139: END IF;
7140:
7141: if (l_num_warn > 0) THEN
7142: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CONFIRM_WARNING');
7143: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
7144: wsh_util_core.add_message(x_return_status);
7145: elsif (p_del_rows.count > 1) THEN
7146: -- bug 2523074 (frontported bug 2508132):
7146: -- bug 2523074 (frontported bug 2508132):
7147: -- if multiple deliveries are processed, show summary message,
7148: -- so that the user does not think the first message (e.g.,
7149: -- request number) applies to all deliveries.
7150: FND_MESSAGE.SET_NAME('WSH', 'WSH_DEL_CONFIRM_SUCCESS');
7151: wsh_util_core.add_message(x_return_status);
7152: else
7153: FND_MESSAGE.SET_NAME('WSH', 'WSH_ONE_DEL_CONFIRM_SUCCESS');
7154: wsh_util_core.add_message(x_return_status);
7149: -- request number) applies to all deliveries.
7150: FND_MESSAGE.SET_NAME('WSH', 'WSH_DEL_CONFIRM_SUCCESS');
7151: wsh_util_core.add_message(x_return_status);
7152: else
7153: FND_MESSAGE.SET_NAME('WSH', 'WSH_ONE_DEL_CONFIRM_SUCCESS');
7154: wsh_util_core.add_message(x_return_status);
7155: end if;
7156: END IF;
7157:
7196: IF (get_delivery_name%ISOPEN) THEN
7197: CLOSE get_delivery_name;
7198: END IF;
7199:
7200: FND_MESSAGE.SET_NAME('WSH','WSH_SHIP_CONFIRM_ERROR');
7201: --
7202: -- Debug Statements
7203: --
7204: IF l_debug_on THEN
7204: IF l_debug_on THEN
7205: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
7206: END IF;
7207: --
7208: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(l_delivery_id));
7209: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7210: wsh_util_core.add_message(x_return_status);
7211: WSH_UTIL_CORE.Store_Msg_In_Table (p_store_flag => FALSE,
7212: x_msg_rec_count => l_msg_rec_count,
7229: IF (get_delivery_name%ISOPEN) THEN
7230: CLOSE get_delivery_name;
7231: END IF;
7232:
7233: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_LOCK_ERR');
7234: wsh_util_core.add_message(x_return_status);
7235: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7236: WSH_UTIL_CORE.Store_Msg_In_Table (p_store_flag => FALSE,
7237: x_msg_rec_count => l_msg_rec_count,
7555: --
7556: IF (SQL%NOTFOUND)
7557: THEN
7558: --{
7559: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_NOT_FOUND');
7560: l_num_errors := l_num_errors + 1;
7561: wsh_util_core.add_message(x_return_status,l_module_name);
7562: --}
7563: ELSE
7835: RETURNING organization_id INTO l_org_id;
7836: --
7837: IF (SQL%NOTFOUND)
7838: THEN
7839: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_NOT_FOUND');
7840: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR);
7841: RAISE FND_API.G_EXC_ERROR;
7842: END IF;
7843: --
8146: --
8147: -- J-IB-NPARIKH---{
8148: IF (del_status%NOTFOUND)
8149: THEN
8150: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_NOT_FOUND');
8151: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
8152: --CLOSE del_status;
8153: l_num_errors := l_num_errors + 1;
8154: RAISE FND_API.G_EXC_ERROR;
8408: last_update_login = l_login_id
8409: where delivery_id = p_del_rows(i);
8410:
8411: IF (SQL%NOTFOUND) THEN
8412: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_NOT_FOUND');
8413: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR);
8414: l_num_errors := l_num_errors + 1;
8415: RAISE FND_API.G_EXC_ERROR;
8416: END IF;
8465: THEN
8466: --{
8467: ROLLBACK TO dlvy_chg_status_sp;
8468: --
8469: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CHANGE_STATUS_ERROR');
8470: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_name);
8471: --
8472: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
8473: --}
8466: --{
8467: ROLLBACK TO dlvy_chg_status_sp;
8468: --
8469: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CHANGE_STATUS_ERROR');
8470: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_name);
8471: --
8472: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
8473: --}
8474: WHEN wsh_util_core.g_exc_warning
8475: THEN
8476: --{
8477: ROLLBACK TO dlvy_chg_status_sp;
8478: --
8479: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CHANGE_STATUS_ERROR');
8480: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_name);
8481: --
8482: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_WARNING,l_module_name);
8483: --}
8476: --{
8477: ROLLBACK TO dlvy_chg_status_sp;
8478: --
8479: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CHANGE_STATUS_ERROR');
8480: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_name);
8481: --
8482: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_WARNING,l_module_name);
8483: --}
8484: --}
8503: x_return_status := l_return_status;
8504: --
8505: IF p_del_rows.count > 1
8506: THEN
8507: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CHANGE_STATUS_SUMMARY');
8508: FND_MESSAGE.SET_TOKEN('NUM_SUCCESS',l_num_dels_processed);
8509: FND_MESSAGE.SET_TOKEN('NUM_ERROR',p_del_rows.count - l_num_dels_processed);
8510: wsh_util_core.add_message(l_return_status,l_module_name);
8511: END IF;
8504: --
8505: IF p_del_rows.count > 1
8506: THEN
8507: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CHANGE_STATUS_SUMMARY');
8508: FND_MESSAGE.SET_TOKEN('NUM_SUCCESS',l_num_dels_processed);
8509: FND_MESSAGE.SET_TOKEN('NUM_ERROR',p_del_rows.count - l_num_dels_processed);
8510: wsh_util_core.add_message(l_return_status,l_module_name);
8511: END IF;
8512: --
8505: IF p_del_rows.count > 1
8506: THEN
8507: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_CHANGE_STATUS_SUMMARY');
8508: FND_MESSAGE.SET_TOKEN('NUM_SUCCESS',l_num_dels_processed);
8509: FND_MESSAGE.SET_TOKEN('NUM_ERROR',p_del_rows.count - l_num_dels_processed);
8510: wsh_util_core.add_message(l_return_status,l_module_name);
8511: END IF;
8512: --
8513: -- Debug Statements
8649: IF (delivery_info%NOTFOUND) THEN
8650: CLOSE delivery_info;
8651:
8652: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8653: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_NOT_FOUND');
8654: wsh_util_core.add_message(x_return_status);
8655:
8656:
8657: IF l_debug_on THEN
8706:
8707: IF (SQL%NOTFOUND) THEN
8708: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8709:
8710: FND_MESSAGE.SET_NAME('WSH','WSH_LEG_NOT_FOUND');
8711: wsh_util_core.add_message(x_return_status);
8712:
8713: IF l_debug_on THEN
8714: WSH_DEBUG_SV.pop(l_module_name);
8724: IF (pickup_delivery_legs%FOUND) THEN
8725: CLOSE pickup_delivery_legs;
8726:
8727: IF (p_insert_msg) THEN
8728: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_MULTIPLE_LEGS');
8729: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
8730: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR);
8731: END IF;
8732:
8725: CLOSE pickup_delivery_legs;
8726:
8727: IF (p_insert_msg) THEN
8728: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_MULTIPLE_LEGS');
8729: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
8730: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR);
8731: END IF;
8732:
8733: IF l_debug_on THEN
8743: CLOSE dropoff_delivery_legs;
8744:
8745: IF (l_count > 1) THEN
8746: IF (p_insert_msg) THEN
8747: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_MULTIPLE_LEGS');
8748: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
8749: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR);
8750: END IF;
8751:
8744:
8745: IF (l_count > 1) THEN
8746: IF (p_insert_msg) THEN
8747: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_MULTIPLE_LEGS');
8748: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
8749: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR);
8750: END IF;
8751:
8752: IF l_debug_on THEN
8763:
8764: IF (l_seq_num <> l_leg_count) THEN
8765:
8766: IF (p_insert_msg) THEN
8767: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_INVALID_FLOW');
8768: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
8769: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR);
8770: END IF;
8771: --
8764: IF (l_seq_num <> l_leg_count) THEN
8765:
8766: IF (p_insert_msg) THEN
8767: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_INVALID_FLOW');
8768: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
8769: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR);
8770: END IF;
8771: --
8772: IF l_debug_on THEN
8780: IF (l_final_dropoff <> l_dropoff_location_id) THEN
8781: x_leg_complete := 'NW';
8782:
8783: IF (p_insert_msg) THEN
8784: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_NO_ULTIMATE_DROPOFF');
8785: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
8786: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR);
8787: END IF;
8788: RETURN;
8781: x_leg_complete := 'NW';
8782:
8783: IF (p_insert_msg) THEN
8784: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_NO_ULTIMATE_DROPOFF');
8785: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_delivery_id));
8786: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR);
8787: END IF;
8788: RETURN;
8789: END IF;
9074: IF (loading_order%NOTFOUND) OR (l_order_flag IS NULL) THEN
9075: IF (loading_order%ISOPEN) THEN
9076: CLOSE loading_order;
9077: END IF;
9078: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_INV_LOADING_ORDER');
9079: --
9080: -- Debug Statements
9081: --
9082: IF l_debug_on THEN
9082: IF l_debug_on THEN
9083: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
9084: END IF;
9085: --
9086: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
9087: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9088: wsh_util_core.add_message(x_return_status);
9089: l_num_error := l_num_error + 1;
9090: goto loop_end;
9147: IF (l_cnt = 0) THEN
9148: IF (continfo_cv%ISOPEN) THEN
9149: CLOSE continfo_cv;
9150: END IF;
9151: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_LOAD_SEQ_LINE_ERROR');
9152: --
9153: -- Debug Statements
9154: --
9155: IF l_debug_on THEN
9155: IF l_debug_on THEN
9156: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
9157: END IF;
9158: --
9159: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
9160: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9161: wsh_util_core.add_message(x_return_status);
9162: l_num_error := l_num_error + 1;
9163: EXIT;
9169:
9170: END LOOP;
9171:
9172: IF (l_cont_cnt = 0) THEN
9173: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_LOAD_SEQ_CONT_ERROR');
9174: --
9175: -- Debug Statements
9176: --
9177: IF l_debug_on THEN
9177: IF l_debug_on THEN
9178: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
9179: END IF;
9180: --
9181: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
9182: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9183: wsh_util_core.add_message(x_return_status);
9184: l_num_error := l_num_error + 1;
9185: END IF;
9195: END LOOP;
9196:
9197: IF (p_del_rows.count > 1) THEN
9198: IF (l_num_error > 0) THEN
9199: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_LOAD_SEQ_SUMMARY');
9200: FND_MESSAGE.SET_TOKEN('NUM_ERROR',l_num_error);
9201: FND_MESSAGE.SET_TOKEN('NUM_SUCCESS',p_del_rows.count - l_num_error);
9202:
9203: IF (p_del_rows.count = l_num_error) THEN
9196:
9197: IF (p_del_rows.count > 1) THEN
9198: IF (l_num_error > 0) THEN
9199: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_LOAD_SEQ_SUMMARY');
9200: FND_MESSAGE.SET_TOKEN('NUM_ERROR',l_num_error);
9201: FND_MESSAGE.SET_TOKEN('NUM_SUCCESS',p_del_rows.count - l_num_error);
9202:
9203: IF (p_del_rows.count = l_num_error) THEN
9204: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9197: IF (p_del_rows.count > 1) THEN
9198: IF (l_num_error > 0) THEN
9199: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_LOAD_SEQ_SUMMARY');
9200: FND_MESSAGE.SET_TOKEN('NUM_ERROR',l_num_error);
9201: FND_MESSAGE.SET_TOKEN('NUM_SUCCESS',p_del_rows.count - l_num_error);
9202:
9203: IF (p_del_rows.count = l_num_error) THEN
9204: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9205: ELSE
9462: --{
9463: --
9464: -- Delivery id is mandatory input
9465: --
9466: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
9467: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'p_delivery_id');
9468: RAISE FND_API.G_EXC_ERROR;
9469: --}
9470: END IF;
9463: --
9464: -- Delivery id is mandatory input
9465: --
9466: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
9467: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'p_delivery_id');
9468: RAISE FND_API.G_EXC_ERROR;
9469: --}
9470: END IF;
9471: --
9480: --{
9481: --
9482: -- Raise error for invalid Delivery id
9483: --
9484: fnd_message.SET_name('WSH', 'WSH_DET_INVALID_DEL');
9485: RAISE FND_API.G_EXC_ERROR;
9486: --}
9487: END IF;
9488: --
9675: IF (SQL%NOTFOUND)
9676: THEN
9677: --{
9678: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9679: fnd_message.SET_name('WSH', 'WSH_DET_INVALID_DEL');
9680: RAISE FND_API.G_EXC_ERROR;
9681: --}
9682: END IF;
9683: --
9713: IF (SQL%NOTFOUND)
9714: THEN
9715: --{
9716: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9717: fnd_message.SET_name('WSH', 'WSH_DET_INVALID_DEL');
9718: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_error,l_module_name);
9719: --}
9720: END IF;
9721: --
9733: END IF;
9734: WHEN e_locked THEN
9735: x_return_status := wsh_util_core.g_ret_sts_error;
9736:
9737: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_LOCK_FAILED');
9738: FND_MESSAGE.SET_TOKEN('ENTITY_NAME', l_name);
9739: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_error,l_module_name);
9740: --
9741: IF l_debug_on
9734: WHEN e_locked THEN
9735: x_return_status := wsh_util_core.g_ret_sts_error;
9736:
9737: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_LOCK_FAILED');
9738: FND_MESSAGE.SET_TOKEN('ENTITY_NAME', l_name);
9739: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_error,l_module_name);
9740: --
9741: IF l_debug_on
9742: THEN
9869: --{
9870: --
9871: -- Delivery id is required field
9872: --
9873: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
9874: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'p_delivery_id');
9875: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_error,l_module_name);
9876: --
9877: RAISE FND_API.G_EXC_ERROR;
9870: --
9871: -- Delivery id is required field
9872: --
9873: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
9874: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'p_delivery_id');
9875: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_error,l_module_name);
9876: --
9877: RAISE FND_API.G_EXC_ERROR;
9878: --}
9885: --
9886: IF l_dlvy_rec.initial_pickup_location_id IS NULL
9887: THEN
9888: --{
9889: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_NOT_EXIST');
9890: FND_MESSAGE.SET_TOKEN('DELIVERY_ID', p_delivery_id);
9891: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_error,l_module_name);
9892: --
9893: RAISE FND_API.G_EXC_ERROR;
9886: IF l_dlvy_rec.initial_pickup_location_id IS NULL
9887: THEN
9888: --{
9889: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_NOT_EXIST');
9890: FND_MESSAGE.SET_TOKEN('DELIVERY_ID', p_delivery_id);
9891: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_error,l_module_name);
9892: --
9893: RAISE FND_API.G_EXC_ERROR;
9894: --}
10086: --}
10087: END IF;
10088: --
10089: --
10090: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_PU_LOCN_UPDATE');
10091: FND_MESSAGE.SET_TOKEN('DELIVERY_NAME', pickup_dlvy_rec.name);
10092: FND_MESSAGE.SET_TOKEN('LOCATION_NAME', l_location_name);
10093: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_warning,l_module_name);
10094: l_num_warnings := l_num_warnings + 1;
10087: END IF;
10088: --
10089: --
10090: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_PU_LOCN_UPDATE');
10091: FND_MESSAGE.SET_TOKEN('DELIVERY_NAME', pickup_dlvy_rec.name);
10092: FND_MESSAGE.SET_TOKEN('LOCATION_NAME', l_location_name);
10093: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_warning,l_module_name);
10094: l_num_warnings := l_num_warnings + 1;
10095: --}
10088: --
10089: --
10090: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_PU_LOCN_UPDATE');
10091: FND_MESSAGE.SET_TOKEN('DELIVERY_NAME', pickup_dlvy_rec.name);
10092: FND_MESSAGE.SET_TOKEN('LOCATION_NAME', l_location_name);
10093: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_warning,l_module_name);
10094: l_num_warnings := l_num_warnings + 1;
10095: --}
10096: END LOOP;
10581: -- Delivery is not assoociated with a site.
10582: IF l_debug_on THEN
10583: wsh_debug_sv.logmsg(l_module_name, 'Delivery is not assoociated with a site');
10584: END IF;
10585: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_NO_SITE');
10586: FND_MESSAGE.Set_Token('DELIVERY',p_delivery_id);
10587: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10588: WSH_UTIL_CORE.add_message(x_return_status);
10589:
10582: IF l_debug_on THEN
10583: wsh_debug_sv.logmsg(l_module_name, 'Delivery is not assoociated with a site');
10584: END IF;
10585: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_NO_SITE');
10586: FND_MESSAGE.Set_Token('DELIVERY',p_delivery_id);
10587: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10588: WSH_UTIL_CORE.add_message(x_return_status);
10589:
10590: IF l_debug_on THEN
10596: -- Delivery is associated with multiple sites
10597: IF l_debug_on THEN
10598: wsh_debug_sv.logmsg(l_module_name, 'Delivery is not assoociated with multiple sites');
10599: END IF;
10600: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_MULT_SITE');
10601: FND_MESSAGE.Set_Token('DELIVERY',p_delivery_id);
10602: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10603: WSH_UTIL_CORE.add_message(x_return_status);
10604:
10597: IF l_debug_on THEN
10598: wsh_debug_sv.logmsg(l_module_name, 'Delivery is not assoociated with multiple sites');
10599: END IF;
10600: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_MULT_SITE');
10601: FND_MESSAGE.Set_Token('DELIVERY',p_delivery_id);
10602: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10603: WSH_UTIL_CORE.add_message(x_return_status);
10604:
10605: IF l_debug_on THEN
10718: IF l_debug_on THEN
10719: wsh_debug_sv.logmsg(l_module_name, 'Location not associated with a customer');
10720: END IF;
10721: -- Location not associated with a customer.
10722: FND_MESSAGE.SET_NAME('WSH','WSH_CUST_NO_LOC');
10723: FND_MESSAGE.SET_TOKEN('DELIVERY',p_delivery_id);
10724: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10725: WSH_UTIL_CORE.add_message(x_return_status);
10726:
10719: wsh_debug_sv.logmsg(l_module_name, 'Location not associated with a customer');
10720: END IF;
10721: -- Location not associated with a customer.
10722: FND_MESSAGE.SET_NAME('WSH','WSH_CUST_NO_LOC');
10723: FND_MESSAGE.SET_TOKEN('DELIVERY',p_delivery_id);
10724: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10725: WSH_UTIL_CORE.add_message(x_return_status);
10726:
10727: IF l_debug_on THEN
10731: -- Location associated with a multiple customers.
10732: IF l_debug_on THEN
10733: wsh_debug_sv.logmsg(l_module_name, 'Location associated with multiple customers');
10734: END IF;
10735: FND_MESSAGE.SET_NAME('WSH','WSH_CUST_MULT_LOC');
10736: FND_MESSAGE.SET_TOKEN('DELIVERY',p_delivery_id);
10737: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10738: WSH_UTIL_CORE.add_message(x_return_status);
10739:
10732: IF l_debug_on THEN
10733: wsh_debug_sv.logmsg(l_module_name, 'Location associated with multiple customers');
10734: END IF;
10735: FND_MESSAGE.SET_NAME('WSH','WSH_CUST_MULT_LOC');
10736: FND_MESSAGE.SET_TOKEN('DELIVERY',p_delivery_id);
10737: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10738: WSH_UTIL_CORE.add_message(x_return_status);
10739:
10740: IF l_debug_on THEN
11770: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID_TAB.COUNT',p_delivery_id_tab.COUNT);
11771:
11772: END IF;
11773:
11774: FND_MESSAGE.SET_NAME('WSH','WSH_FTE_CS_INVALID_INPUT');
11775: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11776: WSH_UTIL_CORE.add_message(x_return_status);
11777: --
11778: -- Debug Statements
11884: -- Changed planned delivery to an ERROR from a WARNING
11885: --
11886: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11887: x_return_message := WSH_UTIL_CORE.G_RET_STS_ERROR;
11888: FND_MESSAGE.Set_Name('WSH', 'WSH_FTE_CS_PLAN_DEL');
11889: FND_MESSAGE.Set_Token('DELIVERY_ID',l_dlvy_info_rec.l_delivery_id);
11890: wsh_util_core.add_message(x_return_status);
11891: --
11892: -- Debug Statements
11885: --
11886: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11887: x_return_message := WSH_UTIL_CORE.G_RET_STS_ERROR;
11888: FND_MESSAGE.Set_Name('WSH', 'WSH_FTE_CS_PLAN_DEL');
11889: FND_MESSAGE.Set_Token('DELIVERY_ID',l_dlvy_info_rec.l_delivery_id);
11890: wsh_util_core.add_message(x_return_status);
11891: --
11892: -- Debug Statements
11893: --
11904:
11905: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11906: x_return_message := WSH_UTIL_CORE.G_RET_STS_ERROR;
11907: IF (substr(p_caller,1,3) = 'FTE') THEN
11908: FND_MESSAGE.Set_Name('WSH','WSH_FTE_CS_TRIP_MANY_FTE');
11909: ELSE
11910: FND_MESSAGE.Set_Name('WSH','WSH_FTE_CS_TRIP_MANY');
11911: END IF;
11912: FND_MESSAGE.Set_Token('DELIVERY_ID',l_dlvy_info_rec.l_delivery_id);
11906: x_return_message := WSH_UTIL_CORE.G_RET_STS_ERROR;
11907: IF (substr(p_caller,1,3) = 'FTE') THEN
11908: FND_MESSAGE.Set_Name('WSH','WSH_FTE_CS_TRIP_MANY_FTE');
11909: ELSE
11910: FND_MESSAGE.Set_Name('WSH','WSH_FTE_CS_TRIP_MANY');
11911: END IF;
11912: FND_MESSAGE.Set_Token('DELIVERY_ID',l_dlvy_info_rec.l_delivery_id);
11913: wsh_util_core.add_message(x_return_status);
11914:
11908: FND_MESSAGE.Set_Name('WSH','WSH_FTE_CS_TRIP_MANY_FTE');
11909: ELSE
11910: FND_MESSAGE.Set_Name('WSH','WSH_FTE_CS_TRIP_MANY');
11911: END IF;
11912: FND_MESSAGE.Set_Token('DELIVERY_ID',l_dlvy_info_rec.l_delivery_id);
11913: wsh_util_core.add_message(x_return_status);
11914:
11915: IF l_debug_on THEN
11916: 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' );
11921:
11922: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11923: x_return_message := WSH_UTIL_CORE.G_RET_STS_ERROR;
11924: IF (substr(p_caller,1,3) = 'FTE') THEN
11925: FND_MESSAGE.Set_Name('WSH','WSH_FTE_CS_TRIP_SHARED_FTE');
11926: ELSE
11927: FND_MESSAGE.Set_Name('WSH', 'WSH_FTE_CS_TRIP_SHARED');
11928: END IF;
11929:
11923: x_return_message := WSH_UTIL_CORE.G_RET_STS_ERROR;
11924: IF (substr(p_caller,1,3) = 'FTE') THEN
11925: FND_MESSAGE.Set_Name('WSH','WSH_FTE_CS_TRIP_SHARED_FTE');
11926: ELSE
11927: FND_MESSAGE.Set_Name('WSH', 'WSH_FTE_CS_TRIP_SHARED');
11928: END IF;
11929:
11930: FND_MESSAGE.Set_Token('DELIVERY_ID',l_dlvy_info_rec.l_delivery_id);
11931: wsh_util_core.add_message(x_return_status);
11926: ELSE
11927: FND_MESSAGE.Set_Name('WSH', 'WSH_FTE_CS_TRIP_SHARED');
11928: END IF;
11929:
11930: FND_MESSAGE.Set_Token('DELIVERY_ID',l_dlvy_info_rec.l_delivery_id);
11931: wsh_util_core.add_message(x_return_status);
11932:
11933: IF l_debug_on THEN
11934: 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' );
11940: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11941: x_return_message := WSH_UTIL_CORE.G_RET_STS_ERROR;
11942:
11943: IF (substr(p_caller,1,3) = 'FTE') THEN
11944: FND_MESSAGE.Set_Name('WSH','WSH_FTE_CS_TRIP_HAS_LANE_FTE');
11945: ELSE
11946: FND_MESSAGE.Set_Name('WSH', 'WSH_FTE_CS_TRIP_HAS_LANE');
11947: END IF;
11948: FND_MESSAGE.Set_Token('DELIVERY_ID',l_dlvy_info_rec.l_delivery_id);
11942:
11943: IF (substr(p_caller,1,3) = 'FTE') THEN
11944: FND_MESSAGE.Set_Name('WSH','WSH_FTE_CS_TRIP_HAS_LANE_FTE');
11945: ELSE
11946: FND_MESSAGE.Set_Name('WSH', 'WSH_FTE_CS_TRIP_HAS_LANE');
11947: END IF;
11948: FND_MESSAGE.Set_Token('DELIVERY_ID',l_dlvy_info_rec.l_delivery_id);
11949: wsh_util_core.add_message(x_return_status);
11950:
11944: FND_MESSAGE.Set_Name('WSH','WSH_FTE_CS_TRIP_HAS_LANE_FTE');
11945: ELSE
11946: FND_MESSAGE.Set_Name('WSH', 'WSH_FTE_CS_TRIP_HAS_LANE');
11947: END IF;
11948: FND_MESSAGE.Set_Token('DELIVERY_ID',l_dlvy_info_rec.l_delivery_id);
11949: wsh_util_core.add_message(x_return_status);
11950:
11951: IF l_debug_on THEN
11952: 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' );
12024: WSH_DEBUG_SV.logmsg(l_module_name,'Return Status after get_default_uoms'||l_return_status);
12025: END IF;
12026:
12027: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
12028: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_NO_UOM');
12029: FND_MESSAGE.SET_TOKEN('DELIVERY',l_dlvy_info_tab(i).l_delivery_id);
12030: WSH_UTIL_CORE.add_message(l_return_status);
12031: l_carrier_sel_entity_tab.DELETE(l_cnt);
12032: GOTO dlvy_nextpass;
12025: END IF;
12026:
12027: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
12028: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_NO_UOM');
12029: FND_MESSAGE.SET_TOKEN('DELIVERY',l_dlvy_info_tab(i).l_delivery_id);
12030: WSH_UTIL_CORE.add_message(l_return_status);
12031: l_carrier_sel_entity_tab.DELETE(l_cnt);
12032: GOTO dlvy_nextpass;
12033: END IF;
12102:
12103: l_cnt := l_cnt+1;
12104:
12105: ELSE
12106: FND_MESSAGE.SET_NAME('WSH','WSH_FTE_CS_DLVY_CONTENT');
12107: FND_MESSAGE.SET_TOKEN('DELIVERY',l_dlvy_info_tab(i).l_delivery_id);
12108: WSH_UTIL_CORE.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR);
12109: END IF;
12110:
12103: l_cnt := l_cnt+1;
12104:
12105: ELSE
12106: FND_MESSAGE.SET_NAME('WSH','WSH_FTE_CS_DLVY_CONTENT');
12107: FND_MESSAGE.SET_TOKEN('DELIVERY',l_dlvy_info_tab(i).l_delivery_id);
12108: WSH_UTIL_CORE.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR);
12109: END IF;
12110:
12111: <
12117: IF l_debug_on THEN
12118: wsh_debug_sv.logmsg(l_module_name, 'None of the selected deliveries have been found as eligible for Carrier Selection');
12119: END IF;
12120: -- All deliveries are content.
12121: FND_MESSAGE.SET_NAME('WSH','WSH_FTE_CS_DLVY_ALL_CONTENT');
12122: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12123: WSH_UTIL_CORE.add_message(x_return_status);
12124: IF l_debug_on THEN
12125: WSH_DEBUG_SV.pop(l_module_name);
12342: --}
12343: ELSE -- for the case when delivery is already attached to trip, l_trip_id IS NOT NULL
12344: --{
12345: IF l_trip_rank_seq is NOT NULL THEN
12346: FND_MESSAGE.SET_NAME('WSH','WSH_FTE_CS_UPD_TRIP_RANK_LIST');
12347: FND_MESSAGE.SET_TOKEN('TRIPID',l_trip_id);
12348: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
12349: WSH_UTIL_CORE.add_message(x_return_status);
12350: END IF;
12343: ELSE -- for the case when delivery is already attached to trip, l_trip_id IS NOT NULL
12344: --{
12345: IF l_trip_rank_seq is NOT NULL THEN
12346: FND_MESSAGE.SET_NAME('WSH','WSH_FTE_CS_UPD_TRIP_RANK_LIST');
12347: FND_MESSAGE.SET_TOKEN('TRIPID',l_trip_id);
12348: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
12349: WSH_UTIL_CORE.add_message(x_return_status);
12350: END IF;
12351:
12462: IF l_trip_id IS NOT NULL THEN
12463: --{
12464: -- if delivery is already assigned to trip and multileg route to be created as per rule results
12465: -- show error;
12466: FND_MESSAGE.SET_NAME('WSH','WSH_FTE_CS_DEL_MLEG_ASG_TRIP');
12467: FND_MESSAGE.SET_TOKEN('DELIVERY_ID',l_delivery_id);
12468: FND_MESSAGE.SET_TOKEN('TRIP_ID',l_trip_id);
12469: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12470: WSH_UTIL_CORE.add_message(x_return_status);
12463: --{
12464: -- if delivery is already assigned to trip and multileg route to be created as per rule results
12465: -- show error;
12466: FND_MESSAGE.SET_NAME('WSH','WSH_FTE_CS_DEL_MLEG_ASG_TRIP');
12467: FND_MESSAGE.SET_TOKEN('DELIVERY_ID',l_delivery_id);
12468: FND_MESSAGE.SET_TOKEN('TRIP_ID',l_trip_id);
12469: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12470: WSH_UTIL_CORE.add_message(x_return_status);
12471:
12464: -- if delivery is already assigned to trip and multileg route to be created as per rule results
12465: -- show error;
12466: FND_MESSAGE.SET_NAME('WSH','WSH_FTE_CS_DEL_MLEG_ASG_TRIP');
12467: FND_MESSAGE.SET_TOKEN('DELIVERY_ID',l_delivery_id);
12468: FND_MESSAGE.SET_TOKEN('TRIP_ID',l_trip_id);
12469: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12470: WSH_UTIL_CORE.add_message(x_return_status);
12471:
12472: l_cs_result_tab(rec_cnt) := NULL;
12477: --}
12478: ELSIF p_caller = 'WSH_AUTO_CREATE_DEL_TRIP' AND l_skip_rtng_rule_ac_trip = 'Y' THEN
12479: --{
12480: IF l_delivery_id <> l_prev_delivery_id THEN
12481: FND_MESSAGE.SET_NAME('WSH','WSH_FTE_CS_MULTILEG');
12482: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12483: WSH_UTIL_CORE.add_message(x_return_status);
12484: END IF;
12485:
13075:
13076: EXCEPTION
13077: WHEN OTHERS THEN
13078: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13079: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_LOCK_FAILED');
13080: FND_MESSAGE.Set_Token('DEL_NAME', WSH_NEW_DELIVERIES_PVT.Get_Name(l_valid_children_tab(i)));
13081: WSH_UTIL_CORE.Add_Message(x_return_status);
13082: --
13083: -- Debug Statements
13076: EXCEPTION
13077: WHEN OTHERS THEN
13078: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13079: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_LOCK_FAILED');
13080: FND_MESSAGE.Set_Token('DEL_NAME', WSH_NEW_DELIVERIES_PVT.Get_Name(l_valid_children_tab(i)));
13081: WSH_UTIL_CORE.Add_Message(x_return_status);
13082: --
13083: -- Debug Statements
13084: --
13297:
13298: EXCEPTION
13299: WHEN OTHERS THEN
13300: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13301: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_LOCK_FAILED');
13302: FND_MESSAGE.Set_Token('DEL_NAME', WSH_NEW_DELIVERIES_PVT.Get_Name(l_valid_children_tab(i)));
13303: WSH_UTIL_CORE.Add_Message(x_return_status);
13304: --
13305: -- Debug Statements
13298: EXCEPTION
13299: WHEN OTHERS THEN
13300: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13301: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_LOCK_FAILED');
13302: FND_MESSAGE.Set_Token('DEL_NAME', WSH_NEW_DELIVERIES_PVT.Get_Name(l_valid_children_tab(i)));
13303: WSH_UTIL_CORE.Add_Message(x_return_status);
13304: --
13305: -- Debug Statements
13306: --
13361:
13362: IF l_valid_children_tab.count < p_del_tab.count THEN
13363:
13364: -- Not all deliveries were assigned to parent.
13365: FND_MESSAGE.SET_NAME('WSH', 'WSH_PARTIAL_CONSOL_ASSIGN');
13366: FND_MESSAGE.SET_TOKEN('DEL_COUNT', 'l_valid_children_tab.count');
13367: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
13368: l_num_warnings := l_num_warnings + 1;
13369: END IF;
13362: IF l_valid_children_tab.count < p_del_tab.count THEN
13363:
13364: -- Not all deliveries were assigned to parent.
13365: FND_MESSAGE.SET_NAME('WSH', 'WSH_PARTIAL_CONSOL_ASSIGN');
13366: FND_MESSAGE.SET_TOKEN('DEL_COUNT', 'l_valid_children_tab.count');
13367: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
13368: l_num_warnings := l_num_warnings + 1;
13369: END IF;
13370:
13427: END IF;
13428: IF c_check_valid_child%ISOPEN THEN
13429: CLOSE c_check_valid_child;
13430: END IF;
13431: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_TRIP');
13432: WSH_UTIL_CORE.Add_Message(x_return_status);
13433: --
13434: -- Debug Statements
13435: --
13455: END IF;
13456: IF c_check_valid_child%ISOPEN THEN
13457: CLOSE c_check_valid_child;
13458: END IF;
13459: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_DECONSOL_POINT');
13460: WSH_UTIL_CORE.Add_Message(x_return_status);
13461: --
13462: -- Debug Statements
13463: --
13483: END IF;
13484: IF c_check_valid_child%ISOPEN THEN
13485: CLOSE c_check_valid_child;
13486: END IF;
13487: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CHILDREN');
13488: WSH_UTIL_CORE.Add_Message(x_return_status);
13489: --
13490: -- Debug Statements
13491: --
13511: IF c_check_valid_child%ISOPEN THEN
13512: CLOSE c_check_valid_child;
13513: END IF;
13514: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13515: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_PARENT');
13516: WSH_UTIL_CORE.Add_Message(x_return_status);
13517: --
13518: -- Debug Statements
13519: --
13540: IF c_check_valid_child%ISOPEN THEN
13541: CLOSE c_check_valid_child;
13542: END IF;
13543: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13544: FND_MESSAGE.SET_NAME('WSH','WSH_FAIL_ASSIGN_DEL_TO_CONSOL');
13545: WSH_UTIL_CORE.Add_Message(x_return_status);
13546: --
13547: -- Debug Statements
13548: --
13753: OPEN check_consol_lpns(l_assigned_dels_tab(i));
13754: FETCH check_consol_lpns INTO l_consol_lpn_dummy;
13755: IF check_consol_lpns%FOUND THEN
13756: CLOSE check_consol_lpns;
13757: FND_MESSAGE.SET_NAME('WSH','WSH_FAIL_UNASSIGN_DEL_LPN');
13758: FND_MESSAGE.SET_TOKEN('DELIVERY_NAME', WSH_NEW_DELIVERIES_PVT.Get_Name(l_assigned_dels_tab(i)));
13759: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13760: wsh_util_core.add_message(l_return_status, l_module_name);
13761: wsh_util_core.api_post_call
13754: FETCH check_consol_lpns INTO l_consol_lpn_dummy;
13755: IF check_consol_lpns%FOUND THEN
13756: CLOSE check_consol_lpns;
13757: FND_MESSAGE.SET_NAME('WSH','WSH_FAIL_UNASSIGN_DEL_LPN');
13758: FND_MESSAGE.SET_TOKEN('DELIVERY_NAME', WSH_NEW_DELIVERIES_PVT.Get_Name(l_assigned_dels_tab(i)));
13759: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13760: wsh_util_core.add_message(l_return_status, l_module_name);
13761: wsh_util_core.api_post_call
13762: (
13790:
13791: EXCEPTION
13792: WHEN OTHERS THEN
13793: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13794: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_LOCK_FAILED');
13795: FND_MESSAGE.Set_Token('DEL_NAME', WSH_NEW_DELIVERIES_PVT.Get_Name(l_assigned_dels_tab(i)));
13796: WSH_UTIL_CORE.Add_Message(x_return_status);
13797: --
13798: -- Debug Statements
13791: EXCEPTION
13792: WHEN OTHERS THEN
13793: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13794: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_LOCK_FAILED');
13795: FND_MESSAGE.Set_Token('DEL_NAME', WSH_NEW_DELIVERIES_PVT.Get_Name(l_assigned_dels_tab(i)));
13796: WSH_UTIL_CORE.Add_Message(x_return_status);
13797: --
13798: -- Debug Statements
13799: --
13860:
13861: EXCEPTION
13862: WHEN OTHERS THEN
13863: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13864: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_DEL_LEG_LOCK');
13865: FND_MESSAGE.Set_Token('DEL_NAME', WSH_NEW_DELIVERIES_PVT.Get_Name(l_assigned_dels_tab(i)));
13866: WSH_UTIL_CORE.Add_Message(x_return_status);
13867: --
13868: -- Debug Statements
13861: EXCEPTION
13862: WHEN OTHERS THEN
13863: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13864: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_DEL_LEG_LOCK');
13865: FND_MESSAGE.Set_Token('DEL_NAME', WSH_NEW_DELIVERIES_PVT.Get_Name(l_assigned_dels_tab(i)));
13866: WSH_UTIL_CORE.Add_Message(x_return_status);
13867: --
13868: -- Debug Statements
13869: --
14014: --
14015:
14016: WHEN WSH_NO_OPEN_CHILD_DELIVERIES THEN
14017: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
14018: FND_MESSAGE.SET_NAME('WSH','WSH_NO_OPEN_DELIVERIES');
14019: WSH_UTIL_CORE.Add_Message(x_return_status);
14020: --
14021: -- Debug Statements
14022: --
14028: --
14029:
14030: WHEN WSH_INVALID_CHILD_DELIVERIES THEN
14031: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
14032: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CHILD_DELIVERIES');
14033: WSH_UTIL_CORE.Add_Message(x_return_status);
14034: --
14035: -- Debug Statements
14036: --
14286: END LOOP;
14287: EXCEPTION
14288: WHEN OTHERS THEN
14289: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
14290: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_LOCK_FAILED');
14291: FND_MESSAGE.Set_Token('ENTITY_NAME', WSH_NEW_DELIVERIES_PVT.Get_Name(l_co_consol_del_tab(l_lock_index)));
14292: WSH_UTIL_CORE.Add_Message(x_return_status);
14293: --
14294: -- Debug Statements
14287: EXCEPTION
14288: WHEN OTHERS THEN
14289: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
14290: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_LOCK_FAILED');
14291: FND_MESSAGE.Set_Token('ENTITY_NAME', WSH_NEW_DELIVERIES_PVT.Get_Name(l_co_consol_del_tab(l_lock_index)));
14292: WSH_UTIL_CORE.Add_Message(x_return_status);
14293: --
14294: -- Debug Statements
14295: --