Adds capability back for all accounts export

src/clj/auto_ap/graphql/accounts.clj

@@ -18,6 +18,12 @@
         [accounts accounts-count ] (d-accounts/get-graphql (<-graphql args))]
     (result->page accounts accounts-count :accounts args)))
 
+(defn get-all-graphql [context args _]
+  (assert-admin (:id context))
+  (let [args                     (assoc args :id (:id context))
+        [accounts accounts-count ] (d-accounts/get-graphql (assoc (<-graphql args) :per-page Integer/MAX_VALUE))]
+    accounts))
+
 (defn default-for-vendor [context args _]
   (assert-can-see-client (:id context) (:client_id args))
   (let [result (d-accounts/get-for-vendor (:vendor_id args) (:client_id args))]