filters
This commit is contained in:
@@ -486,7 +486,7 @@
|
|||||||
"' and credits '"
|
"' and credits '"
|
||||||
(reduce (fnil + 0.0 0.0) 0 (map :credit (:line-items entry)))
|
(reduce (fnil + 0.0 0.0) 0 (map :credit (:line-items entry)))
|
||||||
"' do not add up."))
|
"' do not add up."))
|
||||||
(dollars= (reduce (fnil + 0.0 0.0) 0.0 (map :debit (:line-items entry)))
|
#_#_(dollars= (reduce (fnil + 0.0 0.0) 0.0 (map :debit (:line-items entry)))
|
||||||
0.0)
|
0.0)
|
||||||
(all-row-error (str "Cannot have ledger entries that total $0.00"))
|
(all-row-error (str "Cannot have ledger entries that total $0.00"))
|
||||||
|
|
||||||
|
|||||||
Reference in New Issue
Block a user