notid/integreat
1
0
Fork 0
Code Issues Pull Requests 1 Actions Packages Projects Releases Wiki Activity

one big transaction.

Browse Source
This commit is contained in:
Bryce Covert
2019-06-05 21:04:18 -07:00
parent 3d24927865
commit 303068f1fc
1 changed files with 12 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

20
src/clj/auto_ap/graphql/transactions.clj
View File

@@ -142,15 +142,19 @@
@(d/transact (d/connect uri) @(d/transact (d/connect uri)
(into (transduce
[(remove-nils (rm/apply-rule {:db/id (:db/id transaction) (map #(into
:transaction/amount (:transaction/amount transaction)} [(remove-nils (rm/apply-rule {:db/id (:db/id %)
transaction-rule :transaction/amount (:transaction/amount %)}
transaction-rule
(or (-> transaction :transaction/bank-account :bank-account/locations) (or (-> % :transaction/bank-account :bank-account/locations)
(-> transaction :transaction/client :client/locations))))] (-> % :transaction/client :client/locations))))]
(map (fn [x] [:db/retractEntity (:db/id x)] ) (map (fn [x] [:db/retractEntity (:db/id x)] )
(:transaction/accounts transaction)))))) (:transaction/accounts %))))
into
[]
transactions))))
(transduce (transduce
(comp (comp
(map d-transactions/get-by-id) (map d-transactions/get-by-id)