272: -- IN parameters:
273: -- 1. p_uom: uom name
274: -- 2. p_uom_class: class name (only applies to weight and volumn)
275: --
276: -- Returns a Uom_Code searching into mtl_units_of_measure
277: -- using first uom_code then unit_of_measure
278: -------------------------------------------------------------------------------
279: FUNCTION GET_UOM_CODE(p_uom IN VARCHAR2,
280: p_uom_class IN VARCHAR2 DEFAULT NULL) RETURN VARCHAR2 IS
287: IF (p_uom_class IS NULL OR p_uom_class NOT IN ('Weight', 'Volume')) THEN
288: BEGIN
289: -- First check with UOM_CODE
290: SELECT uom_code INTO l_code
291: FROM mtl_units_of_measure
292: WHERE uom_code = p_uom;
293: EXCEPTION
294: WHEN NO_DATA_FOUND THEN
295: BEGIN
295: BEGIN
296: -- If the given value can't be found as UOM_CODE
297: -- try with UNIT_OF_MEASURE
298: SELECT uom_code INTO l_code
299: FROM mtl_units_of_measure
300: WHERE unit_of_measure = p_uom;
301: EXCEPTION
302: WHEN OTHERS THEN
303: RETURN NULL;
310: IF (l_shipping_uom_class IS NOT NULL) THEN
311: BEGIN
312: -- First check with UOM_CODE
313: SELECT uom_code INTO l_code
314: FROM mtl_units_of_measure
315: WHERE uom_code = p_uom
316: AND uom_class = l_shipping_uom_class;
317: EXCEPTION
318: WHEN NO_DATA_FOUND THEN
319: BEGIN
320: -- If the given value can't be found as UOM_CODE
321: -- try with UNIT_OF_MEASURE
322: SELECT uom_code INTO l_code
323: FROM mtl_units_of_measure
324: WHERE unit_of_measure = p_uom
325: AND uom_class = l_shipping_uom_class;
326: EXCEPTION
327: WHEN OTHERS THEN