From df3be920e368b5f4349e97d2430e72045e95c8ee Mon Sep 17 00:00:00 2001 From: Bryce Covert Date: Mon, 10 Jun 2019 19:45:42 -0700 Subject: [PATCH] use rough rounding --- src/clj/auto_ap/datomic/checks.clj | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) 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