Fixes P&L page to allow for specific locatiosn

This commit is contained in:
2023-03-10 14:56:58 -08:00
parent b669984673
commit cdf9aa571f
4 changed files with 18 additions and 2 deletions

View File

@@ -172,6 +172,7 @@ NOTE: Please review the transactions we may have question for you here: https://
:client-id (:client-id params)
:numeric-code (:numeric-code params)
:location (:location params)
:locations (:locations params)
:date-range (:date-range params)}))
(re-frame/reg-event-fx
@@ -206,12 +207,13 @@ NOTE: Please review the transactions we may have question for you here: https://
(re-frame/reg-event-fx
::investigate-clicked
(fn [{:keys [db]} [_ {:keys [location numeric-code client-id]
(fn [{:keys [db]} [_ {:keys [location numeric-code client-id locations]
{:keys [start end]} :date-range}]]
{:db (-> db (assoc ::ledger-list-active? true))
:dispatch [::data-page/additional-params-changed ::ledger {:client-id client-id
:numeric-code numeric-code
:location location
:locations locations
:date-range {:start (date->str start standard)
:end (date->str end standard)}}]}))