it's now possible to link across each entity type

src/clj/auto_ap/graphql/checks.clj

@@ -20,7 +20,9 @@
             [clojure.edn :as edn]
             [clojure.java.io :as io]
             [clojure.string :as str]
-            [config.core :refer [env]])
+            [config.core :refer [env]]
+            [clojure.tools.logging  :as log]
+            [clojure.set :as set])
   (:import java.io.ByteArrayOutputStream
            java.text.DecimalFormat
            java.util.UUID))
@@ -341,7 +343,15 @@
 (defn get-payment-page [context args value]
   (let [args (assoc args :id (:id context))
         [payments checks-count] (d-checks/get-graphql  (<-graphql args))]
-    [{:payments (map ->graphql payments)
+    
+    [{:payments (->> payments
+                     (map (fn [payment]
+                            (if (seq (:transaction/_payment payment))
+                              (-> payment
+                                  (set/rename-keys {:transaction/_payment :transaction})
+                                  (update :transaction first))
+                              payment)))
+                     (map ->graphql ))
       :total checks-count
       :count (count payments)
       :start (:start args 0)

src/clj/auto_ap/graphql/invoices.clj

@@ -18,7 +18,11 @@
 (defn get-invoice-page [context args value]
   
   (let [args (assoc args :id (:id context))
-        [invoices invoice-count outstanding] (d-invoices/get-graphql (update (<-graphql (assoc args :id (:id context))) :status enum->keyword "invoice-status"))]
+        [invoices invoice-count outstanding] (-> args
+                                                 (assoc :id (:id context))
+                                                 (<-graphql )
+                                                 (update  :status enum->keyword "invoice-status")
+                                                 (d-invoices/get-graphql ))]
     [{:invoices (map ->graphql invoices)
       :outstanding outstanding
       :total invoice-count