you can find transactions now
This commit is contained in:
@@ -1,5 +1,6 @@
|
||||
(ns auto-ap.graphql.transactions
|
||||
(:require [auto-ap.graphql.utils :refer [->graphql <-graphql]]
|
||||
[auto-ap.datomic.transactions :as d-transactions]
|
||||
|
||||
[com.walmartlabs.lacinia :refer [execute]]
|
||||
[com.walmartlabs.lacinia.executor :as executor]
|
||||
@@ -23,21 +24,15 @@
|
||||
|
||||
(defn get-transaction-page [context args value]
|
||||
(let [args (assoc args :id (:id context))
|
||||
extra-context
|
||||
(cond-> {}
|
||||
(executor/selects-field? context :invoice/vendor) (assoc :vendor-cache (by :id (vendors/get-all)))
|
||||
(executor/selects-field? context :invoice/company) (assoc :company-cache (by :id (companies/get-all))))
|
||||
|
||||
transactions (map
|
||||
->graphql
|
||||
(transactions/get-graphql (<-graphql args)))
|
||||
transactions-count (transactions/count-graphql (<-graphql args))]
|
||||
(resolve/with-context
|
||||
[{:transactions transactions
|
||||
:total transactions-count
|
||||
:count (count transactions)
|
||||
:start (:start args 0)
|
||||
:end (+ (:start args 0) (count transactions))}] extra-context)))
|
||||
(d-transactions/get-graphql (<-graphql args)))
|
||||
transactions-count (d-transactions/count-graphql (<-graphql args))]
|
||||
[{:transactions transactions
|
||||
:total transactions-count
|
||||
:count (count transactions)
|
||||
:start (:start args 0)
|
||||
:end (+ (:start args 0) (count transactions))}]))
|
||||
|
||||
|
||||
|
||||
|
||||
Reference in New Issue
Block a user