CREATE or REPLACE FUNCTION capacidad_dorm_case(vinmueble dormitorio.inmueble_id%TYPE, vnum dormitorio.num%TYPE) RETURNS VARCHAR(7) AS $$
DECLARE
vcapacidad dormitorio.capacidad%TYPE;
tamanyo VARCHAR(7);
BEGIN
SELECT capacidad INTO vcapacidad FROM dormitorio
WHERE inmueble_id=vinmueble AND num=vnum;
IF FOUND THEN
 CASE
 WHEN vcapacidad <= 15 THEN tamanyo := 'pequeño';
 WHEN vcapacidad >= 25 THEN tamanyo := 'grande';
 ELSE tamanyo := 'mediano';
END CASE;
ELSE
 RAISE NOTICE 'No existe el dormitorio % del inmueble %',vnum,vinmueble;
END IF;
RETURN tamanyo;
END;
$$ LANGUAGE plpgsql;
