fix.
This commit is contained in:
@@ -11,7 +11,7 @@
|
||||
[auto-ap.datomic.clients :as d-clients]
|
||||
[auto-ap.datomic.bank-accounts :as d-bank-accounts]
|
||||
[auto-ap.datomic :refer [uri remove-nils]]
|
||||
[auto-ap.utils :refer [by]]
|
||||
[auto-ap.utils :refer [by dollars-0?]]
|
||||
[auto-ap.numeric :refer [num->words]]
|
||||
[config.core :refer [env]]
|
||||
[auto-ap.time :refer [parse normal-date iso-date local-now]]
|
||||
@@ -368,7 +368,7 @@
|
||||
[[:db.fn/retractEntity (:db/id x)]
|
||||
{:db/id (:db/id invoice)
|
||||
:invoice/outstanding-balance new-balance
|
||||
:invoice/status (if (< -0.001 new-balance 0.001)
|
||||
:invoice/status (if (dollars-0? new-balance)
|
||||
(:invoice/status invoice)
|
||||
:invoice-status/unpaid)}]))
|
||||
(:payment/invoices check))
|
||||
|
||||
Reference in New Issue
Block a user