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

You can import transactions for more than one bank account at the same time.

Browse Source
This commit is contained in:
Bryce Covert
2018-11-08 18:46:25 -08:00
parent 9c389396fe
commit 04d9ff167a
2 changed files with 17 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@@ -90,7 +90,7 @@
(catch Exception e
(println e)))))
(defn manual-import [manual-transactions company-id]
(defn manual-import [manual-transactions]
(let [transformed-transactions (->> manual-transactions
(filter #(= "posted" (:status %)))
(group-by #(select-keys % [:date :description-original :amount]))
@@ -99,8 +99,9 @@
(mapcat (fn [transaction-group]
(map
(fn [index {:keys [date description-original high-level-category amount account-id] :as transaction}]
(fn [index {:keys [date description-original high-level-category amount account-id company-id] :as transaction}]
{:id (str date "-" account-id "-" description-original "-" amount "-" index "-" company-id)
:company-id company-id
:bank-account-id account-id
:date (time/unparse date "YYYY-MM-dd")
:amount {:amount amount}
@@ -111,7 +112,7 @@
transaction-group))))]
(println "importing manual transactions" transformed-transactions)
(import-transactions transformed-transactions (constantly company-id) :bank-account-id)))
(import-transactions transformed-transactions :company-id :bank-account-id)))
(defn do-import []
(let [transactions (client/get-transactions)