[Home] [Help]
191: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_ITEM_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
192: END IF;
193: --
194: l_item_name := WSH_UTIL_CORE.Get_Item_Name(p_cont_item_id,p_organization_id);
195: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_INV_ITEM');
196: FND_MESSAGE.SET_TOKEN('ITEM_NAME',l_item_name);
197: CLOSE l_valid_cont_csr;
198: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
199:
192: END IF;
193: --
194: l_item_name := WSH_UTIL_CORE.Get_Item_Name(p_cont_item_id,p_organization_id);
195: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_INV_ITEM');
196: FND_MESSAGE.SET_TOKEN('ITEM_NAME',l_item_name);
197: CLOSE l_valid_cont_csr;
198: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
199:
200: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
404: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_ITEM_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
405: END IF;
406: --
407: l_item_name := WSH_UTIL_CORE.Get_Item_Name(P_container_rec.inventory_item_id,P_container_rec.organization_id);
408: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_INV_ITEM');
409: FND_MESSAGE.SET_TOKEN('ITEM_NAME',l_item_name);
410: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
411: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
412: END IF;
405: END IF;
406: --
407: l_item_name := WSH_UTIL_CORE.Get_Item_Name(P_container_rec.inventory_item_id,P_container_rec.organization_id);
408: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_INV_ITEM');
409: FND_MESSAGE.SET_TOKEN('ITEM_NAME',l_item_name);
410: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
411: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
412: END IF;
413:
450: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_ORG_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
451: END IF;
452: --
453: l_org_name := WSH_UTIL_CORE.Get_Org_Name(P_container_rec.organization_id);
454: FND_MESSAGE.SET_NAME('WSH','WSH_DEFAULT_UOM_ERROR');
455: FND_MESSAGE.SET_TOKEN('ORG_NAME',l_org_name);
456: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
457: --
458: IF l_debug_on THEN
451: END IF;
452: --
453: l_org_name := WSH_UTIL_CORE.Get_Org_Name(P_container_rec.organization_id);
454: FND_MESSAGE.SET_NAME('WSH','WSH_DEFAULT_UOM_ERROR');
455: FND_MESSAGE.SET_TOKEN('ORG_NAME',l_org_name);
456: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
457: --
458: IF l_debug_on THEN
459: WSH_DEBUG_SV.log(l_module_name,'Org Name is ',l_org_name);
847: l_orig_update_cont_value := WSH_WMS_LPN_GRP.g_update_to_container;
848: l_inventory_item_id := p_cont_item_id;
849:
850: IF p_organization_id IS NULL AND p_lpn_id IS NULL THEN
851: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_ORG_NULL');
852: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
853: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
854: --
855: IF l_debug_on THEN
1038: CLOSE c_get_lpn_info;
1039: END IF; --}
1040:
1041: IF p_organization_id IS NULL AND l_organization_id IS NULL THEN
1042: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_ORG_NULL');
1043: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1044: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
1045: --
1046: IF l_debug_on THEN
1104: IF l_debug_on THEN
1105: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR CREATING CONTAINER' || TO_CHAR ( L_CONT_INSTANCE_ID ) );
1106: END IF;
1107: --
1108: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_CREATE_ERROR');
1109: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
1110: --
1111: IF l_debug_on THEN
1112: WSH_DEBUG_SV.pop(l_module_name);
1153: END IF;
1154:
1155: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
1156: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
1157: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_CREATE_ERROR');
1158: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1159: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
1160: --
1161: IF l_debug_on THEN
1473: --
1474: EXCEPTION
1475:
1476: WHEN Invalid_Container THEN
1477: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_NULL_DELETE');
1478: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1479: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
1480: --
1481: IF l_debug_on THEN
1483: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:INVALID_CONTAINER');
1484: END IF;
1485: --
1486: WHEN Invalid_Delivery THEN
1487: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DEL_STS_INVALID');
1488: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1489: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
1490: --
1491: IF l_debug_on THEN
1493: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:INVALID_DELIVERY');
1494: END IF;
1495: --
1496: WHEN Invalid_Detail THEN
1497: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DELETE_NOT_CONT');
1498: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1499: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
1500: --
1501: IF l_debug_on THEN
1503: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:INVALID_DETAIL');
1504: END IF;
1505: --
1506: WHEN Cont_Not_Empty THEN
1507: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DELETE_NOT_EMPTY');
1508: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1509: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
1510: --
1511: IF l_debug_on THEN
1514: END IF;
1515: --
1516: WHEN Container_Error THEN
1517: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1518: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DELETE_ERROR');
1519: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
1520: --
1521: IF l_debug_on THEN
1522: WSH_DEBUG_SV.logmsg(l_module_name,'CONTAINER_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1525: --
1526: WHEN Unassign_Del_Error THEN
1527: ROLLBACK to Delete_Cont;
1528: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1529: FND_MESSAGE.SET_NAME('WSH','WSH_UNASSIGN_DEL_ERROR');
1530: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
1531:
1532: --
1533: IF l_debug_on THEN
1691: END IF;
1692: --
1693: IF p_del_detail_tab.COUNT = 0 THEN
1694: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1695: FND_MESSAGE.SET_NAME('WSH', 'WSH_CONT_DET_ASSG_NULL');
1696: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
1697: --
1698: IF l_debug_on THEN
1699: WSH_DEBUG_SV.pop(l_module_name);
1730:
1731: IF (nvl(l_delivery_id,-99) <> -99) THEN
1732:
1733: IF (nvl(l_del_status,'N/A') NOT IN ('OP','SA')) THEN
1734: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DEL_STS_INVALID');
1735: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1736: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
1737: x_pack_status := 'Error';
1738: --
1819:
1820: --
1821: IF (x_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR OR x_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
1822: --dbms_output.put_line('error in autocreate');
1823: FND_MESSAGE.SET_NAME('WSH','WSH_GROUP_DETAILS_ERROR');
1824: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
1825: --
1826: END IF;
1827:
1851: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
1852: END IF;
1853: --
1854: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_container_instance_id);
1855: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONTAINER');
1856: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
1857: WSH_UTIL_CORE.Add_Message(l_ret_sts,l_module_name);
1858: x_return_status := l_ret_sts;
1859: x_pack_status := 'Error';
1852: END IF;
1853: --
1854: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_container_instance_id);
1855: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONTAINER');
1856: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
1857: WSH_UTIL_CORE.Add_Message(l_ret_sts,l_module_name);
1858: x_return_status := l_ret_sts;
1859: x_pack_status := 'Error';
1860: --
1900: CLOSE Get_Det_Cont_Item;
1901: END IF;
1902:
1903: IF l_cont_item_id <> nvl(l_det_cont_item_id,l_cont_item_id) THEN
1904: FND_MESSAGE.SET_NAME('WSH','WSH_DET_CONT_ITEM_DIFF');
1905: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_del_detail_id);
1906: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_WARNING,l_module_name);
1907: IF l_ret_sts <> WSH_UTIL_CORE.G_RET_STS_ERROR THEN
1908: l_ret_sts := WSH_UTIL_CORE.G_RET_STS_WARNING;
1901: END IF;
1902:
1903: IF l_cont_item_id <> nvl(l_det_cont_item_id,l_cont_item_id) THEN
1904: FND_MESSAGE.SET_NAME('WSH','WSH_DET_CONT_ITEM_DIFF');
1905: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_del_detail_id);
1906: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_WARNING,l_module_name);
1907: IF l_ret_sts <> WSH_UTIL_CORE.G_RET_STS_ERROR THEN
1908: l_ret_sts := WSH_UTIL_CORE.G_RET_STS_WARNING;
1909: END IF;
2004: ELSE
2005: -- l_ret_sts := x_return_status;
2006: --dbms_output.put_line('error assigning ' || l_del_detail_id);
2007: l_ret_sts := WSH_UTIL_CORE.G_RET_STS_ERROR;
2008: FND_MESSAGE.SET_NAME('WSH', 'WSH_CONT_DETAIL_NOT_ASSIGNED');
2009: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_del_detail_id);
2010: WSH_UTIL_CORE.Add_Message(l_ret_sts,l_module_name);
2011: END IF;
2012: END IF;
2005: -- l_ret_sts := x_return_status;
2006: --dbms_output.put_line('error assigning ' || l_del_detail_id);
2007: l_ret_sts := WSH_UTIL_CORE.G_RET_STS_ERROR;
2008: FND_MESSAGE.SET_NAME('WSH', 'WSH_CONT_DETAIL_NOT_ASSIGNED');
2009: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_del_detail_id);
2010: WSH_UTIL_CORE.Add_Message(l_ret_sts,l_module_name);
2011: END IF;
2012: END IF;
2013:
2039: END IF;
2040: --
2041:
2042: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2043: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_UPD_ATTR_ERROR');
2044: --
2045: IF l_debug_on THEN
2046: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2047: END IF;
2046: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2047: END IF;
2048: --
2049: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_container_instance_id);
2050: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
2051: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
2052: END IF;
2053:
2054: l_upd_flag := TRUE;
2063:
2064: IF SQL%ROWCOUNT > 1 OR SQL%NOTFOUND THEN
2065: --dbms_output.put_line('error updating master serial number for detail ' || l_del_detail_id);
2066:
2067: FND_MESSAGE.SET_NAME('WSH','WSH_DET_UPD_SER_ERROR');
2068: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_del_detail_id);
2069: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_WARNING,l_module_name);
2070: IF l_ret_sts <> WSH_UTIL_CORE.G_RET_STS_ERROR THEN
2071: l_ret_sts := WSH_UTIL_CORE.G_RET_STS_WARNING;
2064: IF SQL%ROWCOUNT > 1 OR SQL%NOTFOUND THEN
2065: --dbms_output.put_line('error updating master serial number for detail ' || l_del_detail_id);
2066:
2067: FND_MESSAGE.SET_NAME('WSH','WSH_DET_UPD_SER_ERROR');
2068: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_del_detail_id);
2069: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_WARNING,l_module_name);
2070: IF l_ret_sts <> WSH_UTIL_CORE.G_RET_STS_ERROR THEN
2071: l_ret_sts := WSH_UTIL_CORE.G_RET_STS_WARNING;
2072: END IF;
2080: END IF;
2081:
2082: <
2083: IF l_tmp_status = 'Error' THEN
2084: FND_MESSAGE.SET_NAME('WSH', 'WSH_CONT_DETAIL_NOT_ASSIGNED');
2085: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_del_detail_id);
2086: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_WARNING,l_module_name);
2087: END IF;
2088:
2081:
2082: <
2083: IF l_tmp_status = 'Error' THEN
2084: FND_MESSAGE.SET_NAME('WSH', 'WSH_CONT_DETAIL_NOT_ASSIGNED');
2085: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_del_detail_id);
2086: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_WARNING,l_module_name);
2087: END IF;
2088:
2089: i := i + 1;
2253: WSH_DEBUG_SV.log(l_module_name,'P_DEL_UNASSIGN',P_DEL_UNASSIGN);
2254: END IF;
2255: --
2256: IF p_del_detail_tab.count = 0 THEN
2257: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_ASSG_NULL');
2258: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2259: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
2260: --
2261: IF l_debug_on THEN
2311:
2312: IF (nvl(l_del_status,'N/A') <> 'OP')
2313: AND NVL(p_action_prms.caller,'!!!!') NOT LIKE '%' || WSH_UTIL_CORE.C_SPLIT_DLVY_SUFFIX -- J-IB-NPARIKH
2314: THEN
2315: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DEL_STS_INVALID');
2316: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2317: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
2318: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_ERROR THEN
2319: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2389: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2390: IF x_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
2391: l_num_warnings := l_num_warnings + 1;
2392: ELSE
2393: -- FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_UNASSG_ERROR');
2394: -- WSH_UTIL_CORE.Add_Message(x_return_status);
2395: --
2396: IF l_debug_on THEN
2397: WSH_DEBUG_SV.pop(l_module_name);
2438: --
2439: IF x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
2440: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
2441: ) THEN
2442: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_LAST_LINE_ERROR');
2443: --
2444: IF l_debug_on THEN
2445: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2446: END IF;
2445: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2446: END IF;
2447: --
2448: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(l_cont_tab(i));
2449: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
2450: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_WARNING,l_module_name);
2451: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_ERROR THEN
2452: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2453: END IF;
2472: --
2473:
2474: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2475: --dbms_output.put_line('after check cont attr status is ' || x_return_status);
2476: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_ATTR_ERROR');
2477: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_WARNING,l_module_name);
2478: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_ERROR THEN
2479: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2480: END IF;
2542: line_direction = DECODE(line_direction,'IO','O',line_direction) -- J-IB-NPARIKH
2543: WHERE delivery_detail_id = l_cont_tab(i);
2544:
2545: IF SQL%ROWCOUNT > 1 OR SQL%NOTFOUND THEN
2546: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONTAINER');
2547: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
2548: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_ERROR THEN
2549: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2550: END IF;
2567: END IF;
2568: --
2569:
2570: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2571: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_UPD_ATTR_ERROR');
2572: --
2573: IF l_debug_on THEN
2574: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2575: END IF;
2574: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2575: END IF;
2576: --
2577: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(l_cont_tab(i));
2578: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
2579: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
2580: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_ERROR THEN
2581: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2582: END IF;
2594: l_cont_item_id;
2595:
2596: IF Is_Container%NOTFOUND THEN
2597: CLOSE Is_Container;
2598: FND_MESSAGE.SET_NAME('WSH','WSH_DET_INVALID_DETAIL');
2599: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_del_detail_rec(i));
2600: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
2601: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_ERROR THEN
2602: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2595:
2596: IF Is_Container%NOTFOUND THEN
2597: CLOSE Is_Container;
2598: FND_MESSAGE.SET_NAME('WSH','WSH_DET_INVALID_DETAIL');
2599: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_del_detail_rec(i));
2600: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
2601: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_ERROR THEN
2602: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2603: END IF;
2646:
2647: IF (nvl(l_delivery_id,-99) <> -99) THEN --{
2648:
2649: IF (nvl(l_del_status,'N/A') <> 'OP') THEN
2650: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DEL_STS_INVALID');
2651: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2652: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
2653: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_ERROR THEN
2654: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2678: END IF;
2679: --
2680:
2681: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN --{
2682: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_LAST_LINE_ERROR');
2683: --
2684: IF l_debug_on THEN
2685: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2686: END IF;
2685: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2686: END IF;
2687: --
2688: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(l_del_detail_rec(i));
2689: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
2690: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_WARNING,l_module_name);
2691: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_ERROR THEN
2692: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2693: END IF;
2711: END IF;
2712: --
2713:
2714: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN --{
2715: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_ATTR_ERROR');
2716: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_WARNING,l_module_name);
2717: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_ERROR THEN
2718: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2719: END IF;
2776: line_direction = DECODE(line_direction,'IO','O',line_direction) -- J-IB-NPARIKH
2777: WHERE delivery_detail_id = l_del_detail_rec(i);
2778:
2779: IF SQL%ROWCOUNT > 1 OR SQL%NOTFOUND THEN
2780: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONTAINER');
2781: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
2782: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_ERROR THEN
2783: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2784: END IF;
2801: END IF;
2802: --
2803:
2804: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN --{
2805: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_UPD_ATTR_ERROR');
2806: --
2807: IF l_debug_on THEN
2808: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2809: END IF;
2808: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2809: END IF;
2810: --
2811: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(l_del_detail_rec(i));
2812: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
2813: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
2814: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_ERROR THEN
2815: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2816: END IF;
2866: SET master_serial_number = serial_number
2867: WHERE delivery_detail_id = l_del_detail_rec(i);
2868:
2869: IF SQL%ROWCOUNT > 1 OR SQL%NOTFOUND THEN
2870: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_CHILD_UPD_ERROR');
2871: --
2872: IF l_debug_on THEN
2873: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2874: END IF;
2873: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2874: END IF;
2875: --
2876: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(l_del_detail_rec(i));
2877: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
2878: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_ERROR THEN
2879: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2880: END IF;
2881: GOTO next_line;
2896: END IF;
2897: --
2898:
2899: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2900: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_GET_SRL_ERROR');
2901: --
2902: IF l_debug_on THEN
2903: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2904: END IF;
2903: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2904: END IF;
2905: --
2906: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(l_del_detail_rec(i));
2907: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
2908: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_ERROR THEN
2909: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2910: END IF;
2911: GOTO next_line;
2933: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2934: END IF;
2935: --
2936: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(l_del_detail_rec(i));
2937: FND_MESSAGE.SET_NAME('WSH', 'WSH_CONT_CHILD_UPD_ERROR');
2938: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
2939: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2940: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
2941: --
2934: END IF;
2935: --
2936: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(l_del_detail_rec(i));
2937: FND_MESSAGE.SET_NAME('WSH', 'WSH_CONT_CHILD_UPD_ERROR');
2938: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
2939: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2940: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
2941: --
2942: IF l_debug_on THEN
2984: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2985: END IF;
2986: --
2987: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_container_instance_id);
2988: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_OVERPACKED');
2989: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
2990: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2991: WSH_UTIL_CORE.Add_Message(l_return_status);
2992: x_pack_status := 'Overpacked';
2985: END IF;
2986: --
2987: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_container_instance_id);
2988: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_OVERPACKED');
2989: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
2990: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2991: WSH_UTIL_CORE.Add_Message(l_return_status);
2992: x_pack_status := 'Overpacked';
2993:
2996: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2997: END IF;
2998: --
2999: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_container_instance_id);
3000: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_UNDERPACKED');
3001: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
3002: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3003: WSH_UTIL_CORE.Add_Message(l_return_status);
3004: x_pack_status := 'Underpacked';
2997: END IF;
2998: --
2999: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_container_instance_id);
3000: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_UNDERPACKED');
3001: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
3002: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3003: WSH_UTIL_CORE.Add_Message(l_return_status);
3004: x_pack_status := 'Underpacked';
3005: ELSE
3196: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3197: END IF;
3198: --
3199: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_container_instance_id);
3200: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONTAINER');
3201: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
3202: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3203: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
3204: --
3197: END IF;
3198: --
3199: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_container_instance_id);
3200: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONTAINER');
3201: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
3202: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3203: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
3204: --
3205: IF l_debug_on THEN
3223: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3224: END IF;
3225: --
3226: l_del_name := WSH_NEW_DELIVERIES_PVT.Get_Name(p_delivery_id);
3227: FND_MESSAGE.SET_NAME('WSH','WSH_DET_INVALID_DEL');
3228: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_del_name);
3229: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3230: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
3231: --
3224: END IF;
3225: --
3226: l_del_name := WSH_NEW_DELIVERIES_PVT.Get_Name(p_delivery_id);
3227: FND_MESSAGE.SET_NAME('WSH','WSH_DET_INVALID_DEL');
3228: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_del_name);
3229: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3230: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
3231: --
3232: IF l_debug_on THEN
3281: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3282: END IF;
3283: --
3284: l_del_name := WSH_NEW_DELIVERIES_PVT.Get_Name(p_delivery_id);
3285: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_ASSG_ORG_DIFF');
3286: FND_MESSAGE.SET_TOKEN('ENTITY1',l_cont_name);
3287: FND_MESSAGE.SET_TOKEN('ENTITY2',l_del_name);
3288: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3289: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
3282: END IF;
3283: --
3284: l_del_name := WSH_NEW_DELIVERIES_PVT.Get_Name(p_delivery_id);
3285: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_ASSG_ORG_DIFF');
3286: FND_MESSAGE.SET_TOKEN('ENTITY1',l_cont_name);
3287: FND_MESSAGE.SET_TOKEN('ENTITY2',l_del_name);
3288: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3289: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
3290: --
3283: --
3284: l_del_name := WSH_NEW_DELIVERIES_PVT.Get_Name(p_delivery_id);
3285: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_ASSG_ORG_DIFF');
3286: FND_MESSAGE.SET_TOKEN('ENTITY1',l_cont_name);
3287: FND_MESSAGE.SET_TOKEN('ENTITY2',l_del_name);
3288: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3289: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
3290: --
3291: IF l_debug_on THEN
3666: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3667: END IF;
3668: --
3669: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_det_cont_inst_id);
3670: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONTAINER');
3671: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
3672: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3673: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
3674: --
3667: END IF;
3668: --
3669: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_det_cont_inst_id);
3670: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONTAINER');
3671: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
3672: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3673: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
3674: --
3675: IF l_debug_on THEN
3694: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3695: END IF;
3696: --
3697: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_par_cont_inst_id);
3698: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONTAINER');
3699: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
3700: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3701: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
3702: --
3695: END IF;
3696: --
3697: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_par_cont_inst_id);
3698: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONTAINER');
3699: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
3700: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3701: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
3702: --
3703: IF l_debug_on THEN
3717: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3718: END IF;
3719: --
3720: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_det_cont_inst_id);
3721: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_ASSG_ORG_DIFF');
3722: FND_MESSAGE.SET_TOKEN('ENTITY1',l_cont_name);
3723: --
3724: IF l_debug_on THEN
3725: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3718: END IF;
3719: --
3720: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_det_cont_inst_id);
3721: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_ASSG_ORG_DIFF');
3722: FND_MESSAGE.SET_TOKEN('ENTITY1',l_cont_name);
3723: --
3724: IF l_debug_on THEN
3725: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3726: END IF;
3725: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3726: END IF;
3727: --
3728: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_par_cont_inst_id);
3729: FND_MESSAGE.SET_TOKEN('ENTITY2',l_cont_name);
3730: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3731: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
3732: --
3733: IF l_debug_on THEN
3764:
3765: IF (nvl(l_par_del_id,-99) <> -99) THEN
3766:
3767: IF (nvl(l_del_status,'N/A') <> 'OP') THEN
3768: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DEL_STS_INVALID');
3769: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3770: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
3771: --
3772: IF l_debug_on THEN
3804:
3805: IF (nvl(l_det_del_id,-99) <> -99) THEN
3806:
3807: IF (nvl(l_del_status,'N/A') <> 'OP') THEN
3808: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DEL_STS_INVALID');
3809: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3810: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
3811: --
3812: IF l_debug_on THEN
3852: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3853: END IF;
3854: --
3855: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_det_cont_inst_id);
3856: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_ASSG_DEL_DIFF');
3857: FND_MESSAGE.SET_TOKEN('ENTITY1',l_cont_name);
3858: --
3859: IF l_debug_on THEN
3860: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3853: END IF;
3854: --
3855: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_det_cont_inst_id);
3856: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_ASSG_DEL_DIFF');
3857: FND_MESSAGE.SET_TOKEN('ENTITY1',l_cont_name);
3858: --
3859: IF l_debug_on THEN
3860: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3861: END IF;
3860: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3861: END IF;
3862: --
3863: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_par_cont_inst_id);
3864: FND_MESSAGE.SET_TOKEN('ENTITY2',l_cont_name);
3865: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3866: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
3867: --
3868: IF l_debug_on THEN
3892: END IF;
3893:
3894: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
3895: --dbms_output.put_line('error while getting master serial for parent ' || p_par_cont_inst_id);
3896: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_GET_MASTER_ERROR');
3897: --
3898: IF l_debug_on THEN
3899: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3900: END IF;
3899: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3900: END IF;
3901: --
3902: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_par_cont_inst_id);
3903: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
3904: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_WARNING,l_module_name);
3905: IF l_ret_sts <> WSH_UTIL_CORE.G_RET_STS_ERROR THEN
3906: l_ret_sts := WSH_UTIL_CORE.G_RET_STS_WARNING;
3907: END IF;
3923: WSH_DEBUG_SV.log(l_module_name,'return status - ',x_return_status);
3924: END IF;
3925:
3926: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
3927: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_ATTR_ERROR');
3928: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
3929: --
3930: IF l_debug_on THEN
3931: WSH_DEBUG_SV.pop(l_module_name);
3949: WSH_DEBUG_SV.log(l_module_name,'return status - ',x_return_status);
3950: END IF;
3951:
3952: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
3953: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_ATTR_ERROR');
3954: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
3955: --
3956: IF l_debug_on THEN
3957: WSH_DEBUG_SV.pop(l_module_name);
4011: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4012: END IF;
4013: --
4014: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_det_cont_inst_id);
4015: FND_MESSAGE.SET_NAME('WSH', 'WSH_CONT_CHILD_UPD_ERROR');
4016: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
4017: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4018: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
4019: --
4012: END IF;
4013: --
4014: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_det_cont_inst_id);
4015: FND_MESSAGE.SET_NAME('WSH', 'WSH_CONT_CHILD_UPD_ERROR');
4016: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
4017: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4018: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
4019: --
4020: IF l_debug_on THEN
4067: WSH_DEBUG_SV.log(l_module_name,'return status - ',x_return_status);
4068: END IF;
4069:
4070: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
4071: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_GRP_ATTR_WARN');
4072: --
4073: IF l_debug_on THEN
4074: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4075: END IF;
4074: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4075: END IF;
4076: --
4077: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_det_cont_inst_id);
4078: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
4079: l_ret_sts := WSH_UTIL_CORE.G_RET_STS_WARNING;
4080: WSH_UTIL_CORE.Add_Message(l_ret_sts,l_module_name);
4081: END IF;
4082:
4100: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4101: END IF;
4102: --
4103: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_det_cont_inst_id);
4104: FND_MESSAGE.SET_NAME('WSH', 'WSH_CONT_CHILD_UPD_ERROR');
4105: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
4106: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4107: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
4108: --
4101: END IF;
4102: --
4103: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_det_cont_inst_id);
4104: FND_MESSAGE.SET_NAME('WSH', 'WSH_CONT_CHILD_UPD_ERROR');
4105: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
4106: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4107: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
4108: --
4109: IF l_debug_on THEN
4155: IF l_debug_on THEN
4156: WSH_DEBUG_SV.log(l_module_name,'return status - ',x_return_status);
4157: END IF;
4158: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
4159: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_GRP_ATTR_WARN');
4160: --
4161: IF l_debug_on THEN
4162: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4163: END IF;
4162: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4163: END IF;
4164: --
4165: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_det_cont_inst_id);
4166: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
4167: l_ret_sts := WSH_UTIL_CORE.G_RET_STS_WARNING;
4168: WSH_UTIL_CORE.Add_Message(l_ret_sts,l_module_name);
4169: END IF;
4170:
4188: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4189: END IF;
4190: --
4191: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_det_cont_inst_id);
4192: FND_MESSAGE.SET_NAME('WSH', 'WSH_CONT_CHILD_UPD_ERROR');
4193: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
4194: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4195: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
4196: --
4189: END IF;
4190: --
4191: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_det_cont_inst_id);
4192: FND_MESSAGE.SET_NAME('WSH', 'WSH_CONT_CHILD_UPD_ERROR');
4193: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
4194: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4195: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
4196: --
4197: IF l_debug_on THEN
4234: WSH_DEBUG_SV.log(l_module_name,'return status - ',x_return_status);
4235: END IF;
4236: IF (x_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR OR x_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
4237: OR NVL(l_out_rec.single_group, 'N') = 'N') THEN
4238: FND_MESSAGE.SET_NAME('WSH','WSH_GROUP_DETAILS_ERROR');
4239: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
4240: --
4241: IF l_debug_on THEN
4242: WSH_DEBUG_SV.pop(l_module_name);
4292: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4293: END IF;
4294: --
4295: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_det_cont_inst_id);
4296: FND_MESSAGE.SET_NAME('WSH', 'WSH_CONT_CHILD_UPD_ERROR');
4297: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
4298: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4299: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
4300: --
4293: END IF;
4294: --
4295: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_det_cont_inst_id);
4296: FND_MESSAGE.SET_NAME('WSH', 'WSH_CONT_CHILD_UPD_ERROR');
4297: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
4298: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4299: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
4300: --
4301: IF l_debug_on THEN
4418: END IF;
4419: --
4420: l_item_name := WSH_UTIL_CORE.Get_Item_Name(p_container_item_id, p_organization_id);
4421: --dbms_output.put_line('Container '||p_container_item_id||' not found in Org '||p_organization_id);
4422: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_INV_ITEM');
4423: FND_MESSAGE.SET_TOKEN('ITEM_NAME',l_item_name);
4424: CLOSE Get_Cont_Msi;
4425: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
4426: x_return_status := C_ERROR_STATUS;
4419: --
4420: l_item_name := WSH_UTIL_CORE.Get_Item_Name(p_container_item_id, p_organization_id);
4421: --dbms_output.put_line('Container '||p_container_item_id||' not found in Org '||p_organization_id);
4422: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_INV_ITEM');
4423: FND_MESSAGE.SET_TOKEN('ITEM_NAME',l_item_name);
4424: CLOSE Get_Cont_Msi;
4425: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
4426: x_return_status := C_ERROR_STATUS;
4427: x_error_cnt := x_error_cnt + 1;
4452: END IF;
4453: --
4454: l_item_name := WSH_UTIL_CORE.Get_Item_Name(p_container_item_id, p_organization_id);
4455: --dbms_output.put_line('Container '||p_container_item_id||' not found in Org '||p_organization_id);
4456: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_INV_ITEM');
4457: FND_MESSAGE.SET_TOKEN('ITEM_NAME',l_item_name);
4458: CLOSE Get_Cont_Msi;
4459: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
4460: x_return_status := C_ERROR_STATUS;
4453: --
4454: l_item_name := WSH_UTIL_CORE.Get_Item_Name(p_container_item_id, p_organization_id);
4455: --dbms_output.put_line('Container '||p_container_item_id||' not found in Org '||p_organization_id);
4456: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_INV_ITEM');
4457: FND_MESSAGE.SET_TOKEN('ITEM_NAME',l_item_name);
4458: CLOSE Get_Cont_Msi;
4459: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
4460: x_return_status := C_ERROR_STATUS;
4461: x_error_cnt := x_error_cnt + 1;
4466:
4467:
4468: IF ((NVL(l_mtl_max_load,0) <= 0) AND (p_w_v_both in ('W','B'))) THEN
4469: --dbms_output.put_line('Preferred Container Weight is <= 0');
4470: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_MAX_LOAD_ERROR');
4471: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
4472: x_return_status := C_ERROR_STATUS;
4473: x_error_cnt := x_error_cnt + 1;
4474: l_flag := 'N';
4475: END IF;
4476:
4477: IF ((NVL(l_mtl_max_vol,0) <= 0) AND (p_w_v_both in ('V','B'))) THEN
4478: --dbms_output.put_line('Preferred Container Volume is <= 0');
4479: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_MAX_VOL_ERROR');
4480: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
4481: x_return_status := C_ERROR_STATUS;
4482: x_error_cnt := x_error_cnt + 1;
4483: l_flag := 'N';
4717: --
4718: l_org_name := WSH_UTIL_CORE.Get_Org_Name(p_organization_id);
4719: --dbms_output.put_line('Error: Cont/Load Relationship does not exist for Item '||l_item_name||' Org '||l_org_name);
4720: --dbms_output.put_line('p_inventory_item_id '||p_inventory_item_id||' p_organization_id '||p_organization_id);
4721: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONT_LOAD');
4722: FND_MESSAGE.SET_TOKEN('ITEM_NAME',l_item_name);
4723: FND_MESSAGE.SET_TOKEN('ORG_NAME',l_org_name);
4724: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
4725: x_return_status := C_ERROR_STATUS;
4718: l_org_name := WSH_UTIL_CORE.Get_Org_Name(p_organization_id);
4719: --dbms_output.put_line('Error: Cont/Load Relationship does not exist for Item '||l_item_name||' Org '||l_org_name);
4720: --dbms_output.put_line('p_inventory_item_id '||p_inventory_item_id||' p_organization_id '||p_organization_id);
4721: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONT_LOAD');
4722: FND_MESSAGE.SET_TOKEN('ITEM_NAME',l_item_name);
4723: FND_MESSAGE.SET_TOKEN('ORG_NAME',l_org_name);
4724: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
4725: x_return_status := C_ERROR_STATUS;
4726: x_error_cnt := x_error_cnt + 1;
4719: --dbms_output.put_line('Error: Cont/Load Relationship does not exist for Item '||l_item_name||' Org '||l_org_name);
4720: --dbms_output.put_line('p_inventory_item_id '||p_inventory_item_id||' p_organization_id '||p_organization_id);
4721: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONT_LOAD');
4722: FND_MESSAGE.SET_TOKEN('ITEM_NAME',l_item_name);
4723: FND_MESSAGE.SET_TOKEN('ORG_NAME',l_org_name);
4724: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
4725: x_return_status := C_ERROR_STATUS;
4726: x_error_cnt := x_error_cnt + 1;
4727: ELSE
4727: ELSE
4728: CLOSE Get_Cont_Load;
4729: IF ((l_max_load_qty = 0) AND (p_fill_pc_basis = 'Q')) THEN
4730: --dbms_output.put_line('Error: Max Load qty for Preferred Container is 0');
4731: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_LOAD_QTY_ERROR');
4732: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
4733: x_error_cnt := x_error_cnt + 1;
4734: x_return_status := C_ERROR_STATUS;
4735: l_wcl_cont_item_id := NULL;
4864: -- Bug 2786021
4865: IF (nvl(l_mtl_max_load,0) = 0 OR nvl(l_weight_per_pc,0) = 0)THEN
4866: x_return_status := C_ERROR_STATUS;
4867: IF nvl(l_mtl_max_load,0) = 0 THEN
4868: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_MAX_LOAD_ERROR');
4869: ELSIF nvl(l_weight_per_pc,0) = 0 THEN
4870: FND_MESSAGE.SET_NAME('WSH','WSH_NULL_WEIGHT_VOLUME');
4871: FND_MESSAGE.SET_TOKEN('DELIVERY_DETAIL',p_line_cont_rec.delivery_detail_id);
4872: END IF;
4866: x_return_status := C_ERROR_STATUS;
4867: IF nvl(l_mtl_max_load,0) = 0 THEN
4868: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_MAX_LOAD_ERROR');
4869: ELSIF nvl(l_weight_per_pc,0) = 0 THEN
4870: FND_MESSAGE.SET_NAME('WSH','WSH_NULL_WEIGHT_VOLUME');
4871: FND_MESSAGE.SET_TOKEN('DELIVERY_DETAIL',p_line_cont_rec.delivery_detail_id);
4872: END IF;
4873: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
4874: IF l_debug_on THEN
4867: IF nvl(l_mtl_max_load,0) = 0 THEN
4868: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_MAX_LOAD_ERROR');
4869: ELSIF nvl(l_weight_per_pc,0) = 0 THEN
4870: FND_MESSAGE.SET_NAME('WSH','WSH_NULL_WEIGHT_VOLUME');
4871: FND_MESSAGE.SET_TOKEN('DELIVERY_DETAIL',p_line_cont_rec.delivery_detail_id);
4872: END IF;
4873: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
4874: IF l_debug_on THEN
4875: WSH_DEBUG_SV.pop(l_module_name);
4887: -- Bug 2786021
4888: IF (nvl(l_mtl_max_vol,0) = 0 OR nvl(l_volume_per_pc,0) = 0) THEN
4889: x_return_status := C_ERROR_STATUS;
4890: IF nvl(l_mtl_max_vol,0) = 0 THEN
4891: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_MAX_VOL_ERROR');
4892: ELSIF nvl(l_volume_per_pc,0) = 0 THEN
4893: FND_MESSAGE.SET_NAME('WSH','WSH_NULL_WEIGHT_VOLUME');
4894: FND_MESSAGE.SET_TOKEN('DELIVERY_DETAIL',p_line_cont_rec.delivery_detail_id);
4895: END IF;
4889: x_return_status := C_ERROR_STATUS;
4890: IF nvl(l_mtl_max_vol,0) = 0 THEN
4891: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_MAX_VOL_ERROR');
4892: ELSIF nvl(l_volume_per_pc,0) = 0 THEN
4893: FND_MESSAGE.SET_NAME('WSH','WSH_NULL_WEIGHT_VOLUME');
4894: FND_MESSAGE.SET_TOKEN('DELIVERY_DETAIL',p_line_cont_rec.delivery_detail_id);
4895: END IF;
4896: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
4897: IF l_debug_on THEN
4890: IF nvl(l_mtl_max_vol,0) = 0 THEN
4891: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_MAX_VOL_ERROR');
4892: ELSIF nvl(l_volume_per_pc,0) = 0 THEN
4893: FND_MESSAGE.SET_NAME('WSH','WSH_NULL_WEIGHT_VOLUME');
4894: FND_MESSAGE.SET_TOKEN('DELIVERY_DETAIL',p_line_cont_rec.delivery_detail_id);
4895: END IF;
4896: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
4897: IF l_debug_on THEN
4898: WSH_DEBUG_SV.pop(l_module_name);
4966: IF (l_return_status <> C_SUCCESS_STATUS OR
4967: p_line_cont_rec.indivisible_flag = 'Y')THEN
4968: -- Fractional qtys not allowed
4969: --dbms_output.put_line('WSH_DETAILS_VALIDATIONS.Check_Decimal_Quantity returned '||l_return_status);
4970: l_discard_message := FND_MESSAGE.GET;
4971: l_tmp_split_qty := FLOOR(l_tmp_split_qty);
4972: END IF;
4973: -- HW OPMCONV - 1) No need to check for process
4974: -- - 2) Changed code to handle qty2
5053: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
5054: --dbms_output.put_line('WSH_DELIVERY_DETAILS_ACTIONS.Split_Delivery_Details returned '|| l_return_status);
5055: x_return_status := C_ERROR_STATUS;
5056: --dbms_output.put_line('WSH_DELIVERY_DETAILS_ACTIONS.Split_Delivery_Details returned '||x_return_status);
5057: FND_MESSAGE.SET_NAME('WSH','WSH_DET_SPLIT_ERROR');
5058: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_line_cont_rec.delivery_detail_id);
5059: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
5060: --
5061: IF l_debug_on THEN
5054: --dbms_output.put_line('WSH_DELIVERY_DETAILS_ACTIONS.Split_Delivery_Details returned '|| l_return_status);
5055: x_return_status := C_ERROR_STATUS;
5056: --dbms_output.put_line('WSH_DELIVERY_DETAILS_ACTIONS.Split_Delivery_Details returned '||x_return_status);
5057: FND_MESSAGE.SET_NAME('WSH','WSH_DET_SPLIT_ERROR');
5058: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_line_cont_rec.delivery_detail_id);
5059: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
5060: --
5061: IF l_debug_on THEN
5062: WSH_DEBUG_SV.pop(l_module_name);
5210: IF (l_return_status <> C_SUCCESS_STATUS OR
5211: p_line_cont_rec.indivisible_flag = 'Y')THEN
5212: -- Fractional qtys not allowed
5213: --dbms_output.put_line('WSH_DETAILS_VALIDATIONS.Check_Decimal_Quantity returned '||l_return_status);
5214: l_discard_message := FND_MESSAGE.GET;
5215: l_split_qty := FLOOR(l_tmp_split_qty);
5216: END IF;
5217:
5218: -- HW OPMCONV - 1) No need to check for process
5262:
5263: -- Start BugFix#3475352
5264: IF (l_num_of_split + 1) > 100000 THEN
5265: x_return_status := C_ERROR_STATUS;
5266: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONT_COUNT');
5267: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_line_cont_rec.delivery_detail_id);
5268: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
5269: return;
5270: END IF;
5263: -- Start BugFix#3475352
5264: IF (l_num_of_split + 1) > 100000 THEN
5265: x_return_status := C_ERROR_STATUS;
5266: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONT_COUNT');
5267: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_line_cont_rec.delivery_detail_id);
5268: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
5269: return;
5270: END IF;
5271: -- End BugFix#3475352
5300: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
5301: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
5302: --dbms_output.put_line('WSH_DELIVERY_DETAILS_ACTIONS.Split_Delivery_Details returned '|| l_return_status);
5303: x_return_status := C_ERROR_STATUS;
5304: FND_MESSAGE.SET_NAME('WSH','WSH_DET_SPLIT_ERROR');
5305: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_line_cont_rec.delivery_detail_id);
5306: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
5307:
5308: IF l_debug_on THEN
5301: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
5302: --dbms_output.put_line('WSH_DELIVERY_DETAILS_ACTIONS.Split_Delivery_Details returned '|| l_return_status);
5303: x_return_status := C_ERROR_STATUS;
5304: FND_MESSAGE.SET_NAME('WSH','WSH_DET_SPLIT_ERROR');
5305: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_line_cont_rec.delivery_detail_id);
5306: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
5307:
5308: IF l_debug_on THEN
5309: WSH_DEBUG_SV.pop(l_module_name);
5837: END IF;
5838:
5839: IF (l_return_status <> C_SUCCESS_STATUS) THEN
5840: --dbms_output.put_line('WSH_WV_UTILS.Detail_Weight_Volume did not return success');
5841: FND_MESSAGE.SET_NAME('WSH','WSH_DET_WT_VOL_FAILED');
5842: FND_MESSAGE.SET_TOKEN('DETAIL_ID',rec.delivery_detail_id);
5843: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
5844: error_cnt := error_cnt + 1;
5845: --dbms_output.put_line('Skipping this dd');
5838:
5839: IF (l_return_status <> C_SUCCESS_STATUS) THEN
5840: --dbms_output.put_line('WSH_WV_UTILS.Detail_Weight_Volume did not return success');
5841: FND_MESSAGE.SET_NAME('WSH','WSH_DET_WT_VOL_FAILED');
5842: FND_MESSAGE.SET_TOKEN('DETAIL_ID',rec.delivery_detail_id);
5843: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
5844: error_cnt := error_cnt + 1;
5845: --dbms_output.put_line('Skipping this dd');
5846: goto next_detail;
5854:
5855: IF ((NVL(rec.net_weight,0) = 0) OR
5856: (NVL(rec.volume,0) = 0)) THEN
5857: --dbms_output.put_line('Weight or Volume is NULL or 0');
5858: FND_MESSAGE.SET_NAME('WSH', 'WSH_NULL_WEIGHT_VOLUME');
5859: FND_MESSAGE.SET_TOKEN('DELIVERY_DETAIL', rec.delivery_detail_id);
5860: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
5861: error_cnt := error_cnt + 1;
5862: --dbms_output.put_line('Skipping this dd');
5855: IF ((NVL(rec.net_weight,0) = 0) OR
5856: (NVL(rec.volume,0) = 0)) THEN
5857: --dbms_output.put_line('Weight or Volume is NULL or 0');
5858: FND_MESSAGE.SET_NAME('WSH', 'WSH_NULL_WEIGHT_VOLUME');
5859: FND_MESSAGE.SET_TOKEN('DELIVERY_DETAIL', rec.delivery_detail_id);
5860: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
5861: error_cnt := error_cnt + 1;
5862: --dbms_output.put_line('Skipping this dd');
5863: goto next_detail;
5891: WSH_DEBUG_SV.log(l_module_name,'fill pc is Q,but use Wt or Vol');
5892: WSH_DEBUG_SV.log(l_module_name,'Wt-'||l_mtl_max_load);
5893: WSH_DEBUG_SV.log(l_module_name,'Vol-'||l_mtl_max_vol);
5894: END IF;
5895: FND_MESSAGE.SET_NAME('WSH', 'WSH_CONT_MAX_WT_ERROR');
5896: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
5897: error_cnt := error_cnt + l_error_cnt;
5898: goto next_detail;
5899: END IF;
5958: WSH_DEBUG_SV.log(l_module_name,'return status -',l_return_status);
5959: END IF;
5960: IF l_return_status <> C_SUCCESS_STATUS THEN
5961: --dbms_output.put_line('WSH_DETAILS_VALIDATIONS.Check_Decimal_Quantity returned '||l_return_status);
5962: l_discard_message := FND_MESSAGE.GET;
5963: l_tmp_num_cont := FLOOR(rec.packed_quantity/l_max_load_qty);
5964:
5965: IF (l_tmp_num_cont = 0) THEN
5966: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_MAX_WT_ERROR');
5962: l_discard_message := FND_MESSAGE.GET;
5963: l_tmp_num_cont := FLOOR(rec.packed_quantity/l_max_load_qty);
5964:
5965: IF (l_tmp_num_cont = 0) THEN
5966: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_MAX_WT_ERROR');
5967: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
5968: error_cnt := error_cnt + 1;
5969: goto next_detail;
5970: ELSE
5978: line_cont_rec.max_load_qty := l_max_load_qty;
5979:
5980: IF (NVL(line_cont_rec.max_load_qty,0) <= 0) THEN
5981: --dbms_output.put_line('Max Load Qty is NULL or <= 0. Skipping this dd');
5982: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_MAX_WT_ERROR');
5983: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
5984: error_cnt := error_cnt + 1;
5985: goto next_detail;
5986: END IF;
6014: END IF;
6015:
6016: IF (l_return_status <> C_SUCCESS_STATUS) THEN
6017: --dbms_output.put_line('WSH_WV_UTILS.Detail_Weight_Volume did not return success');
6018: FND_MESSAGE.SET_NAME('WSH','WSH_DET_WT_VOL_FAILED');
6019: FND_MESSAGE.SET_TOKEN('DETAIL_ID',rec.delivery_detail_id);
6020: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
6021: error_cnt := error_cnt + 1;
6022: --dbms_output.put_line('Skipping this dd');
6015:
6016: IF (l_return_status <> C_SUCCESS_STATUS) THEN
6017: --dbms_output.put_line('WSH_WV_UTILS.Detail_Weight_Volume did not return success');
6018: FND_MESSAGE.SET_NAME('WSH','WSH_DET_WT_VOL_FAILED');
6019: FND_MESSAGE.SET_TOKEN('DETAIL_ID',rec.delivery_detail_id);
6020: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
6021: error_cnt := error_cnt + 1;
6022: --dbms_output.put_line('Skipping this dd');
6023: goto next_detail;
6035: IF (line_cont_rec.fill_pc_basis = 'W') THEN
6036:
6037: IF (NVL(rec.gross_weight,0) = 0) THEN
6038: --dbms_output.put_line('Weight is NULL or 0');
6039: FND_MESSAGE.SET_NAME('WSH', 'WSH_NULL_WEIGHT_VOLUME');
6040: FND_MESSAGE.SET_TOKEN('DELIVERY_DETAIL', rec.delivery_detail_id);
6041: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
6042: error_cnt := error_cnt + 1;
6043: --dbms_output.put_line('Skipping this dd');
6036:
6037: IF (NVL(rec.gross_weight,0) = 0) THEN
6038: --dbms_output.put_line('Weight is NULL or 0');
6039: FND_MESSAGE.SET_NAME('WSH', 'WSH_NULL_WEIGHT_VOLUME');
6040: FND_MESSAGE.SET_TOKEN('DELIVERY_DETAIL', rec.delivery_detail_id);
6041: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
6042: error_cnt := error_cnt + 1;
6043: --dbms_output.put_line('Skipping this dd');
6044: goto next_detail;
6046: ELSE
6047:
6048: IF (NVL(rec.volume,0) = 0) THEN
6049: --dbms_output.put_line('Volume is NULL or 0');
6050: FND_MESSAGE.SET_NAME('WSH', 'WSH_NULL_WEIGHT_VOLUME');
6051: FND_MESSAGE.SET_TOKEN('DELIVERY_DETAIL', rec.delivery_detail_id);
6052: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
6053: error_cnt := error_cnt + 1;
6054: --dbms_output.put_line('Skipping this dd');
6047:
6048: IF (NVL(rec.volume,0) = 0) THEN
6049: --dbms_output.put_line('Volume is NULL or 0');
6050: FND_MESSAGE.SET_NAME('WSH', 'WSH_NULL_WEIGHT_VOLUME');
6051: FND_MESSAGE.SET_TOKEN('DELIVERY_DETAIL', rec.delivery_detail_id);
6052: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
6053: error_cnt := error_cnt + 1;
6054: --dbms_output.put_line('Skipping this dd');
6055: goto next_detail;
6132: ((line_cont_rec.fill_pc_basis = 'W' AND ((line_cont_rec.converted_wt/line_cont_rec.shp_qty) > l_mtl_max_load)) OR
6133: (line_cont_rec.fill_pc_basis = 'V' AND ((line_cont_rec.converted_vol/line_cont_rec.shp_qty) > l_mtl_max_vol)))) THEN
6134: --dbms_output.put_line('Indivisible flag is Y and Preferred Cont cannot hold atleast 1 piece');
6135: -- Bug#: 2503937 - New Error Message
6136: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_MAX_WT_VOL_ERROR');
6137: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
6138: error_cnt := error_cnt + 1;
6139: --dbms_output.put_line('Skipping this dd');
6140: goto next_detail;
6161: ((line_cont_rec.fill_pc_basis = 'Q' AND (line_cont_rec.shp_qty > line_cont_rec.max_load_qty ))
6162: OR (line_cont_rec.fill_pc_basis = 'W' AND (l_dd_gross_wt > line_cont_rec.cont_wt) )
6163: OR (line_cont_rec.fill_pc_basis = 'V' AND (l_dd_volume> line_cont_rec.cont_vol) ) ) ) THEN
6164:
6165: FND_MESSAGE.SET_NAME('WSH','WSH_OPM_IND_SPLIT_PACK');
6166: FND_MESSAGE.SET_TOKEN('DETAIL_ID',rec.delivery_detail_id);
6167: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6168: WSH_UTIL_CORE.Add_Message(l_return_status);
6169: error_cnt := error_cnt + 1;
6162: OR (line_cont_rec.fill_pc_basis = 'W' AND (l_dd_gross_wt > line_cont_rec.cont_wt) )
6163: OR (line_cont_rec.fill_pc_basis = 'V' AND (l_dd_volume> line_cont_rec.cont_vol) ) ) ) THEN
6164:
6165: FND_MESSAGE.SET_NAME('WSH','WSH_OPM_IND_SPLIT_PACK');
6166: FND_MESSAGE.SET_TOKEN('DETAIL_ID',rec.delivery_detail_id);
6167: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6168: WSH_UTIL_CORE.Add_Message(l_return_status);
6169: error_cnt := error_cnt + 1;
6170: goto next_detail;
6523:
6524: -- 10. Check if Count of p_del_detail_tab table is 0
6525: IF p_del_detail_tab.count = 0 THEN
6526: --dbms_output.put_line('p_del_detail_tab count is 0');
6527: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_ASSG_NULL');
6528: x_return_status := C_ERROR_STATUS;
6529: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
6530: --
6531: IF l_debug_on THEN
6574: END IF;
6575: IF (l_return_status = C_ERROR_STATUS) OR
6576: (l_return_status = C_UNEXP_ERROR_STATUS) THEN
6577: --dbms_output.put_line('***WSH_DELIVERY_AUTOCREATE.autocreate_deliveries returned '||l_return_status);
6578: FND_MESSAGE.SET_NAME('WSH','WSH_GROUP_DETAILS_ERROR');
6579: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
6580: x_return_status := l_return_status;
6581: --
6582: IF l_debug_on THEN
6592: cnt := p_group_id_tab.FIRST;
6593:
6594: IF ((cnt IS NULL) OR (p_group_id_tab.COUNT <> p_del_detail_tab.count)) THEN
6595: x_return_status := C_ERROR_STATUS;
6596: FND_MESSAGE.SET_NAME('WSH','WSH_GROUP_DETAILS_ERROR');
6597: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
6598: --
6599: IF l_debug_on THEN
6600: WSH_DEBUG_SV.pop(l_module_name);
6630: -- Raise warning if we found some delivery details with status 'S'
6631: -- Raise Error if all lines are with status 'S'
6632: IF (l_release_warn_count = p_del_detail_tab.count) THEN
6633: x_return_status := C_ERROR_STATUS;
6634: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_RELEASED_STATUS');
6635: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
6636: -- Bug 3337629 : Added the following return statement.
6637: IF l_debug_on THEN
6638: WSH_DEBUG_SV.pop(l_module_name);
6646: --IF (x_return_status <> C_ERROR_STATUS) THEN
6647: IF (l_return_status <> C_ERROR_STATUS) THEN
6648: x_return_status := C_WARNING_STATUS;
6649: warn_cnt := warn_cnt + 1;
6650: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_REL_STATUS_WARN');
6651: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
6652: END IF;
6653: END IF;
6654: --
6657: -- Raise warning if only some of the dds have 'Shipping Parameter' percent fill basis as None
6658: --
6659: IF (l_fill_pc_warn_count = p_del_detail_tab.count) THEN
6660: x_return_status := C_ERROR_STATUS;
6661: FND_MESSAGE.SET_NAME('WSH','WSH_FILL_BASIS_NONE');
6662: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
6663: IF l_debug_on THEN
6664: WSH_DEBUG_SV.pop(l_module_name);
6665: END IF;
6667: ELSIF (l_fill_pc_warn_count > 0) THEN
6668: IF (l_return_status <> C_ERROR_STATUS) THEN
6669: x_return_status := C_WARNING_STATUS;
6670: warn_cnt := warn_cnt + 1;
6671: FND_MESSAGE.SET_NAME('WSH','WSH_FILL_BASIS_NONE');
6672: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
6673: END IF;
6674: END IF;
6675: -- end of bug 3562797 jckwok
6752:
6753: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
6754: ) THEN
6755: --dbms_output.put_line('Container Creation failed for index '|| cnt);
6756: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_CREATE_ERROR');
6757: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
6758: error_cnt := error_cnt + 1;
6759: ELSE
6760:
7681: END IF;
7682: IF (warn_cnt > 0 OR cont_warn > 0) THEN
7683: x_return_status := C_WARNING_STATUS;
7684: IF cont_warn > 0 THEN
7685: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_PACK_WARN');
7686: FND_MESSAGE.SET_TOKEN('CONT_WARN',cont_warn);
7687: FND_MESSAGE.SET_TOKEN('CONT_ERR',0);
7688: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
7689: END IF;
7682: IF (warn_cnt > 0 OR cont_warn > 0) THEN
7683: x_return_status := C_WARNING_STATUS;
7684: IF cont_warn > 0 THEN
7685: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_PACK_WARN');
7686: FND_MESSAGE.SET_TOKEN('CONT_WARN',cont_warn);
7687: FND_MESSAGE.SET_TOKEN('CONT_ERR',0);
7688: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
7689: END IF;
7690: ELSIF (error_cnt > 0) THEN
7683: x_return_status := C_WARNING_STATUS;
7684: IF cont_warn > 0 THEN
7685: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_PACK_WARN');
7686: FND_MESSAGE.SET_TOKEN('CONT_WARN',cont_warn);
7687: FND_MESSAGE.SET_TOKEN('CONT_ERR',0);
7688: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
7689: END IF;
7690: ELSIF (error_cnt > 0) THEN
7691: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_PACK_ERROR');
7687: FND_MESSAGE.SET_TOKEN('CONT_ERR',0);
7688: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
7689: END IF;
7690: ELSIF (error_cnt > 0) THEN
7691: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_PACK_ERROR');
7692: FND_MESSAGE.SET_TOKEN('ERROR_COUNT',error_cnt);
7693: FND_MESSAGE.SET_TOKEN('WARN_COUNT',warn_cnt);
7694: FND_MESSAGE.SET_TOKEN('SUCC_COUNT',succ_cnt);
7695: IF succ_cnt > 0 THEN
7688: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
7689: END IF;
7690: ELSIF (error_cnt > 0) THEN
7691: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_PACK_ERROR');
7692: FND_MESSAGE.SET_TOKEN('ERROR_COUNT',error_cnt);
7693: FND_MESSAGE.SET_TOKEN('WARN_COUNT',warn_cnt);
7694: FND_MESSAGE.SET_TOKEN('SUCC_COUNT',succ_cnt);
7695: IF succ_cnt > 0 THEN
7696: x_return_status := C_WARNING_STATUS;
7689: END IF;
7690: ELSIF (error_cnt > 0) THEN
7691: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_PACK_ERROR');
7692: FND_MESSAGE.SET_TOKEN('ERROR_COUNT',error_cnt);
7693: FND_MESSAGE.SET_TOKEN('WARN_COUNT',warn_cnt);
7694: FND_MESSAGE.SET_TOKEN('SUCC_COUNT',succ_cnt);
7695: IF succ_cnt > 0 THEN
7696: x_return_status := C_WARNING_STATUS;
7697: ELSE
7690: ELSIF (error_cnt > 0) THEN
7691: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_PACK_ERROR');
7692: FND_MESSAGE.SET_TOKEN('ERROR_COUNT',error_cnt);
7693: FND_MESSAGE.SET_TOKEN('WARN_COUNT',warn_cnt);
7694: FND_MESSAGE.SET_TOKEN('SUCC_COUNT',succ_cnt);
7695: IF succ_cnt > 0 THEN
7696: x_return_status := C_WARNING_STATUS;
7697: ELSE
7698: x_return_status := C_ERROR_STATUS;
7707: WSH_DEBUG_SV.logmsg(l_module_name,'X ret status -'||x_return_status);
7708: END IF;
7709: IF x_return_status = C_ERROR_STATUS THEN
7710: IF p_pack_cont_flag = 'Y' THEN
7711: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_MASTER_NOT_PACK');
7712: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
7713: END IF;
7714: --
7715: IF l_debug_on THEN
7749: END IF;
7750: IF l_return_status = C_UNEXP_ERROR_STATUS THEN
7751: --dbms_output.put_line('Returned from autopack conts with unexpected error');
7752: /* No message WSH_CONT_CONT_AUTOPACK_ERR
7753: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_CONT_AUTOPACK_ERR');
7754: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
7755: IF l_return_status <> C_ERROR_STATUS THEN
7756: l_return_status := C_WARNING_STATUS;
7757: END IF;
7792: --
7793: EXCEPTION
7794:
7795: WHEN mark_reprice_error THEN
7796: FND_MESSAGE.Set_Name('WSH','WSH_REPRICE_REQD_ERR');
7797: x_return_status := l_return_status;
7798: WSH_UTIL_CORE.add_message(x_return_status,l_module_name);
7799: IF l_debug_on THEN
7800: WSH_DEBUG_SV.logmsg(l_module_name,'MARK_REPRICE_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7954: OPEN get_delivery_wms(p_delivery_tab(j));
7955: FETCH get_delivery_wms INTO l_wms_enabled_flag;
7956: IF get_delivery_wms%NOTFOUND THEN
7957: CLOSE get_delivery_wms;
7958: FND_MESSAGE.SET_NAME('WSH', 'WSH_NO_DATA_FOUND');
7959: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7960: --
7961: --IF l_debug_on THEN
7962: --WSH_DEBUG_SV.pop(l_module_name);
7992: IF l_del_detail_tab.count = 0 THEN
7993:
7994: l_ret_sts := WSH_UTIL_CORE.G_RET_STS_ERROR;
7995:
7996: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_AUTOPACK_NULL');
7997: --
7998: IF l_debug_on THEN
7999: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
8000: END IF;
7999: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
8000: END IF;
8001: --
8002: l_del_name := WSH_NEW_DELIVERIES_PVT.Get_Name(p_delivery_tab(j));
8003: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_del_name);
8004: WSH_UTIL_CORE.Add_Message(l_ret_sts,l_module_name);
8005: ELSE
8006:
8007: --
8055:
8056: -- bug 1578527: disallow packing actions in WMS
8057: IF l_wms_count > 0 THEN
8058: IF l_wms_count = p_delivery_tab.count THEN
8059: FND_MESSAGE.SET_NAME('WSH', 'WSH_WMS_PACK_NOT_ALLOWED');
8060: WSH_UTIL_CORE.Add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
8061: ELSE
8062: FND_MESSAGE.SET_NAME('WSH', 'WSH_WMS_RECORDS_NOT_PACKED');
8063: FND_MESSAGE.SET_TOKEN('COUNT', l_wms_count);
8058: IF l_wms_count = p_delivery_tab.count THEN
8059: FND_MESSAGE.SET_NAME('WSH', 'WSH_WMS_PACK_NOT_ALLOWED');
8060: WSH_UTIL_CORE.Add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
8061: ELSE
8062: FND_MESSAGE.SET_NAME('WSH', 'WSH_WMS_RECORDS_NOT_PACKED');
8063: FND_MESSAGE.SET_TOKEN('COUNT', l_wms_count);
8064: WSH_UTIL_CORE.Add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
8065: END IF;
8066: END IF;
8059: FND_MESSAGE.SET_NAME('WSH', 'WSH_WMS_PACK_NOT_ALLOWED');
8060: WSH_UTIL_CORE.Add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
8061: ELSE
8062: FND_MESSAGE.SET_NAME('WSH', 'WSH_WMS_RECORDS_NOT_PACKED');
8063: FND_MESSAGE.SET_TOKEN('COUNT', l_wms_count);
8064: WSH_UTIL_CORE.Add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
8065: END IF;
8066: END IF;
8067:
8084: END IF;
8085: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR OR
8086: l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
8087: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8088: FND_MESSAGE.SET_NAME('WSH', 'WSH_REPRICE_REQUIRED_ERR');
8089: WSH_UTIL_CORE.add_message(x_return_status,l_module_name);
8090: --IF l_debug_on THEN
8091: -- WSH_DEBUG_SV.pop(l_module_name);
8092: --END IF;
8129: --
8130:
8131: IF warn_cnt > 0 THEN
8132: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
8133: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_PACK_WARN');
8134: FND_MESSAGE.SET_TOKEN('ERROR_COUNT',error_cnt);
8135: FND_MESSAGE.SET_TOKEN('WARN_COUNT',warn_cnt);
8136: FND_MESSAGE.SET_TOKEN('SUCC_COUNT',succ_cnt);
8137: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
8130:
8131: IF warn_cnt > 0 THEN
8132: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
8133: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_PACK_WARN');
8134: FND_MESSAGE.SET_TOKEN('ERROR_COUNT',error_cnt);
8135: FND_MESSAGE.SET_TOKEN('WARN_COUNT',warn_cnt);
8136: FND_MESSAGE.SET_TOKEN('SUCC_COUNT',succ_cnt);
8137: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
8138:
8131: IF warn_cnt > 0 THEN
8132: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
8133: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_PACK_WARN');
8134: FND_MESSAGE.SET_TOKEN('ERROR_COUNT',error_cnt);
8135: FND_MESSAGE.SET_TOKEN('WARN_COUNT',warn_cnt);
8136: FND_MESSAGE.SET_TOKEN('SUCC_COUNT',succ_cnt);
8137: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
8138:
8139: ELSIF error_cnt > 0 THEN
8132: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
8133: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_PACK_WARN');
8134: FND_MESSAGE.SET_TOKEN('ERROR_COUNT',error_cnt);
8135: FND_MESSAGE.SET_TOKEN('WARN_COUNT',warn_cnt);
8136: FND_MESSAGE.SET_TOKEN('SUCC_COUNT',succ_cnt);
8137: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
8138:
8139: ELSIF error_cnt > 0 THEN
8140: IF succ_cnt > 0 THEN
8138:
8139: ELSIF error_cnt > 0 THEN
8140: IF succ_cnt > 0 THEN
8141: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
8142: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_PACK_WARN');
8143: FND_MESSAGE.SET_TOKEN('ERROR_COUNT',error_cnt);
8144: FND_MESSAGE.SET_TOKEN('WARN_COUNT',warn_cnt);
8145: FND_MESSAGE.SET_TOKEN('SUCC_COUNT',succ_cnt);
8146: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
8139: ELSIF error_cnt > 0 THEN
8140: IF succ_cnt > 0 THEN
8141: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
8142: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_PACK_WARN');
8143: FND_MESSAGE.SET_TOKEN('ERROR_COUNT',error_cnt);
8144: FND_MESSAGE.SET_TOKEN('WARN_COUNT',warn_cnt);
8145: FND_MESSAGE.SET_TOKEN('SUCC_COUNT',succ_cnt);
8146: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
8147: ELSE
8140: IF succ_cnt > 0 THEN
8141: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
8142: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_PACK_WARN');
8143: FND_MESSAGE.SET_TOKEN('ERROR_COUNT',error_cnt);
8144: FND_MESSAGE.SET_TOKEN('WARN_COUNT',warn_cnt);
8145: FND_MESSAGE.SET_TOKEN('SUCC_COUNT',succ_cnt);
8146: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
8147: ELSE
8148: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8141: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
8142: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_PACK_WARN');
8143: FND_MESSAGE.SET_TOKEN('ERROR_COUNT',error_cnt);
8144: FND_MESSAGE.SET_TOKEN('WARN_COUNT',warn_cnt);
8145: FND_MESSAGE.SET_TOKEN('SUCC_COUNT',succ_cnt);
8146: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
8147: ELSE
8148: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8149: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_PACK_ERROR');
8145: FND_MESSAGE.SET_TOKEN('SUCC_COUNT',succ_cnt);
8146: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
8147: ELSE
8148: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8149: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_PACK_ERROR');
8150: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
8151: END IF;
8152: ELSIF succ_cnt > 0 THEN
8153: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
8432: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_PC',P_SPLIT_PC);
8433: END IF;
8434: --
8435: IF p_cont_tab.count = 0 OR p_del_detail_tab.count = 0 THEN
8436: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_ASSG_NULL');
8437: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8438: x_pack_status := 'Error';
8439: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
8440: --
8524: END IF;
8525:
8526: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
8527: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8528: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DETAIL_NOT_ASSIGNED');
8529: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(j).delivery_detail_id);
8530: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
8531: x_pack_status := 'Error';
8532: END IF;
8525:
8526: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
8527: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8528: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DETAIL_NOT_ASSIGNED');
8529: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(j).delivery_detail_id);
8530: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
8531: x_pack_status := 'Error';
8532: END IF;
8533:
8619: l_det_cont_item_id,
8620: l_det_pack_qty2;
8621:
8622: IF Get_Detail_Info%NOTFOUND THEN
8623: FND_MESSAGE.SET_NAME('WSH','WSH_DET_INVALID_DETAIL');
8624: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(j).delivery_detail_id);
8625: x_pack_status := 'Error';
8626: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8627: CLOSE Get_Detail_Info;
8620: l_det_pack_qty2;
8621:
8622: IF Get_Detail_Info%NOTFOUND THEN
8623: FND_MESSAGE.SET_NAME('WSH','WSH_DET_INVALID_DETAIL');
8624: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(j).delivery_detail_id);
8625: x_pack_status := 'Error';
8626: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8627: CLOSE Get_Detail_Info;
8628: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
8698: --RETURN;
8699: raise e_return_excp; -- LPN CONV. rv
8700: END IF;
8701: IF (l_fill_pc_basis = 'N') THEN
8702: FND_MESSAGE.SET_NAME('WSH','WSH_FILL_BASIS_NONE');
8703: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8704: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
8705: x_pack_status := 'Error';
8706: error_cnt := error_cnt + 1;
8771: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
8772: END IF;
8773: --
8774: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(l_cont_tab(i).container_instance_id);
8775: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONTAINER');
8776: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
8777: x_pack_status := 'Error';
8778: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8779: CLOSE Get_Cont_Info;
8772: END IF;
8773: --
8774: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(l_cont_tab(i).container_instance_id);
8775: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONTAINER');
8776: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
8777: x_pack_status := 'Error';
8778: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8779: CLOSE Get_Cont_Info;
8780: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
8819: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
8820: END IF;
8821: --
8822: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(l_cont_tab(i).container_instance_id);
8823: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_WT_VOL_FAILED');
8824: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
8825:
8826:
8827: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_WARNING,l_module_name);
8820: END IF;
8821: --
8822: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(l_cont_tab(i).container_instance_id);
8823: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_WT_VOL_FAILED');
8824: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
8825:
8826:
8827: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_WARNING,l_module_name);
8828: cont_warn := cont_warn + 1;
8970: END IF;
8971:
8972: -- bug 1716136: errors likely mean integers are safe values.
8973: IF l_discard_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
8974: l_discard_message := FND_MESSAGE.GET;
8975: l_split_qty := FLOOR(l_tmp_split_qty);
8976: END IF;
8977:
8978: IF l_split_qty IS NULL THEN
8979: l_split_qty := l_tmp_split_qty;
8980: END IF;
8981:
8982: IF (l_split_qty < 0 OR l_split_qty > l_det_pack_qty) THEN
8983: FND_MESSAGE.SET_NAME('WSH','WSH_DET_SPLIT_ERROR');
8984: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(j).delivery_detail_id);
8985: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8986: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
8987: l_det_tab(j).pack_status := 'Error';
8980: END IF;
8981:
8982: IF (l_split_qty < 0 OR l_split_qty > l_det_pack_qty) THEN
8983: FND_MESSAGE.SET_NAME('WSH','WSH_DET_SPLIT_ERROR');
8984: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(j).delivery_detail_id);
8985: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8986: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
8987: l_det_tab(j).pack_status := 'Error';
8988: error_cnt := error_cnt + 1;
9010: -- else go to the next container
9011: -- HW OPMCONV - 1) Renamed lot_indivisible variable to lot_divisible_flag
9012: -- - 2) Changed check condition for lot divisible from 1 to 'N'
9013: IF ( l_lot_divisible_flag = 'N' AND i = cont_count AND l_det_pack_sts = 'Unpacked') THEN
9014: FND_MESSAGE.SET_NAME('WSH','WSH_OPM_IND_SPLIT_PACK');
9015: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(j).delivery_detail_id);
9016: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9017: WSH_UTIL_CORE.Add_Message(l_return_status);
9018: l_det_tab(j).pack_status := 'Error';
9011: -- HW OPMCONV - 1) Renamed lot_indivisible variable to lot_divisible_flag
9012: -- - 2) Changed check condition for lot divisible from 1 to 'N'
9013: IF ( l_lot_divisible_flag = 'N' AND i = cont_count AND l_det_pack_sts = 'Unpacked') THEN
9014: FND_MESSAGE.SET_NAME('WSH','WSH_OPM_IND_SPLIT_PACK');
9015: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(j).delivery_detail_id);
9016: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9017: WSH_UTIL_CORE.Add_Message(l_return_status);
9018: l_det_tab(j).pack_status := 'Error';
9019: error_cnt := error_cnt + 1;
9051: END IF;
9052:
9053: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9054: --dbms_output.put_line('error in splitting');
9055: FND_MESSAGE.SET_NAME('WSH','WSH_DET_SPLIT_ERROR');
9056: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(j).delivery_detail_id);
9057: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9058: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
9059: l_det_tab(j).pack_status := 'Error';
9052:
9053: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9054: --dbms_output.put_line('error in splitting');
9055: FND_MESSAGE.SET_NAME('WSH','WSH_DET_SPLIT_ERROR');
9056: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(j).delivery_detail_id);
9057: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9058: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
9059: l_det_tab(j).pack_status := 'Error';
9060: error_cnt := error_cnt + 1;
9184: l_det_cont_item_id,
9185: l_det_pack_qty2;
9186:
9187: IF Get_Detail_Info%NOTFOUND THEN
9188: FND_MESSAGE.SET_NAME('WSH','WSH_DET_INVALID_DETAIL');
9189: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(j).delivery_detail_id);
9190: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9191: CLOSE Get_Detail_Info;
9192: --dbms_output.put_line('error in fetching details for ' || l_det_tab(j).delivery_detail_id);
9185: l_det_pack_qty2;
9186:
9187: IF Get_Detail_Info%NOTFOUND THEN
9188: FND_MESSAGE.SET_NAME('WSH','WSH_DET_INVALID_DETAIL');
9189: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(j).delivery_detail_id);
9190: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9191: CLOSE Get_Detail_Info;
9192: --dbms_output.put_line('error in fetching details for ' || l_det_tab(j).delivery_detail_id);
9193: l_det_tab(j).pack_status := 'Error';
9247: END IF;
9248:
9249: -- bug 1716136: errors likely mean integers are safe values.
9250: IF l_discard_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9251: l_discard_message := FND_MESSAGE.GET;
9252: l_split_qty := FLOOR(l_tmp_split_qty);
9253: END IF;
9254: /* Bug 2173615 - added l_split_qty = 0,in case of fractional split example = 0.3 */
9255: IF (l_split_qty IS NULL OR l_split_qty = 0) THEN
9298: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
9299: END IF;
9300: --
9301: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(l_cont_tab(i).container_instance_id);
9302: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONTAINER');
9303: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
9304: -- x_pack_status := 'Error';
9305: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9306: l_cont_tab(i).pack_status := 'Error';
9299: END IF;
9300: --
9301: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(l_cont_tab(i).container_instance_id);
9302: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONTAINER');
9303: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
9304: -- x_pack_status := 'Error';
9305: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9306: l_cont_tab(i).pack_status := 'Error';
9307: CLOSE Get_Cont_Info;
9331: --- HW OPM BUG# 3011758
9332: -- HW OPMCONV - 1) Renamed lot_indivisible variable to lot_divisible_flag
9333: -- - 2) Changed check condition for lot divisible from 1 to 'N'
9334: IF ( l_lot_divisible_flag = 'N' AND i = cont_count AND l_det_pack_sts = 'Unpacked') THEN
9335: FND_MESSAGE.SET_NAME('WSH','WSH_OPM_IND_SPLIT_PACK');
9336: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(j).delivery_detail_id);
9337: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9338: WSH_UTIL_CORE.Add_Message(l_return_status);
9339: l_det_tab(j).pack_status := 'Error';
9332: -- HW OPMCONV - 1) Renamed lot_indivisible variable to lot_divisible_flag
9333: -- - 2) Changed check condition for lot divisible from 1 to 'N'
9334: IF ( l_lot_divisible_flag = 'N' AND i = cont_count AND l_det_pack_sts = 'Unpacked') THEN
9335: FND_MESSAGE.SET_NAME('WSH','WSH_OPM_IND_SPLIT_PACK');
9336: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(j).delivery_detail_id);
9337: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9338: WSH_UTIL_CORE.Add_Message(l_return_status);
9339: l_det_tab(j).pack_status := 'Error';
9340: error_cnt := error_cnt + 1;
9368: END IF;
9369: --dbms_output.put_line('...split detail id ' || l_split_det_id);
9370:
9371: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9372: FND_MESSAGE.SET_NAME('WSH','WSH_DET_SPLIT_ERROR');
9373: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(j).delivery_detail_id);
9374: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9375: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
9376: --dbms_output.put_line('error in splitting details for ' || l_det_tab(j).delivery_detail_id);
9369: --dbms_output.put_line('...split detail id ' || l_split_det_id);
9370:
9371: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9372: FND_MESSAGE.SET_NAME('WSH','WSH_DET_SPLIT_ERROR');
9373: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(j).delivery_detail_id);
9374: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9375: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
9376: --dbms_output.put_line('error in splitting details for ' || l_det_tab(j).delivery_detail_id);
9377: error_cnt := error_cnt + 1;
9467:
9468: l_tmp_det_qty := l_tmp_det_qty + l_split_qty;
9469: ELSE
9470: --dbms_output.put_line('orgs dont match for detail ' || l_det_tab(j).delivery_detail_id || ' and container ' || l_cont_tab(i).container_instance_id);
9471: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_NO_MATCH');
9472: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(j).delivery_detail_id);
9473: --
9474: IF l_debug_on THEN
9475: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
9468: l_tmp_det_qty := l_tmp_det_qty + l_split_qty;
9469: ELSE
9470: --dbms_output.put_line('orgs dont match for detail ' || l_det_tab(j).delivery_detail_id || ' and container ' || l_cont_tab(i).container_instance_id);
9471: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_NO_MATCH');
9472: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(j).delivery_detail_id);
9473: --
9474: IF l_debug_on THEN
9475: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
9476: END IF;
9475: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
9476: END IF;
9477: --
9478: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(l_cont_tab(i).container_instance_id);
9479: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
9480:
9481: END IF; -- cont org and det org id check
9482:
9483: END IF; -- if l_tmp_det_qty < l_det_pack_qty
9500:
9501: ELSE
9502: -- packing mode is invalid - did not pack
9503:
9504: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_INVALID_PACK_MODE');
9505: x_pack_status := 'Error';
9506: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9507: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
9508: --Bugfix 4070732 {
9557: --dbms_output.put_line('detail ' || l_det_tab(i).delivery_detail_id || ' status is ' || l_det_tab(i).pack_status);
9558: IF l_det_tab(i).pack_status <> 'Packed' THEN
9559: IF l_det_tab(i).pack_status = 'Error' THEN
9560: error_cnt := error_cnt + 1;
9561: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DETAIL_NOT_ASSIGNED');
9562: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(i).delivery_detail_id);
9563: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
9564: ELSE
9565: IF l_det_tab(i).pack_status = 'Unpacked' THEN
9558: IF l_det_tab(i).pack_status <> 'Packed' THEN
9559: IF l_det_tab(i).pack_status = 'Error' THEN
9560: error_cnt := error_cnt + 1;
9561: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DETAIL_NOT_ASSIGNED');
9562: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(i).delivery_detail_id);
9563: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
9564: ELSE
9565: IF l_det_tab(i).pack_status = 'Unpacked' THEN
9566: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_IGNORED');
9562: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(i).delivery_detail_id);
9563: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
9564: ELSE
9565: IF l_det_tab(i).pack_status = 'Unpacked' THEN
9566: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_IGNORED');
9567: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(i).delivery_detail_id);
9568: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_WARNING,l_module_name);
9569: END IF;
9570: warn_cnt := warn_cnt + 1;
9563: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
9564: ELSE
9565: IF l_det_tab(i).pack_status = 'Unpacked' THEN
9566: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_IGNORED');
9567: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(i).delivery_detail_id);
9568: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_WARNING,l_module_name);
9569: END IF;
9570: warn_cnt := warn_cnt + 1;
9571: END IF;
9578:
9579: END LOOP;
9580:
9581: IF error_cnt > 0 or warn_cnt > 0 THEN
9582: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_PACK_ERROR');
9583: FND_MESSAGE.SET_TOKEN('ERROR_COUNT',error_cnt);
9584: FND_MESSAGE.SET_TOKEN('WARN_COUNT',warn_cnt);
9585: FND_MESSAGE.SET_TOKEN('SUCC_COUNT',succ_cnt);
9586: IF error_cnt > 0 THEN
9579: END LOOP;
9580:
9581: IF error_cnt > 0 or warn_cnt > 0 THEN
9582: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_PACK_ERROR');
9583: FND_MESSAGE.SET_TOKEN('ERROR_COUNT',error_cnt);
9584: FND_MESSAGE.SET_TOKEN('WARN_COUNT',warn_cnt);
9585: FND_MESSAGE.SET_TOKEN('SUCC_COUNT',succ_cnt);
9586: IF error_cnt > 0 THEN
9587: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9580:
9581: IF error_cnt > 0 or warn_cnt > 0 THEN
9582: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_PACK_ERROR');
9583: FND_MESSAGE.SET_TOKEN('ERROR_COUNT',error_cnt);
9584: FND_MESSAGE.SET_TOKEN('WARN_COUNT',warn_cnt);
9585: FND_MESSAGE.SET_TOKEN('SUCC_COUNT',succ_cnt);
9586: IF error_cnt > 0 THEN
9587: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9588: ELSIF warn_cnt > 0 THEN
9581: IF error_cnt > 0 or warn_cnt > 0 THEN
9582: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_PACK_ERROR');
9583: FND_MESSAGE.SET_TOKEN('ERROR_COUNT',error_cnt);
9584: FND_MESSAGE.SET_TOKEN('WARN_COUNT',warn_cnt);
9585: FND_MESSAGE.SET_TOKEN('SUCC_COUNT',succ_cnt);
9586: IF error_cnt > 0 THEN
9587: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9588: ELSIF warn_cnt > 0 THEN
9589: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9650: WSH_DEBUG_SV.log(l_module_name,'return status',l_return_status);
9651: END IF;
9652: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9653: x_return_status := l_return_status;
9654: FND_MESSAGE.SET_NAME('WSH', 'WSH_REPRICE_REQUIRED_ERR');
9655: WSH_UTIL_CORE.add_message(x_return_status,l_module_name);
9656: --
9657: --Bugfix 4070732 {
9658: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name) THEN
9711: IF l_cont_tab(i).pack_status <> 'Packed' THEN
9712: IF l_cont_tab(i).pack_status = 'Error' THEN
9713: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9714: cont_err := cont_err + 1;
9715: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_NOT_PACKED');
9716: --
9717: IF l_debug_on THEN
9718: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
9719: END IF;
9718: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
9719: END IF;
9720: --
9721: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(l_cont_tab(i).container_instance_id);
9722: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
9723: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
9724: ELSIF l_cont_tab(i).pack_status = 'Overpacked' THEN
9725: cont_warn := cont_warn + 1;
9726: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_OVERPACKED');
9722: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
9723: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
9724: ELSIF l_cont_tab(i).pack_status = 'Overpacked' THEN
9725: cont_warn := cont_warn + 1;
9726: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_OVERPACKED');
9727: --
9728: IF l_debug_on THEN
9729: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
9730: END IF;
9729: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
9730: END IF;
9731: --
9732: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(l_cont_tab(i).container_instance_id);
9733: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
9734: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_WARNING,l_module_name);
9735: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9736: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9737: END IF;
9736: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9737: END IF;
9738: ELSIF l_cont_tab(i).pack_status = 'Underpacked' THEN
9739: cont_warn := cont_warn + 1;
9740: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_UNDERPACKED');
9741: --
9742: IF l_debug_on THEN
9743: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
9744: END IF;
9743: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
9744: END IF;
9745: --
9746: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(l_cont_tab(i).container_instance_id);
9747: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
9748: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_WARNING,l_module_name);
9749: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9750: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9751: END IF;
9750: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9751: END IF;
9752: ELSIF l_cont_tab(i).pack_status = 'Warning' THEN
9753: cont_warn := cont_warn + 1;
9754: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_WT_VOL_FAILED');
9755: --
9756: IF l_debug_on THEN
9757: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
9758: END IF;
9757: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
9758: END IF;
9759: --
9760: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(l_cont_tab(i).container_instance_id);
9761: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
9762: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_WARNING,l_module_name);
9763:
9764: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9765: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9803: -- LPN CONV. rv
9804: --
9805:
9806: IF cont_err > 0 OR cont_warn > 0 THEN
9807: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_PACK_WARN');
9808: FND_MESSAGE.SET_TOKEN('CONT_WARN',cont_warn);
9809: FND_MESSAGE.SET_TOKEN('CONT_ERR',cont_err);
9810: IF cont_err > 0 THEN
9811: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9804: --
9805:
9806: IF cont_err > 0 OR cont_warn > 0 THEN
9807: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_PACK_WARN');
9808: FND_MESSAGE.SET_TOKEN('CONT_WARN',cont_warn);
9809: FND_MESSAGE.SET_TOKEN('CONT_ERR',cont_err);
9810: IF cont_err > 0 THEN
9811: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9812: ELSE
9805:
9806: IF cont_err > 0 OR cont_warn > 0 THEN
9807: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_PACK_WARN');
9808: FND_MESSAGE.SET_TOKEN('CONT_WARN',cont_warn);
9809: FND_MESSAGE.SET_TOKEN('CONT_ERR',cont_err);
9810: IF cont_err > 0 THEN
9811: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9812: ELSE
9813: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10067: FETCH Get_Ship_Qty INTO l_shp_qty;
10068:
10069: IF Get_Ship_Qty%NOTFOUND THEN
10070: CLOSE Get_Ship_Qty;
10071: FND_MESSAGE.SET_NAME('WSH','WSH_DET_INVALID_DETAIL');
10072: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_delivery_detail_id);
10073: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10074: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
10075: --
10068:
10069: IF Get_Ship_Qty%NOTFOUND THEN
10070: CLOSE Get_Ship_Qty;
10071: FND_MESSAGE.SET_NAME('WSH','WSH_DET_INVALID_DETAIL');
10072: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_delivery_detail_id);
10073: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10074: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
10075: --
10076: IF l_debug_on THEN
10102: FETCH Get_Ship_Qty into l_db_split_shp_qty;
10103:
10104: IF Get_Ship_Qty%NOTFOUND THEN
10105: CLOSE Get_Ship_Qty;
10106: FND_MESSAGE.SET_NAME('WSH','WSH_DET_INVALID_DETAIL');
10107: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_split_detail_id);
10108: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10109: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
10110: --
10103:
10104: IF Get_Ship_Qty%NOTFOUND THEN
10105: CLOSE Get_Ship_Qty;
10106: FND_MESSAGE.SET_NAME('WSH','WSH_DET_INVALID_DETAIL');
10107: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_split_detail_id);
10108: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10109: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
10110: --
10111: IF l_debug_on THEN
10129: SET shipped_quantity = l_shp_qty
10130: WHERE delivery_detail_id = p_delivery_detail_id;
10131:
10132: IF SQL%NOTFOUND THEN
10133: FND_MESSAGE.SET_NAME('WSH','WSH_DET_INVALID_DETAIL');
10134: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_delivery_detail_id);
10135: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10136: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
10137: --
10130: WHERE delivery_detail_id = p_delivery_detail_id;
10131:
10132: IF SQL%NOTFOUND THEN
10133: FND_MESSAGE.SET_NAME('WSH','WSH_DET_INVALID_DETAIL');
10134: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_delivery_detail_id);
10135: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10136: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
10137: --
10138: IF l_debug_on THEN
10146: SET shipped_quantity = p_split_qty
10147: WHERE delivery_detail_id = p_split_detail_id;
10148:
10149: IF SQL%NOTFOUND THEN
10150: FND_MESSAGE.SET_NAME('WSH','WSH_DET_INVALID_DETAIL');
10151: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_split_detail_id);
10152: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10153: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
10154: --
10147: WHERE delivery_detail_id = p_split_detail_id;
10148:
10149: IF SQL%NOTFOUND THEN
10150: FND_MESSAGE.SET_NAME('WSH','WSH_DET_INVALID_DETAIL');
10151: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_split_detail_id);
10152: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10153: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
10154: --
10155: IF l_debug_on THEN
10678: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
10679: END IF;
10680: --
10681: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(line_cont_rec.delivery_detail_id);
10682: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_WT_VOL_FAILED');
10683: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
10684: IF l_return_status = C_WARNING_STATUS THEN
10685: warn_cnt := warn_cnt + 1;
10686: ELSE
10679: END IF;
10680: --
10681: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(line_cont_rec.delivery_detail_id);
10682: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_WT_VOL_FAILED');
10683: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
10684: IF l_return_status = C_WARNING_STATUS THEN
10685: warn_cnt := warn_cnt + 1;
10686: ELSE
10687: error_cnt := error_cnt + 1;
10695:
10696: IF ((NVL(line_cont_rec.gross_weight,0) = 0) OR
10697: (NVL(line_cont_rec.volume,0) = 0)) THEN
10698: --dbms_output.put_line('Weight or Volume is NULL or 0');
10699: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_MAX_WT_ERROR');
10700: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
10701: error_cnt := error_cnt + 1;
10702: --dbms_output.put_line('Skipping this cont');
10703: goto next_cont;
10773: line_cont_rec.max_load_qty := l_max_load_qty;
10774:
10775: IF (NVL(line_cont_rec.max_load_qty,0) <= 0) THEN
10776: --dbms_output.put_line('Max Load Qty is null or <= 0. Skipping this container');
10777: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_MAX_WT_ERROR');
10778: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
10779: error_cnt := error_cnt + 1;
10780: goto next_cont;
10781: END IF;
10814: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
10815: END IF;
10816: --
10817: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(line_cont_rec.delivery_detail_id);
10818: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_WT_VOL_FAILED');
10819: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
10820: IF l_return_status = C_WARNING_STATUS THEN
10821: warn_cnt := warn_cnt + 1;
10822: ELSE
10815: END IF;
10816: --
10817: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(line_cont_rec.delivery_detail_id);
10818: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_WT_VOL_FAILED');
10819: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
10820: IF l_return_status = C_WARNING_STATUS THEN
10821: warn_cnt := warn_cnt + 1;
10822: ELSE
10823: error_cnt := error_cnt + 1;
10832:
10833: IF (NVL(line_cont_rec.gross_weight,0) = 0) THEN
10834: --dbms_output.put_line('Weight is NULL or 0');
10835: --BUG 3577115
10836: --FND_MESSAGE.SET_NAME('WSH','WSH_CONT_MAX_WT_ERROR');
10837: l_item_name := WSH_UTIL_CORE.Get_Item_Name(line_cont_rec.inventory_item_id, line_cont_rec.organization_id);
10838: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_NULL_WEIGHT_VOLUME');
10839: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_item_name);
10840: --BUG 3577115
10834: --dbms_output.put_line('Weight is NULL or 0');
10835: --BUG 3577115
10836: --FND_MESSAGE.SET_NAME('WSH','WSH_CONT_MAX_WT_ERROR');
10837: l_item_name := WSH_UTIL_CORE.Get_Item_Name(line_cont_rec.inventory_item_id, line_cont_rec.organization_id);
10838: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_NULL_WEIGHT_VOLUME');
10839: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_item_name);
10840: --BUG 3577115
10841: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
10842: error_cnt := error_cnt + 1;
10835: --BUG 3577115
10836: --FND_MESSAGE.SET_NAME('WSH','WSH_CONT_MAX_WT_ERROR');
10837: l_item_name := WSH_UTIL_CORE.Get_Item_Name(line_cont_rec.inventory_item_id, line_cont_rec.organization_id);
10838: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_NULL_WEIGHT_VOLUME');
10839: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_item_name);
10840: --BUG 3577115
10841: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
10842: error_cnt := error_cnt + 1;
10843: --dbms_output.put_line('Skipping this Cont');
10848:
10849: IF (NVL(line_cont_rec.volume,0) = 0) THEN
10850: --dbms_output.put_line('Volume is NULL or 0');
10851: --BUG 3577115
10852: --FND_MESSAGE.SET_NAME('WSH','WSH_CONT_MAX_VOL_ERROR');
10853: l_item_name := WSH_UTIL_CORE.Get_Item_Name(line_cont_rec.inventory_item_id, line_cont_rec.organization_id);
10854: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_NULL_WEIGHT_VOLUME');
10855: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_item_name);
10856: --BUG 3577115
10850: --dbms_output.put_line('Volume is NULL or 0');
10851: --BUG 3577115
10852: --FND_MESSAGE.SET_NAME('WSH','WSH_CONT_MAX_VOL_ERROR');
10853: l_item_name := WSH_UTIL_CORE.Get_Item_Name(line_cont_rec.inventory_item_id, line_cont_rec.organization_id);
10854: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_NULL_WEIGHT_VOLUME');
10855: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_item_name);
10856: --BUG 3577115
10857: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
10858: error_cnt := error_cnt + 1;
10851: --BUG 3577115
10852: --FND_MESSAGE.SET_NAME('WSH','WSH_CONT_MAX_VOL_ERROR');
10853: l_item_name := WSH_UTIL_CORE.Get_Item_Name(line_cont_rec.inventory_item_id, line_cont_rec.organization_id);
10854: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_NULL_WEIGHT_VOLUME');
10855: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_item_name);
10856: --BUG 3577115
10857: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
10858: error_cnt := error_cnt + 1;
10859: --dbms_output.put_line('Skipping this Cont');
10935: IF ((line_cont_rec.fill_pc_basis = 'W' AND (line_cont_rec.converted_wt > l_mtl_max_load)) OR
10936: (line_cont_rec.fill_pc_basis = 'V' AND (line_cont_rec.converted_vol > l_mtl_max_vol))) THEN
10937: --dbms_output.put_line('Indivisible flag is Y and Preferred Mast Cont cannot hold atleast 1 piece');
10938: -- Bug#: 2503937 - New Error Message
10939: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_MAX_WT_VOL_ERROR');
10940: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
10941: error_cnt := error_cnt + 1;
10942: --dbms_output.put_line('Skipping this Cont');
10943: goto next_cont;
11120: -- 10. Check if Count of p_del_detail_tab table is 0
11121: --IF (p_cont_detail_tab.COUNT = 0 OR p_cont_info_tab.COUNT = 0) THEN
11122: IF (p_cont_detail_tab.COUNT = 0) THEN
11123: --dbms_output.put_line('p_cont_detail_tab count is 0');
11124: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_CONT_ASSG_NULL');
11125: x_return_status := C_ERROR_STATUS;
11126: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
11127: --
11128: IF l_debug_on THEN
11171: END IF;
11172: IF (l_return_status = C_ERROR_STATUS) OR
11173: (l_return_status = C_UNEXP_ERROR_STATUS) THEN
11174: --dbms_output.put_line('WSH_DELIVERY_AUTOCREATE.autocreate_deliveries returned '||l_return_status);
11175: FND_MESSAGE.SET_NAME('WSH','WSH_GROUP_DETAILS_ERROR');
11176: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
11177: x_return_status := l_return_status;
11178: --
11179: IF l_debug_on THEN
11188: ELSE
11189: cnt := p_group_id_tab.FIRST;
11190: IF ((cnt IS NULL) OR (p_group_id_tab.COUNT <> p_cont_detail_tab.count)) THEN
11191: x_return_status := C_ERROR_STATUS;
11192: FND_MESSAGE.SET_NAME('WSH','WSH_GROUP_DETAILS_ERROR');
11193: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
11194: --
11195: IF l_debug_on THEN
11196: WSH_DEBUG_SV.pop(l_module_name);
11229: -- percent fill basis as None.
11230: --
11231: IF (l_fill_pc_warn_count = p_cont_detail_tab.count) THEN
11232: x_return_status := C_ERROR_STATUS;
11233: FND_MESSAGE.SET_NAME('WSH','WSH_FILL_BASIS_NONE');
11234: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
11235: IF l_debug_on THEN
11236: WSH_DEBUG_SV.pop(l_module_name);
11237: END IF;
11239: ELSIF (l_fill_pc_warn_count > 0) THEN
11240: IF (l_return_status <> C_ERROR_STATUS) THEN
11241: x_return_status := C_WARNING_STATUS;
11242: warn_cnt := warn_cnt + 1;
11243: FND_MESSAGE.SET_NAME('WSH','WSH_FILL_BASIS_NONE');
11244: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
11245: END IF;
11246: END IF;
11247: -- end of bug 3562797 jckwok
11318: -- K LPN CONV. rv
11319:
11320: IF l_return_status <> C_SUCCESS_STATUS THEN
11321: --dbms_output.put_line('Container Creation failed for index '|| cnt);
11322: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_CREATE_ERROR');
11323: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
11324: error_cnt := error_cnt + 1;
11325: ELSE
11326: l_cont_instance_id := l_cont_tab(1);
11407: SET ignore_for_planning=cur.ignore_for_planning
11408: WHERE delivery_detail_id=l_cont_instance_id;
11409:
11410: IF SQL%NOTFOUND THEN
11411: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONTAINER');
11412: IF l_debug_on THEN
11413: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
11414: END IF;
11415: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(l_cont_instance_id);
11412: IF l_debug_on THEN
11413: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
11414: END IF;
11415: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(l_cont_instance_id);
11416: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
11417: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11418: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
11419: IF l_debug_on THEN
11420: WSH_DEBUG_SV.pop(l_module_name);
11458: END IF;
11459:
11460: -- 90.1 Summarize errors/warnings
11461: IF (error_cnt > 0) THEN
11462: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_CONT_PACK_ERROR');
11463: FND_MESSAGE.SET_TOKEN('ERROR_COUNT',error_cnt);
11464: FND_MESSAGE.SET_TOKEN('WARN_COUNT',warn_cnt);
11465: FND_MESSAGE.SET_TOKEN('SUCC_COUNT',succ_cnt);
11466: IF succ_cnt > 0 THEN
11459:
11460: -- 90.1 Summarize errors/warnings
11461: IF (error_cnt > 0) THEN
11462: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_CONT_PACK_ERROR');
11463: FND_MESSAGE.SET_TOKEN('ERROR_COUNT',error_cnt);
11464: FND_MESSAGE.SET_TOKEN('WARN_COUNT',warn_cnt);
11465: FND_MESSAGE.SET_TOKEN('SUCC_COUNT',succ_cnt);
11466: IF succ_cnt > 0 THEN
11467: x_return_status := C_WARNING_STATUS;
11460: -- 90.1 Summarize errors/warnings
11461: IF (error_cnt > 0) THEN
11462: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_CONT_PACK_ERROR');
11463: FND_MESSAGE.SET_TOKEN('ERROR_COUNT',error_cnt);
11464: FND_MESSAGE.SET_TOKEN('WARN_COUNT',warn_cnt);
11465: FND_MESSAGE.SET_TOKEN('SUCC_COUNT',succ_cnt);
11466: IF succ_cnt > 0 THEN
11467: x_return_status := C_WARNING_STATUS;
11468: ELSE
11461: IF (error_cnt > 0) THEN
11462: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_CONT_PACK_ERROR');
11463: FND_MESSAGE.SET_TOKEN('ERROR_COUNT',error_cnt);
11464: FND_MESSAGE.SET_TOKEN('WARN_COUNT',warn_cnt);
11465: FND_MESSAGE.SET_TOKEN('SUCC_COUNT',succ_cnt);
11466: IF succ_cnt > 0 THEN
11467: x_return_status := C_WARNING_STATUS;
11468: ELSE
11469: x_return_status := C_ERROR_STATUS;
11471: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
11472: ELSIF (warn_cnt > 0 OR cont_warn > 0) THEN
11473: x_return_status := C_WARNING_STATUS;
11474: IF cont_warn > 0 THEN
11475: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_PACK_WARN');
11476: FND_MESSAGE.SET_TOKEN('CONT_WARN',cont_warn);
11477: FND_MESSAGE.SET_TOKEN('CONT_ERR',0);
11478: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
11479: END IF;
11472: ELSIF (warn_cnt > 0 OR cont_warn > 0) THEN
11473: x_return_status := C_WARNING_STATUS;
11474: IF cont_warn > 0 THEN
11475: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_PACK_WARN');
11476: FND_MESSAGE.SET_TOKEN('CONT_WARN',cont_warn);
11477: FND_MESSAGE.SET_TOKEN('CONT_ERR',0);
11478: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
11479: END IF;
11480: ELSE
11473: x_return_status := C_WARNING_STATUS;
11474: IF cont_warn > 0 THEN
11475: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_PACK_WARN');
11476: FND_MESSAGE.SET_TOKEN('CONT_WARN',cont_warn);
11477: FND_MESSAGE.SET_TOKEN('CONT_ERR',0);
11478: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
11479: END IF;
11480: ELSE
11481: x_return_status := C_SUCCESS_STATUS;
11630:
11631: IF Get_Detail_Attr%NOTFOUND THEN
11632: --dbms_output.put_line('invalid detail id ' || p_delivery_detail_id);
11633: CLOSE Get_Detail_Attr;
11634: FND_MESSAGE.SET_NAME('WSH','WSH_DET_INVALID_DETAIL');
11635: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_delivery_detail_id);
11636: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11637: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
11638: --
11631: IF Get_Detail_Attr%NOTFOUND THEN
11632: --dbms_output.put_line('invalid detail id ' || p_delivery_detail_id);
11633: CLOSE Get_Detail_Attr;
11634: FND_MESSAGE.SET_NAME('WSH','WSH_DET_INVALID_DETAIL');
11635: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_delivery_detail_id);
11636: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11637: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
11638: --
11639: IF l_debug_on THEN
11671: ;
11672:
11673: IF Get_Del_Attr%NOTFOUND THEN
11674: CLOSE Get_Del_Attr;
11675: FND_MESSAGE.SET_NAME('WSH','WSH_DET_INVALID_DELIVERY');
11676: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_delivery_id);
11677: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11678: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
11679: --
11672:
11673: IF Get_Del_Attr%NOTFOUND THEN
11674: CLOSE Get_Del_Attr;
11675: FND_MESSAGE.SET_NAME('WSH','WSH_DET_INVALID_DELIVERY');
11676: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_delivery_id);
11677: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11678: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
11679: --
11680: IF l_debug_on THEN
11688: CLOSE Get_Del_Attr;
11689: END IF;
11690:
11691: ELSE
11692: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_NO_ATTR_ERROR');
11693: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11694: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
11695: --
11696: IF l_debug_on THEN
11773: WHERE delivery_detail_id = p_container_instance_id;
11774:
11775: IF SQL%NOTFOUND THEN
11776: --dbms_output.put_line('could not update container ' || p_container_instance_id);
11777: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONTAINER');
11778: --
11779: IF l_debug_on THEN
11780: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
11781: END IF;
11780: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
11781: END IF;
11782: --
11783: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_container_instance_id);
11784: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
11785: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11786: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
11787: --
11788: IF l_debug_on THEN
11901:
11902: IF Get_Detail_Attr%NOTFOUND THEN
11903: CLOSE Get_Detail_Attr;
11904: --dbms_output.put_line('no detail found for ' || p_container_instance_id);
11905: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONTAINER');
11906: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11907: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
11908: x_attr_flag := 'N';
11909: --
12092: WSH_DEBUG_SV.log(l_module_name,'return status-',l_return_status);
12093: END IF;
12094:
12095: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12096: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_UPD_ATTR_ERROR');
12097: --
12098: IF l_debug_on THEN
12099: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
12100: END IF;
12099: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
12100: END IF;
12101: --
12102: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(cont.delivery_detail_id);
12103: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
12104: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
12105: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
12106: END IF;
12107:
12227:
12228: IF Get_Contents%NOTFOUND THEN
12229: CLOSE Get_Contents;
12230: x_last_line_flag := 'N';
12231: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONTAINER');
12232: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
12233: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
12234: --
12235: IF l_debug_on THEN
12249:
12250: IF Get_Cont_Count%NOTFOUND THEN
12251: CLOSE Get_Cont_Count;
12252: x_last_line_flag := 'N';
12253: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONTAINER');
12254: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
12255: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
12256: --
12257: IF l_debug_on THEN
12438: --{
12439: --
12440: -- p_delivery_id is mandatory
12441: --
12442: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
12443: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'p_delivery_id');
12444: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_error,l_module_name);
12445: --
12446: RAISE FND_API.G_EXC_ERROR;
12439: --
12440: -- p_delivery_id is mandatory
12441: --
12442: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
12443: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'p_delivery_id');
12444: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_error,l_module_name);
12445: --
12446: RAISE FND_API.G_EXC_ERROR;
12447: --}
12452: --{
12453: --
12454: -- p_lines_tbl should have at least one record
12455: --
12456: FND_MESSAGE.SET_NAME('WSH', 'WSH_EMPTY_TABLE_ERROR');
12457: FND_MESSAGE.SET_TOKEN('TABLE_NAME', 'p_lines_tbl');
12458: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_error,l_module_name);
12459: --
12460: RAISE FND_API.G_EXC_ERROR;
12453: --
12454: -- p_lines_tbl should have at least one record
12455: --
12456: FND_MESSAGE.SET_NAME('WSH', 'WSH_EMPTY_TABLE_ERROR');
12457: FND_MESSAGE.SET_TOKEN('TABLE_NAME', 'p_lines_tbl');
12458: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_error,l_module_name);
12459: --
12460: RAISE FND_API.G_EXC_ERROR;
12461: --}
12468: --
12469: IF l_dlvy_rec.initial_pickup_location_id IS NULL
12470: THEN
12471: --{
12472: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_NOT_EXIST');
12473: FND_MESSAGE.SET_TOKEN('DELIVERY_ID', p_delivery_id);
12474: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_error,l_module_name);
12475: --
12476: RAISE FND_API.G_EXC_ERROR;
12469: IF l_dlvy_rec.initial_pickup_location_id IS NULL
12470: THEN
12471: --{
12472: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_NOT_EXIST');
12473: FND_MESSAGE.SET_TOKEN('DELIVERY_ID', p_delivery_id);
12474: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_error,l_module_name);
12475: --
12476: RAISE FND_API.G_EXC_ERROR;
12477: --}
12483: --{
12484: --
12485: -- Invalid operation for outbound delivery
12486: --
12487: FND_MESSAGE.SET_NAME('WSH','WSH_NOT_IB_DLVY_ERROR');
12488: FND_MESSAGE.SET_TOKEN('DELIVERY_NAME', l_dlvy_rec.name);
12489: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_error,l_module_name);
12490: --
12491: RAISE FND_API.G_EXC_ERROR;
12484: --
12485: -- Invalid operation for outbound delivery
12486: --
12487: FND_MESSAGE.SET_NAME('WSH','WSH_NOT_IB_DLVY_ERROR');
12488: FND_MESSAGE.SET_TOKEN('DELIVERY_NAME', l_dlvy_rec.name);
12489: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_error,l_module_name);
12490: --
12491: RAISE FND_API.G_EXC_ERROR;
12492: --}
12839: --{
12840: --
12841: -- p_delivery_id is mandatory
12842: --
12843: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
12844: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'p_delivery_id');
12845: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_error,l_module_name);
12846: --
12847: RAISE FND_API.G_EXC_ERROR;
12840: --
12841: -- p_delivery_id is mandatory
12842: --
12843: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
12844: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'p_delivery_id');
12845: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_error,l_module_name);
12846: --
12847: RAISE FND_API.G_EXC_ERROR;
12848: --}
12855: --
12856: IF l_dlvy_rec.initial_pickup_location_id IS NULL
12857: THEN
12858: --{
12859: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_NOT_EXIST');
12860: FND_MESSAGE.SET_TOKEN('DELIVERY_ID', p_delivery_id);
12861: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_error,l_module_name);
12862: --
12863: RAISE FND_API.G_EXC_ERROR;
12856: IF l_dlvy_rec.initial_pickup_location_id IS NULL
12857: THEN
12858: --{
12859: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_NOT_EXIST');
12860: FND_MESSAGE.SET_TOKEN('DELIVERY_ID', p_delivery_id);
12861: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_error,l_module_name);
12862: --
12863: RAISE FND_API.G_EXC_ERROR;
12864: --}
12870: --{
12871: --
12872: -- Invalid operation for outbound delivery
12873: --
12874: FND_MESSAGE.SET_NAME('WSH','WSH_NOT_IB_DLVY_ERROR');
12875: FND_MESSAGE.SET_TOKEN('DELIVERY_NAME', l_dlvy_rec.name);
12876: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_error,l_module_name);
12877: --
12878: RAISE FND_API.G_EXC_ERROR;
12871: --
12872: -- Invalid operation for outbound delivery
12873: --
12874: FND_MESSAGE.SET_NAME('WSH','WSH_NOT_IB_DLVY_ERROR');
12875: FND_MESSAGE.SET_TOKEN('DELIVERY_NAME', l_dlvy_rec.name);
12876: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_error,l_module_name);
12877: --
12878: RAISE FND_API.G_EXC_ERROR;
12879: --}
13031: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY',P_QUANTITY);
13032: END IF;
13033: --
13034: IF ( NVL(p_quantity,0) <= 0 ) THEN
13035: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_CREATE_ERROR');
13036: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13037: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
13038: --
13039: IF l_debug_on THEN
13073: --
13074: x_cont_names(x_cont_names.count+1) := l_cont_name;
13075: ELSE
13076: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13077: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_NAME_DUPLICATE');
13078: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
13079: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
13080: END IF;
13081: END LOOP;
13074: x_cont_names(x_cont_names.count+1) := l_cont_name;
13075: ELSE
13076: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13077: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_NAME_DUPLICATE');
13078: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
13079: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
13080: END IF;
13081: END LOOP;
13082:
13081: END LOOP;
13082:
13083: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13084: x_return_status := l_return_status;
13085: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_CREATE_ERROR');
13086: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
13087: --
13088: IF l_debug_on THEN
13089: WSH_DEBUG_SV.pop(l_module_name);
13634: wsh_delivery_details_pkg.lock_wda_no_compare(p_delivery_detail_id => p_child_container_id);
13635: EXCEPTION
13636: WHEN OTHERS THEN
13637: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13638: FND_MESSAGE.SET_NAME('WSH','WSH_NO_LOCK');
13639: WSH_UTIL_CORE.Add_Message(x_return_status);
13640: --
13641: -- Debug Statements
13642: --
13723:
13724: EXCEPTION
13725: WHEN OTHERS THEN
13726: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13727: FND_MESSAGE.SET_NAME('WSH','WSH_NO_LOCK');
13728: WSH_UTIL_CORE.Add_Message(x_return_status);
13729: --
13730: -- Debug Statements
13731: --
13984: END IF;
13985:
13986: WHEN WSH_INVALID_TRIPS THEN
13987: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13988: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_TRIPS');
13989: WSH_UTIL_CORE.Add_Message(x_return_status);
13990: --
13991: -- Debug Statements
13992: --
13997: END IF;
13998:
13999: WHEN WSH_NO_CHILD_LPNS THEN
14000: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
14001: FND_MESSAGE.SET_NAME('WSH','WSH_NO_CHILD_LPNS');
14002: WSH_UTIL_CORE.Add_Message(x_return_status);
14003: --
14004: -- Debug Statements
14005: --
14010: END IF;
14011:
14012: WHEN WSH_CONSOL_DEL_NO_MATCH THEN
14013: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
14014: FND_MESSAGE.SET_NAME('WSH','WSH_CONSOL_DEL_NO_MATCH');
14015: WSH_UTIL_CORE.Add_Message(x_return_status);
14016: --
14017: -- Debug Statements
14018: --
14023: END IF;
14024:
14025: WHEN WSH_ASSIGN_CONSOL_LPN_ERROR THEN
14026: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
14027: FND_MESSAGE.SET_NAME('WSH','WSH_ASSIGN_CONSOL_LPN_ERROR');
14028: WSH_UTIL_CORE.Add_Message(x_return_status);
14029: --
14030: -- Debug Statements
14031: --
14036: END IF;
14037:
14038: WHEN WSH_INVALID_CONSOL_ASSIGN THEN
14039: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
14040: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONSOL_ASSIGN');
14041: WSH_UTIL_CORE.Add_Message(x_return_status);
14042: --
14043: -- Debug Statements
14044: --
14049: END IF;
14050:
14051: WHEN WSH_INVALID_PARENT THEN
14052: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
14053: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_PARENT');
14054: WSH_UTIL_CORE.Add_Message(x_return_status);
14055: --
14056: -- Debug Statements
14057: --
14062: END IF;
14063:
14064: WHEN WSH_INVALID_CHILD THEN
14065: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
14066: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CHILD');
14067: WSH_UTIL_CORE.Add_Message(x_return_status);
14068: --
14069: -- Debug Statements
14070: --
14208:
14209: EXCEPTION
14210: WHEN OTHERS THEN
14211: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
14212: FND_MESSAGE.SET_NAME('WSH','WSH_NO_LOCK');
14213: WSH_UTIL_CORE.Add_Message(x_return_status);
14214: --
14215: -- Debug Statements
14216: --
14346:
14347:
14348: WHEN WSH_INVALID_COMBINATION THEN
14349: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
14350: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_COMBINATION');
14351: WSH_UTIL_CORE.Add_Message(x_return_status);
14352: --
14353: -- Debug Statements
14354: --