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

beginning to support new icons.

Browse Source
This commit is contained in:
BC
2019-01-24 23:54:18 -08:00
parent ec5fb059b8
commit c677d0191f
15 changed files with 2154 additions and 12 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@@ -19,14 +19,14 @@
[:li.menu-item
[:a.item {:href (bidi/path-for routes/routes :unpaid-invoices)
:class [(active-when ap = :unpaid-invoices)]}
[:span {:class "icon"}
[:i {:class "fa fa-envelope-open-o"}]]
[:span {:class "icon icon-accounting-document" :style {"font-size" "25px"}}]
[:span {:class "name"} "Unpaid Invoices"]]]
[:li.menu-item
[:a.item {:href (bidi/path-for routes/routes :paid-invoices)
:class [(active-when ap = :paid-invoices)]}
[:span {:class "icon"}
[:i {:class "fa fa-envelope-o"}]]
[:span {:class "icon icon-accounting-invoice-mail" :style {"font-size" "25px"}}]
[:span {:class "name"} "Paid Invoices"]]]]
]
[:div

22
src/cljs/auto_ap/views/pages/unpaid_invoices.cljs
View File

@@ -92,7 +92,6 @@
::toggle-check
(fn [db [_ data]]
(update-in db [::invoice-page :checked] (fn [x]
(let [x (or x #{})]
(if (x data)
(disj x data)
@@ -682,7 +681,7 @@
(defn vendor-filter []
(let [{:keys [vendor-filter]} @(re-frame/subscribe [::invoice-page])])
(let [{:keys [vendor-filter]} @(re-frame/subscribe [::invoice-page])]
[:div.field
[:div.control
[bind-field
@@ -693,7 +692,16 @@
:text-field [:vendor-name]
:event [::change-selected-vendor]
:spec (s/nilable ::invoice/vendor-id)
:subscription vendor-filter}]]]])
:subscription vendor-filter}]]]]))
(defn invoice-number-filter []
(let [{:keys [invoice-number-like] :as params} @(re-frame/subscribe [::params])]
[:div.field
[:div.control [:input.input {:placeholder "AP-123"
:value invoice-number-like
:on-change (fn [x]
(re-frame/dispatch [::params-change (assoc params :invoice-number-like (.. x -target -value)) ])
)} ]]]))
(def unpaid-invoices-content
(with-meta
@@ -778,9 +786,13 @@
(defn unpaid-invoices-page []
[side-bar-layout {:side-bar [invoices-side-bar {}
[:div [:p.menu-label "Vendor"]
[:p.menu-label "Vendor"]
[:div
[vendor-filter]]
]
[:p.menu-label "Invoice #"]
[:div
[invoice-number-filter]
]]
:main [unpaid-invoices-content]
:bottom [vendor-dialog {:vendor @(re-frame/subscribe [::subs/user-editing-vendor])
:save-event [::events/save-vendor]