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

supporting transaction automation

Browse Source
This commit is contained in:
Bryce Covert
2019-05-16 13:45:14 -07:00
parent 6d85c2d67c
commit 26fbb89345
9 changed files with 21 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/cljs/auto_ap/events.cljs
View File

@@ -254,5 +254,5 @@
(fn [{:keys [db]} _]
{:graphql {:token (:user db)
:query-obj {:venia/queries [[:yodlee-merchants
[:name :yodlee-id]]]}
[:name :yodlee-id :id]]]}
:on-success [::yodlee-merchants-received]}}))

1
src/cljs/auto_ap/views/pages/admin/rules/common.cljs
View File

@@ -8,6 +8,7 @@
:dom-gte
:dom-lte
:transaction-approval-status
[:yodlee-merchant [:name :id :yodlee-id]]
[:vendor [:name :id]]
[:client [:name :id]]
[:bank-account [:name :id]]

5
src/cljs/auto_ap/views/pages/admin/rules/form.cljs
View File

@@ -43,6 +43,7 @@
:accounts
:note])
(assoc :vendor-id (:id (:vendor data)))
(assoc :yodlee-merchant-id (:id (:yodlee-merchant data)))
(update :accounts (fn [as]
(map #(-> %
(update :id (fn [i] (if (some-> i (str/starts-with? "new-"))
@@ -118,9 +119,9 @@
:dom-gte
:vendor
:accounts
:yodlee-merchant
:transaction-approval-status])
(update :accounts (fn [xs]
(println xs)
(mapv #(assoc % :amount-percentage (* (:percentage %) 100.0))
xs))))))))
@@ -219,7 +220,7 @@
[field "Yodlee Merchant"
[typeahead-entity {:matches @(re-frame/subscribe [::subs/yodlee-merchants])
:match->text #(str (:name %) " - " (:yodlee-id %))
:match->text #(do (println %) (str (:name %) " - " (:yodlee-id %)))
:type "typeahead-entity"
:field [:yodlee-merchant]}]]

2
src/cljs/auto_ap/views/pages/transactions/common.cljs
View File

@@ -9,7 +9,7 @@
[:vendor [:name :id]]
[:accounts [:id :amount :location [:account [:name :id :location :numeric-code]]]]
:date
[:yodlee_merchant [:name :yodlee-id]]
[:yodlee_merchant [:name :yodlee-id :id]]
:post_date
:status
:description_original