Makes multiple client selection somewhat possible via graphql.

src/clj/auto_ap/graphql/transactions.clj

@@ -52,7 +52,8 @@
                       {:validation-error  "In order to select potential duplicates, you must filter your view more."})))))
 
 (defn get-transaction-page [context args _]
-  (let [args (assoc (:filters args) :id (:id context))
+  (let [args (assoc (:filters args)
+                    :clients (:clients context))
         _ (assert-filtered-enough args)
         [transactions transactions-count] (d-transactions/get-graphql (update (<-graphql args) :approval-status enum->keyword  "transaction-approval-status"))
         transactions (map ->graphql (map approval-status->graphql transactions))]
@@ -85,7 +86,7 @@
        (map first)))
 (defn bulk-change-status [context args _]
   (let [_ (assert-admin (:id context))
-        args (assoc args :id (:id context))
+        args (assoc args :clients (:clients context))
         all-ids (->> (get-ids-matching-filters args)
                      all-ids-not-locked)]
 
@@ -137,10 +138,11 @@
 
 (defn bulk-code-transactions [context args _]
   (assert-admin (:id context))
-  (when-not (:client_id args)
+  (when-not (seq (:client_id args))
     (throw (ex-info "Client is required"
                     {:validation-error "client is required"})))
-  (let [args    (assoc args :id (:id context)) 
+  ;; TODO FIX THIS TO WORK WITH MULTIPLE
+  (let [args    (assoc args :clients (:clients context)) 
         locations (pull-attr (dc/db conn)
                              :client/locations
                              (:client_id args))
@@ -184,7 +186,7 @@
 
 (defn delete-transactions [context args _]
   (let [_ (assert-admin (:id context))
-        args (assoc args :id (:id context))
+        args (assoc args :clients (:clients context))
         all-ids (all-ids-not-locked (get-ids-matching-filters args))
         db (dc/db conn)]