[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);
406: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_ITEM_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
407: END IF;
408: --
409: l_item_name := WSH_UTIL_CORE.Get_Item_Name(P_container_rec.inventory_item_id,P_container_rec.organization_id);
410: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_INV_ITEM');
411: FND_MESSAGE.SET_TOKEN('ITEM_NAME',l_item_name);
412: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
413: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
414: END IF;
407: END IF;
408: --
409: l_item_name := WSH_UTIL_CORE.Get_Item_Name(P_container_rec.inventory_item_id,P_container_rec.organization_id);
410: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_INV_ITEM');
411: FND_MESSAGE.SET_TOKEN('ITEM_NAME',l_item_name);
412: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
413: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
414: END IF;
415:
455: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_ORG_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
456: END IF;
457: --
458: l_org_name := WSH_UTIL_CORE.Get_Org_Name(P_container_rec.organization_id);
459: FND_MESSAGE.SET_NAME('WSH','WSH_DEFAULT_UOM_ERROR');
460: FND_MESSAGE.SET_TOKEN('ORG_NAME',l_org_name);
461: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
462: --
463: IF l_debug_on THEN
456: END IF;
457: --
458: l_org_name := WSH_UTIL_CORE.Get_Org_Name(P_container_rec.organization_id);
459: FND_MESSAGE.SET_NAME('WSH','WSH_DEFAULT_UOM_ERROR');
460: FND_MESSAGE.SET_TOKEN('ORG_NAME',l_org_name);
461: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
462: --
463: IF l_debug_on THEN
464: WSH_DEBUG_SV.log(l_module_name,'Org Name is ',l_org_name);
874: l_orig_update_cont_value := WSH_WMS_LPN_GRP.g_update_to_container;
875: l_inventory_item_id := p_cont_item_id;
876:
877: IF p_organization_id IS NULL AND p_lpn_id IS NULL THEN
878: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_ORG_NULL');
879: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
880: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
881: --
882: IF l_debug_on THEN
1065: CLOSE c_get_lpn_info;
1066: END IF; --}
1067:
1068: IF p_organization_id IS NULL AND l_organization_id IS NULL THEN
1069: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_ORG_NULL');
1070: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1071: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
1072: --
1073: IF l_debug_on THEN
1131: IF l_debug_on THEN
1132: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR CREATING CONTAINER' || TO_CHAR ( L_CONT_INSTANCE_ID ) );
1133: END IF;
1134: --
1135: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_CREATE_ERROR');
1136: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
1137: --
1138: IF l_debug_on THEN
1139: WSH_DEBUG_SV.pop(l_module_name);
1180: END IF;
1181:
1182: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
1183: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
1184: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_CREATE_ERROR');
1185: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1186: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
1187: --
1188: IF l_debug_on THEN
1500: --
1501: EXCEPTION
1502:
1503: WHEN Invalid_Container THEN
1504: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_NULL_DELETE');
1505: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1506: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
1507: --
1508: IF l_debug_on THEN
1510: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:INVALID_CONTAINER');
1511: END IF;
1512: --
1513: WHEN Invalid_Delivery THEN
1514: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DEL_STS_INVALID');
1515: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1516: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
1517: --
1518: IF l_debug_on THEN
1520: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:INVALID_DELIVERY');
1521: END IF;
1522: --
1523: WHEN Invalid_Detail THEN
1524: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DELETE_NOT_CONT');
1525: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1526: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
1527: --
1528: IF l_debug_on THEN
1530: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:INVALID_DETAIL');
1531: END IF;
1532: --
1533: WHEN Cont_Not_Empty THEN
1534: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DELETE_NOT_EMPTY');
1535: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1536: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
1537: --
1538: IF l_debug_on THEN
1541: END IF;
1542: --
1543: WHEN Container_Error THEN
1544: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1545: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DELETE_ERROR');
1546: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
1547: --
1548: IF l_debug_on THEN
1549: WSH_DEBUG_SV.logmsg(l_module_name,'CONTAINER_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1552: --
1553: WHEN Unassign_Del_Error THEN
1554: ROLLBACK to Delete_Cont;
1555: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1556: FND_MESSAGE.SET_NAME('WSH','WSH_UNASSIGN_DEL_ERROR');
1557: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
1558:
1559: --
1560: IF l_debug_on THEN
1718: END IF;
1719: --
1720: IF p_del_detail_tab.COUNT = 0 THEN
1721: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1722: FND_MESSAGE.SET_NAME('WSH', 'WSH_CONT_DET_ASSG_NULL');
1723: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
1724: --
1725: IF l_debug_on THEN
1726: WSH_DEBUG_SV.pop(l_module_name);
1757:
1758: IF (nvl(l_delivery_id,-99) <> -99) THEN
1759:
1760: IF (nvl(l_del_status,'N/A') NOT IN ('OP','SA')) THEN
1761: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DEL_STS_INVALID');
1762: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1763: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
1764: x_pack_status := 'Error';
1765: --
1846:
1847: --
1848: IF (x_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR OR x_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
1849: --dbms_output.put_line('error in autocreate');
1850: FND_MESSAGE.SET_NAME('WSH','WSH_GROUP_DETAILS_ERROR');
1851: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
1852: --
1853: END IF;
1854:
1878: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
1879: END IF;
1880: --
1881: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_container_instance_id);
1882: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONTAINER');
1883: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
1884: WSH_UTIL_CORE.Add_Message(l_ret_sts,l_module_name);
1885: x_return_status := l_ret_sts;
1886: x_pack_status := 'Error';
1879: END IF;
1880: --
1881: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_container_instance_id);
1882: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONTAINER');
1883: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
1884: WSH_UTIL_CORE.Add_Message(l_ret_sts,l_module_name);
1885: x_return_status := l_ret_sts;
1886: x_pack_status := 'Error';
1887: --
1927: CLOSE Get_Det_Cont_Item;
1928: END IF;
1929:
1930: IF l_cont_item_id <> nvl(l_det_cont_item_id,l_cont_item_id) THEN
1931: FND_MESSAGE.SET_NAME('WSH','WSH_DET_CONT_ITEM_DIFF');
1932: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_del_detail_id);
1933: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_WARNING,l_module_name);
1934: IF l_ret_sts <> WSH_UTIL_CORE.G_RET_STS_ERROR THEN
1935: l_ret_sts := WSH_UTIL_CORE.G_RET_STS_WARNING;
1928: END IF;
1929:
1930: IF l_cont_item_id <> nvl(l_det_cont_item_id,l_cont_item_id) THEN
1931: FND_MESSAGE.SET_NAME('WSH','WSH_DET_CONT_ITEM_DIFF');
1932: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_del_detail_id);
1933: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_WARNING,l_module_name);
1934: IF l_ret_sts <> WSH_UTIL_CORE.G_RET_STS_ERROR THEN
1935: l_ret_sts := WSH_UTIL_CORE.G_RET_STS_WARNING;
1936: END IF;
2031: ELSE
2032: -- l_ret_sts := x_return_status;
2033: --dbms_output.put_line('error assigning ' || l_del_detail_id);
2034: l_ret_sts := WSH_UTIL_CORE.G_RET_STS_ERROR;
2035: FND_MESSAGE.SET_NAME('WSH', 'WSH_CONT_DETAIL_NOT_ASSIGNED');
2036: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_del_detail_id);
2037: WSH_UTIL_CORE.Add_Message(l_ret_sts,l_module_name);
2038: END IF;
2039: END IF;
2032: -- l_ret_sts := x_return_status;
2033: --dbms_output.put_line('error assigning ' || l_del_detail_id);
2034: l_ret_sts := WSH_UTIL_CORE.G_RET_STS_ERROR;
2035: FND_MESSAGE.SET_NAME('WSH', 'WSH_CONT_DETAIL_NOT_ASSIGNED');
2036: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_del_detail_id);
2037: WSH_UTIL_CORE.Add_Message(l_ret_sts,l_module_name);
2038: END IF;
2039: END IF;
2040:
2066: END IF;
2067: --
2068:
2069: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2070: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_UPD_ATTR_ERROR');
2071: --
2072: IF l_debug_on THEN
2073: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2074: END IF;
2073: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2074: END IF;
2075: --
2076: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_container_instance_id);
2077: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
2078: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
2079: END IF;
2080:
2081: l_upd_flag := TRUE;
2090:
2091: IF SQL%ROWCOUNT > 1 OR SQL%NOTFOUND THEN
2092: --dbms_output.put_line('error updating master serial number for detail ' || l_del_detail_id);
2093:
2094: FND_MESSAGE.SET_NAME('WSH','WSH_DET_UPD_SER_ERROR');
2095: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_del_detail_id);
2096: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_WARNING,l_module_name);
2097: IF l_ret_sts <> WSH_UTIL_CORE.G_RET_STS_ERROR THEN
2098: l_ret_sts := WSH_UTIL_CORE.G_RET_STS_WARNING;
2091: IF SQL%ROWCOUNT > 1 OR SQL%NOTFOUND THEN
2092: --dbms_output.put_line('error updating master serial number for detail ' || l_del_detail_id);
2093:
2094: FND_MESSAGE.SET_NAME('WSH','WSH_DET_UPD_SER_ERROR');
2095: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_del_detail_id);
2096: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_WARNING,l_module_name);
2097: IF l_ret_sts <> WSH_UTIL_CORE.G_RET_STS_ERROR THEN
2098: l_ret_sts := WSH_UTIL_CORE.G_RET_STS_WARNING;
2099: END IF;
2107: END IF;
2108:
2109: <
2110: IF l_tmp_status = 'Error' THEN
2111: FND_MESSAGE.SET_NAME('WSH', 'WSH_CONT_DETAIL_NOT_ASSIGNED');
2112: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_del_detail_id);
2113: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_WARNING,l_module_name);
2114: END IF;
2115:
2108:
2109: <
2110: IF l_tmp_status = 'Error' THEN
2111: FND_MESSAGE.SET_NAME('WSH', 'WSH_CONT_DETAIL_NOT_ASSIGNED');
2112: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_del_detail_id);
2113: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_WARNING,l_module_name);
2114: END IF;
2115:
2116: i := i + 1;
2283: WSH_DEBUG_SV.log(l_module_name,'P_DEL_UNASSIGN',P_DEL_UNASSIGN);
2284: END IF;
2285: --
2286: IF p_del_detail_tab.count = 0 THEN
2287: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_ASSG_NULL');
2288: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2289: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
2290: --
2291: IF l_debug_on THEN
2341:
2342: IF (nvl(l_del_status,'N/A') <> 'OP')
2343: AND NVL(p_action_prms.caller,'!!!!') NOT LIKE '%' || WSH_UTIL_CORE.C_SPLIT_DLVY_SUFFIX -- J-IB-NPARIKH
2344: THEN
2345: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DEL_STS_INVALID');
2346: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2347: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
2348: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_ERROR THEN
2349: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2419: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2420: IF x_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
2421: l_num_warnings := l_num_warnings + 1;
2422: ELSE
2423: -- FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_UNASSG_ERROR');
2424: -- WSH_UTIL_CORE.Add_Message(x_return_status);
2425: --
2426: IF l_debug_on THEN
2427: WSH_DEBUG_SV.pop(l_module_name);
2468: --
2469: IF x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
2470: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
2471: ) THEN
2472: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_LAST_LINE_ERROR');
2473: --
2474: IF l_debug_on THEN
2475: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2476: END IF;
2475: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2476: END IF;
2477: --
2478: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(l_cont_tab(i));
2479: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
2480: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_WARNING,l_module_name);
2481: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_ERROR THEN
2482: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2483: END IF;
2502: --
2503:
2504: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2505: --dbms_output.put_line('after check cont attr status is ' || x_return_status);
2506: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_ATTR_ERROR');
2507: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_WARNING,l_module_name);
2508: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_ERROR THEN
2509: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2510: END IF;
2573: client_id = NULL -- LSP PROJECT :
2574: WHERE delivery_detail_id = l_cont_tab(i);
2575:
2576: IF SQL%ROWCOUNT > 1 OR SQL%NOTFOUND THEN
2577: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONTAINER');
2578: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
2579: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_ERROR THEN
2580: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2581: END IF;
2598: END IF;
2599: --
2600:
2601: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2602: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_UPD_ATTR_ERROR');
2603: --
2604: IF l_debug_on THEN
2605: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2606: END IF;
2605: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2606: END IF;
2607: --
2608: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(l_cont_tab(i));
2609: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
2610: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
2611: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_ERROR THEN
2612: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2613: END IF;
2625: l_cont_item_id;
2626:
2627: IF Is_Container%NOTFOUND THEN
2628: CLOSE Is_Container;
2629: FND_MESSAGE.SET_NAME('WSH','WSH_DET_INVALID_DETAIL');
2630: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_del_detail_rec(i));
2631: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
2632: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_ERROR THEN
2633: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2626:
2627: IF Is_Container%NOTFOUND THEN
2628: CLOSE Is_Container;
2629: FND_MESSAGE.SET_NAME('WSH','WSH_DET_INVALID_DETAIL');
2630: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_del_detail_rec(i));
2631: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
2632: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_ERROR THEN
2633: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2634: END IF;
2677:
2678: IF (nvl(l_delivery_id,-99) <> -99) THEN --{
2679:
2680: IF (nvl(l_del_status,'N/A') <> 'OP') THEN
2681: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DEL_STS_INVALID');
2682: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2683: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
2684: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_ERROR THEN
2685: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2708: END IF;
2709: --
2710:
2711: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN --{
2712: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_LAST_LINE_ERROR');
2713: --
2714: IF l_debug_on THEN
2715: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2716: END IF;
2715: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2716: END IF;
2717: --
2718: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(l_del_detail_rec(i));
2719: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
2720: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_WARNING,l_module_name);
2721:
2722: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_ERROR THEN
2723: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2742: END IF;
2743: --
2744:
2745: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN --{
2746: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_ATTR_ERROR');
2747: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_WARNING,l_module_name);
2748:
2749: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_ERROR THEN
2750: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2810: client_id = NULL -- LSP PROJECT
2811: WHERE delivery_detail_id = l_del_detail_rec(i);
2812:
2813: IF SQL%ROWCOUNT > 1 OR SQL%NOTFOUND THEN
2814: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONTAINER');
2815: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
2816: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_ERROR THEN
2817: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2818: END IF;
2835: END IF;
2836: --
2837:
2838: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN --{
2839: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_UPD_ATTR_ERROR');
2840: --
2841: IF l_debug_on THEN
2842: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2843: END IF;
2842: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2843: END IF;
2844: --
2845: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(l_del_detail_rec(i));
2846: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
2847: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
2848: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_ERROR THEN
2849: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2850: END IF;
2900: SET master_serial_number = serial_number
2901: WHERE delivery_detail_id = l_del_detail_rec(i);
2902:
2903: IF SQL%ROWCOUNT > 1 OR SQL%NOTFOUND THEN
2904: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_CHILD_UPD_ERROR');
2905: --
2906: IF l_debug_on THEN
2907: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2908: END IF;
2907: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2908: END IF;
2909: --
2910: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(l_del_detail_rec(i));
2911: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
2912: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_ERROR THEN
2913: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2914: END IF;
2915: GOTO next_line;
2930: END IF;
2931: --
2932:
2933: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2934: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_GET_SRL_ERROR');
2935: --
2936: IF l_debug_on THEN
2937: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2938: END IF;
2937: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2938: END IF;
2939: --
2940: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(l_del_detail_rec(i));
2941: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
2942: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_ERROR THEN
2943: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2944: END IF;
2945: GOTO next_line;
2967: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2968: END IF;
2969: --
2970: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(l_del_detail_rec(i));
2971: FND_MESSAGE.SET_NAME('WSH', 'WSH_CONT_CHILD_UPD_ERROR');
2972: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
2973: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2974: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
2975: --
2968: END IF;
2969: --
2970: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(l_del_detail_rec(i));
2971: FND_MESSAGE.SET_NAME('WSH', 'WSH_CONT_CHILD_UPD_ERROR');
2972: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
2973: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2974: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
2975: --
2976: IF l_debug_on THEN
3018: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3019: END IF;
3020: --
3021: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_container_instance_id);
3022: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_OVERPACKED');
3023: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
3024: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3025: WSH_UTIL_CORE.Add_Message(l_return_status);
3026: x_pack_status := 'Overpacked';
3019: END IF;
3020: --
3021: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_container_instance_id);
3022: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_OVERPACKED');
3023: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
3024: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3025: WSH_UTIL_CORE.Add_Message(l_return_status);
3026: x_pack_status := 'Overpacked';
3027:
3030: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3031: END IF;
3032: --
3033: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_container_instance_id);
3034: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_UNDERPACKED');
3035: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
3036: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3037: WSH_UTIL_CORE.Add_Message(l_return_status);
3038: x_pack_status := 'Underpacked';
3031: END IF;
3032: --
3033: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_container_instance_id);
3034: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_UNDERPACKED');
3035: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
3036: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3037: WSH_UTIL_CORE.Add_Message(l_return_status);
3038: x_pack_status := 'Underpacked';
3039: ELSE
3250: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3251: END IF;
3252: --
3253: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_container_instance_id);
3254: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONTAINER');
3255: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
3256: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3257: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
3258: --
3251: END IF;
3252: --
3253: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_container_instance_id);
3254: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONTAINER');
3255: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
3256: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3257: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
3258: --
3259: IF l_debug_on THEN
3277: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3278: END IF;
3279: --
3280: l_del_name := WSH_NEW_DELIVERIES_PVT.Get_Name(p_delivery_id);
3281: FND_MESSAGE.SET_NAME('WSH','WSH_DET_INVALID_DEL');
3282: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_del_name);
3283: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3284: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
3285: --
3278: END IF;
3279: --
3280: l_del_name := WSH_NEW_DELIVERIES_PVT.Get_Name(p_delivery_id);
3281: FND_MESSAGE.SET_NAME('WSH','WSH_DET_INVALID_DEL');
3282: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_del_name);
3283: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3284: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
3285: --
3286: IF l_debug_on THEN
3335: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3336: END IF;
3337: --
3338: l_del_name := WSH_NEW_DELIVERIES_PVT.Get_Name(p_delivery_id);
3339: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_ASSG_ORG_DIFF');
3340: FND_MESSAGE.SET_TOKEN('ENTITY1',l_cont_name);
3341: FND_MESSAGE.SET_TOKEN('ENTITY2',l_del_name);
3342: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3343: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
3336: END IF;
3337: --
3338: l_del_name := WSH_NEW_DELIVERIES_PVT.Get_Name(p_delivery_id);
3339: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_ASSG_ORG_DIFF');
3340: FND_MESSAGE.SET_TOKEN('ENTITY1',l_cont_name);
3341: FND_MESSAGE.SET_TOKEN('ENTITY2',l_del_name);
3342: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3343: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
3344: --
3337: --
3338: l_del_name := WSH_NEW_DELIVERIES_PVT.Get_Name(p_delivery_id);
3339: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_ASSG_ORG_DIFF');
3340: FND_MESSAGE.SET_TOKEN('ENTITY1',l_cont_name);
3341: FND_MESSAGE.SET_TOKEN('ENTITY2',l_del_name);
3342: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3343: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
3344: --
3345: IF l_debug_on THEN
3723: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3724: END IF;
3725: --
3726: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_det_cont_inst_id);
3727: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONTAINER');
3728: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
3729: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3730: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
3731: --
3724: END IF;
3725: --
3726: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_det_cont_inst_id);
3727: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONTAINER');
3728: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
3729: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3730: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
3731: --
3732: IF l_debug_on THEN
3751: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3752: END IF;
3753: --
3754: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_par_cont_inst_id);
3755: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONTAINER');
3756: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
3757: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3758: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
3759: --
3752: END IF;
3753: --
3754: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_par_cont_inst_id);
3755: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONTAINER');
3756: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
3757: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3758: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
3759: --
3760: IF l_debug_on THEN
3774: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3775: END IF;
3776: --
3777: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_det_cont_inst_id);
3778: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_ASSG_ORG_DIFF');
3779: FND_MESSAGE.SET_TOKEN('ENTITY1',l_cont_name);
3780: --
3781: IF l_debug_on THEN
3782: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3775: END IF;
3776: --
3777: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_det_cont_inst_id);
3778: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_ASSG_ORG_DIFF');
3779: FND_MESSAGE.SET_TOKEN('ENTITY1',l_cont_name);
3780: --
3781: IF l_debug_on THEN
3782: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3783: END IF;
3782: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3783: END IF;
3784: --
3785: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_par_cont_inst_id);
3786: FND_MESSAGE.SET_TOKEN('ENTITY2',l_cont_name);
3787: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3788: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
3789: --
3790: IF l_debug_on THEN
3822: IF (nvl(l_par_del_id,-99) <> -99) THEN
3823:
3824: -- TPW - Distributed Organization Changes
3825: IF (nvl(l_del_status,'N/A') NOT IN ('OP','SA')) THEN
3826: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DEL_STS_INVALID');
3827: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3828: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
3829: --
3830: IF l_debug_on THEN
3862:
3863: IF (nvl(l_det_del_id,-99) <> -99) THEN
3864:
3865: IF (nvl(l_del_status,'N/A') <> 'OP') THEN
3866: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DEL_STS_INVALID');
3867: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3868: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
3869: --
3870: IF l_debug_on THEN
3910: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3911: END IF;
3912: --
3913: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_det_cont_inst_id);
3914: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_ASSG_DEL_DIFF');
3915: FND_MESSAGE.SET_TOKEN('ENTITY1',l_cont_name);
3916: --
3917: IF l_debug_on THEN
3918: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3911: END IF;
3912: --
3913: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_det_cont_inst_id);
3914: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_ASSG_DEL_DIFF');
3915: FND_MESSAGE.SET_TOKEN('ENTITY1',l_cont_name);
3916: --
3917: IF l_debug_on THEN
3918: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3919: END IF;
3918: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3919: END IF;
3920: --
3921: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_par_cont_inst_id);
3922: FND_MESSAGE.SET_TOKEN('ENTITY2',l_cont_name);
3923: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3924: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
3925: --
3926: IF l_debug_on THEN
3950: END IF;
3951:
3952: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
3953: --dbms_output.put_line('error while getting master serial for parent ' || p_par_cont_inst_id);
3954: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_GET_MASTER_ERROR');
3955: --
3956: IF l_debug_on THEN
3957: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3958: END IF;
3957: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3958: END IF;
3959: --
3960: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_par_cont_inst_id);
3961: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
3962: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_WARNING,l_module_name);
3963: IF l_ret_sts <> WSH_UTIL_CORE.G_RET_STS_ERROR THEN
3964: l_ret_sts := WSH_UTIL_CORE.G_RET_STS_WARNING;
3965: END IF;
3981: WSH_DEBUG_SV.log(l_module_name,'return status - ',x_return_status);
3982: END IF;
3983:
3984: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
3985: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_ATTR_ERROR');
3986: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
3987: --
3988: IF l_debug_on THEN
3989: WSH_DEBUG_SV.pop(l_module_name);
4007: WSH_DEBUG_SV.log(l_module_name,'return status - ',x_return_status);
4008: END IF;
4009:
4010: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
4011: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_ATTR_ERROR');
4012: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
4013: --
4014: IF l_debug_on THEN
4015: WSH_DEBUG_SV.pop(l_module_name);
4069: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4070: END IF;
4071: --
4072: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_det_cont_inst_id);
4073: FND_MESSAGE.SET_NAME('WSH', 'WSH_CONT_CHILD_UPD_ERROR');
4074: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
4075: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4076: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
4077: --
4070: END IF;
4071: --
4072: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_det_cont_inst_id);
4073: FND_MESSAGE.SET_NAME('WSH', 'WSH_CONT_CHILD_UPD_ERROR');
4074: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
4075: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4076: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
4077: --
4078: IF l_debug_on THEN
4125: WSH_DEBUG_SV.log(l_module_name,'return status - ',x_return_status);
4126: END IF;
4127:
4128: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
4129: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_GRP_ATTR_WARN');
4130: --
4131: IF l_debug_on THEN
4132: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4133: END IF;
4132: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4133: END IF;
4134: --
4135: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_det_cont_inst_id);
4136: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
4137: l_ret_sts := WSH_UTIL_CORE.G_RET_STS_WARNING;
4138: WSH_UTIL_CORE.Add_Message(l_ret_sts,l_module_name);
4139: END IF;
4140:
4158: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4159: END IF;
4160: --
4161: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_det_cont_inst_id);
4162: FND_MESSAGE.SET_NAME('WSH', 'WSH_CONT_CHILD_UPD_ERROR');
4163: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
4164: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4165: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
4166: --
4159: END IF;
4160: --
4161: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_det_cont_inst_id);
4162: FND_MESSAGE.SET_NAME('WSH', 'WSH_CONT_CHILD_UPD_ERROR');
4163: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
4164: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4165: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
4166: --
4167: IF l_debug_on THEN
4213: IF l_debug_on THEN
4214: WSH_DEBUG_SV.log(l_module_name,'return status - ',x_return_status);
4215: END IF;
4216: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
4217: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_GRP_ATTR_WARN');
4218: --
4219: IF l_debug_on THEN
4220: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4221: END IF;
4220: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4221: END IF;
4222: --
4223: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_det_cont_inst_id);
4224: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
4225: l_ret_sts := WSH_UTIL_CORE.G_RET_STS_WARNING;
4226: WSH_UTIL_CORE.Add_Message(l_ret_sts,l_module_name);
4227: END IF;
4228:
4246: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4247: END IF;
4248: --
4249: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_det_cont_inst_id);
4250: FND_MESSAGE.SET_NAME('WSH', 'WSH_CONT_CHILD_UPD_ERROR');
4251: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
4252: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4253: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
4254: --
4247: END IF;
4248: --
4249: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_det_cont_inst_id);
4250: FND_MESSAGE.SET_NAME('WSH', 'WSH_CONT_CHILD_UPD_ERROR');
4251: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
4252: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4253: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
4254: --
4255: IF l_debug_on THEN
4292: WSH_DEBUG_SV.log(l_module_name,'return status - ',x_return_status);
4293: END IF;
4294: IF (x_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR OR x_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
4295: OR NVL(l_out_rec.single_group, 'N') = 'N') THEN
4296: FND_MESSAGE.SET_NAME('WSH','WSH_GROUP_DETAILS_ERROR');
4297: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
4298: --
4299: IF l_debug_on THEN
4300: WSH_DEBUG_SV.pop(l_module_name);
4350: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4351: END IF;
4352: --
4353: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_det_cont_inst_id);
4354: FND_MESSAGE.SET_NAME('WSH', 'WSH_CONT_CHILD_UPD_ERROR');
4355: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
4356: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4357: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
4358: --
4351: END IF;
4352: --
4353: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_det_cont_inst_id);
4354: FND_MESSAGE.SET_NAME('WSH', 'WSH_CONT_CHILD_UPD_ERROR');
4355: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
4356: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4357: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
4358: --
4359: IF l_debug_on THEN
4490: END IF;
4491: --
4492: l_item_name := WSH_UTIL_CORE.Get_Item_Name(p_container_item_id, p_organization_id);
4493: --dbms_output.put_line('Container '||p_container_item_id||' not found in Org '||p_organization_id);
4494: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_INV_ITEM');
4495: FND_MESSAGE.SET_TOKEN('ITEM_NAME',l_item_name);
4496: CLOSE Get_Cont_Msi;
4497: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
4498: x_return_status := C_ERROR_STATUS;
4491: --
4492: l_item_name := WSH_UTIL_CORE.Get_Item_Name(p_container_item_id, p_organization_id);
4493: --dbms_output.put_line('Container '||p_container_item_id||' not found in Org '||p_organization_id);
4494: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_INV_ITEM');
4495: FND_MESSAGE.SET_TOKEN('ITEM_NAME',l_item_name);
4496: CLOSE Get_Cont_Msi;
4497: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
4498: x_return_status := C_ERROR_STATUS;
4499: x_error_cnt := x_error_cnt + 1;
4524: END IF;
4525: --
4526: l_item_name := WSH_UTIL_CORE.Get_Item_Name(p_container_item_id, p_organization_id);
4527: --dbms_output.put_line('Container '||p_container_item_id||' not found in Org '||p_organization_id);
4528: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_INV_ITEM');
4529: FND_MESSAGE.SET_TOKEN('ITEM_NAME',l_item_name);
4530: CLOSE Get_Cont_Msi;
4531: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
4532: x_return_status := C_ERROR_STATUS;
4525: --
4526: l_item_name := WSH_UTIL_CORE.Get_Item_Name(p_container_item_id, p_organization_id);
4527: --dbms_output.put_line('Container '||p_container_item_id||' not found in Org '||p_organization_id);
4528: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_INV_ITEM');
4529: FND_MESSAGE.SET_TOKEN('ITEM_NAME',l_item_name);
4530: CLOSE Get_Cont_Msi;
4531: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
4532: x_return_status := C_ERROR_STATUS;
4533: x_error_cnt := x_error_cnt + 1;
4538:
4539:
4540: IF ((NVL(l_mtl_max_load,0) <= 0) AND (p_w_v_both in ('W','B'))) THEN
4541: --dbms_output.put_line('Preferred Container Weight is <= 0');
4542: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_MAX_LOAD_ERROR');
4543: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
4544: x_return_status := C_ERROR_STATUS;
4545: x_error_cnt := x_error_cnt + 1;
4546: l_flag := 'N';
4547: END IF;
4548:
4549: IF ((NVL(l_mtl_max_vol,0) <= 0) AND (p_w_v_both in ('V','B'))) THEN
4550: --dbms_output.put_line('Preferred Container Volume is <= 0');
4551: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_MAX_VOL_ERROR');
4552: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
4553: x_return_status := C_ERROR_STATUS;
4554: x_error_cnt := x_error_cnt + 1;
4555: l_flag := 'N';
4789: --
4790: l_org_name := WSH_UTIL_CORE.Get_Org_Name(p_organization_id);
4791: --dbms_output.put_line('Error: Cont/Load Relationship does not exist for Item '||l_item_name||' Org '||l_org_name);
4792: --dbms_output.put_line('p_inventory_item_id '||p_inventory_item_id||' p_organization_id '||p_organization_id);
4793: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONT_LOAD');
4794: FND_MESSAGE.SET_TOKEN('ITEM_NAME',l_item_name);
4795: FND_MESSAGE.SET_TOKEN('ORG_NAME',l_org_name);
4796: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
4797: x_return_status := C_ERROR_STATUS;
4790: l_org_name := WSH_UTIL_CORE.Get_Org_Name(p_organization_id);
4791: --dbms_output.put_line('Error: Cont/Load Relationship does not exist for Item '||l_item_name||' Org '||l_org_name);
4792: --dbms_output.put_line('p_inventory_item_id '||p_inventory_item_id||' p_organization_id '||p_organization_id);
4793: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONT_LOAD');
4794: FND_MESSAGE.SET_TOKEN('ITEM_NAME',l_item_name);
4795: FND_MESSAGE.SET_TOKEN('ORG_NAME',l_org_name);
4796: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
4797: x_return_status := C_ERROR_STATUS;
4798: x_error_cnt := x_error_cnt + 1;
4791: --dbms_output.put_line('Error: Cont/Load Relationship does not exist for Item '||l_item_name||' Org '||l_org_name);
4792: --dbms_output.put_line('p_inventory_item_id '||p_inventory_item_id||' p_organization_id '||p_organization_id);
4793: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONT_LOAD');
4794: FND_MESSAGE.SET_TOKEN('ITEM_NAME',l_item_name);
4795: FND_MESSAGE.SET_TOKEN('ORG_NAME',l_org_name);
4796: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
4797: x_return_status := C_ERROR_STATUS;
4798: x_error_cnt := x_error_cnt + 1;
4799: ELSE
4799: ELSE
4800: CLOSE Get_Cont_Load;
4801: IF ((l_max_load_qty = 0) AND (p_fill_pc_basis = 'Q')) THEN
4802: --dbms_output.put_line('Error: Max Load qty for Preferred Container is 0');
4803: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_LOAD_QTY_ERROR');
4804: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
4805: x_error_cnt := x_error_cnt + 1;
4806: x_return_status := C_ERROR_STATUS;
4807: l_wcl_cont_item_id := NULL;
4936: -- Bug 2786021
4937: IF (nvl(l_mtl_max_load,0) = 0 OR nvl(l_weight_per_pc,0) = 0)THEN
4938: x_return_status := C_ERROR_STATUS;
4939: IF nvl(l_mtl_max_load,0) = 0 THEN
4940: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_MAX_LOAD_ERROR');
4941: ELSIF nvl(l_weight_per_pc,0) = 0 THEN
4942: FND_MESSAGE.SET_NAME('WSH','WSH_NULL_WEIGHT_VOLUME');
4943: FND_MESSAGE.SET_TOKEN('DELIVERY_DETAIL',p_line_cont_rec.delivery_detail_id);
4944: END IF;
4938: x_return_status := C_ERROR_STATUS;
4939: IF nvl(l_mtl_max_load,0) = 0 THEN
4940: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_MAX_LOAD_ERROR');
4941: ELSIF nvl(l_weight_per_pc,0) = 0 THEN
4942: FND_MESSAGE.SET_NAME('WSH','WSH_NULL_WEIGHT_VOLUME');
4943: FND_MESSAGE.SET_TOKEN('DELIVERY_DETAIL',p_line_cont_rec.delivery_detail_id);
4944: END IF;
4945: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
4946: IF l_debug_on THEN
4939: IF nvl(l_mtl_max_load,0) = 0 THEN
4940: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_MAX_LOAD_ERROR');
4941: ELSIF nvl(l_weight_per_pc,0) = 0 THEN
4942: FND_MESSAGE.SET_NAME('WSH','WSH_NULL_WEIGHT_VOLUME');
4943: FND_MESSAGE.SET_TOKEN('DELIVERY_DETAIL',p_line_cont_rec.delivery_detail_id);
4944: END IF;
4945: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
4946: IF l_debug_on THEN
4947: WSH_DEBUG_SV.pop(l_module_name);
4959: -- Bug 2786021
4960: IF (nvl(l_mtl_max_vol,0) = 0 OR nvl(l_volume_per_pc,0) = 0) THEN
4961: x_return_status := C_ERROR_STATUS;
4962: IF nvl(l_mtl_max_vol,0) = 0 THEN
4963: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_MAX_VOL_ERROR');
4964: ELSIF nvl(l_volume_per_pc,0) = 0 THEN
4965: FND_MESSAGE.SET_NAME('WSH','WSH_NULL_WEIGHT_VOLUME');
4966: FND_MESSAGE.SET_TOKEN('DELIVERY_DETAIL',p_line_cont_rec.delivery_detail_id);
4967: END IF;
4961: x_return_status := C_ERROR_STATUS;
4962: IF nvl(l_mtl_max_vol,0) = 0 THEN
4963: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_MAX_VOL_ERROR');
4964: ELSIF nvl(l_volume_per_pc,0) = 0 THEN
4965: FND_MESSAGE.SET_NAME('WSH','WSH_NULL_WEIGHT_VOLUME');
4966: FND_MESSAGE.SET_TOKEN('DELIVERY_DETAIL',p_line_cont_rec.delivery_detail_id);
4967: END IF;
4968: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
4969: IF l_debug_on THEN
4962: IF nvl(l_mtl_max_vol,0) = 0 THEN
4963: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_MAX_VOL_ERROR');
4964: ELSIF nvl(l_volume_per_pc,0) = 0 THEN
4965: FND_MESSAGE.SET_NAME('WSH','WSH_NULL_WEIGHT_VOLUME');
4966: FND_MESSAGE.SET_TOKEN('DELIVERY_DETAIL',p_line_cont_rec.delivery_detail_id);
4967: END IF;
4968: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
4969: IF l_debug_on THEN
4970: WSH_DEBUG_SV.pop(l_module_name);
5038: IF (l_return_status <> C_SUCCESS_STATUS OR
5039: p_line_cont_rec.indivisible_flag = 'Y')THEN
5040: -- Fractional qtys not allowed
5041: --dbms_output.put_line('WSH_DETAILS_VALIDATIONS.Check_Decimal_Quantity returned '||l_return_status);
5042: l_discard_message := FND_MESSAGE.GET;
5043: l_tmp_split_qty := FLOOR(l_tmp_split_qty);
5044: END IF;
5045: -- HW OPMCONV - 1) No need to check for process
5046: -- - 2) Changed code to handle qty2
5125: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
5126: --dbms_output.put_line('WSH_DELIVERY_DETAILS_ACTIONS.Split_Delivery_Details returned '|| l_return_status);
5127: x_return_status := C_ERROR_STATUS;
5128: --dbms_output.put_line('WSH_DELIVERY_DETAILS_ACTIONS.Split_Delivery_Details returned '||x_return_status);
5129: FND_MESSAGE.SET_NAME('WSH','WSH_DET_SPLIT_ERROR');
5130: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_line_cont_rec.delivery_detail_id);
5131: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
5132: --
5133: IF l_debug_on THEN
5126: --dbms_output.put_line('WSH_DELIVERY_DETAILS_ACTIONS.Split_Delivery_Details returned '|| l_return_status);
5127: x_return_status := C_ERROR_STATUS;
5128: --dbms_output.put_line('WSH_DELIVERY_DETAILS_ACTIONS.Split_Delivery_Details returned '||x_return_status);
5129: FND_MESSAGE.SET_NAME('WSH','WSH_DET_SPLIT_ERROR');
5130: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_line_cont_rec.delivery_detail_id);
5131: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
5132: --
5133: IF l_debug_on THEN
5134: WSH_DEBUG_SV.pop(l_module_name);
5282: IF (l_return_status <> C_SUCCESS_STATUS OR
5283: p_line_cont_rec.indivisible_flag = 'Y')THEN
5284: -- Fractional qtys not allowed
5285: --dbms_output.put_line('WSH_DETAILS_VALIDATIONS.Check_Decimal_Quantity returned '||l_return_status);
5286: l_discard_message := FND_MESSAGE.GET;
5287: l_split_qty := FLOOR(l_tmp_split_qty);
5288: END IF;
5289:
5290: -- HW OPMCONV - 1) No need to check for process
5334:
5335: -- Start BugFix#3475352
5336: IF (l_num_of_split + 1) > 100000 THEN
5337: x_return_status := C_ERROR_STATUS;
5338: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONT_COUNT');
5339: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_line_cont_rec.delivery_detail_id);
5340: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
5341: return;
5342: END IF;
5335: -- Start BugFix#3475352
5336: IF (l_num_of_split + 1) > 100000 THEN
5337: x_return_status := C_ERROR_STATUS;
5338: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONT_COUNT');
5339: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_line_cont_rec.delivery_detail_id);
5340: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
5341: return;
5342: END IF;
5343: -- End BugFix#3475352
5372: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
5373: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
5374: --dbms_output.put_line('WSH_DELIVERY_DETAILS_ACTIONS.Split_Delivery_Details returned '|| l_return_status);
5375: x_return_status := C_ERROR_STATUS;
5376: FND_MESSAGE.SET_NAME('WSH','WSH_DET_SPLIT_ERROR');
5377: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_line_cont_rec.delivery_detail_id);
5378: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
5379:
5380: IF l_debug_on THEN
5373: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
5374: --dbms_output.put_line('WSH_DELIVERY_DETAILS_ACTIONS.Split_Delivery_Details returned '|| l_return_status);
5375: x_return_status := C_ERROR_STATUS;
5376: FND_MESSAGE.SET_NAME('WSH','WSH_DET_SPLIT_ERROR');
5377: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_line_cont_rec.delivery_detail_id);
5378: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
5379:
5380: IF l_debug_on THEN
5381: WSH_DEBUG_SV.pop(l_module_name);
5909: END IF;
5910:
5911: IF (l_return_status <> C_SUCCESS_STATUS) THEN
5912: --dbms_output.put_line('WSH_WV_UTILS.Detail_Weight_Volume did not return success');
5913: FND_MESSAGE.SET_NAME('WSH','WSH_DET_WT_VOL_FAILED');
5914: FND_MESSAGE.SET_TOKEN('DETAIL_ID',rec.delivery_detail_id);
5915: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
5916: error_cnt := error_cnt + 1;
5917: --dbms_output.put_line('Skipping this dd');
5910:
5911: IF (l_return_status <> C_SUCCESS_STATUS) THEN
5912: --dbms_output.put_line('WSH_WV_UTILS.Detail_Weight_Volume did not return success');
5913: FND_MESSAGE.SET_NAME('WSH','WSH_DET_WT_VOL_FAILED');
5914: FND_MESSAGE.SET_TOKEN('DETAIL_ID',rec.delivery_detail_id);
5915: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
5916: error_cnt := error_cnt + 1;
5917: --dbms_output.put_line('Skipping this dd');
5918: goto next_detail;
5926:
5927: IF ((NVL(rec.net_weight,0) = 0) OR
5928: (NVL(rec.volume,0) = 0)) THEN
5929: --dbms_output.put_line('Weight or Volume is NULL or 0');
5930: FND_MESSAGE.SET_NAME('WSH', 'WSH_NULL_WEIGHT_VOLUME');
5931: FND_MESSAGE.SET_TOKEN('DELIVERY_DETAIL', rec.delivery_detail_id);
5932: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
5933: error_cnt := error_cnt + 1;
5934: --dbms_output.put_line('Skipping this dd');
5927: IF ((NVL(rec.net_weight,0) = 0) OR
5928: (NVL(rec.volume,0) = 0)) THEN
5929: --dbms_output.put_line('Weight or Volume is NULL or 0');
5930: FND_MESSAGE.SET_NAME('WSH', 'WSH_NULL_WEIGHT_VOLUME');
5931: FND_MESSAGE.SET_TOKEN('DELIVERY_DETAIL', rec.delivery_detail_id);
5932: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
5933: error_cnt := error_cnt + 1;
5934: --dbms_output.put_line('Skipping this dd');
5935: goto next_detail;
5963: WSH_DEBUG_SV.log(l_module_name,'fill pc is Q,but use Wt or Vol');
5964: WSH_DEBUG_SV.log(l_module_name,'Wt-'||l_mtl_max_load);
5965: WSH_DEBUG_SV.log(l_module_name,'Vol-'||l_mtl_max_vol);
5966: END IF;
5967: FND_MESSAGE.SET_NAME('WSH', 'WSH_CONT_MAX_WT_ERROR');
5968: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
5969: error_cnt := error_cnt + l_error_cnt;
5970: goto next_detail;
5971: END IF;
6030: WSH_DEBUG_SV.log(l_module_name,'return status -',l_return_status);
6031: END IF;
6032: IF l_return_status <> C_SUCCESS_STATUS THEN
6033: --dbms_output.put_line('WSH_DETAILS_VALIDATIONS.Check_Decimal_Quantity returned '||l_return_status);
6034: l_discard_message := FND_MESSAGE.GET;
6035: l_tmp_num_cont := FLOOR(rec.packed_quantity/l_max_load_qty);
6036:
6037: IF (l_tmp_num_cont = 0) THEN
6038: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_MAX_WT_ERROR');
6034: l_discard_message := FND_MESSAGE.GET;
6035: l_tmp_num_cont := FLOOR(rec.packed_quantity/l_max_load_qty);
6036:
6037: IF (l_tmp_num_cont = 0) THEN
6038: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_MAX_WT_ERROR');
6039: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
6040: error_cnt := error_cnt + 1;
6041: goto next_detail;
6042: ELSE
6050: line_cont_rec.max_load_qty := l_max_load_qty;
6051:
6052: IF (NVL(line_cont_rec.max_load_qty,0) <= 0) THEN
6053: --dbms_output.put_line('Max Load Qty is NULL or <= 0. Skipping this dd');
6054: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_MAX_WT_ERROR');
6055: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
6056: error_cnt := error_cnt + 1;
6057: goto next_detail;
6058: END IF;
6086: END IF;
6087:
6088: IF (l_return_status <> C_SUCCESS_STATUS) THEN
6089: --dbms_output.put_line('WSH_WV_UTILS.Detail_Weight_Volume did not return success');
6090: FND_MESSAGE.SET_NAME('WSH','WSH_DET_WT_VOL_FAILED');
6091: FND_MESSAGE.SET_TOKEN('DETAIL_ID',rec.delivery_detail_id);
6092: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
6093: error_cnt := error_cnt + 1;
6094: --dbms_output.put_line('Skipping this dd');
6087:
6088: IF (l_return_status <> C_SUCCESS_STATUS) THEN
6089: --dbms_output.put_line('WSH_WV_UTILS.Detail_Weight_Volume did not return success');
6090: FND_MESSAGE.SET_NAME('WSH','WSH_DET_WT_VOL_FAILED');
6091: FND_MESSAGE.SET_TOKEN('DETAIL_ID',rec.delivery_detail_id);
6092: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
6093: error_cnt := error_cnt + 1;
6094: --dbms_output.put_line('Skipping this dd');
6095: goto next_detail;
6107: IF (line_cont_rec.fill_pc_basis = 'W') THEN
6108:
6109: IF (NVL(rec.gross_weight,0) = 0) THEN
6110: --dbms_output.put_line('Weight is NULL or 0');
6111: FND_MESSAGE.SET_NAME('WSH', 'WSH_NULL_WEIGHT_VOLUME');
6112: FND_MESSAGE.SET_TOKEN('DELIVERY_DETAIL', rec.delivery_detail_id);
6113: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
6114: error_cnt := error_cnt + 1;
6115: --dbms_output.put_line('Skipping this dd');
6108:
6109: IF (NVL(rec.gross_weight,0) = 0) THEN
6110: --dbms_output.put_line('Weight is NULL or 0');
6111: FND_MESSAGE.SET_NAME('WSH', 'WSH_NULL_WEIGHT_VOLUME');
6112: FND_MESSAGE.SET_TOKEN('DELIVERY_DETAIL', rec.delivery_detail_id);
6113: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
6114: error_cnt := error_cnt + 1;
6115: --dbms_output.put_line('Skipping this dd');
6116: goto next_detail;
6118: ELSE
6119:
6120: IF (NVL(rec.volume,0) = 0) THEN
6121: --dbms_output.put_line('Volume is NULL or 0');
6122: FND_MESSAGE.SET_NAME('WSH', 'WSH_NULL_WEIGHT_VOLUME');
6123: FND_MESSAGE.SET_TOKEN('DELIVERY_DETAIL', rec.delivery_detail_id);
6124: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
6125: error_cnt := error_cnt + 1;
6126: --dbms_output.put_line('Skipping this dd');
6119:
6120: IF (NVL(rec.volume,0) = 0) THEN
6121: --dbms_output.put_line('Volume is NULL or 0');
6122: FND_MESSAGE.SET_NAME('WSH', 'WSH_NULL_WEIGHT_VOLUME');
6123: FND_MESSAGE.SET_TOKEN('DELIVERY_DETAIL', rec.delivery_detail_id);
6124: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
6125: error_cnt := error_cnt + 1;
6126: --dbms_output.put_line('Skipping this dd');
6127: goto next_detail;
6204: ((line_cont_rec.fill_pc_basis = 'W' AND ((line_cont_rec.converted_wt/line_cont_rec.shp_qty) > l_mtl_max_load)) OR
6205: (line_cont_rec.fill_pc_basis = 'V' AND ((line_cont_rec.converted_vol/line_cont_rec.shp_qty) > l_mtl_max_vol)))) THEN
6206: --dbms_output.put_line('Indivisible flag is Y and Preferred Cont cannot hold atleast 1 piece');
6207: -- Bug#: 2503937 - New Error Message
6208: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_MAX_WT_VOL_ERROR');
6209: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
6210: error_cnt := error_cnt + 1;
6211: --dbms_output.put_line('Skipping this dd');
6212: goto next_detail;
6233: ((line_cont_rec.fill_pc_basis = 'Q' AND (line_cont_rec.shp_qty > line_cont_rec.max_load_qty ))
6234: OR (line_cont_rec.fill_pc_basis = 'W' AND (l_dd_gross_wt > line_cont_rec.cont_wt) )
6235: OR (line_cont_rec.fill_pc_basis = 'V' AND (l_dd_volume> line_cont_rec.cont_vol) ) ) ) THEN
6236:
6237: FND_MESSAGE.SET_NAME('WSH','WSH_OPM_IND_SPLIT_PACK');
6238: FND_MESSAGE.SET_TOKEN('DETAIL_ID',rec.delivery_detail_id);
6239: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6240: WSH_UTIL_CORE.Add_Message(l_return_status);
6241: error_cnt := error_cnt + 1;
6234: OR (line_cont_rec.fill_pc_basis = 'W' AND (l_dd_gross_wt > line_cont_rec.cont_wt) )
6235: OR (line_cont_rec.fill_pc_basis = 'V' AND (l_dd_volume> line_cont_rec.cont_vol) ) ) ) THEN
6236:
6237: FND_MESSAGE.SET_NAME('WSH','WSH_OPM_IND_SPLIT_PACK');
6238: FND_MESSAGE.SET_TOKEN('DETAIL_ID',rec.delivery_detail_id);
6239: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6240: WSH_UTIL_CORE.Add_Message(l_return_status);
6241: error_cnt := error_cnt + 1;
6242: goto next_detail;
6609:
6610: -- 10. Check if Count of p_del_detail_tab table is 0
6611: IF p_del_detail_tab.count = 0 THEN
6612: --dbms_output.put_line('p_del_detail_tab count is 0');
6613: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_ASSG_NULL');
6614: x_return_status := C_ERROR_STATUS;
6615: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
6616: --
6617: IF l_debug_on THEN
6660: END IF;
6661: IF (l_return_status = C_ERROR_STATUS) OR
6662: (l_return_status = C_UNEXP_ERROR_STATUS) THEN
6663: --dbms_output.put_line('***WSH_DELIVERY_AUTOCREATE.autocreate_deliveries returned '||l_return_status);
6664: FND_MESSAGE.SET_NAME('WSH','WSH_GROUP_DETAILS_ERROR');
6665: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
6666: x_return_status := l_return_status;
6667: --
6668: IF l_debug_on THEN
6678: cnt := p_group_id_tab.FIRST;
6679:
6680: IF ((cnt IS NULL) OR (p_group_id_tab.COUNT <> p_del_detail_tab.count)) THEN
6681: x_return_status := C_ERROR_STATUS;
6682: FND_MESSAGE.SET_NAME('WSH','WSH_GROUP_DETAILS_ERROR');
6683: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
6684: --
6685: IF l_debug_on THEN
6686: WSH_DEBUG_SV.pop(l_module_name);
6716: -- Raise warning if we found some delivery details with status 'S'
6717: -- Raise Error if all lines are with status 'S'
6718: IF (l_release_warn_count = p_del_detail_tab.count) THEN
6719: x_return_status := C_ERROR_STATUS;
6720: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_RELEASED_STATUS');
6721: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
6722: -- Bug 3337629 : Added the following return statement.
6723: IF l_debug_on THEN
6724: WSH_DEBUG_SV.pop(l_module_name);
6732: --IF (x_return_status <> C_ERROR_STATUS) THEN
6733: IF (l_return_status <> C_ERROR_STATUS) THEN
6734: x_return_status := C_WARNING_STATUS;
6735: warn_cnt := warn_cnt + 1;
6736: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_REL_STATUS_WARN');
6737: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
6738: END IF;
6739: END IF;
6740: --
6743: -- Raise warning if only some of the dds have 'Shipping Parameter' percent fill basis as None
6744: --
6745: IF (l_fill_pc_warn_count = p_del_detail_tab.count) THEN
6746: x_return_status := C_ERROR_STATUS;
6747: FND_MESSAGE.SET_NAME('WSH','WSH_FILL_BASIS_NONE');
6748: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
6749: IF l_debug_on THEN
6750: WSH_DEBUG_SV.pop(l_module_name);
6751: END IF;
6753: ELSIF (l_fill_pc_warn_count > 0) THEN
6754: IF (l_return_status <> C_ERROR_STATUS) THEN
6755: x_return_status := C_WARNING_STATUS;
6756: warn_cnt := warn_cnt + 1;
6757: FND_MESSAGE.SET_NAME('WSH','WSH_FILL_BASIS_NONE');
6758: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
6759: END IF;
6760: END IF;
6761: -- end of bug 3562797 jckwok
6838:
6839: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
6840: ) THEN
6841: --dbms_output.put_line('Container Creation failed for index '|| cnt);
6842: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_CREATE_ERROR');
6843: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
6844: error_cnt := error_cnt + 1;
6845: ELSE
6846:
7810: END IF;
7811: IF (warn_cnt > 0 OR cont_warn > 0) THEN
7812: x_return_status := C_WARNING_STATUS;
7813: IF cont_warn > 0 THEN
7814: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_PACK_WARN');
7815: FND_MESSAGE.SET_TOKEN('CONT_WARN',cont_warn);
7816: FND_MESSAGE.SET_TOKEN('CONT_ERR',0);
7817: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
7818: END IF;
7811: IF (warn_cnt > 0 OR cont_warn > 0) THEN
7812: x_return_status := C_WARNING_STATUS;
7813: IF cont_warn > 0 THEN
7814: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_PACK_WARN');
7815: FND_MESSAGE.SET_TOKEN('CONT_WARN',cont_warn);
7816: FND_MESSAGE.SET_TOKEN('CONT_ERR',0);
7817: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
7818: END IF;
7819: ELSIF (error_cnt > 0) THEN
7812: x_return_status := C_WARNING_STATUS;
7813: IF cont_warn > 0 THEN
7814: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_PACK_WARN');
7815: FND_MESSAGE.SET_TOKEN('CONT_WARN',cont_warn);
7816: FND_MESSAGE.SET_TOKEN('CONT_ERR',0);
7817: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
7818: END IF;
7819: ELSIF (error_cnt > 0) THEN
7820: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_PACK_ERROR');
7816: FND_MESSAGE.SET_TOKEN('CONT_ERR',0);
7817: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
7818: END IF;
7819: ELSIF (error_cnt > 0) THEN
7820: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_PACK_ERROR');
7821: FND_MESSAGE.SET_TOKEN('ERROR_COUNT',error_cnt);
7822: FND_MESSAGE.SET_TOKEN('WARN_COUNT',warn_cnt);
7823: FND_MESSAGE.SET_TOKEN('SUCC_COUNT',succ_cnt);
7824: IF succ_cnt > 0 THEN
7817: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
7818: END IF;
7819: ELSIF (error_cnt > 0) THEN
7820: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_PACK_ERROR');
7821: FND_MESSAGE.SET_TOKEN('ERROR_COUNT',error_cnt);
7822: FND_MESSAGE.SET_TOKEN('WARN_COUNT',warn_cnt);
7823: FND_MESSAGE.SET_TOKEN('SUCC_COUNT',succ_cnt);
7824: IF succ_cnt > 0 THEN
7825: x_return_status := C_WARNING_STATUS;
7818: END IF;
7819: ELSIF (error_cnt > 0) THEN
7820: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_PACK_ERROR');
7821: FND_MESSAGE.SET_TOKEN('ERROR_COUNT',error_cnt);
7822: FND_MESSAGE.SET_TOKEN('WARN_COUNT',warn_cnt);
7823: FND_MESSAGE.SET_TOKEN('SUCC_COUNT',succ_cnt);
7824: IF succ_cnt > 0 THEN
7825: x_return_status := C_WARNING_STATUS;
7826: ELSE
7819: ELSIF (error_cnt > 0) THEN
7820: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_PACK_ERROR');
7821: FND_MESSAGE.SET_TOKEN('ERROR_COUNT',error_cnt);
7822: FND_MESSAGE.SET_TOKEN('WARN_COUNT',warn_cnt);
7823: FND_MESSAGE.SET_TOKEN('SUCC_COUNT',succ_cnt);
7824: IF succ_cnt > 0 THEN
7825: x_return_status := C_WARNING_STATUS;
7826: ELSE
7827: x_return_status := C_ERROR_STATUS;
7836: WSH_DEBUG_SV.logmsg(l_module_name,'X ret status -'||x_return_status);
7837: END IF;
7838: IF x_return_status = C_ERROR_STATUS THEN
7839: IF p_pack_cont_flag = 'Y' THEN
7840: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_MASTER_NOT_PACK');
7841: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
7842: END IF;
7843: --
7844: IF l_debug_on THEN
7878: END IF;
7879: IF l_return_status = C_UNEXP_ERROR_STATUS THEN
7880: --dbms_output.put_line('Returned from autopack conts with unexpected error');
7881: /* No message WSH_CONT_CONT_AUTOPACK_ERR
7882: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_CONT_AUTOPACK_ERR');
7883: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
7884: IF l_return_status <> C_ERROR_STATUS THEN
7885: l_return_status := C_WARNING_STATUS;
7886: END IF;
7921: --
7922: EXCEPTION
7923:
7924: WHEN mark_reprice_error THEN
7925: FND_MESSAGE.Set_Name('WSH','WSH_REPRICE_REQD_ERR');
7926: x_return_status := l_return_status;
7927: WSH_UTIL_CORE.add_message(x_return_status,l_module_name);
7928: IF l_debug_on THEN
7929: WSH_DEBUG_SV.logmsg(l_module_name,'MARK_REPRICE_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
8083: OPEN get_delivery_wms(p_delivery_tab(j));
8084: FETCH get_delivery_wms INTO l_wms_enabled_flag;
8085: IF get_delivery_wms%NOTFOUND THEN
8086: CLOSE get_delivery_wms;
8087: FND_MESSAGE.SET_NAME('WSH', 'WSH_NO_DATA_FOUND');
8088: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8089: --
8090: --IF l_debug_on THEN
8091: --WSH_DEBUG_SV.pop(l_module_name);
8121: IF l_del_detail_tab.count = 0 THEN
8122:
8123: l_ret_sts := WSH_UTIL_CORE.G_RET_STS_ERROR;
8124:
8125: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_AUTOPACK_NULL');
8126: --
8127: IF l_debug_on THEN
8128: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
8129: END IF;
8128: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
8129: END IF;
8130: --
8131: l_del_name := WSH_NEW_DELIVERIES_PVT.Get_Name(p_delivery_tab(j));
8132: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_del_name);
8133: WSH_UTIL_CORE.Add_Message(l_ret_sts,l_module_name);
8134: ELSE
8135:
8136: --
8184:
8185: -- bug 1578527: disallow packing actions in WMS
8186: IF l_wms_count > 0 THEN
8187: IF l_wms_count = p_delivery_tab.count THEN
8188: FND_MESSAGE.SET_NAME('WSH', 'WSH_WMS_PACK_NOT_ALLOWED');
8189: WSH_UTIL_CORE.Add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
8190: ELSE
8191: FND_MESSAGE.SET_NAME('WSH', 'WSH_WMS_RECORDS_NOT_PACKED');
8192: FND_MESSAGE.SET_TOKEN('COUNT', l_wms_count);
8187: IF l_wms_count = p_delivery_tab.count THEN
8188: FND_MESSAGE.SET_NAME('WSH', 'WSH_WMS_PACK_NOT_ALLOWED');
8189: WSH_UTIL_CORE.Add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
8190: ELSE
8191: FND_MESSAGE.SET_NAME('WSH', 'WSH_WMS_RECORDS_NOT_PACKED');
8192: FND_MESSAGE.SET_TOKEN('COUNT', l_wms_count);
8193: WSH_UTIL_CORE.Add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
8194: END IF;
8195: END IF;
8188: FND_MESSAGE.SET_NAME('WSH', 'WSH_WMS_PACK_NOT_ALLOWED');
8189: WSH_UTIL_CORE.Add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
8190: ELSE
8191: FND_MESSAGE.SET_NAME('WSH', 'WSH_WMS_RECORDS_NOT_PACKED');
8192: FND_MESSAGE.SET_TOKEN('COUNT', l_wms_count);
8193: WSH_UTIL_CORE.Add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
8194: END IF;
8195: END IF;
8196:
8213: END IF;
8214: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR OR
8215: l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
8216: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8217: FND_MESSAGE.SET_NAME('WSH', 'WSH_REPRICE_REQUIRED_ERR');
8218: WSH_UTIL_CORE.add_message(x_return_status,l_module_name);
8219: --IF l_debug_on THEN
8220: -- WSH_DEBUG_SV.pop(l_module_name);
8221: --END IF;
8258: --
8259:
8260: IF warn_cnt > 0 THEN
8261: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
8262: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_PACK_WARN');
8263: FND_MESSAGE.SET_TOKEN('ERROR_COUNT',error_cnt);
8264: FND_MESSAGE.SET_TOKEN('WARN_COUNT',warn_cnt);
8265: FND_MESSAGE.SET_TOKEN('SUCC_COUNT',succ_cnt);
8266: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
8259:
8260: IF warn_cnt > 0 THEN
8261: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
8262: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_PACK_WARN');
8263: FND_MESSAGE.SET_TOKEN('ERROR_COUNT',error_cnt);
8264: FND_MESSAGE.SET_TOKEN('WARN_COUNT',warn_cnt);
8265: FND_MESSAGE.SET_TOKEN('SUCC_COUNT',succ_cnt);
8266: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
8267:
8260: IF warn_cnt > 0 THEN
8261: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
8262: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_PACK_WARN');
8263: FND_MESSAGE.SET_TOKEN('ERROR_COUNT',error_cnt);
8264: FND_MESSAGE.SET_TOKEN('WARN_COUNT',warn_cnt);
8265: FND_MESSAGE.SET_TOKEN('SUCC_COUNT',succ_cnt);
8266: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
8267:
8268: ELSIF error_cnt > 0 THEN
8261: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
8262: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_PACK_WARN');
8263: FND_MESSAGE.SET_TOKEN('ERROR_COUNT',error_cnt);
8264: FND_MESSAGE.SET_TOKEN('WARN_COUNT',warn_cnt);
8265: FND_MESSAGE.SET_TOKEN('SUCC_COUNT',succ_cnt);
8266: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
8267:
8268: ELSIF error_cnt > 0 THEN
8269: IF succ_cnt > 0 THEN
8267:
8268: ELSIF error_cnt > 0 THEN
8269: IF succ_cnt > 0 THEN
8270: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
8271: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_PACK_WARN');
8272: FND_MESSAGE.SET_TOKEN('ERROR_COUNT',error_cnt);
8273: FND_MESSAGE.SET_TOKEN('WARN_COUNT',warn_cnt);
8274: FND_MESSAGE.SET_TOKEN('SUCC_COUNT',succ_cnt);
8275: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
8268: ELSIF error_cnt > 0 THEN
8269: IF succ_cnt > 0 THEN
8270: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
8271: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_PACK_WARN');
8272: FND_MESSAGE.SET_TOKEN('ERROR_COUNT',error_cnt);
8273: FND_MESSAGE.SET_TOKEN('WARN_COUNT',warn_cnt);
8274: FND_MESSAGE.SET_TOKEN('SUCC_COUNT',succ_cnt);
8275: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
8276: ELSE
8269: IF succ_cnt > 0 THEN
8270: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
8271: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_PACK_WARN');
8272: FND_MESSAGE.SET_TOKEN('ERROR_COUNT',error_cnt);
8273: FND_MESSAGE.SET_TOKEN('WARN_COUNT',warn_cnt);
8274: FND_MESSAGE.SET_TOKEN('SUCC_COUNT',succ_cnt);
8275: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
8276: ELSE
8277: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8270: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
8271: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_PACK_WARN');
8272: FND_MESSAGE.SET_TOKEN('ERROR_COUNT',error_cnt);
8273: FND_MESSAGE.SET_TOKEN('WARN_COUNT',warn_cnt);
8274: FND_MESSAGE.SET_TOKEN('SUCC_COUNT',succ_cnt);
8275: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
8276: ELSE
8277: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8278: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_PACK_ERROR');
8274: FND_MESSAGE.SET_TOKEN('SUCC_COUNT',succ_cnt);
8275: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
8276: ELSE
8277: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8278: FND_MESSAGE.SET_NAME('WSH','WSH_DEL_PACK_ERROR');
8279: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
8280: END IF;
8281: ELSIF succ_cnt > 0 THEN
8282: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
8561: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_PC',P_SPLIT_PC);
8562: END IF;
8563: --
8564: IF p_cont_tab.count = 0 OR p_del_detail_tab.count = 0 THEN
8565: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_ASSG_NULL');
8566: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8567: x_pack_status := 'Error';
8568: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
8569: --
8653: END IF;
8654:
8655: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
8656: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8657: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DETAIL_NOT_ASSIGNED');
8658: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(j).delivery_detail_id);
8659: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
8660: x_pack_status := 'Error';
8661: END IF;
8654:
8655: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
8656: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8657: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DETAIL_NOT_ASSIGNED');
8658: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(j).delivery_detail_id);
8659: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
8660: x_pack_status := 'Error';
8661: END IF;
8662:
8748: l_det_cont_item_id,
8749: l_det_pack_qty2;
8750:
8751: IF Get_Detail_Info%NOTFOUND THEN
8752: FND_MESSAGE.SET_NAME('WSH','WSH_DET_INVALID_DETAIL');
8753: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(j).delivery_detail_id);
8754: x_pack_status := 'Error';
8755: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8756: CLOSE Get_Detail_Info;
8749: l_det_pack_qty2;
8750:
8751: IF Get_Detail_Info%NOTFOUND THEN
8752: FND_MESSAGE.SET_NAME('WSH','WSH_DET_INVALID_DETAIL');
8753: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(j).delivery_detail_id);
8754: x_pack_status := 'Error';
8755: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8756: CLOSE Get_Detail_Info;
8757: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
8827: --RETURN;
8828: raise e_return_excp; -- LPN CONV. rv
8829: END IF;
8830: IF (l_fill_pc_basis = 'N') THEN
8831: FND_MESSAGE.SET_NAME('WSH','WSH_FILL_BASIS_NONE');
8832: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8833: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
8834: x_pack_status := 'Error';
8835: error_cnt := error_cnt + 1;
8900: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
8901: END IF;
8902: --
8903: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(l_cont_tab(i).container_instance_id);
8904: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONTAINER');
8905: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
8906: x_pack_status := 'Error';
8907: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8908: CLOSE Get_Cont_Info;
8901: END IF;
8902: --
8903: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(l_cont_tab(i).container_instance_id);
8904: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONTAINER');
8905: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
8906: x_pack_status := 'Error';
8907: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8908: CLOSE Get_Cont_Info;
8909: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
8948: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
8949: END IF;
8950: --
8951: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(l_cont_tab(i).container_instance_id);
8952: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_WT_VOL_FAILED');
8953: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
8954:
8955:
8956: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_WARNING,l_module_name);
8949: END IF;
8950: --
8951: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(l_cont_tab(i).container_instance_id);
8952: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_WT_VOL_FAILED');
8953: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
8954:
8955:
8956: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_WARNING,l_module_name);
8957: cont_warn := cont_warn + 1;
9099: END IF;
9100:
9101: -- bug 1716136: errors likely mean integers are safe values.
9102: IF l_discard_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9103: l_discard_message := FND_MESSAGE.GET;
9104: l_split_qty := FLOOR(l_tmp_split_qty);
9105: END IF;
9106:
9107: IF l_split_qty IS NULL THEN
9108: l_split_qty := l_tmp_split_qty;
9109: END IF;
9110:
9111: IF (l_split_qty < 0 OR l_split_qty > l_det_pack_qty) THEN
9112: FND_MESSAGE.SET_NAME('WSH','WSH_DET_SPLIT_ERROR');
9113: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(j).delivery_detail_id);
9114: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9115: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
9116: l_det_tab(j).pack_status := 'Error';
9109: END IF;
9110:
9111: IF (l_split_qty < 0 OR l_split_qty > l_det_pack_qty) THEN
9112: FND_MESSAGE.SET_NAME('WSH','WSH_DET_SPLIT_ERROR');
9113: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(j).delivery_detail_id);
9114: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9115: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
9116: l_det_tab(j).pack_status := 'Error';
9117: error_cnt := error_cnt + 1;
9139: -- else go to the next container
9140: -- HW OPMCONV - 1) Renamed lot_indivisible variable to lot_divisible_flag
9141: -- - 2) Changed check condition for lot divisible from 1 to 'N'
9142: IF ( l_lot_divisible_flag = 'N' AND i = cont_count AND l_det_pack_sts = 'Unpacked') THEN
9143: FND_MESSAGE.SET_NAME('WSH','WSH_OPM_IND_SPLIT_PACK');
9144: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(j).delivery_detail_id);
9145: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9146: WSH_UTIL_CORE.Add_Message(l_return_status);
9147: l_det_tab(j).pack_status := 'Error';
9140: -- HW OPMCONV - 1) Renamed lot_indivisible variable to lot_divisible_flag
9141: -- - 2) Changed check condition for lot divisible from 1 to 'N'
9142: IF ( l_lot_divisible_flag = 'N' AND i = cont_count AND l_det_pack_sts = 'Unpacked') THEN
9143: FND_MESSAGE.SET_NAME('WSH','WSH_OPM_IND_SPLIT_PACK');
9144: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(j).delivery_detail_id);
9145: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9146: WSH_UTIL_CORE.Add_Message(l_return_status);
9147: l_det_tab(j).pack_status := 'Error';
9148: error_cnt := error_cnt + 1;
9180: END IF;
9181:
9182: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9183: --dbms_output.put_line('error in splitting');
9184: FND_MESSAGE.SET_NAME('WSH','WSH_DET_SPLIT_ERROR');
9185: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(j).delivery_detail_id);
9186: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9187: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
9188: l_det_tab(j).pack_status := 'Error';
9181:
9182: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9183: --dbms_output.put_line('error in splitting');
9184: FND_MESSAGE.SET_NAME('WSH','WSH_DET_SPLIT_ERROR');
9185: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(j).delivery_detail_id);
9186: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9187: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
9188: l_det_tab(j).pack_status := 'Error';
9189: error_cnt := error_cnt + 1;
9313: l_det_cont_item_id,
9314: l_det_pack_qty2;
9315:
9316: IF Get_Detail_Info%NOTFOUND THEN
9317: FND_MESSAGE.SET_NAME('WSH','WSH_DET_INVALID_DETAIL');
9318: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(j).delivery_detail_id);
9319: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9320: CLOSE Get_Detail_Info;
9321: --dbms_output.put_line('error in fetching details for ' || l_det_tab(j).delivery_detail_id);
9314: l_det_pack_qty2;
9315:
9316: IF Get_Detail_Info%NOTFOUND THEN
9317: FND_MESSAGE.SET_NAME('WSH','WSH_DET_INVALID_DETAIL');
9318: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(j).delivery_detail_id);
9319: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9320: CLOSE Get_Detail_Info;
9321: --dbms_output.put_line('error in fetching details for ' || l_det_tab(j).delivery_detail_id);
9322: l_det_tab(j).pack_status := 'Error';
9376: END IF;
9377:
9378: -- bug 1716136: errors likely mean integers are safe values.
9379: IF l_discard_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9380: l_discard_message := FND_MESSAGE.GET;
9381: l_split_qty := FLOOR(l_tmp_split_qty);
9382: END IF;
9383: /* Bug 2173615 - added l_split_qty = 0,in case of fractional split example = 0.3 */
9384: IF (l_split_qty IS NULL OR l_split_qty = 0) THEN
9427: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
9428: END IF;
9429: --
9430: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(l_cont_tab(i).container_instance_id);
9431: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONTAINER');
9432: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
9433: -- x_pack_status := 'Error';
9434: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9435: l_cont_tab(i).pack_status := 'Error';
9428: END IF;
9429: --
9430: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(l_cont_tab(i).container_instance_id);
9431: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONTAINER');
9432: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
9433: -- x_pack_status := 'Error';
9434: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9435: l_cont_tab(i).pack_status := 'Error';
9436: CLOSE Get_Cont_Info;
9460: --- HW OPM BUG# 3011758
9461: -- HW OPMCONV - 1) Renamed lot_indivisible variable to lot_divisible_flag
9462: -- - 2) Changed check condition for lot divisible from 1 to 'N'
9463: IF ( l_lot_divisible_flag = 'N' AND i = cont_count AND l_det_pack_sts = 'Unpacked') THEN
9464: FND_MESSAGE.SET_NAME('WSH','WSH_OPM_IND_SPLIT_PACK');
9465: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(j).delivery_detail_id);
9466: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9467: WSH_UTIL_CORE.Add_Message(l_return_status);
9468: l_det_tab(j).pack_status := 'Error';
9461: -- HW OPMCONV - 1) Renamed lot_indivisible variable to lot_divisible_flag
9462: -- - 2) Changed check condition for lot divisible from 1 to 'N'
9463: IF ( l_lot_divisible_flag = 'N' AND i = cont_count AND l_det_pack_sts = 'Unpacked') THEN
9464: FND_MESSAGE.SET_NAME('WSH','WSH_OPM_IND_SPLIT_PACK');
9465: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(j).delivery_detail_id);
9466: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9467: WSH_UTIL_CORE.Add_Message(l_return_status);
9468: l_det_tab(j).pack_status := 'Error';
9469: error_cnt := error_cnt + 1;
9497: END IF;
9498: --dbms_output.put_line('...split detail id ' || l_split_det_id);
9499:
9500: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9501: FND_MESSAGE.SET_NAME('WSH','WSH_DET_SPLIT_ERROR');
9502: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(j).delivery_detail_id);
9503: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9504: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
9505: --dbms_output.put_line('error in splitting details for ' || l_det_tab(j).delivery_detail_id);
9498: --dbms_output.put_line('...split detail id ' || l_split_det_id);
9499:
9500: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9501: FND_MESSAGE.SET_NAME('WSH','WSH_DET_SPLIT_ERROR');
9502: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(j).delivery_detail_id);
9503: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9504: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
9505: --dbms_output.put_line('error in splitting details for ' || l_det_tab(j).delivery_detail_id);
9506: error_cnt := error_cnt + 1;
9596:
9597: l_tmp_det_qty := l_tmp_det_qty + l_split_qty;
9598: ELSE
9599: --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);
9600: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_NO_MATCH');
9601: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(j).delivery_detail_id);
9602: --
9603: IF l_debug_on THEN
9604: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
9597: l_tmp_det_qty := l_tmp_det_qty + l_split_qty;
9598: ELSE
9599: --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);
9600: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_NO_MATCH');
9601: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(j).delivery_detail_id);
9602: --
9603: IF l_debug_on THEN
9604: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
9605: END IF;
9604: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
9605: END IF;
9606: --
9607: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(l_cont_tab(i).container_instance_id);
9608: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
9609:
9610: END IF; -- cont org and det org id check
9611:
9612: END IF; -- if l_tmp_det_qty < l_det_pack_qty
9629:
9630: ELSE
9631: -- packing mode is invalid - did not pack
9632:
9633: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_INVALID_PACK_MODE');
9634: x_pack_status := 'Error';
9635: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9636: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
9637: --Bugfix 4070732 {
9686: --dbms_output.put_line('detail ' || l_det_tab(i).delivery_detail_id || ' status is ' || l_det_tab(i).pack_status);
9687: IF l_det_tab(i).pack_status <> 'Packed' THEN
9688: IF l_det_tab(i).pack_status = 'Error' THEN
9689: error_cnt := error_cnt + 1;
9690: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DETAIL_NOT_ASSIGNED');
9691: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(i).delivery_detail_id);
9692: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
9693: ELSE
9694: IF l_det_tab(i).pack_status = 'Unpacked' THEN
9687: IF l_det_tab(i).pack_status <> 'Packed' THEN
9688: IF l_det_tab(i).pack_status = 'Error' THEN
9689: error_cnt := error_cnt + 1;
9690: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DETAIL_NOT_ASSIGNED');
9691: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(i).delivery_detail_id);
9692: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
9693: ELSE
9694: IF l_det_tab(i).pack_status = 'Unpacked' THEN
9695: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_IGNORED');
9691: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(i).delivery_detail_id);
9692: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
9693: ELSE
9694: IF l_det_tab(i).pack_status = 'Unpacked' THEN
9695: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_IGNORED');
9696: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(i).delivery_detail_id);
9697: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_WARNING,l_module_name);
9698: END IF;
9699: warn_cnt := warn_cnt + 1;
9692: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
9693: ELSE
9694: IF l_det_tab(i).pack_status = 'Unpacked' THEN
9695: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_IGNORED');
9696: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_det_tab(i).delivery_detail_id);
9697: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_WARNING,l_module_name);
9698: END IF;
9699: warn_cnt := warn_cnt + 1;
9700: END IF;
9707:
9708: END LOOP;
9709:
9710: IF error_cnt > 0 or warn_cnt > 0 THEN
9711: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_PACK_ERROR');
9712: FND_MESSAGE.SET_TOKEN('ERROR_COUNT',error_cnt);
9713: FND_MESSAGE.SET_TOKEN('WARN_COUNT',warn_cnt);
9714: FND_MESSAGE.SET_TOKEN('SUCC_COUNT',succ_cnt);
9715: IF error_cnt > 0 THEN
9708: END LOOP;
9709:
9710: IF error_cnt > 0 or warn_cnt > 0 THEN
9711: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_PACK_ERROR');
9712: FND_MESSAGE.SET_TOKEN('ERROR_COUNT',error_cnt);
9713: FND_MESSAGE.SET_TOKEN('WARN_COUNT',warn_cnt);
9714: FND_MESSAGE.SET_TOKEN('SUCC_COUNT',succ_cnt);
9715: IF error_cnt > 0 THEN
9716: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9709:
9710: IF error_cnt > 0 or warn_cnt > 0 THEN
9711: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_PACK_ERROR');
9712: FND_MESSAGE.SET_TOKEN('ERROR_COUNT',error_cnt);
9713: FND_MESSAGE.SET_TOKEN('WARN_COUNT',warn_cnt);
9714: FND_MESSAGE.SET_TOKEN('SUCC_COUNT',succ_cnt);
9715: IF error_cnt > 0 THEN
9716: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9717: ELSIF warn_cnt > 0 THEN
9710: IF error_cnt > 0 or warn_cnt > 0 THEN
9711: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_PACK_ERROR');
9712: FND_MESSAGE.SET_TOKEN('ERROR_COUNT',error_cnt);
9713: FND_MESSAGE.SET_TOKEN('WARN_COUNT',warn_cnt);
9714: FND_MESSAGE.SET_TOKEN('SUCC_COUNT',succ_cnt);
9715: IF error_cnt > 0 THEN
9716: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9717: ELSIF warn_cnt > 0 THEN
9718: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9779: WSH_DEBUG_SV.log(l_module_name,'return status',l_return_status);
9780: END IF;
9781: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9782: x_return_status := l_return_status;
9783: FND_MESSAGE.SET_NAME('WSH', 'WSH_REPRICE_REQUIRED_ERR');
9784: WSH_UTIL_CORE.add_message(x_return_status,l_module_name);
9785: --
9786: --Bugfix 4070732 {
9787: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name) THEN
9840: IF l_cont_tab(i).pack_status <> 'Packed' THEN
9841: IF l_cont_tab(i).pack_status = 'Error' THEN
9842: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9843: cont_err := cont_err + 1;
9844: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_NOT_PACKED');
9845: --
9846: IF l_debug_on THEN
9847: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
9848: END IF;
9847: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
9848: END IF;
9849: --
9850: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(l_cont_tab(i).container_instance_id);
9851: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
9852: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
9853: ELSIF l_cont_tab(i).pack_status = 'Overpacked' THEN
9854: cont_warn := cont_warn + 1;
9855: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_OVERPACKED');
9851: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
9852: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
9853: ELSIF l_cont_tab(i).pack_status = 'Overpacked' THEN
9854: cont_warn := cont_warn + 1;
9855: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_OVERPACKED');
9856: --
9857: IF l_debug_on THEN
9858: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
9859: END IF;
9858: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
9859: END IF;
9860: --
9861: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(l_cont_tab(i).container_instance_id);
9862: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
9863: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_WARNING,l_module_name);
9864: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9865: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9866: END IF;
9865: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9866: END IF;
9867: ELSIF l_cont_tab(i).pack_status = 'Underpacked' THEN
9868: cont_warn := cont_warn + 1;
9869: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_UNDERPACKED');
9870: --
9871: IF l_debug_on THEN
9872: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
9873: END IF;
9872: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
9873: END IF;
9874: --
9875: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(l_cont_tab(i).container_instance_id);
9876: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
9877: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_WARNING,l_module_name);
9878: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9879: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9880: END IF;
9879: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9880: END IF;
9881: ELSIF l_cont_tab(i).pack_status = 'Warning' THEN
9882: cont_warn := cont_warn + 1;
9883: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_WT_VOL_FAILED');
9884: --
9885: IF l_debug_on THEN
9886: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
9887: END IF;
9886: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
9887: END IF;
9888: --
9889: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(l_cont_tab(i).container_instance_id);
9890: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
9891: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_WARNING,l_module_name);
9892:
9893: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9894: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9932: -- LPN CONV. rv
9933: --
9934:
9935: IF cont_err > 0 OR cont_warn > 0 THEN
9936: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_PACK_WARN');
9937: FND_MESSAGE.SET_TOKEN('CONT_WARN',cont_warn);
9938: FND_MESSAGE.SET_TOKEN('CONT_ERR',cont_err);
9939: IF cont_err > 0 THEN
9940: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9933: --
9934:
9935: IF cont_err > 0 OR cont_warn > 0 THEN
9936: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_PACK_WARN');
9937: FND_MESSAGE.SET_TOKEN('CONT_WARN',cont_warn);
9938: FND_MESSAGE.SET_TOKEN('CONT_ERR',cont_err);
9939: IF cont_err > 0 THEN
9940: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9941: ELSE
9934:
9935: IF cont_err > 0 OR cont_warn > 0 THEN
9936: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_PACK_WARN');
9937: FND_MESSAGE.SET_TOKEN('CONT_WARN',cont_warn);
9938: FND_MESSAGE.SET_TOKEN('CONT_ERR',cont_err);
9939: IF cont_err > 0 THEN
9940: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9941: ELSE
9942: l_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10196: FETCH Get_Ship_Qty INTO l_shp_qty;
10197:
10198: IF Get_Ship_Qty%NOTFOUND THEN
10199: CLOSE Get_Ship_Qty;
10200: FND_MESSAGE.SET_NAME('WSH','WSH_DET_INVALID_DETAIL');
10201: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_delivery_detail_id);
10202: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10203: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
10204: --
10197:
10198: IF Get_Ship_Qty%NOTFOUND THEN
10199: CLOSE Get_Ship_Qty;
10200: FND_MESSAGE.SET_NAME('WSH','WSH_DET_INVALID_DETAIL');
10201: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_delivery_detail_id);
10202: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10203: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
10204: --
10205: IF l_debug_on THEN
10231: FETCH Get_Ship_Qty into l_db_split_shp_qty;
10232:
10233: IF Get_Ship_Qty%NOTFOUND THEN
10234: CLOSE Get_Ship_Qty;
10235: FND_MESSAGE.SET_NAME('WSH','WSH_DET_INVALID_DETAIL');
10236: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_split_detail_id);
10237: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10238: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
10239: --
10232:
10233: IF Get_Ship_Qty%NOTFOUND THEN
10234: CLOSE Get_Ship_Qty;
10235: FND_MESSAGE.SET_NAME('WSH','WSH_DET_INVALID_DETAIL');
10236: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_split_detail_id);
10237: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10238: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
10239: --
10240: IF l_debug_on THEN
10258: SET shipped_quantity = l_shp_qty
10259: WHERE delivery_detail_id = p_delivery_detail_id;
10260:
10261: IF SQL%NOTFOUND THEN
10262: FND_MESSAGE.SET_NAME('WSH','WSH_DET_INVALID_DETAIL');
10263: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_delivery_detail_id);
10264: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10265: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
10266: --
10259: WHERE delivery_detail_id = p_delivery_detail_id;
10260:
10261: IF SQL%NOTFOUND THEN
10262: FND_MESSAGE.SET_NAME('WSH','WSH_DET_INVALID_DETAIL');
10263: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_delivery_detail_id);
10264: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10265: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
10266: --
10267: IF l_debug_on THEN
10275: SET shipped_quantity = p_split_qty
10276: WHERE delivery_detail_id = p_split_detail_id;
10277:
10278: IF SQL%NOTFOUND THEN
10279: FND_MESSAGE.SET_NAME('WSH','WSH_DET_INVALID_DETAIL');
10280: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_split_detail_id);
10281: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10282: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
10283: --
10276: WHERE delivery_detail_id = p_split_detail_id;
10277:
10278: IF SQL%NOTFOUND THEN
10279: FND_MESSAGE.SET_NAME('WSH','WSH_DET_INVALID_DETAIL');
10280: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_split_detail_id);
10281: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10282: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
10283: --
10284: IF l_debug_on THEN
10807: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
10808: END IF;
10809: --
10810: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(line_cont_rec.delivery_detail_id);
10811: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_WT_VOL_FAILED');
10812: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
10813: IF l_return_status = C_WARNING_STATUS THEN
10814: warn_cnt := warn_cnt + 1;
10815: ELSE
10808: END IF;
10809: --
10810: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(line_cont_rec.delivery_detail_id);
10811: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_WT_VOL_FAILED');
10812: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
10813: IF l_return_status = C_WARNING_STATUS THEN
10814: warn_cnt := warn_cnt + 1;
10815: ELSE
10816: error_cnt := error_cnt + 1;
10824:
10825: IF ((NVL(line_cont_rec.gross_weight,0) = 0) OR
10826: (NVL(line_cont_rec.volume,0) = 0)) THEN
10827: --dbms_output.put_line('Weight or Volume is NULL or 0');
10828: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_MAX_WT_ERROR');
10829: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
10830: error_cnt := error_cnt + 1;
10831: --dbms_output.put_line('Skipping this cont');
10832: goto next_cont;
10902: line_cont_rec.max_load_qty := l_max_load_qty;
10903:
10904: IF (NVL(line_cont_rec.max_load_qty,0) <= 0) THEN
10905: --dbms_output.put_line('Max Load Qty is null or <= 0. Skipping this container');
10906: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_MAX_WT_ERROR');
10907: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
10908: error_cnt := error_cnt + 1;
10909: goto next_cont;
10910: END IF;
10943: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
10944: END IF;
10945: --
10946: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(line_cont_rec.delivery_detail_id);
10947: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_WT_VOL_FAILED');
10948: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
10949: IF l_return_status = C_WARNING_STATUS THEN
10950: warn_cnt := warn_cnt + 1;
10951: ELSE
10944: END IF;
10945: --
10946: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(line_cont_rec.delivery_detail_id);
10947: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_WT_VOL_FAILED');
10948: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
10949: IF l_return_status = C_WARNING_STATUS THEN
10950: warn_cnt := warn_cnt + 1;
10951: ELSE
10952: error_cnt := error_cnt + 1;
10961:
10962: IF (NVL(line_cont_rec.gross_weight,0) = 0) THEN
10963: --dbms_output.put_line('Weight is NULL or 0');
10964: --BUG 3577115
10965: --FND_MESSAGE.SET_NAME('WSH','WSH_CONT_MAX_WT_ERROR');
10966: l_item_name := WSH_UTIL_CORE.Get_Item_Name(line_cont_rec.inventory_item_id, line_cont_rec.organization_id);
10967: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_NULL_WEIGHT_VOLUME');
10968: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_item_name);
10969: --BUG 3577115
10963: --dbms_output.put_line('Weight is NULL or 0');
10964: --BUG 3577115
10965: --FND_MESSAGE.SET_NAME('WSH','WSH_CONT_MAX_WT_ERROR');
10966: l_item_name := WSH_UTIL_CORE.Get_Item_Name(line_cont_rec.inventory_item_id, line_cont_rec.organization_id);
10967: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_NULL_WEIGHT_VOLUME');
10968: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_item_name);
10969: --BUG 3577115
10970: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
10971: error_cnt := error_cnt + 1;
10964: --BUG 3577115
10965: --FND_MESSAGE.SET_NAME('WSH','WSH_CONT_MAX_WT_ERROR');
10966: l_item_name := WSH_UTIL_CORE.Get_Item_Name(line_cont_rec.inventory_item_id, line_cont_rec.organization_id);
10967: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_NULL_WEIGHT_VOLUME');
10968: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_item_name);
10969: --BUG 3577115
10970: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
10971: error_cnt := error_cnt + 1;
10972: --dbms_output.put_line('Skipping this Cont');
10977:
10978: IF (NVL(line_cont_rec.volume,0) = 0) THEN
10979: --dbms_output.put_line('Volume is NULL or 0');
10980: --BUG 3577115
10981: --FND_MESSAGE.SET_NAME('WSH','WSH_CONT_MAX_VOL_ERROR');
10982: l_item_name := WSH_UTIL_CORE.Get_Item_Name(line_cont_rec.inventory_item_id, line_cont_rec.organization_id);
10983: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_NULL_WEIGHT_VOLUME');
10984: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_item_name);
10985: --BUG 3577115
10979: --dbms_output.put_line('Volume is NULL or 0');
10980: --BUG 3577115
10981: --FND_MESSAGE.SET_NAME('WSH','WSH_CONT_MAX_VOL_ERROR');
10982: l_item_name := WSH_UTIL_CORE.Get_Item_Name(line_cont_rec.inventory_item_id, line_cont_rec.organization_id);
10983: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_NULL_WEIGHT_VOLUME');
10984: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_item_name);
10985: --BUG 3577115
10986: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
10987: error_cnt := error_cnt + 1;
10980: --BUG 3577115
10981: --FND_MESSAGE.SET_NAME('WSH','WSH_CONT_MAX_VOL_ERROR');
10982: l_item_name := WSH_UTIL_CORE.Get_Item_Name(line_cont_rec.inventory_item_id, line_cont_rec.organization_id);
10983: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_NULL_WEIGHT_VOLUME');
10984: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_item_name);
10985: --BUG 3577115
10986: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
10987: error_cnt := error_cnt + 1;
10988: --dbms_output.put_line('Skipping this Cont');
11064: IF ((line_cont_rec.fill_pc_basis = 'W' AND (line_cont_rec.converted_wt > l_mtl_max_load)) OR
11065: (line_cont_rec.fill_pc_basis = 'V' AND (line_cont_rec.converted_vol > l_mtl_max_vol))) THEN
11066: --dbms_output.put_line('Indivisible flag is Y and Preferred Mast Cont cannot hold atleast 1 piece');
11067: -- Bug#: 2503937 - New Error Message
11068: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_MAX_WT_VOL_ERROR');
11069: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
11070: error_cnt := error_cnt + 1;
11071: --dbms_output.put_line('Skipping this Cont');
11072: goto next_cont;
11249: -- 10. Check if Count of p_del_detail_tab table is 0
11250: --IF (p_cont_detail_tab.COUNT = 0 OR p_cont_info_tab.COUNT = 0) THEN
11251: IF (p_cont_detail_tab.COUNT = 0) THEN
11252: --dbms_output.put_line('p_cont_detail_tab count is 0');
11253: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_CONT_ASSG_NULL');
11254: x_return_status := C_ERROR_STATUS;
11255: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
11256: --
11257: IF l_debug_on THEN
11300: END IF;
11301: IF (l_return_status = C_ERROR_STATUS) OR
11302: (l_return_status = C_UNEXP_ERROR_STATUS) THEN
11303: --dbms_output.put_line('WSH_DELIVERY_AUTOCREATE.autocreate_deliveries returned '||l_return_status);
11304: FND_MESSAGE.SET_NAME('WSH','WSH_GROUP_DETAILS_ERROR');
11305: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
11306: x_return_status := l_return_status;
11307: --
11308: IF l_debug_on THEN
11317: ELSE
11318: cnt := p_group_id_tab.FIRST;
11319: IF ((cnt IS NULL) OR (p_group_id_tab.COUNT <> p_cont_detail_tab.count)) THEN
11320: x_return_status := C_ERROR_STATUS;
11321: FND_MESSAGE.SET_NAME('WSH','WSH_GROUP_DETAILS_ERROR');
11322: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
11323: --
11324: IF l_debug_on THEN
11325: WSH_DEBUG_SV.pop(l_module_name);
11358: -- percent fill basis as None.
11359: --
11360: IF (l_fill_pc_warn_count = p_cont_detail_tab.count) THEN
11361: x_return_status := C_ERROR_STATUS;
11362: FND_MESSAGE.SET_NAME('WSH','WSH_FILL_BASIS_NONE');
11363: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
11364: IF l_debug_on THEN
11365: WSH_DEBUG_SV.pop(l_module_name);
11366: END IF;
11368: ELSIF (l_fill_pc_warn_count > 0) THEN
11369: IF (l_return_status <> C_ERROR_STATUS) THEN
11370: x_return_status := C_WARNING_STATUS;
11371: warn_cnt := warn_cnt + 1;
11372: FND_MESSAGE.SET_NAME('WSH','WSH_FILL_BASIS_NONE');
11373: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
11374: END IF;
11375: END IF;
11376: -- end of bug 3562797 jckwok
11447: -- K LPN CONV. rv
11448:
11449: IF l_return_status <> C_SUCCESS_STATUS THEN
11450: --dbms_output.put_line('Container Creation failed for index '|| cnt);
11451: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_CREATE_ERROR');
11452: WSH_UTIL_CORE.Add_Message(C_ERROR_STATUS,l_module_name);
11453: error_cnt := error_cnt + 1;
11454: ELSE
11455: l_cont_instance_id := l_cont_tab(1);
11536: SET ignore_for_planning=cur.ignore_for_planning
11537: WHERE delivery_detail_id=l_cont_instance_id;
11538:
11539: IF SQL%NOTFOUND THEN
11540: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONTAINER');
11541: IF l_debug_on THEN
11542: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
11543: END IF;
11544: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(l_cont_instance_id);
11541: IF l_debug_on THEN
11542: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
11543: END IF;
11544: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(l_cont_instance_id);
11545: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
11546: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11547: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
11548: IF l_debug_on THEN
11549: WSH_DEBUG_SV.pop(l_module_name);
11587: END IF;
11588:
11589: -- 90.1 Summarize errors/warnings
11590: IF (error_cnt > 0) THEN
11591: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_CONT_PACK_ERROR');
11592: FND_MESSAGE.SET_TOKEN('ERROR_COUNT',error_cnt);
11593: FND_MESSAGE.SET_TOKEN('WARN_COUNT',warn_cnt);
11594: FND_MESSAGE.SET_TOKEN('SUCC_COUNT',succ_cnt);
11595: IF succ_cnt > 0 THEN
11588:
11589: -- 90.1 Summarize errors/warnings
11590: IF (error_cnt > 0) THEN
11591: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_CONT_PACK_ERROR');
11592: FND_MESSAGE.SET_TOKEN('ERROR_COUNT',error_cnt);
11593: FND_MESSAGE.SET_TOKEN('WARN_COUNT',warn_cnt);
11594: FND_MESSAGE.SET_TOKEN('SUCC_COUNT',succ_cnt);
11595: IF succ_cnt > 0 THEN
11596: x_return_status := C_WARNING_STATUS;
11589: -- 90.1 Summarize errors/warnings
11590: IF (error_cnt > 0) THEN
11591: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_CONT_PACK_ERROR');
11592: FND_MESSAGE.SET_TOKEN('ERROR_COUNT',error_cnt);
11593: FND_MESSAGE.SET_TOKEN('WARN_COUNT',warn_cnt);
11594: FND_MESSAGE.SET_TOKEN('SUCC_COUNT',succ_cnt);
11595: IF succ_cnt > 0 THEN
11596: x_return_status := C_WARNING_STATUS;
11597: ELSE
11590: IF (error_cnt > 0) THEN
11591: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_CONT_PACK_ERROR');
11592: FND_MESSAGE.SET_TOKEN('ERROR_COUNT',error_cnt);
11593: FND_MESSAGE.SET_TOKEN('WARN_COUNT',warn_cnt);
11594: FND_MESSAGE.SET_TOKEN('SUCC_COUNT',succ_cnt);
11595: IF succ_cnt > 0 THEN
11596: x_return_status := C_WARNING_STATUS;
11597: ELSE
11598: x_return_status := C_ERROR_STATUS;
11600: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
11601: ELSIF (warn_cnt > 0 OR cont_warn > 0) THEN
11602: x_return_status := C_WARNING_STATUS;
11603: IF cont_warn > 0 THEN
11604: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_PACK_WARN');
11605: FND_MESSAGE.SET_TOKEN('CONT_WARN',cont_warn);
11606: FND_MESSAGE.SET_TOKEN('CONT_ERR',0);
11607: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
11608: END IF;
11601: ELSIF (warn_cnt > 0 OR cont_warn > 0) THEN
11602: x_return_status := C_WARNING_STATUS;
11603: IF cont_warn > 0 THEN
11604: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_PACK_WARN');
11605: FND_MESSAGE.SET_TOKEN('CONT_WARN',cont_warn);
11606: FND_MESSAGE.SET_TOKEN('CONT_ERR',0);
11607: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
11608: END IF;
11609: ELSE
11602: x_return_status := C_WARNING_STATUS;
11603: IF cont_warn > 0 THEN
11604: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_PACK_WARN');
11605: FND_MESSAGE.SET_TOKEN('CONT_WARN',cont_warn);
11606: FND_MESSAGE.SET_TOKEN('CONT_ERR',0);
11607: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
11608: END IF;
11609: ELSE
11610: x_return_status := C_SUCCESS_STATUS;
11767:
11768: IF Get_Detail_Attr%NOTFOUND THEN
11769: --dbms_output.put_line('invalid detail id ' || p_delivery_detail_id);
11770: CLOSE Get_Detail_Attr;
11771: FND_MESSAGE.SET_NAME('WSH','WSH_DET_INVALID_DETAIL');
11772: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_delivery_detail_id);
11773: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11774: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
11775: --
11768: IF Get_Detail_Attr%NOTFOUND THEN
11769: --dbms_output.put_line('invalid detail id ' || p_delivery_detail_id);
11770: CLOSE Get_Detail_Attr;
11771: FND_MESSAGE.SET_NAME('WSH','WSH_DET_INVALID_DETAIL');
11772: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_delivery_detail_id);
11773: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11774: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
11775: --
11776: IF l_debug_on THEN
11809: ;
11810:
11811: IF Get_Del_Attr%NOTFOUND THEN
11812: CLOSE Get_Del_Attr;
11813: FND_MESSAGE.SET_NAME('WSH','WSH_DET_INVALID_DELIVERY');
11814: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_delivery_id);
11815: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11816: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
11817: --
11810:
11811: IF Get_Del_Attr%NOTFOUND THEN
11812: CLOSE Get_Del_Attr;
11813: FND_MESSAGE.SET_NAME('WSH','WSH_DET_INVALID_DELIVERY');
11814: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_delivery_id);
11815: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11816: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
11817: --
11818: IF l_debug_on THEN
11826: CLOSE Get_Del_Attr;
11827: END IF;
11828:
11829: ELSE
11830: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_NO_ATTR_ERROR');
11831: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11832: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
11833: --
11834: IF l_debug_on THEN
11923: WHERE delivery_detail_id = p_container_instance_id;
11924:
11925: IF SQL%NOTFOUND THEN
11926: --dbms_output.put_line('could not update container ' || p_container_instance_id);
11927: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONTAINER');
11928: --
11929: IF l_debug_on THEN
11930: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
11931: END IF;
11930: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
11931: END IF;
11932: --
11933: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(p_container_instance_id);
11934: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
11935: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11936: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
11937: --
11938: IF l_debug_on THEN
12051:
12052: IF Get_Detail_Attr%NOTFOUND THEN
12053: CLOSE Get_Detail_Attr;
12054: --dbms_output.put_line('no detail found for ' || p_container_instance_id);
12055: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONTAINER');
12056: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
12057: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
12058: x_attr_flag := 'N';
12059: --
12242: WSH_DEBUG_SV.log(l_module_name,'return status-',l_return_status);
12243: END IF;
12244:
12245: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12246: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_UPD_ATTR_ERROR');
12247: --
12248: IF l_debug_on THEN
12249: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
12250: END IF;
12249: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
12250: END IF;
12251: --
12252: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(cont.delivery_detail_id);
12253: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
12254: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
12255: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
12256: END IF;
12257:
12377:
12378: IF Get_Contents%NOTFOUND THEN
12379: CLOSE Get_Contents;
12380: x_last_line_flag := 'N';
12381: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONTAINER');
12382: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
12383: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
12384: --
12385: IF l_debug_on THEN
12399:
12400: IF Get_Cont_Count%NOTFOUND THEN
12401: CLOSE Get_Cont_Count;
12402: x_last_line_flag := 'N';
12403: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONTAINER');
12404: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
12405: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
12406: --
12407: IF l_debug_on THEN
12588: --{
12589: --
12590: -- p_delivery_id is mandatory
12591: --
12592: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
12593: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'p_delivery_id');
12594: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_error,l_module_name);
12595: --
12596: RAISE FND_API.G_EXC_ERROR;
12589: --
12590: -- p_delivery_id is mandatory
12591: --
12592: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
12593: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'p_delivery_id');
12594: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_error,l_module_name);
12595: --
12596: RAISE FND_API.G_EXC_ERROR;
12597: --}
12602: --{
12603: --
12604: -- p_lines_tbl should have at least one record
12605: --
12606: FND_MESSAGE.SET_NAME('WSH', 'WSH_EMPTY_TABLE_ERROR');
12607: FND_MESSAGE.SET_TOKEN('TABLE_NAME', 'p_lines_tbl');
12608: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_error,l_module_name);
12609: --
12610: RAISE FND_API.G_EXC_ERROR;
12603: --
12604: -- p_lines_tbl should have at least one record
12605: --
12606: FND_MESSAGE.SET_NAME('WSH', 'WSH_EMPTY_TABLE_ERROR');
12607: FND_MESSAGE.SET_TOKEN('TABLE_NAME', 'p_lines_tbl');
12608: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_error,l_module_name);
12609: --
12610: RAISE FND_API.G_EXC_ERROR;
12611: --}
12618: --
12619: IF l_dlvy_rec.initial_pickup_location_id IS NULL
12620: THEN
12621: --{
12622: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_NOT_EXIST');
12623: FND_MESSAGE.SET_TOKEN('DELIVERY_ID', p_delivery_id);
12624: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_error,l_module_name);
12625: --
12626: RAISE FND_API.G_EXC_ERROR;
12619: IF l_dlvy_rec.initial_pickup_location_id IS NULL
12620: THEN
12621: --{
12622: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_NOT_EXIST');
12623: FND_MESSAGE.SET_TOKEN('DELIVERY_ID', p_delivery_id);
12624: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_error,l_module_name);
12625: --
12626: RAISE FND_API.G_EXC_ERROR;
12627: --}
12633: --{
12634: --
12635: -- Invalid operation for outbound delivery
12636: --
12637: FND_MESSAGE.SET_NAME('WSH','WSH_NOT_IB_DLVY_ERROR');
12638: FND_MESSAGE.SET_TOKEN('DELIVERY_NAME', l_dlvy_rec.name);
12639: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_error,l_module_name);
12640: --
12641: RAISE FND_API.G_EXC_ERROR;
12634: --
12635: -- Invalid operation for outbound delivery
12636: --
12637: FND_MESSAGE.SET_NAME('WSH','WSH_NOT_IB_DLVY_ERROR');
12638: FND_MESSAGE.SET_TOKEN('DELIVERY_NAME', l_dlvy_rec.name);
12639: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_error,l_module_name);
12640: --
12641: RAISE FND_API.G_EXC_ERROR;
12642: --}
12989: --{
12990: --
12991: -- p_delivery_id is mandatory
12992: --
12993: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
12994: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'p_delivery_id');
12995: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_error,l_module_name);
12996: --
12997: RAISE FND_API.G_EXC_ERROR;
12990: --
12991: -- p_delivery_id is mandatory
12992: --
12993: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
12994: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'p_delivery_id');
12995: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_error,l_module_name);
12996: --
12997: RAISE FND_API.G_EXC_ERROR;
12998: --}
13005: --
13006: IF l_dlvy_rec.initial_pickup_location_id IS NULL
13007: THEN
13008: --{
13009: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_NOT_EXIST');
13010: FND_MESSAGE.SET_TOKEN('DELIVERY_ID', p_delivery_id);
13011: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_error,l_module_name);
13012: --
13013: RAISE FND_API.G_EXC_ERROR;
13006: IF l_dlvy_rec.initial_pickup_location_id IS NULL
13007: THEN
13008: --{
13009: FND_MESSAGE.SET_NAME('WSH','WSH_DLVY_NOT_EXIST');
13010: FND_MESSAGE.SET_TOKEN('DELIVERY_ID', p_delivery_id);
13011: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_error,l_module_name);
13012: --
13013: RAISE FND_API.G_EXC_ERROR;
13014: --}
13020: --{
13021: --
13022: -- Invalid operation for outbound delivery
13023: --
13024: FND_MESSAGE.SET_NAME('WSH','WSH_NOT_IB_DLVY_ERROR');
13025: FND_MESSAGE.SET_TOKEN('DELIVERY_NAME', l_dlvy_rec.name);
13026: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_error,l_module_name);
13027: --
13028: RAISE FND_API.G_EXC_ERROR;
13021: --
13022: -- Invalid operation for outbound delivery
13023: --
13024: FND_MESSAGE.SET_NAME('WSH','WSH_NOT_IB_DLVY_ERROR');
13025: FND_MESSAGE.SET_TOKEN('DELIVERY_NAME', l_dlvy_rec.name);
13026: WSH_UTIL_CORE.add_message (wsh_util_core.g_ret_sts_error,l_module_name);
13027: --
13028: RAISE FND_API.G_EXC_ERROR;
13029: --}
13181: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY',P_QUANTITY);
13182: END IF;
13183: --
13184: IF ( NVL(p_quantity,0) <= 0 ) THEN
13185: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_CREATE_ERROR');
13186: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13187: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
13188: --
13189: IF l_debug_on THEN
13223: --
13224: x_cont_names(x_cont_names.count+1) := l_cont_name;
13225: ELSE
13226: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13227: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_NAME_DUPLICATE');
13228: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
13229: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
13230: END IF;
13231: END LOOP;
13224: x_cont_names(x_cont_names.count+1) := l_cont_name;
13225: ELSE
13226: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13227: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_NAME_DUPLICATE');
13228: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
13229: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
13230: END IF;
13231: END LOOP;
13232:
13231: END LOOP;
13232:
13233: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13234: x_return_status := l_return_status;
13235: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_CREATE_ERROR');
13236: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
13237: --
13238: IF l_debug_on THEN
13239: WSH_DEBUG_SV.pop(l_module_name);
13784: wsh_delivery_details_pkg.lock_wda_no_compare(p_delivery_detail_id => p_child_container_id);
13785: EXCEPTION
13786: WHEN OTHERS THEN
13787: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13788: FND_MESSAGE.SET_NAME('WSH','WSH_NO_LOCK');
13789: WSH_UTIL_CORE.Add_Message(x_return_status);
13790: --
13791: -- Debug Statements
13792: --
13873:
13874: EXCEPTION
13875: WHEN OTHERS THEN
13876: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13877: FND_MESSAGE.SET_NAME('WSH','WSH_NO_LOCK');
13878: WSH_UTIL_CORE.Add_Message(x_return_status);
13879: --
13880: -- Debug Statements
13881: --
14134: END IF;
14135:
14136: WHEN WSH_INVALID_TRIPS THEN
14137: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
14138: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_TRIPS');
14139: WSH_UTIL_CORE.Add_Message(x_return_status);
14140: --
14141: -- Debug Statements
14142: --
14147: END IF;
14148:
14149: WHEN WSH_NO_CHILD_LPNS THEN
14150: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
14151: FND_MESSAGE.SET_NAME('WSH','WSH_NO_CHILD_LPNS');
14152: WSH_UTIL_CORE.Add_Message(x_return_status);
14153: --
14154: -- Debug Statements
14155: --
14160: END IF;
14161:
14162: WHEN WSH_CONSOL_DEL_NO_MATCH THEN
14163: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
14164: FND_MESSAGE.SET_NAME('WSH','WSH_CONSOL_DEL_NO_MATCH');
14165: WSH_UTIL_CORE.Add_Message(x_return_status);
14166: --
14167: -- Debug Statements
14168: --
14173: END IF;
14174:
14175: WHEN WSH_ASSIGN_CONSOL_LPN_ERROR THEN
14176: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
14177: FND_MESSAGE.SET_NAME('WSH','WSH_ASSIGN_CONSOL_LPN_ERROR');
14178: WSH_UTIL_CORE.Add_Message(x_return_status);
14179: --
14180: -- Debug Statements
14181: --
14186: END IF;
14187:
14188: WHEN WSH_INVALID_CONSOL_ASSIGN THEN
14189: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
14190: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CONSOL_ASSIGN');
14191: WSH_UTIL_CORE.Add_Message(x_return_status);
14192: --
14193: -- Debug Statements
14194: --
14199: END IF;
14200:
14201: WHEN WSH_INVALID_PARENT THEN
14202: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
14203: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_PARENT');
14204: WSH_UTIL_CORE.Add_Message(x_return_status);
14205: --
14206: -- Debug Statements
14207: --
14212: END IF;
14213:
14214: WHEN WSH_INVALID_CHILD THEN
14215: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
14216: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_CHILD');
14217: WSH_UTIL_CORE.Add_Message(x_return_status);
14218: --
14219: -- Debug Statements
14220: --
14358:
14359: EXCEPTION
14360: WHEN OTHERS THEN
14361: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
14362: FND_MESSAGE.SET_NAME('WSH','WSH_NO_LOCK');
14363: WSH_UTIL_CORE.Add_Message(x_return_status);
14364: --
14365: -- Debug Statements
14366: --
14496:
14497:
14498: WHEN WSH_INVALID_COMBINATION THEN
14499: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
14500: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_COMBINATION');
14501: WSH_UTIL_CORE.Add_Message(x_return_status);
14502: --
14503: -- Debug Statements
14504: --