128: l_in_param_null := TRUE;
129: END IF;
130:
131: IF l_in_param_null THEN
132: FND_MESSAGE.SET_NAME('WSH','WSH_REQUIRED_FIELD_NULL');
133: FND_MESSAGE.SET_TOKEN('FIELD_NAME',l_param_name);
134: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
135: RAISE FND_API.G_EXC_ERROR;
136: END IF;
129: END IF;
130:
131: IF l_in_param_null THEN
132: FND_MESSAGE.SET_NAME('WSH','WSH_REQUIRED_FIELD_NULL');
133: FND_MESSAGE.SET_TOKEN('FIELD_NAME',l_param_name);
134: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
135: RAISE FND_API.G_EXC_ERROR;
136: END IF;
137: --
166: FETCH c_lock_container INTO l_delivery_detail_id;
167: CLOSE c_lock_container;
168: EXCEPTION
169: WHEN app_exception.application_exception or app_exception.record_lock_exception THEN
170: FND_MESSAGE.SET_NAME('WSH', 'WSH_DLVB_LOCK_FAILED');
171: FND_MESSAGE.SET_TOKEN('DEL_NAME', l_delivery_detail_id);
172: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
173: RAISE FND_API.G_EXC_ERROR;
174: END;
167: CLOSE c_lock_container;
168: EXCEPTION
169: WHEN app_exception.application_exception or app_exception.record_lock_exception THEN
170: FND_MESSAGE.SET_NAME('WSH', 'WSH_DLVB_LOCK_FAILED');
171: FND_MESSAGE.SET_TOKEN('DEL_NAME', l_delivery_detail_id);
172: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
173: RAISE FND_API.G_EXC_ERROR;
174: END;
175:
179: --LPN reuse project
180: released_status = 'X';
181:
182: IF SQL%ROWCOUNT <> 1 THEN
183: FND_MESSAGE.SET_NAME('WSH','WSH_LPN_UPDATE_FAILED'); --bms new
184: FND_MESSAGE.SET_TOKEN('LPNID',p_detail_info_tab(i).lpn_id);
185: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
186: RAISE FND_API.G_EXC_ERROR;
187: END IF;
180: released_status = 'X';
181:
182: IF SQL%ROWCOUNT <> 1 THEN
183: FND_MESSAGE.SET_NAME('WSH','WSH_LPN_UPDATE_FAILED'); --bms new
184: FND_MESSAGE.SET_TOKEN('LPNID',p_detail_info_tab(i).lpn_id);
185: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
186: RAISE FND_API.G_EXC_ERROR;
187: END IF;
188: i := p_detail_info_tab.NEXT(i);
200: IF p_detail_info_tab(i).lpn_id IS NULL THEN
201: IF l_debug_on THEN
202: wsh_debug_sv.logmsg(l_module_name,'lpn_id cannot be null');
203: END IF;
204: FND_MESSAGE.SET_NAME('WSH','WSH_REQUIRED_FIELD_NULL');
205: FND_MESSAGE.SET_TOKEN('FIELD_NAME','LPN_ID');
206: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
207: RAISE FND_API.G_EXC_ERROR;
208: END IF;
201: IF l_debug_on THEN
202: wsh_debug_sv.logmsg(l_module_name,'lpn_id cannot be null');
203: END IF;
204: FND_MESSAGE.SET_NAME('WSH','WSH_REQUIRED_FIELD_NULL');
205: FND_MESSAGE.SET_TOKEN('FIELD_NAME','LPN_ID');
206: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
207: RAISE FND_API.G_EXC_ERROR;
208: END IF;
209:
222: IF l_debug_on THEN
223: wsh_debug_sv.log(l_module_name,'There are no records in wsh_delivery_details for lpn_id: ', p_detail_info_tab(i).lpn_id);
224: END IF;
225:
226: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_DETAIL'); --bmso new message
227: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
228: RAISE FND_API.G_EXC_ERROR;
229: END;
230: IF p_IN_rec.caller <> WSH_GLBL_VAR_STRCT_GRP.c_skip_miss_info THEN
273: FETCH c_lpn_exist INTO l_dummy;
274: CLOSE c_lpn_exist;
275:
276: IF l_dummy = 1 THEN
277: FND_MESSAGE.SET_NAME('WSH','WSH_DUPLICATE_RECORD');
278: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
279: RAISE FND_API.G_EXC_ERROR;
280: END IF;
281:
302: IF l_debug_on THEN
303: wsh_debug_sv.log(l_module_name,'Invalid Action Code',
304: p_IN_rec.action_code);
305: END IF;
306: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_ACTION_CODE');
307: FND_MESSAGE.SET_TOKEN('ACT_CODE',p_IN_rec.action_code);
308: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR,l_module_name);
309: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
310: END IF; --}
303: wsh_debug_sv.log(l_module_name,'Invalid Action Code',
304: p_IN_rec.action_code);
305: END IF;
306: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_ACTION_CODE');
307: FND_MESSAGE.SET_TOKEN('ACT_CODE',p_IN_rec.action_code);
308: WSH_UTIL_CORE.Add_Message(WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR,l_module_name);
309: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
310: END IF; --}
311:
901: l_raise_error_flag := TRUE;
902: END IF;
903:
904: IF l_raise_error_flag THEN
905: FND_MESSAGE.SET_NAME('WSH','WSH_REQUIRED_FIELD_NULL');
906: FND_MESSAGE.SET_TOKEN('FIELD_NAME',l_param_name);
907: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
908: RAISE FND_API.G_EXC_ERROR;
909: END IF;
902: END IF;
903:
904: IF l_raise_error_flag THEN
905: FND_MESSAGE.SET_NAME('WSH','WSH_REQUIRED_FIELD_NULL');
906: FND_MESSAGE.SET_TOKEN('FIELD_NAME',l_param_name);
907: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
908: RAISE FND_API.G_EXC_ERROR;
909: END IF;
910:
912: RAISE FND_API.G_EXC_ERROR;
913: END IF;
914:
915: IF p_action_prms.action_code NOT IN ('PACK', 'UNPACK', 'ASSIGN', 'UNASSIGN', 'DELETE') THEN
916: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_ACTION_CODE');
917: FND_MESSAGE.SET_TOKEN('ACT_CODE',p_action_prms.action_code);
918: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
919: RAISE FND_API.G_EXC_ERROR;
920: END IF;
913: END IF;
914:
915: IF p_action_prms.action_code NOT IN ('PACK', 'UNPACK', 'ASSIGN', 'UNASSIGN', 'DELETE') THEN
916: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_ACTION_CODE');
917: FND_MESSAGE.SET_TOKEN('ACT_CODE',p_action_prms.action_code);
918: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
919: RAISE FND_API.G_EXC_ERROR;
920: END IF;
921:
1324: );
1325: --
1326: IF (l_fill_status = 'O') THEN
1327: --{
1328: FND_MESSAGE.SET_NAME('WSH', 'WSH_CONT_OVERPACKED');
1329: FND_MESSAGE.SET_TOKEN('CONT_NAME', p_action_prms.lpn_rec.container_name);
1330: wsh_util_core.add_message(wsh_util_core.g_ret_sts_warning);
1331: l_num_warnings := l_num_warnings + 1;
1332: --}
1325: --
1326: IF (l_fill_status = 'O') THEN
1327: --{
1328: FND_MESSAGE.SET_NAME('WSH', 'WSH_CONT_OVERPACKED');
1329: FND_MESSAGE.SET_TOKEN('CONT_NAME', p_action_prms.lpn_rec.container_name);
1330: wsh_util_core.add_message(wsh_util_core.g_ret_sts_warning);
1331: l_num_warnings := l_num_warnings + 1;
1332: --}
1333: ELSIF (l_fill_status = 'U') THEN
1331: l_num_warnings := l_num_warnings + 1;
1332: --}
1333: ELSIF (l_fill_status = 'U') THEN
1334: --{
1335: FND_MESSAGE.SET_NAME('WSH', 'WSH_CONT_OVERPACKED');
1336: FND_MESSAGE.SET_TOKEN('CONT_NAME', p_action_prms.lpn_rec.container_name);
1337: wsh_util_core.add_message(wsh_util_core.g_ret_sts_warning);
1338: l_num_warnings := l_num_warnings + 1;
1339: --}
1332: --}
1333: ELSIF (l_fill_status = 'U') THEN
1334: --{
1335: FND_MESSAGE.SET_NAME('WSH', 'WSH_CONT_OVERPACKED');
1336: FND_MESSAGE.SET_TOKEN('CONT_NAME', p_action_prms.lpn_rec.container_name);
1337: wsh_util_core.add_message(wsh_util_core.g_ret_sts_warning);
1338: l_num_warnings := l_num_warnings + 1;
1339: --}
1340: END IF;
1906: EXCEPTION
1907:
1908: WHEN WSH_INVALID_PARENT THEN
1909: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1910: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_PARENT');
1911: WSH_UTIL_CORE.Add_Message(x_return_status);
1912: --
1913: -- Debug Statements
1914: --
1919: END IF;
1920: --
1921: WHEN WSH_INVALID_TRIP THEN
1922: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1923: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_TRIP');
1924: WSH_UTIL_CORE.Add_Message(x_return_status);
1925: --
1926: -- Debug Statements
1927: --
1932: END IF;
1933:
1934: WHEN WSH_INVALID_DECONSOL_POINT THEN
1935: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1936: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_DECONSOL_POINT');
1937: WSH_UTIL_CORE.Add_Message(x_return_status);
1938: --
1939: -- Debug Statements
1940: --