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

ledger final fixes

Browse Source
This commit is contained in:
Bryce Covert
2020-09-30 20:54:32 -07:00
parent 45f4ba4e03
commit 3ace024437
5 changed files with 70 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@@ -134,7 +134,7 @@
(:error state)
"An unexpected error occured.")]))])
(if (seq info-states)
[:div.notification
[:div.notification.is-info.is-light
(for [state states]
(do
^{:key (:info state)}

35
src/cljs/auto_ap/views/pages/ledger/external_ledger.cljs
View File

@@ -63,7 +63,8 @@
(re-frame/reg-event-fx
::unmounted
(fn [{:keys [db]} _]
{:dispatch [::data-page/dispose ::page]
{:dispatch-n [[::data-page/dispose ::page]
[::status/dispose-single ::delete-selected]]
::track/dispose {:id ::params}}))
(re-frame/reg-event-fx
@@ -73,13 +74,39 @@
:subscription [::data-page/params ::page]
:event-fn (fn [params] [::params-change params])}}))
(re-frame/reg-event-fx
::delete-successful
(fn [cofx [_ result params]]
{:dispatch-n [[::params-change params]
[::status/info ::delete-selected (:message (:delete-external-ledger result))]]}))
(re-frame/reg-event-fx
::delete-selected
(fn [cofx [_ params]]
(let [checked @(re-frame/subscribe [::data-page/checked ::page])
checked-params (get checked "header")
specific-ledger-entries (map :id (vals (dissoc checked "header")))]
{:db (:db cofx)
:graphql {:token (-> cofx :db :user)
:owns-state {:single ::delete-selected}
:query-obj
{:venia/operation {:operation/type :mutation
:operation/name "DeleteExternalLedger"}
:venia/queries [{:query/data
[:delete-external-ledger
{:filters (some-> checked-params data-params->query-params)
:ids specific-ledger-entries}
[:message]]}]}
:on-success (fn [result]
[::delete-successful result params])}})))
(defn ledger-content []
(let [current-client @(re-frame/subscribe [::subs/client])
params @(re-frame/subscribe [::data-page/params ::page])
checked @(re-frame/subscribe [::data-page/checked ::page])]
[:div
[:h1.title "External Ledger"]
[status/status-notification {:statuses [[::status/single ::delete-selected]]}]
[:div.is-pulled-right
[:div.buttons
(into [:div.tags ] (map (fn [[z {:keys [id external-id]}]]
@@ -91,10 +118,10 @@
[:button.delete.is-small {:on-click
(dispatch-event [::data-page/remove-check ::page id])}]]))
checked))
[:button.button.is-danger {#_#_:on-click (dispatch-event [::delete-selected params])
[:button.button.is-danger {:on-click (dispatch-event [::delete-selected params])
:class (status/class-for @(re-frame/subscribe [::status/single ::delete-selected]))
:disabled true #_(or (status/disabled-for @(re-frame/subscribe [::status/single ::delete-selected]))
(not (seq checked)))}
:disabled (or (status/disabled-for @(re-frame/subscribe [::status/single ::delete-selected]))
(not (seq checked)))}
"Delete selected"]]]
[table/table {:id :ledger
:data-page ::page}]]))