trial balance fix
This commit is contained in:
@@ -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)
|
||||
|
||||
Reference in New Issue
Block a user