11047: END IF ;
11048:
11049: BEGIN
11050: SELECT uom_code INTO l_to_UOM_code
11051: FROM mtl_units_of_measure
11052: WHERE uom_class IN (SELECT uom_class
11053: FROM mtl_units_of_measure
11054: WHERE uom_code = p_to_UOM_code)
11055: AND base_uom_flag = 'Y';
11049: BEGIN
11050: SELECT uom_code INTO l_to_UOM_code
11051: FROM mtl_units_of_measure
11052: WHERE uom_class IN (SELECT uom_class
11053: FROM mtl_units_of_measure
11054: WHERE uom_code = p_to_UOM_code)
11055: AND base_uom_flag = 'Y';
11056: EXCEPTION
11057: WHEN No_Data_Found THEN
11059: END;
11060:
11061: BEGIN
11062: SELECT uom_code INTO l_from_UOM_code
11063: FROM mtl_units_of_measure
11064: WHERE uom_class IN (SELECT uom_class
11065: FROM mtl_units_of_measure
11066: WHERE uom_code = p_from_UOM_code)
11067: AND base_uom_flag = 'Y';
11061: BEGIN
11062: SELECT uom_code INTO l_from_UOM_code
11063: FROM mtl_units_of_measure
11064: WHERE uom_class IN (SELECT uom_class
11065: FROM mtl_units_of_measure
11066: WHERE uom_code = p_from_UOM_code)
11067: AND base_uom_flag = 'Y';
11068: EXCEPTION
11069: WHEN No_Data_Found THEN