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

hopefully adds routing numbers

Browse Source
This commit is contained in:
Bryce Covert
2018-07-14 12:31:29 -07:00
parent b663b862dc
commit fc0f727fb8
2 changed files with 6 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@@ -80,7 +80,7 @@
[[:cell {:colspan 2}] [[:cell {:colspan 2}]
[:cell {:colspan 10 :leading 30} [:cell {:colspan 10 :leading 30}
[:phrase {:size 18 :ttf-name "public/micrenc.ttf"} (str "c" check "c a" (:acct-number (:bank company)) "a 10302c")]]] [:phrase {:size 18 :ttf-name "public/micrenc.ttf"} (str "c" check "c a" (:routing (:bank company)) "a " (:acct-number (:bank company)) "c")]]]
[[:cell {:colspan 12 :leading 18} [:spacer]]] [[:cell {:colspan 12 :leading 18} [:spacer]]]
@@ -198,6 +198,7 @@
:address (:address company) :address (:address company)
:bank {:name (:bank-name bank-account) :bank {:name (:bank-name bank-account)
:acct (:bank-code bank-account) :acct (:bank-code bank-account)
:routing (:routing bank-account)
:acct-number (:number bank-account)}}} :acct-number (:number bank-account)}}}
:invoices (map :id invoices)})) :invoices (map :id invoices)}))

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

@@ -34,7 +34,10 @@
(defn extract-check-number [{{description-original :original} :description}] (defn extract-check-number [{{description-original :original} :description}]
(if-let [[_ check-number] (re-find #"(?i)check[^0-9]+([0-9]*)" description-original)] (if-let [[_ check-number] (re-find #"(?i)check[^0-9]+([0-9]*)" description-original)]
(Integer/parseInt check-number) (try
(Integer/parseInt check-number)
(catch NumberFormatException e
nil))
nil)) nil))
(defn import-transactions [transactions transaction->company transaction->bank-account-id] (defn import-transactions [transactions transaction->company transaction->bank-account-id]