all columns available.
This commit is contained in:
@@ -8,27 +8,42 @@
|
||||
[auto-ap.db.utils :refer [query]]
|
||||
[auto-ap.utils :refer [by]]
|
||||
[auto-ap.parse :as parse]
|
||||
[auto-ap.graphql :as graphql]
|
||||
[auto-ap.graphql.utils :refer [->graphql]]
|
||||
[auto-ap.routes.utils :refer [wrap-secure]]
|
||||
[clj-time.coerce :refer [to-date]]
|
||||
[auto-ap.db.invoices-expense-accounts :as expense-accounts]
|
||||
[ring.middleware.json :refer [wrap-json-response]]
|
||||
[compojure.core :refer [GET POST context defroutes wrap-routes]]
|
||||
[clojure.string :as str]))
|
||||
[clojure.string :as str]
|
||||
[venia.core :as venia]))
|
||||
|
||||
(defroutes routes
|
||||
(wrap-routes
|
||||
(wrap-routes
|
||||
(context "/" []
|
||||
(GET "/invoices/export" {:keys [query-params]}
|
||||
(let [invoices (invoices/get-graphql {:company (query-params "company")})]
|
||||
(map (fn [i]
|
||||
(update i :date to-date))
|
||||
invoices)))
|
||||
(GET "/invoices/export" {:keys [query-params identity] :as request}
|
||||
(let [query [[:all_invoices
|
||||
{:company-id (query-params "company")}
|
||||
[:id :total :outstanding-balance :invoice-number :date
|
||||
[:checks [:amount [:check [:check-number]]]]
|
||||
[:vendor [:name :id]]
|
||||
[:expense_accounts [:amount :id :expense_account_id :location
|
||||
[:expense_account [:id :name [:parent [:id :name]]]]]]
|
||||
[:company [:name :id :locations]]]]]
|
||||
invoices (graphql/query identity (venia/graphql-query {:venia/queries (->graphql query)}))]
|
||||
(list (:all-invoices (:data invoices)))))
|
||||
(GET "/checks/export" {:keys [query-params]}
|
||||
(let [checks (checks/get-graphql {:company (query-params "company")})]
|
||||
(map (fn [i]
|
||||
(update i :date to-date))
|
||||
checks)))
|
||||
(let [query [[:all_checks
|
||||
{:company-id (query-params "company")}
|
||||
[:id :check-number :amount :memo :date
|
||||
[:invoices [:invoice-id :amount]]
|
||||
[:bank-account [:number :bank-name :bank-code]]
|
||||
[:vendor [:name :id :primary-contact :primary-email :primary-phone :default-expense-account]]
|
||||
[:company [:id :name]]
|
||||
]]]
|
||||
checks (graphql/query identity (venia/graphql-query {:venia/queries (->graphql query)}))]
|
||||
(list (:all-checks (:data checks)))))
|
||||
|
||||
(GET "/companies/export" {:keys [query-params]}
|
||||
(companies/get-all))
|
||||
|
||||
Reference in New Issue
Block a user