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

[test-extras] (create-transaction) adds price trading commodities/currency

Browse Source 
this will modify a test which was calibrated to record purchase price
only. fix transaction creation to add prices for both purchase and
sales, and also fix test which was assuming no sale price was bring
recorded.
This commit is contained in:
Christopher Lam 2019-02-17 03:29:09 +08:00
parent 918321aafa
commit 9ba0d9658d
2 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
gnucash/report/report-system/test/test-commodity-utils.scm
View File

@ -163,7 +163,7 @@
(gnc-pricedb-create USD IBM (gnc-dmy2time64 1 1 2013) 19399/100)
(gnc-pricedb-create USD AAPL (gnc-dmy2time64 1 1 2014) 7728/100)
(gnc-pricedb-create USD MSFT (gnc-dmy2time64 1 1 2014) 3691/100)
(gnc-pricedb-create USD IBM (gnc-dmy2time64 1 1 2014) 18664/100)
(gnc-pricedb-create USD IBM (gnc-dmy2time64 1 1 2014) 18669/100)
(gnc-pricedb-create USD AAPL (gnc-dmy2time64 1 1 2015) 10933/100)
(gnc-pricedb-create USD MSFT (gnc-dmy2time64 1 1 2015) 4676/100)
(gnc-pricedb-create USD IBM (gnc-dmy2time64 1 1 2015) 16206/100)
@ -498,7 +498,7 @@
(gnc:make-gnc-monetary MSFT 1) USD
(gnc-dmy2time64 11 9 2016))))
(test-equal "IBM nearest 1 July 2014"
18664/100 (gnc:gnc-monetary-amount
18663/100 (gnc:gnc-monetary-amount
(gnc:exchange-by-pricedb-nearest
(gnc:make-gnc-monetary IBM 1) USD
(gnc-dmy2time64 1 7 2014))))

2
libgnucash/engine/test/test-extras.scm
View File

@ -267,7 +267,7 @@
(xaccSplitSetReconcile newsplit (car reconcile))
(xaccSplitSetDateReconciledSecs newsplit (cdr reconcile)))
(if (and pricedb?
(positive? amt)
(not (zero? amt))
(not (gnc-commodity-equiv
(xaccAccountGetCommodity first-split)
(xaccAccountGetCommodity acc))))