trial balance fix

This commit is contained in:
Bryce
2023-08-21 10:53:33 -07:00
parent 312b365e65
commit fc67083dfb

View File

@@ -442,7 +442,7 @@
:account-type/dividend
:account-type/expense} (:db/ident (:account/type (:journal-entry-line/account jel))))
(update (or v {}) :debit (fnil + 0.0) (or (:journal-entry-line/debit jel) 0.0))
(update (or v {}) :debit (fnil + 0.0) (or (:journal-entry-line/credit jel) 0.0))))))
(update (or v {}) :credit (fnil + 0.0) (or (:journal-entry-line/credit jel) 0.0))))))
{})
(map (fn [[[a l] {:keys [debit credit]}]]
[(or (pull-attr db :account/name a)