mirror of
https://github.com/Gnucash/gnucash.git
synced 2025-02-25 18:55:30 -06:00
* src/report/standard-reports/average-balance.scm (renderer): quit
using gnc:glist->list and gnc:list->glist -- new g-wrap eliminates need. git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@6603 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
parent
96d48772ad
commit
0432233680
@ -343,9 +343,7 @@
|
|||||||
(set! accounts
|
(set! accounts
|
||||||
(delete-duplicates (append accounts subaccts)))))
|
(delete-duplicates (append accounts subaccts)))))
|
||||||
|
|
||||||
(gnc:query-add-account-match
|
(gnc:query-add-account-match query accounts 'acct-match-any 'query-and)
|
||||||
query (gnc:list->glist accounts)
|
|
||||||
'acct-match-any 'query-and)
|
|
||||||
|
|
||||||
;; match splits between start and end dates
|
;; match splits between start and end dates
|
||||||
(gnc:query-add-date-match-timepair
|
(gnc:query-add-date-match-timepair
|
||||||
@ -354,8 +352,7 @@
|
|||||||
query 'by-date 'by-standard 'by-none)
|
query 'by-date 'by-standard 'by-none)
|
||||||
|
|
||||||
;; get the query results
|
;; get the query results
|
||||||
(set! splits (gnc:glist->list (gnc:query-get-splits query)
|
(set! splits (gnc:query-get-splits query))
|
||||||
<gnc:Split*>))
|
|
||||||
|
|
||||||
;; find the net starting balance for the set of accounts
|
;; find the net starting balance for the set of accounts
|
||||||
(set! startbal
|
(set! startbal
|
||||||
|
Loading…
Reference in New Issue
Block a user