An Upper Bound Theorem for Rational Polytopes