automated imports.

src/clj/auto_ap/graphql/transactions.clj

@@ -0,0 +1,49 @@
+(ns auto-ap.graphql.transactions
+  (:require [auto-ap.graphql.utils :refer [->graphql <-graphql]]
+
+            [com.walmartlabs.lacinia :refer [execute]]
+            [com.walmartlabs.lacinia.executor :as executor]
+            [com.walmartlabs.lacinia.resolve :as resolve]
+            [auto-ap.db.transactions :as transactions]
+            [auto-ap.db.vendors :as vendors]
+            [auto-ap.db.checks :as checks]
+            [auto-ap.utils :refer [by]]
+            [auto-ap.db.companies :as companies]
+            [auto-ap.time :refer [parse normal-date]]))
+
+(defn get-vendor-for-transaction [context args value]
+  (->graphql
+    (if-let [vendor-cache (:vendor-cache context)]
+      (vendor-cache (:vendor_id value))
+      (vendors/get-by-id (:vendor_id value)))))
+
+(defn get-check-for-transaction [context args value]
+  (->graphql
+   (checks/get-by-id (:check_id value))))
+
+(defn get-company-for-transaction [context args value]
+  (->graphql
+    (if-let [company-cache (:company-cache context)]
+      (company-cache (:company_id value))
+      (companies/get-by-id (:company_id value)))))
+
+(defn get-transaction-page [context args value]
+  (let [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)))
+
+
+
+