     "UPDATE metric USING TTL ? SET data = data + ? "
     "WHERE tenant = ? AND rollup = ? AND period = ? AND path = ? AND time = ?;")))
 
-(defn fetchq
+(def ^:const fetchq (str "SELECT data,time FROM metric WHERE "
+                         "path = ? AND tenant = ? AND rollup = ? AND period = ? "
+                         "AND time >= ? AND time <= ?;"))
+
+(defn fetchqp
   "Yields a cassandra prepared statement of 7 arguments:
 
 * `paths`: list of paths

        (let [min-point  (align-time from rollup)
              max-point  (align-time (apply min [to (now)]) rollup)]
          (if-let [series (and (seq paths)
                               (par-fetch session fetch! paths tenant rollup
                                          period min-point max-point))]
            (format "{\"from\":%s,\"to\":%s,\"step\":%s,\"series\":%s}"
                    min-point max-point rollup series)

                                                                                :remote 8192}}})
                    (alia/connect keyspace))
        insert! (insertq session)
        fetch!  (fetchqp session)]
    (reify
      Metricstore
      (channel-for [this]
