Makes integreat run on datomic cloud

src/clj/auto_ap/graphql/import_batch.clj

@@ -1,14 +1,13 @@
 (ns auto-ap.graphql.import-batch
   (:require
-   [auto-ap.datomic
-    :refer
-    [add-sorter-fields apply-pagination apply-sort-3 conn merge-query]]
+   [auto-ap.datomic :refer [add-sorter-fields apply-pagination apply-sort-3 conn merge-query pull-many-by-id]]
    [auto-ap.graphql.utils
     :refer
     [<-graphql assert-admin ident->enum-f result->page]]
    [clj-time.coerce :as coerce]
    [com.walmartlabs.lacinia.util :refer [attach-resolvers]]
    [datomic.api :as d]
+   [datomic.client.api :as dc]
    [auto-ap.graphql.utils :refer [attach-tracing-resolvers]]))
 
 (def default-read '[:db/id
@@ -36,19 +35,17 @@
 
     
     (cond->> query
-      true (d/query)
+      true (dc/q)
       true (apply-sort-3 args)
       true (apply-pagination args))))
 
 (defn graphql-results [ids db _]
-  (let [results (->> (d/pull-many db default-read ids)
-                     (group-by :db/id))]
+  (let [results (pull-many-by-id db default-read ids)]
     (->> ids
-         (map results)
-         (map first))))
+         (map results))))
 
 (defn get-graphql [args]
-  (let [db (d/db conn)
+  (let [db (dc/db conn)
         {ids-to-retrieve :ids matching-count :count} (raw-graphql-ids db args)]
     [(graphql-results ids-to-retrieve db args)
      matching-count]))