[Home] [Help]
1: PACKAGE BODY wms_pick_load_ui AS
2: /* $Header: WMSPLUIB.pls 120.8 2011/02/21 10:28:30 ssikhara ship $ */
3:
4: g_debug NUMBER := NVL(fnd_profile.VALUE('INV_DEBUG_TRACE'), 2);
5:
170: -- an LPN
171: IF p_is_loc_or_lpn = 'EITHER' THEN
172:
173: IF (g_debug = 1) THEN
174: debug('Check if entered value is an LPN', 'wms_pick_load_ui.validate_locator');
175: END IF;
176: IF p_allow_locator_change = 'N' THEN
177: IF p_serial_allocated = 'Y' THEN
178: wms_lpn_lovs.get_pick_load_serial_lpn_lov
265: -- from a different locator
266: IF x_locator_id IS NOT NULL AND x_locator_id <> p_suggested_loc_id THEN
267: IF p_allow_locator_change = 'N' THEN
268: IF (g_debug = 1) THEN
269: debug('Locator change is not allowed', 'wms_pick_load_ui.validate_locator');
270: END IF;
271: fnd_message.set_name('WMS', 'WMS_INVALID_VALUE');
272: fnd_msg_pub.add;
273: RAISE fnd_api.g_exc_error;
291:
292: IF (Nvl(l_alias_enabled, 'N') = 'Y') THEN
293: IF (p_confirm_locator_hidden = 'Y') THEN
294: IF (g_debug = 1) THEN
295: debug('130', 'wms_pick_load_ui.validate_locator_lpn.p_confirm_locator_hidden:' || p_confirm_locator_hidden);
296: END IF;
297: select concatenated_segments INTO l_locator_lpn
298: from wms_item_locations_kfv
299: where concatenated_segments = p_locator_lpn
300: and SUBINVENTORY_CODE = p_subinventory_code
301: and ORGANIZATION_ID = p_organization_id;
302: ELSE
303: IF (g_debug = 1) THEN
304: debug('131', 'wms_pick_load_ui.validate_locator_lpn.p_confirm_locator_hidden:' || p_confirm_locator_hidden);
305: END IF;
306: select concatenated_segments INTO l_locator_lpn
307: from wms_item_locations_kfv
308: where alias = p_locator_lpn
330: -- If Loc Change = No or Partail, check for the entered Loc in the Sub confirmed
331: IF p_allow_locator_change IN ('N', 'P') THEN
332:
333: IF (g_debug = 1) THEN
334: debug('Validating Loc with Loc Change = N (No), P (Partial - Diff loc from the same sub is valid)', 'wms_pick_load_ui.validate_locator');
335: END IF;
336:
337: /* Bug 4990550 changing the call to the newly added procedure 'get_pickload_loc' in inv_ui_item_sub_loc_lovs since the locator is no longer an LOV from 11510*/
338: inv_ui_item_sub_loc_lovs.get_pickload_loc
382: -- If Loc Change = Complete, check for the entered Loc in any sub
383: -- (filtering on sub not required)
384: ELSIF p_allow_locator_change = 'C' THEN
385: IF (g_debug = 1) THEN
386: debug('Validating Loc with Loc Change = C (Loc from even a diff sub is valid)', 'wms_pick_load_ui.validate_locator');
387: END IF;
388:
389: inv_ui_item_sub_loc_lovs.get_pickload_all_loc_lov
390: (x_locators => l_locators,
425: -- get the new lpn controlled value
426: IF x_subinventory_code <> p_suggested_sub THEN
427:
428: IF (g_debug = 1) THEN
429: debug('Check if subinventory is LPN controlled', 'wms_pick_load_ui.validate_locator');
430: END IF;
431:
432: SELECT Decode(lpn_controlled_flag, 1, 'Y', 'N')
433: INTO x_is_lpn_controlled
439: EXCEPTION
440: WHEN fnd_api.g_exc_error THEN
441:
442: IF (g_debug = 1) THEN
443: debug('Error', 'wms_pick_load_ui.validate_locator');
444: END IF;
445:
446: x_return_status := 'E';
447:
448: inv_mobile_helper_functions.get_stacked_messages(x_message => x_msg_data);
449:
450: WHEN OTHERS THEN
451: IF (g_debug = 1) THEN
452: debug('Unexpected Error: ' || Sqlerrm, 'wms_pick_load_ui.validate_locator');
453: END IF;
454:
455: x_return_status := 'U';
456:
457: inv_mobile_helper_functions.get_stacked_messages(x_message => x_msg_data);
458:
459: END validate_locator_lpn;
460:
461: END wms_pick_load_ui;