notid/integreat
1
0
Fork 0
Code Issues Pull Requests 2 Actions Packages Projects Releases Wiki Activity

more check tweaks, adding real cbc accounts, export supports all transactions, fixed date parsing.

Browse Source
This commit is contained in:
Bryce Covert
2018-07-13 15:38:32 -07:00
parent 14d95dab8d
commit 5f1451afa4
10 changed files with 334 additions and 319 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
src/clj/auto_ap/db/checks.clj
View File

@@ -79,11 +79,11 @@
(not (nil? status)) (helpers/merge-where [:= :status status])
(not (nil? amount)) (helpers/merge-where [:= :amount amount])))
(defn get-graphql [{:keys [start sort-by asc id] :as args}]
(defn get-graphql [{:keys [start sort-by asc id limit] :as args :or {limit 20}}]
(query
(cond-> (base-graphql args)
#_#_(not (nil? sort-by) ) (add-sort-by sort-by asc)
true (assoc :limit 20)
true (assoc :limit limit)
start (assoc :offset start))))
(defn count-graphql [args]

4
src/clj/auto_ap/db/transactions.clj
View File

@@ -25,11 +25,11 @@
(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] :as args}]
(defn get-graphql [{:keys [start sort-by asc limit] :as args :or {limit 20}}]
(query
(cond-> (base-graphql args)
#_#_(not (nil? sort-by) ) (add-sort-by sort-by asc)
true (assoc :limit 20)
true (assoc :limit limit)
start (assoc :offset start))))
(defn count-graphql [args]