profit and loss changes for more than one client.

src/cljs/auto_ap/views/components/buttons.cljs

@@ -13,6 +13,8 @@
      [:span.icon [:i.fa {:class icon}]]]
     (r/children (r/current-component)))])
 
+
+
 (defn sl-icon [{:keys [event icon class on-click] :as params}]
   [:a.button  (cond-> params
                   true (dissoc :event :icon)
@@ -25,3 +27,14 @@
                           :on-click (dispatch-event event)}
    [:span.icon [:i.fa.fa-plus]]
    [:span name]])
+
+(defn dropdown [{:keys [event icon class on-click] :as params}]
+  [:a.button (cond-> params
+               true (dissoc :event :icon)
+               (and (not on-click)
+                    event)
+               (assoc :on-click (dispatch-event event)))
+   (conj (into
+          [:<>]
+          (r/children (r/current-component)))
+         [:span.icon [:i.fa.fa-chevron-down]])])

src/cljs/auto_ap/views/components/switch_field.cljs

@@ -1,6 +1,6 @@
 (ns auto-ap.views.components.switch-field)
 
-(defn switch-field [{:keys [id label on-change checked]}]
+(defn switch-field [{:keys [id label on-change checked class]}]
   [:<> 
-   [:input.switch {:type "checkbox" :id id :on-change on-change :checked checked}]
+   [:input.switch {:type "checkbox" :id id :on-change on-change :checked checked :class class}]
    [:label {:for id} label]])