extra logging

src/clj/auto_ap/graphql/transactions.clj

@@ -590,6 +590,7 @@
    :bulk_code_transactions {:type    :message
                             :args    {:filters {:type :transaction_filters}
                                       :vendor  {:type :id}
+                                      :client_id  {:type :id}
                                       :approval_status  {:type :transaction_approval_status}
                                       :accounts {:type '(list :edit_percentage_account)}
                                       :ids     {:type '(list :id)}}

src/clj/auto_ap/handler.clj

@@ -224,7 +224,9 @@
                              [client-id])
                            x-clients)
                          (catch Exception e
-                           (alog/warn ::cant-access :error e)
+                           (alog/warn ::cant-access :error e
+                                      :identity identity
+                                      :x-clients (pr-str x-clients))
                            :all))
           new-request (if x-clients
                         (assoc-in request [:session :client-selection] x-clients)