create or replace FUNCTION sal_ok (salary REAL, title REAL) 
 RETURN BOOLEAN IS 
        min_sal  REAL; 
        max_sal  REAL; 
    BEGIN 
        SELECT losal, hisal INTO min_sal, max_sal FROM sals 
            WHERE job = title; 
        RETURN (salary >= min_sal) AND (salary <= max_sal); 
    END sal_ok;