fix broken ledger issue
This commit is contained in:
@@ -464,11 +464,11 @@
|
||||
(statsd/gauge "data.mismatched_invoices" (count (mismatched-invoices))))
|
||||
(statsd/gauge "data.mismatched_invoices" 0.0)))
|
||||
(log/info "Attempting to fix transactions that are in the ledger but debits/credits don't add up")
|
||||
(let [unbalanced-invoices (unbalanced-invoices)]
|
||||
(if (seq unbalanced-invoices)
|
||||
(let [unbalanced-is (unbalanced-invoices)]
|
||||
(if (seq unbalanced-is)
|
||||
(do
|
||||
(log/warn (count unbalanced-invoices) " invoices exist but don't have matching debits/credits ")
|
||||
(doseq [m unbalanced-invoices]
|
||||
(log/warn (count unbalanced-is) " invoices exist but don't have matching debits/credits ")
|
||||
(doseq [m unbalanced-is]
|
||||
(touch-invoice m))
|
||||
(statsd/gauge "data.unbalanced_invoices" (count (unbalanced-invoices))))
|
||||
(statsd/gauge "data.unbalanced_invoices" 0.0)))
|
||||
|
||||
Reference in New Issue
Block a user