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

more debugging info.

Browse Source
This commit is contained in:
Bryce Covert
2018-07-30 17:58:24 -07:00
parent 83ba0e4db0
commit 49373bb9aa
2 changed files with 2 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/clj/auto_ap/routes/checks.clj
View File

@@ -178,7 +178,7 @@
(defmulti check-for-invoices (fn [invoices vendor-id vendors company bank-account index invoice-amounts] (defmulti check-for-invoices (fn [invoices vendor-id vendors company bank-account index invoice-amounts]
(:type bank-account))) (or (:type bank-account) "check")))
(defmethod check-for-invoices "check" [invoices vendor-id vendors company bank-account index invoice-amounts] (defmethod check-for-invoices "check" [invoices vendor-id vendors company bank-account index invoice-amounts]
(let [uuid (str (UUID/randomUUID)) (let [uuid (str (UUID/randomUUID))

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

@@ -112,6 +112,7 @@
(defn do-import [] (defn do-import []
(let [transactions (client/get-transactions) (let [transactions (client/get-transactions)
_ (println "ALL Transactions:" transactions)
all-bank-accounts (mapcat (fn [c] (map all-bank-accounts (mapcat (fn [c] (map
(fn [{:keys [id yodlee-account-id]}] (fn [{:keys [id yodlee-account-id]}]
(when (and id yodlee-account-id) (when (and id yodlee-account-id)