r16791 - gnucash/branches/2.2/src/business/business-reports - [r16728] Including all bills/invoices since the beginning of time.

[Andreas Köhler]

Author: andi5
Date: 2008-01-04 19:51:51 -0500 (Fri, 04 Jan 2008)
New Revision: 16791
Trac: http://svn.gnucash.org/trac/changeset/16791

Modified:
   gnucash/branches/2.2/src/business/business-reports/aging.scm
Log:
[r16728] Including all bills/invoices since the beginning of time.

Patch by Jeff Green.


Modified: gnucash/branches/2.2/src/business/business-reports/aging.scm
===================================================================
--- gnucash/branches/2.2/src/business/business-reports/aging.scm	2008-01-05 00:51:42 UTC (rev 16790)
+++ gnucash/branches/2.2/src/business/business-reports/aging.scm	2008-01-05 00:51:51 UTC (rev 16791)
@@ -294,12 +294,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))