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

Now you can add manual checks.

Browse Source
This commit is contained in:
BC
2018-06-28 23:24:01 -07:00
parent 5f6bc5beea
commit a23975f9cf
10 changed files with 171 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@@ -13,9 +13,10 @@
first
:id))
(defn transaction->check-id [_ check-number company-id vendor-id]
(defn transaction->check-id [_ check-number company-id bank-account-id vendor-id]
(when check-number
(-> (checks/get-graphql {:company-id company-id
:bank-account-id bank-account-id
:check-number check-number})
first
:id)))
@@ -54,11 +55,12 @@
status :status}
transaction
transaction (if (= 0 (rand-int 3))
(assoc-in transaction [:description :original] (str "check xxx" (rand-nth ["6789" "1234" "6790"])))
(assoc-in transaction [:description :original] (str "check xxx1236"))
transaction)
check-number (extract-check-number transaction)
company-id (account->company account-id)
vendor-id (transaction->vendor-id transaction)]]
vendor-id (transaction->vendor-id transaction)
bank-account-id (yodlee-account-id->bank-account-id account-id)]]
(try
(transactions/upsert!
@@ -74,8 +76,8 @@
:company-id company-id
:vendor-id vendor-id
:check-number check-number
:bank-account-id (yodlee-account-id->bank-account-id account-id)
:check-id (transaction->check-id transaction check-number company-id vendor-id)
:bank-account-id bank-account-id
:check-id (transaction->check-id transaction check-number company-id bank-account-id vendor-id)
})
(catch Exception e
(println e))))))