 
 (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))
+  (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)
 


      (summarize-and-store (u/to-ISO-8601 (t/minus start-day (t/days 1))) (u/to-ISO-8601 end-day))
      
      (let [summaries (select usage-summaries)]
        (is (= [{:disk-GB {:unit_minutes 144720.0}, :RAM-GB {:unit_minutes 11520.0}, :nb-cpu {:unit_minutes 2880.0}}] 
          (map (comp u/deserialize :usage) (select usage-summaries)))))))





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