beginnings of better import.
This commit is contained in:
11
src/clj/auto_ap/graphql/intuit_bank_accounts.clj
Normal file
11
src/clj/auto_ap/graphql/intuit_bank_accounts.clj
Normal file
@@ -0,0 +1,11 @@
|
||||
(ns auto-ap.graphql.intuit-bank-accounts
|
||||
(:require [auto-ap.graphql.utils :refer [->graphql <-graphql assert-admin]]
|
||||
[auto-ap.datomic :refer [conn]]
|
||||
[datomic.api :as d]))
|
||||
|
||||
(defn get-intuit-bank-accounts [context args value]
|
||||
#_(assert-admin (:id context))
|
||||
(->graphql (map first (d/q '[:find (pull ?e [*])
|
||||
:in $
|
||||
:where [?e :intuit-bank-account/external-id]]
|
||||
(d/db conn)))))
|
||||
Reference in New Issue
Block a user