notid/integreat
1
0
Fork 0
Code Issues Pull Requests 2 Actions Packages Projects Releases Wiki Activity

another attempt

Browse Source
This commit is contained in:
Bryce Covert
2022-10-22 21:03:22 -07:00
parent d8030e98a1
commit 19fcff7dc5
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
src/clj/auto_ap/graphql/ledger.clj
View File

@@ -548,8 +548,8 @@
(fn [[acc last-je] je] (fn [[acc last-je] je]
(let [next-je (assoc je :running_balance (let [next-je (assoc je :running_balance
(- (+ (:running_balance last-je 0.0) (- (+ (:running_balance last-je 0.0)
(Double/parseDouble (:debit je 0.0))) (:debit je 0.0))
(Double/parseDouble (:credit je 0.0))))] (:credit je 0.0)))]
[(conj acc next-je) next-je])) [(conj acc next-je) next-je]))
[] []
journal-entries)})}) journal-entries)})})