       (rc/-insertEnd joe-exo-end)
       (summarize-and-store (u/to-ISO-8601 start-day) (u/to-ISO-8601 end-day))
 
-      (let [summary (-> (select usage-summaries)
+      (let [summary (-> (select usage_summaries)
                         first
                         :usage  
                         u/deserialize)]


(defn delete-all [f]
  (rc/-init)
  (defentity usage-records)
  (defentity usage-summaries)
  (delete usage-records)
  (delete usage-summaries)
  (log/debug "All usage-records deleted")
  (log/debug "usage records " (select usage-records))
  (log/debug "usage summaries " (select usage-summaries))
  (f))
(use-fixtures :each delete-all)



(defn check-summaries
  []  
  (doseq [summary (select usage_summaries)]    
    (if (= "exoscale-ch-gva"  (:cloud summary))
      (do
        (is (= "joe"              (:user summary)))
