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

refactored transactions.

Browse Source
This commit is contained in:
Bryce Covert
2019-04-26 13:20:40 -07:00
parent f1269085ae
commit 598da0f322
9 changed files with 104 additions and 98 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
src/cljs/auto_ap/views/pages/invoices/form.cljs
View File

@@ -147,13 +147,15 @@
::change-vendor
[(forms/in-form ::form)]
(fn [{{:keys [data]} :db} [_ field value]]
(if (and value (expense-accounts-field/can-replace-with-default? (:expense-accounts data)))
{:dispatch [::forms/change ::form
field value
[:expense-accounts] (expense-accounts-field/default-account (:expense-accounts data)
@(re-frame/subscribe [::subs/vendor-default-account value])
(:amount data))]}
{:dispatch [::forms/change ::form field value]})))
(let [locations @(re-frame/subscribe [::subs/locations-for-client (:client-id data)])]
(if (and value (expense-accounts-field/can-replace-with-default? (:expense-accounts data)))
{:dispatch [::forms/change ::form
field value
[:expense-accounts] (expense-accounts-field/default-account (:expense-accounts data)
@(re-frame/subscribe [::subs/vendor-default-account value])
(:amount data)
locations)]}
{:dispatch [::forms/change ::form field value]}))))
(re-frame/reg-event-fx