everything is now looked up through datomic

This commit is contained in:
Bryce Covert
2018-08-16 07:13:29 -07:00
parent a25232a195
commit 202ed6b0e2
5 changed files with 57 additions and 71 deletions

View File

@@ -512,6 +512,7 @@
(d/transact (d/connect uri))))
(defn load-entities []
(d/transact (d/connect uri)
[{:db/ident :test
@@ -555,7 +556,7 @@
(map
(fn [{:keys [name address id code locations email bank-accounts signature-file] client-id :id}]
(remove-nils #:client {:original-id id
:name (str name "-test")
:name (str name)
:code nil
:email email
:signature-file signature-file
@@ -706,7 +707,7 @@
(d/db (d/connect uri))))
(defn query-check-payments []
(d/q '[:find (pull ?e [*])
(d/q '[:find (pull ?e [* {:invoice-payment/payment [*]}])
:where [?e :invoice-payment/original-id]]
(d/db (d/connect uri))))