removing hidden vendors.

This commit is contained in:
2022-12-08 08:21:17 -08:00
parent b2787b4732
commit c90be0db3e
2 changed files with 4 additions and 2 deletions

View File

@@ -239,7 +239,8 @@
:where [?vu :vendor-usage/client ?c] :where [?vu :vendor-usage/client ?c]
[?vu :vendor-usage/count ?count] [?vu :vendor-usage/count ?count]
[(>= ?vu 0)] [(>= ?vu 0)]
[?vu :vendor-usage/vendor ?v]] [?vu :vendor-usage/vendor ?v]
(not [?v :vendor/hidden true])]
(d/db conn) (d/db conn)
client) client)
(map (fn [[v]] (map (fn [[v]]

View File

@@ -5,6 +5,7 @@
[auto-ap.views.components.buttons :refer [fa-icon]] [auto-ap.views.components.buttons :refer [fa-icon]]
[auto-ap.views.components.layouts :refer [side-bar-layout]] [auto-ap.views.components.layouts :refer [side-bar-layout]]
[auto-ap.views.pages.company.side-bar :refer [company-side-bar]] [auto-ap.views.pages.company.side-bar :refer [company-side-bar]]
[goog.crypt.base64 :as b64]
[re-frame.core :as re-frame] [re-frame.core :as re-frame]
[reagent.core :as reagent] [reagent.core :as reagent]
[vimsical.re-frame.cofx.inject :as inject] [vimsical.re-frame.cofx.inject :as inject]
@@ -59,7 +60,7 @@
[:<> [:<>
[:div [:div
"Ready! Click " "Ready! Click "
[:a {:href (str "data:attachment/csv;charset=utf-8,%EF%BB%BF" (js/encodeURI (str/replace export-result "#" "Number "))) [:a {:href (str "data:attachment/csv;base64," (b64/encodeString export-result))
:target "_blank" :target "_blank"
:download (str "vendors-" (:code client) ".csv")} :download (str "vendors-" (:code client) ".csv")}
"here"] "here"]