diff --git a/src/clj/auto_ap/datomic/checks.clj b/src/clj/auto_ap/datomic/checks.clj index ba32b9bc..4fff451c 100644 --- a/src/clj/auto_ap/datomic/checks.clj +++ b/src/clj/auto_ap/datomic/checks.clj @@ -53,7 +53,8 @@ (:bank-account-id args) (add-arg '?bank-account-id (:bank-account-id args) '[?e :payment/bank-account ?bank-account-id]) (:amount args) (add-arg '?amount (:amount args) - '[?e :payment/amount ?amount]) + '[?e :payment/amount ?transaction-amount] + '[(auto-ap.utils/dollars= ?transaction-amount ?amount)]) (:status args) (add-arg '?status (:status args) '[?e :payment/status ?status]) check-number-like (add-arg '?check-number-like check-number-like