     (reset! rows-cursor sorted-rows)))
 
 
+;;; -------------------------------------------
+;;; Фильтрование
 (defn filter-rows-numeric
+  "Отфильтровать строки по числу"
   [rows filter-cond field-name value]
   (filter #((case filter-cond ; получаем оператор сравнения
               :gt >

  (reset! (app-cursor :show-text-filter?) false))


(defn current-filter-checkboxes-from-rows
  []
  (let [rows @(app-cursor :rows)]
    (map #(-> {:id (:id %)
              :name (:brand %)
              :checked? false})
           @(app-cursor :rows))
    ))

;; (defn show-filter-popup
;;   [evt]

  )


(defn change-numeric-filter-search-str
  [column active-col-filter value]
  (println "change-NUM-filter-search-str " value)
  (swap! (rum/cursor-in app-state [:active-col-filters])
         #(assoc-in % [(:index column) :search-str] value))
;;   (println @(rum/cursor-in app-state [:active-col-filters]))
  )

(defn change-text-filter-search-str
  [column active-col-filter value]
  (println "change-TEXT-filter-search-str " value)
  (swap! (rum/cursor-in app-state [:active-col-filters])
         ;; если уже был фильтр на эту колонну
         #(if active-col-filter
            ;; изменяем одно поле
            (assoc-in % [(:index column) :search-str] value)
            ;; иначе создаем первоначальную инфу по фильтру
            (assoc % (:index column)
              (assoc (column->init-col-filter column)
                                     :search-str value))))
;;   (println @(rum/cursor-in app-state [:active-col-filters]))
  )


(defn current-filter-checkboxes-to-column
  "Получить список чекбоксов для фильтра для конкр.столбца"
  [column]
  (let [c-rows (get-filtered-rows @init-rows
                                  @(app-cursor :active-col-filters))]
    (into [] (map-indexed (fn[i r]
                            {:index i
                             :name (get r (:field-name column))
                             :checked? true})
                         c-rows))))


(defn show-filter-popup
  "Показать контекстное меню для добавления записи в категорию"
  [evt column]
  (do
    (println "show-filter-popup!")
    (let [top-offset (-> (.-target evt)
