Check matching

src/clj/auto_ap/graphql.clj

@@ -527,6 +527,11 @@
     :edit_transaction {:type :transaction
                        :args {:transaction {:type :edit_transaction}}
                        :resolve :mutation/edit-transaction}
+
+    :match_transaction {:type :transaction
+                        :args {:transaction_id {:type :id}
+                               :payment_id {:type :id}}
+                        :resolve :mutation/match-transaction}
     :void_invoice {:type :invoice
                    :args {:invoice_id {:type :id}}
                    :resolve :mutation/void-invoice}
@@ -580,18 +585,11 @@
     m))
 
 
-
-
-
-
 (defn get-all-payments [context args value]
   (assert-admin (:id context))
   (map
    ->graphql
-   (d-checks/get-graphql (assoc (<-graphql args)
-                              :count Integer/MAX_VALUE))))
-
-
+   (d-checks/get-graphql (assoc (<-graphql args) :count Integer/MAX_VALUE))))
 
 
 (defn get-user [context args value]
@@ -699,6 +697,7 @@
                          :mutation/add-and-print-invoice gq-invoices/add-and-print-invoice
                          :mutation/edit-invoice gq-invoices/edit-invoice
                          :mutation/edit-transaction gq-transactions/edit-transaction
+                         :mutation/match-transaction gq-transactions/match-transaction
                          :mutation/edit-client gq-clients/edit-client
                          :mutation/upsert-vendor gq-vendors/upsert-vendor
                          :mutation/upsert-account gq-accounts/upsert-account