unpaid invoice matching

src/cljs/auto_ap/views/pages/transactions/form.cljs

@@ -130,6 +130,23 @@
      :on-success (fn [result]
                    [::edited (:match-transaction-autopay-invoices result)])}}))
 
+(re-frame/reg-event-fx
+ ::matching-unpaid-invoices
+ [with-user (forms/triggers-loading ::form) (forms/in-form ::form)]
+ (fn [{{{:keys [id]} :data} :db user :user} [_ invoice-ids]]
+   {:graphql
+    {:token user
+     :query-obj {:venia/operation {:operation/type :mutation
+                                   :operation/name "MatchTransactionUnpaidInvoices"}
+                 :venia/queries [{:query/data [:match-transaction-unpaid-invoices
+                                               {:transaction_id id
+                                                :unpaid-invoice-ids invoice-ids}
+                                               transaction-read]}]}
+     :owns-state {:multi ::matching
+                  :which [:unpaid-invoices invoice-ids]}
+     :on-success (fn [result]
+                   [::edited (:match-transaction-unpaid-invoices result)])}}))
+
 (re-frame/reg-event-fx
  ::matching-rule
  [with-user (forms/triggers-loading ::form) (forms/in-form ::form)]