This commit is contained in:
2024-09-25 22:24:32 -07:00
parent db9e0dc459
commit 721cab056b

View File

@@ -490,19 +490,6 @@
[0.0 []]
(:dirty-entries account-needing-refresh)))))
(let [db (dc/db conn)
account-needing-rebuild
{:account (pull-id (dc/db conn) [:bank-account/code "SCCB-2888CB"])
:client (pull-id (dc/db conn) [:client/code "SCCB"])
:location "A"}
result (-> account-needing-rebuild
(assoc :dirty-entries (get-entries-to-refresh account-needing-rebuild db))
(assoc :account-type (:account_type ((build-account-lookup (:client account-needing-rebuild)) (:account account-needing-rebuild))))
(compute-running-balance))]
(alog/info ::recomputed-entries-with-new-sum :count (count result))
result)
(defn refresh-running-balance-accounts [accounts-needing-rebuild clients c i db]
(mu/log ::found-accounts-needing-rebuild