Updating to include extra fields.

This commit is contained in:
BC
2019-02-02 17:13:22 -08:00
parent 7662569111
commit a257468b75
6 changed files with 12 additions and 11 deletions

View File

@@ -112,8 +112,8 @@
true (apply-pagination args))))
(defn graphql-results [ids db args]
(->> (d/pull-many db '[* {:transaction/client [:client/name :db/id]
:transaction/bank-account [:bank-account/name :bank-account/yodlee-account-id :db/id]}]
(->> (d/pull-many db '[* {:transaction/client [:client/name :db/id :client/code]
:transaction/bank-account [:bank-account/name :bank-account/code :bank-account/yodlee-account-id :db/id]}]
ids)
(map #(update % :transaction/date c/from-date))
(map #(update % :transaction/post-date c/from-date))