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

better way of keeping transactions up to date

Browse Source
This commit is contained in:
Bryce Covert
2020-09-25 06:07:19 -07:00
parent efb6b76670
commit 77786c084e
4 changed files with 14 additions and 28 deletions
Download Patch File Download Diff File Expand all files Collapse all files

17
src/clj/auto_ap/yodlee/import.clj
View File

@@ -194,8 +194,17 @@
([]
(do-import (client/get-transactions)))
([transactions]
(let [all-bank-accounts (get-all-bank-accounts)
transaction->bank-account (comp (by :bank-account/yodlee-account-id all-bank-accounts) :accountId)
all-rules (tr/get-all)]
(batch-transact (transactions->txs transactions transaction->bank-account (rm/rule-applying-fn all-rules) (get-existing))))))
(lc/with-context {:source "Import yodlee transactions"}
(do
(log/info "importing from yodlee")
(let [all-bank-accounts (get-all-bank-accounts)
transaction->bank-account (comp (by :bank-account/yodlee-account-id all-bank-accounts) :accountId)
all-rules (tr/get-all)]
(batch-transact (transactions->txs transactions transaction->bank-account (rm/rule-applying-fn all-rules) (get-existing))))))))
(mount/defstate import-transaction-worker
:start (scheduler/every (* 1000 60 60 4) do-import)
:stop (scheduler/stop import-transactions-cleared-against))