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

various fixes.

Browse Source
This commit is contained in:
Bryce Covert
2020-10-16 14:20:51 -07:00
parent 9c34a188fc
commit 8c746e2100
7 changed files with 47 additions and 23 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
src/cljs/auto_ap/views/components/invoice_table.cljs
View File

@@ -32,6 +32,7 @@
:amount-gte (:amount-gte (:amount-range params))
:amount-lte (:amount-lte (:amount-range params))
:location (:location params)
:unresolved (:unresolved params)
:invoice-number-like (:invoice-number-like params)
:client-id (:id @(re-frame/subscribe [::subs/client]))
:import-status (:import-status params)

39
src/cljs/auto_ap/views/components/invoices/side_bar.cljs
View File

@@ -1,20 +1,14 @@
(ns auto-ap.views.components.invoices.side-bar
(:require [re-frame.core :as re-frame]
[reagent.core :as r]
[clojure.string :as str]
[clojure.spec.alpha :as s]
[cljs-time.core :as c]
[goog.string :as gstring]
[bidi.bidi :as bidi]
[auto-ap.utils :refer [deep-merge ]]
[auto-ap.routes :as routes]
(:require [auto-ap.routes :as routes]
[auto-ap.subs :as subs]
[auto-ap.views.components.date-range-filter :refer [date-range-filter]]
[auto-ap.views.components.number-filter :refer [number-filter]]
[auto-ap.views.components.switch-field :refer [switch-field]]
[auto-ap.views.components.typeahead :refer [typeahead-entity]]
[auto-ap.views.utils :refer [active-when dispatch-event bind-field horizontal-field date->str str->date pretty standard query-params dispatch-value-change]]
[auto-ap.subs :as subs]
[auto-ap.events :as events]
[auto-ap.views.pages.data-page :as data-page]))
[auto-ap.views.pages.data-page :as data-page]
[auto-ap.views.utils :refer [active-when dispatch-value-change]]
[bidi.bidi :as bidi]
[re-frame.core :as re-frame]))
(defn invoice-number-filter [{:keys [data-page]}]
[:div.field
@@ -97,4 +91,21 @@
[:p.menu-label "Invoice #"]
[:div
[invoice-number-filter params]]])]))
[invoice-number-filter params]]
(when (= "admin" (:user/role user))
[:<>
[:p.menu-label "Admin only"]
[:div
[switch-field {:id "unresolved-only"
:checked (boolean @(re-frame/subscribe [::data-page/filter data-page :unresolved]))
:on-change (fn [e]
(re-frame/dispatch [::data-page/filter-changed data-page :unresolved (.-checked (.-target e))])
)
:label "Unresolved only"
:type "checkbox"}]]]
)
])]))