mirror of
https://github.com/Gnucash/gnucash.git
synced 2025-02-25 18:55:30 -06:00
[gnucash-cli] improve "-R show" to describe report
* 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:
parent
e302921404
commit
0b4cd692d7
@ -778,9 +778,22 @@ not found.")))
|
||||
(else
|
||||
(for-each
|
||||
(lambda (template)
|
||||
(let* ((options-gen (gnc:report-template-options-generator template)))
|
||||
(format port "\n* guid: ~a\n~a"
|
||||
(let* ((options-gen (gnc:report-template-options-generator template))
|
||||
(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)
|
||||
(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))))
|
||||
templates)))))
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user