From cd0574e346c9e9f5c3a8063ab8505c005f74590e Mon Sep 17 00:00:00 2001 From: Derek Atkins Date: Wed, 26 Dec 2007 03:14:22 +0000 Subject: [PATCH] Including all bills/invoices since the beginning of time. Patch by Jeff Green. BP git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@16728 57a11ea4-9604-0410-9ed3-97b8803252fd --- src/business/business-reports/aging.scm | 6 +----- 1 file changed, 1 insertion(+), 5 deletions(-) diff --git a/src/business/business-reports/aging.scm b/src/business/business-reports/aging.scm index ee08318b5e..325d4dba35 100644 --- a/src/business/business-reports/aging.scm +++ b/src/business/business-reports/aging.scm @@ -301,12 +301,8 @@ (define (setup-query query account date) (define (date-copy date) (cons (car date) (cdr date))) - (let ((begindate (date-copy date))) + (let ((begindate (make-zdate))) ;Set begindate to the start of the Epoch ; (gnc:debug "Account: " account) - (set! begindate (decdate begindate NinetyDayDelta)) - (set! begindate (decdate begindate NinetyDayDelta)) - (set! begindate (decdate begindate NinetyDayDelta)) - (set! begindate (decdate begindate NinetyDayDelta)) ;XXX - 360 days!?! (gnc:debug "begindate" begindate) (gnc:debug "date" date) (qof-query-set-book query (gnc-get-current-book))