diff --git a/src/clj/auto_ap/db/checks.clj b/src/clj/auto_ap/db/checks.clj index afca5202..fff1be10 100644 --- a/src/clj/auto_ap/db/checks.clj +++ b/src/clj/auto_ap/db/checks.clj @@ -92,7 +92,7 @@ (not (nil? amount)) (helpers/merge-where [:= :amount amount]) (seq statuses ) (helpers/merge-where [:in :status statuses]))) -(defn get-graphql [{:keys [start sort-by asc id limit] :as args :or {limit 20}}] +(defn get-graphql [{:keys [start sort-by asc id limit] :as args :or {limit 100}}] (query (cond-> (base-graphql args) true (add-sort-by sort-by asc) diff --git a/src/clj/auto_ap/db/invoices.clj b/src/clj/auto_ap/db/invoices.clj index a68f6bfd..42536800 100644 --- a/src/clj/auto_ap/db/invoices.clj +++ b/src/clj/auto_ap/db/invoices.clj @@ -42,7 +42,6 @@ [:= :exist.vendor-id nil] [:= :v.vendor-id nil]]]]] :where [:= :exist.id nil] }]}) - statement (j/prepare-statement (j/get-connection (get-conn)) query @@ -150,7 +149,7 @@ (not (nil? status)) (helpers/merge-where [:= :status status]) (not (nil? company-id)) (helpers/merge-where [:= :company-id company-id]))) -(defn get-graphql [{:keys [start sort-by asc limit] :as args :or {limit 20}}] +(defn get-graphql [{:keys [start sort-by asc limit] :as args :or {limit 100}}] (query (cond-> (base-graphql args) diff --git a/src/clj/auto_ap/db/transactions.clj b/src/clj/auto_ap/db/transactions.clj index 99a247dd..3b5ffe22 100644 --- a/src/clj/auto_ap/db/transactions.clj +++ b/src/clj/auto_ap/db/transactions.clj @@ -27,7 +27,7 @@ (limited-companies id) (helpers/merge-where [:in :company-id (limited-companies id)]) (not (nil? company-id)) (helpers/merge-where [:= :company-id company-id]))) -(defn get-graphql [{:keys [start sort-by asc limit] :as args :or {limit 10}}] +(defn get-graphql [{:keys [start sort-by asc limit] :as args :or {limit 100}}] (query (cond-> (base-graphql args) #_#_(not (nil? sort-by) ) (add-sort-by sort-by asc) diff --git a/src/cljs/auto_ap/views/components/paginator.cljs b/src/cljs/auto_ap/views/components/paginator.cljs index c6e9fdc4..1ce18fda 100644 --- a/src/cljs/auto_ap/views/components/paginator.cljs +++ b/src/cljs/auto_ap/views/components/paginator.cljs @@ -19,7 +19,7 @@ y)) (defn paginator [{:keys [start end count total on-change]}] - (let [per-page 20 + (let [per-page 100 max-buttons 5 buttons-before (Math/floor (/ max-buttons 2)) total-pages (Math/ceil (/ total per-page))