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

applying feedback

Browse Source
This commit is contained in:
Bryce
2024-11-20 09:48:07 -08:00
parent d534b9e10f
commit a4a40fc9c2
6 changed files with 73 additions and 40 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
src/cljc/auto_ap/ledger/reports.cljc
View File

@@ -806,7 +806,8 @@
[index p] (map vector (range) (:periods (:args pnl-data)))
:let [is-first? (= 0 index)
period-date (date->str p)
period-headers (if is-first?
period-headers (if (or is-first?
(not (:include-deltas (:args pnl-data))))
[{:value period-date}]
[{:value period-date}
{:value "+/-"}])]
@@ -902,7 +903,8 @@
(negate #{:cogs :payroll :controllable :fixed-overhead :ownership-controllable}))
pnl-datas)
"Retained Earnings")))
table (if (> (count (:periods (:args pnl-data))) 1)
table (if (and (> (count (:periods (:args pnl-data))) 1)
(:include-deltas (:args pnl-data)))
(append-deltas table)
table)]
{:warning (warning-message pnl-data)