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

Makes reports exportable

Browse Source
This commit is contained in:
Bryce
2023-09-23 07:48:06 -07:00
parent 12c676629d
commit be13bbbb4d
7 changed files with 15 additions and 19 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
src/clj/auto_ap/pdf/ledger.clj
View File

@@ -153,7 +153,7 @@
args (assoc args
:periods (filter identity (cond-> [(:date args)]
(:include-comparison args) (conj (:comparison-date args)))))
clients (pull-many (dc/db conn) [:client/code :client/name :db/id] [(:client-id args)])
clients (pull-many (dc/db conn) [:client/code :client/name :db/id] (:client-ids args))
data (concat (->> (:balance-sheet-accounts data)
(map (fn [b]
(assoc b
@@ -167,7 +167,6 @@
report (l-reports/summarize-balance-sheet pnl-data)
output-stream (ByteArrayOutputStream.)]
(log/info report)
(pdf/pdf
(-> [{:left-margin 10 :right-margin 10 :top-margin 15 :bottom-margin 15
:size :letter