1410: l_conc_segments := concat_segments(l_appl_short_name,
1411: l_key_flex_code,
1412: l_structure_number);
1413:
1414: l_keystat_val := FND_FLEX_KEYVAL.Validate_Segs(
1415: OPERATION => l_validation_mode,
1416: APPL_SHORT_NAME => l_appl_short_name,
1417: KEY_FLEX_CODE => l_key_flex_code,
1418: STRUCTURE_NUMBER => l_structure_number,
1423:
1424: IF (l_keystat_val = FALSE) THEN
1425: RETURN F;
1426: ELSE
1427: l_id := FND_FLEX_KEYVAL.combination_id;
1428: p_item.inventory_item_id := l_id;
1429: END IF;
1430: END IF;
1431:
1524: l_conc_segments := concat_segments(l_appl_short_name,
1525: l_key_flex_code,
1526: l_structure_number);
1527:
1528: l_keystat_val := FND_FLEX_KEYVAL.Validate_Segs(
1529: OPERATION => l_validation_mode,
1530: APPL_SHORT_NAME => l_appl_short_name,
1531: KEY_FLEX_CODE => l_key_flex_code,
1532: STRUCTURE_NUMBER => l_structure_number,
1537:
1538: IF (l_keystat_val = FALSE) THEN
1539: RETURN F;
1540: ELSE
1541: l_id := FND_FLEX_KEYVAL.combination_id;
1542: p_item.inventory_item_id := l_id;
1543: END IF;
1544: END IF;
1545:
1648: l_structure_number);
1649:
1650: --inv_debug.message('l_conc_segments is ' || l_conc_segments);
1651:
1652: l_keystat_val := FND_FLEX_KEYVAL.Validate_Segs(
1653: OPERATION => p_validation_mode,
1654: APPL_SHORT_NAME => l_appl_short_name,
1655: KEY_FLEX_CODE => l_key_flex_code,
1656: STRUCTURE_NUMBER => l_structure_number,
1660: );
1661: IF (l_keystat_val = FALSE) THEN
1662: RETURN F;
1663: ELSE
1664: l_id := FND_FLEX_KEYVAL.combination_id;
1665: --inv_debug.message('l_id is ' || l_id);
1666: p_locator.inventory_location_id := l_id;
1667: if(p_validation_mode = EXISTS_OR_CREATE
1668: AND FND_FLEX_KEYVAL.new_combination)
1664: l_id := FND_FLEX_KEYVAL.combination_id;
1665: --inv_debug.message('l_id is ' || l_id);
1666: p_locator.inventory_location_id := l_id;
1667: if(p_validation_mode = EXISTS_OR_CREATE
1668: AND FND_FLEX_KEYVAL.new_combination)
1669: then
1670: --inv_debug.message('new combination');
1671: UPDATE mtl_item_locations
1672: SET subinventory_code = p_sub.secondary_inventory_name