Makes integreat run on datomic cloud

src/clj/auto_ap/import/intuit.clj

@@ -10,10 +10,12 @@
    [clojure.string :as str]
    [clojure.tools.logging :as log]
    [com.unbounce.dogstatsd.core :as statsd]
-   [datomic.api :as d]))
+   [datomic.client.api :as dc]
+   [mount.core :as mount]
+   [yang.scheduler :as scheduler]))
 
 (defn get-intuit-bank-accounts [db]
-  (d/q '[:find ?external-id ?ba ?c
+  (dc/q '[:find ?external-id ?ba ?c
          :in $ 
          :where
          [?c :client/bank-accounts ?ba]
@@ -49,7 +51,7 @@
                  :priority :low}
                 nil)
   (let [import-batch (t/start-import-batch :import-source/intuit "Automated intuit user")
-        db           (d/db conn)
+        db           (dc/db conn)
         end          (auto-ap.time/local-now)
         start        (time/plus end (time/days -30))]
     (try
@@ -76,8 +78,8 @@
 (defn upsert-accounts []
   (let [token (i/get-fresh-access-token)
         bank-accounts (i/get-bank-accounts token)]
-    @(d/transact conn (mapv
-                      (fn [ba]
-                        {:intuit-bank-account/external-id (:name ba)
-                         :intuit-bank-account/name (:name ba)})
-                      bank-accounts))))
+    (dc/transact conn {:tx-data (mapv
+                                  (fn [ba]
+                                    {:intuit-bank-account/external-id (:name ba)
+                                     :intuit-bank-account/name        (:name ba)})
+                                  bank-accounts)})))