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

ledger params.

Browse Source
This commit is contained in:
Bryce Covert
2020-08-22 08:10:36 -07:00
parent e8301b071d
commit 9f765fd493
6 changed files with 96 additions and 188 deletions
Download Patch File Download Diff File Expand all files Collapse all files

31
src/cljs/auto_ap/views/pages/transactions.cljs
View File

@@ -103,34 +103,21 @@
(defn content []
(let [notification (re-frame/subscribe [::notification])
user @(re-frame/subscribe [::subs/user])
(let [user @(re-frame/subscribe [::subs/user])
params @(re-frame/subscribe [::data-page/params ::page])]
[:div
[:h1.title "Transactions"]
[status/status-notification {:statuses [[::status/single ::unapprove-all]
[::status/single ::manual-import]]}]
(when (= "admin" (:user/role user))
[:div
(when (:message @notification)
(list
[:div.notification
(:message @notification)]
(when (seq (:errors @notification))
[:div.notification.is-danger
[:h3 (count (:errors @notification)) " errors:"]
[:ul
(for [transaction (:errors @notification)
error (:errors transaction)]
[:li (:description-original transaction) "-" (:details error)])]])))
[:div.is-pulled-right
[:div.buttons
[:button.button.is-outlined.is-primary {:on-click (dispatch-event [::manual/opening])}
"Manual Yodlee Import"]
[:button.button.is-outlined.is-danger {:on-click (dispatch-event [::unapprove-all params])
:class (status/class-for @(re-frame/subscribe [::status/single ::unapprove-all]))
:disabled (status/disabled-for @(re-frame/subscribe [::status/single ::unapprove-all]))}
"Unapprove all"]]]])
[:div.is-pulled-right
[:div.buttons
[:button.button.is-outlined.is-primary {:on-click (dispatch-event [::manual/opening])}
"Manual Yodlee Import"]
[:button.button.is-outlined.is-danger {:on-click (dispatch-event [::unapprove-all params])
:class (status/class-for @(re-frame/subscribe [::status/single ::unapprove-all]))
:disabled (status/disabled-for @(re-frame/subscribe [::status/single ::unapprove-all]))}
"Unapprove all"]]])
[table/table {:id :transactions
:data-page ::page}]]))