mostly supporting showing when something cleared.

src/clj/auto_ap/datomic/invoices.clj

@@ -18,7 +18,8 @@
                              {:invoice/client [:client/name :db/id :client/locations]}
                              {:invoice/vendor [:vendor/name :db/id]}
                              {:invoice/status [:db/ident]}
-                             {:invoice-payment/_invoice [* {:invoice-payment/payment [*]}]}]))
+                             {:invoice-payment/_invoice [* {:invoice-payment/payment [* {:payment/status [*]}
+                                                                                      {:transaction/_payment [*]}]}]}]))
 
 (defn <-datomic [x]
   (->> x