fixes.

src/cljs/auto_ap/views/pages/ledger/side_bar.cljs

@@ -2,9 +2,33 @@
   (:require [auto-ap.routes :as routes]
             [auto-ap.subs :as subs]
             [auto-ap.views.utils :refer [active-when]]
+            [auto-ap.views.components.typeahead :refer [typeahead-entity]]
             [bidi.bidi :as bidi]
             [re-frame.core :as re-frame]))
 
+(re-frame/reg-sub
+ ::filters
+ (fn [db ]
+   (::filters db {})))
+
+(re-frame/reg-sub
+ ::filter
+ :<- [::filters]
+ (fn [filters [_ which]]
+   (filters which)))
+
+(re-frame/reg-sub
+ ::filter-params
+ :<- [::filters]
+ (fn [filters]
+   {:vendor-id (:id (:vendor filters))}))
+
+(re-frame/reg-event-fx
+ ::filter-changed
+ (fn [{:keys [db]} [_ which val]]
+   {:dispatch [:auto-ap.views.pages.ledger/params-change]
+    :db (assoc-in db [::filters which] val)}))
+
 (defn ledger-side-bar []
   (let [ap @(re-frame/subscribe [::subs/active-page])
         user @(re-frame/subscribe [::subs/user])]
@@ -35,4 +59,11 @@
          [:a.item {:href (bidi/path-for routes/routes :external-import-ledger)
                    :class [(active-when ap = :external-import-ledger)]}
           [:span.icon [:i {:class "fa fa-download"}]]
-          [:span {:class "name"} "External Import"]]])]]))
+          [:span {:class "name"} "External Import"]]])
+      [:p.menu-label "Vendor"]
+      [:div
+       [typeahead-entity {:matches @(re-frame/subscribe [::subs/vendors])
+                          :on-change #(re-frame/dispatch [::filter-changed :vendor %])
+                          :match->text :name
+                          :type "typeahead-entity"
+                          :value @(re-frame/subscribe [::filter :vendor])}]]]]))