TP->T64: gnucash/report/standard-reports/budget-income-statement.scm

This commit is contained in:
Christopher Lam 2017-12-15 19:24:24 +08:00
parent a7eb1bcc77
commit 1181f7fee7

View File

@ -350,7 +350,7 @@
(if use-budget-period-range? (- user-budget-period-start 1) #f)) (if use-budget-period-range? (- user-budget-period-start 1) #f))
(period-end (period-end
(if use-budget-period-range? user-budget-period-end #f)) (if use-budget-period-range? user-budget-period-end #f))
(date-tp (date-t64
(if budget-valid? (if budget-valid?
(gnc-budget-get-period-start-date (gnc-budget-get-period-start-date
budget budget
@ -416,7 +416,7 @@
depth-limit)) depth-limit))
;; exchange rates calculation parameters ;; exchange rates calculation parameters
(exchange-fn (exchange-fn
(gnc:case-exchange-fn price-source report-commodity date-tp)) (gnc:case-exchange-fn price-source report-commodity date-t64))
) )
;; Wrapper to call gnc:html-table-add-labeled-amount-line! ;; Wrapper to call gnc:html-table-add-labeled-amount-line!