Description filter

src/cljs/auto_ap/views/pages/transactions.cljs

@@ -114,6 +114,24 @@
      {:dispatch [::params-change (::params updated)]
       :db updated})))
 
+(re-frame/reg-event-fx
+ ::description-settled
+ (fn [{:keys [db]} [_ description]]
+   (let [updated (-> db
+                     (assoc-in  [::params :description] description))]
+     {:dispatch [::params-change (::params updated)]
+      :db updated})))
+
+
+(re-frame/reg-event-fx
+ ::description-changed
+ (fn [{:keys [db]} [_ description]]
+   {:dispatch-debounce 
+    {:event [::description-settled description]
+     :time 500
+     :key ::description}
+    :db (assoc-in db [::transaction-page :description] description)}))
+
 (re-frame/reg-sub
  ::notification
  (fn [db]
@@ -207,6 +225,7 @@
          {:on-change-event [::change-selected-bank-account]
           :value (:bank-acount-filter @(re-frame/subscribe [::transaction-page]))
           :bank-accounts @(re-frame/subscribe [::subs/bank-accounts])}]]
+
        [:p.menu-label "Date Range"]
        [:div
         [date-range-filter
@@ -225,8 +244,15 @@
                            :on-change #(re-frame/dispatch [::change-selected-vendor %])
                            :match->text :name
                            :type "typeahead-entity"
-                           :value (:vendor-filter @(re-frame/subscribe [::transaction-page]))}]
-        ] ]
+                           :value (:vendor-filter @(re-frame/subscribe [::transaction-page]))}]]
+
+       [:p.menu-label "Description"]
+       [:div
+        [:div.field
+         [:div.control [:input.input {:placeholder "CHECK 123 ABC"
+                                      :value (:description @(re-frame/subscribe [::transaction-page]))
+                                      :on-change (fn [e]
+                                                   (re-frame/dispatch [::description-changed (.. e -target -value) ]))} ]]]]]
       :main [(get main-content approval-status)]
 
       :bottom [:div