349: End If;
350:
351: IF x_return_status = fnd_api.g_ret_sts_error THEN
352: IF is_debug then
353: print_debug('Error from INV_QUANTITY_TREE_PVT.Lock_Tree',
354: 'Inv_Express_Pick_Pub.Pick_release');
355: END IF;
356: RAISE fnd_api.g_exc_error ;
357: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
355: END IF;
356: RAISE fnd_api.g_exc_error ;
357: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
358: If is_debug then
359: print_debug('Unexpected error from INV_QUANTITY_TREE_PVT.Lock_Tree',
360: 'Inv_Express_Pick_Pub.Pick_release');
361: End If;
362: RAISE fnd_api.g_exc_unexpected_error;
363: END IF;
389: End If;
390:
391: IF x_return_status = fnd_api.g_ret_sts_error THEN
392: IF is_debug then
393: print_debug('Error from INV_QUANTITY_TREE_PVT.Lock_Tree',
394: 'Inv_Express_Pick_Pub.Pick_release');
395: END IF;
396: RAISE fnd_api.g_exc_error ;
397: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
395: END IF;
396: RAISE fnd_api.g_exc_error ;
397: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
398: If is_debug then
399: print_debug('Unexpected error from INV_QUANTITY_TREE_PVT.Lock_Tree',
400: 'Inv_Express_Pick_Pub.Pick_release');
401: End If;
402: RAISE fnd_api.g_exc_unexpected_error;
403: END IF;
429: ((l_rsv_qty < l_dd_qty) AND (p_allow_partial_pick = g_true) AND (l_cur_ship_set_id IS NULL)))
430: THEN
431: --Lock item/org comobo so that no Pick release process could not release them concurrently.
432:
433: INV_QUANTITY_TREE_PVT.Lock_Tree(p_api_version_number => l_api_version
434: , p_init_msg_lst => fnd_api.g_false
435: , x_return_status => x_return_status
436: , x_msg_count => x_msg_count
437: , x_msg_data => x_msg_data
444: End If;
445:
446: IF x_return_status = fnd_api.g_ret_sts_error THEN
447: IF is_debug then
448: print_debug('Error from INV_QUANTITY_TREE_PVT.Lock_Tree',
449: 'Inv_Express_Pick_Pub.Pick_release');
450: END IF;
451: RAISE fnd_api.g_exc_error ;
452: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
450: END IF;
451: RAISE fnd_api.g_exc_error ;
452: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
453: If is_debug then
454: print_debug('Unexpected error from INV_QUANTITY_TREE_PVT.Lock_Tree',
455: 'Inv_Express_Pick_Pub.Pick_release');
456: End If;
457: RAISE fnd_api.g_exc_unexpected_error;
458: END IF;