supporting some features for brian

2019-09-30 20:21:40 -07:00
parent c912fbed36
commit c8a7f05e28
2 changed files with 8 additions and 1 deletions
--- a/src/clj/auto_ap/routes/exports.clj
+++ b/src/clj/auto_ap/routes/exports.clj
@@ -61,7 +61,8 @@
                              (map <-graphql))
                             conj
                             (list)
-                             (first (d-ledger/get-graphql {}))))
+                             (first (d-ledger/get-graphql {:count Integer/MAX_VALUE
+                                                           :client-code (query-params "client-code")}))))

             (GET "/transactions/export" {:keys [query-params identity]}
                  (assert-admin identity)