slightly better report
This commit is contained in:
@@ -9,7 +9,7 @@
|
||||
[auto-ap.graphql.utils
|
||||
:refer [->graphql <-graphql assert-admin assert-can-see-client result->page]]
|
||||
[auto-ap.parse.util :as parse]
|
||||
[auto-ap.pdf.ledger :refer [print-balance-sheet print-pnl]]
|
||||
[auto-ap.pdf.ledger :refer [print-balance-sheet print-pnl print-journal-detail-report]]
|
||||
[auto-ap.utils :refer [by dollars= heartbeat]]
|
||||
[clj-time.coerce :as coerce]
|
||||
[clj-time.core :as t]
|
||||
@@ -541,6 +541,14 @@
|
||||
:journal_entries journal-entries})})
|
||||
|
||||
|
||||
|
||||
(defn journal-detail-report-pdf [context args value]
|
||||
(let [data (get-journal-detail-report context args value)
|
||||
result (print-journal-detail-report (:id context) args data)]
|
||||
|
||||
(->graphql result)))
|
||||
|
||||
|
||||
(def objects
|
||||
{:balance_sheet_account
|
||||
{:fields {:id {:type 'String}
|
||||
@@ -638,6 +646,13 @@
|
||||
:categories {:type '(list :ledger_category)}}
|
||||
:resolve :get-journal-detail-report}
|
||||
|
||||
:journal_detail_report_pdf {:type :report_pdf
|
||||
:args {:client_id {:type :id}
|
||||
:client_ids {:type '(list :id)}
|
||||
:date_range {:type :date_range}
|
||||
:categories {:type '(list :ledger_category)}}
|
||||
:resolve :journal-detail-report-pdf}
|
||||
|
||||
:profit_and_loss_pdf {:type :report_pdf
|
||||
:args {:client_id {:type :id}
|
||||
:client_ids {:type '(list :id)}
|
||||
@@ -716,6 +731,7 @@
|
||||
:get-balance-sheet get-balance-sheet
|
||||
:get-profit-and-loss get-profit-and-loss
|
||||
:profit-and-loss-pdf profit-and-loss-pdf
|
||||
:journal-detail-report-pdf journal-detail-report-pdf
|
||||
:balance-sheet-pdf balance-sheet-pdf
|
||||
:get-journal-detail-report get-journal-detail-report
|
||||
:mutation/delete-external-ledger delete-external-ledger
|
||||
|
||||
Reference in New Issue
Block a user