improvements for payment finding

2021-04-27 21:46:45 -07:00
parent ec236ae979
commit 4c764ed927
6 changed files with 45 additions and 10 deletions
--- a/src/clj/auto_ap/datomic/checks.clj
+++ b/src/clj/auto_ap/datomic/checks.clj
@@ -130,6 +130,11 @@
                                              '[(<= ?date ?end-date)]]}
                              :args [(c/to-date (:end (:date-range args)))]})

+                (:payment-type args)
+                (merge-query {:query {:in '[?payment-type]
+                                      :where ['[?e :payment/type ?payment-type]]}
+                              :args [(:payment-type args)]})
+
                check-number-like
                (merge-query {:query {:in '[?check-number-like]
                                      :where ['[?e :payment/check-number ?check-number-like]]}