IntenseFinance/gnucash
3
0
Fork 0
mirror of https://github.com/Gnucash/gnucash.git synced 2025-02-25 18:55:30 -06:00
Code Issues Packages Projects Releases Wiki Activity

[gnucash-cli] improve "-R show" to describe report

Browse Source 
* displays available export types if applicable
* saved-reports: displays parent report name

eg

* name: GST
  guid: 41c859a223a54913ad323ef166039df0
  parent-template: Income and GST Statement
  export-types: CSV
This commit is contained in:
Christopher Lam 2020-07-18 19:30:42 +08:00
parent e302921404
commit 0b4cd692d7
1 changed files with 15 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
gnucash/report/report-core.scm
View File

@ -778,9 +778,22 @@ not found.")))
(else (else
(for-each (for-each
(lambda (template) (lambda (template)
(let* ((options-gen (gnc:report-template-options-generator template))) (let* ((options-gen (gnc:report-template-options-generator template))
(format port "\n* guid: ~a\n~a" (parent-guid (gnc:report-template-parent-type template))
(parent-template (and parent-guid
(hash-ref *gnc:_report-templates_* parent-guid)))
(export-types (gnc:report-template-export-types
(or parent-template template))))
(format port "\n* name: ~a\n guid: ~a\n~a~a~a"
(gnc:report-template-name template)
(gnc:report-template-report-guid template) (gnc:report-template-report-guid template)
(if parent-template
(format #f " parent-template: ~a\n"
(gnc:report-template-name parent-template))
"")
(if export-types
(format #f " export-types: ~a\n"
(string-join (map car export-types) ", ")) "")
(gnc:html-render-options-changed (options-gen) #t)))) (gnc:html-render-options-changed (options-gen) #t))))
templates))))) templates)))))