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

[new-aging] step 4 - prepended lists must be reversed

Browse Source 
after building lists by prepending in b72052137 we need to process
them in reverse to obtain the original sorting of accounts and
owner-list.
This commit is contained in:
Christopher Lam 2019-11-10 13:32:50 +08:00
parent 6f7c6b9de3
commit a482c25072
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
gnucash/report/business-reports/new-aging.scm
View File

@ -286,6 +286,7 @@ exist but have no suitable transactions."))
(let ((owner (car owner-and-aging)) (let ((owner (car owner-and-aging))
(aging (cadr owner-and-aging)) (aging (cadr owner-and-aging))
(aging-total (caddr owner-and-aging))) (aging-total (caddr owner-and-aging)))
(gnc:html-table-append-row! (gnc:html-table-append-row!
table table
(append (append
@ -308,7 +309,8 @@ exist but have no suitable transactions."))
(gnc:owner-report-text owner account) (gnc:owner-report-text owner account)
(gnc:make-gnc-monetary comm aging-total))))) (gnc:make-gnc-monetary comm aging-total)))))
(options->address options receivable owner))))) (options->address options receivable owner)))))
owners-and-aging) (reverse owners-and-aging))
(gnc:html-table-append-row! (gnc:html-table-append-row!
table table
(append (append
@ -320,7 +322,8 @@ exist but have no suitable transactions."))
(gnc:make-html-table-cell/markup (gnc:make-html-table-cell/markup
"total-number-cell" (gnc:make-gnc-monetary comm amt))) "total-number-cell" (gnc:make-gnc-monetary comm amt)))
acc-totals))))) acc-totals)))))
accounts-and-owners) (reverse accounts-and-owners))
(for-each gncOwnerFree tofree) (for-each gncOwnerFree tofree)
(gnc:html-document-add-object! document table))))) (gnc:html-document-add-object! document table)))))