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

2001-07-07 Dave Peticolas <dave@krondo.com>

Browse Source 
* src/test/gnc-test-stuff.c (get_random_query): not so many terms

	* src/test/Makefile.am: add test-scm-query

	* src/test/.cvsignore: add test-scm-query

	* src/test/test-scm-query.c: new test -- check query<->scm
	conversion

	* src/guile/gnucash.h: new func api

	* src/guile/gnucash.c.in (gnc_gw_init): new func

	* src/guile/gnc-helpers.c: fix bugs

	* src/engine/Query.c: fix bugs


git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@4928 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
Dave Peticolas 2001-07-07 10:07:37 +00:00
parent ba44950605
commit 48772fc3d7
2 changed files with 29 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
ChangeLog
View File

@ -1,3 +1,22 @@
2001-07-07 Dave Peticolas <dave@krondo.com>
* src/test/gnc-test-stuff.c (get_random_query): not so many terms
* src/test/Makefile.am: add test-scm-query
* src/test/.cvsignore: add test-scm-query
* src/test/test-scm-query.c: new test -- check query<->scm
conversion
* src/guile/gnucash.h: new func api
* src/guile/gnucash.c.in (gnc_gw_init): new func
* src/guile/gnc-helpers.c: fix bugs
* src/engine/Query.c: fix bugs
2001-07-06 Dave Peticolas <dave@krondo.com> 2001-07-06 Dave Peticolas <dave@krondo.com>
* src/gnome/glade/sched-xact.glade: tweak * src/gnome/glade/sched-xact.glade: tweak

14
src/engine/Query.c
View File

@ -104,6 +104,12 @@ xaccQueryPrint(Query * q)
GList * i, * j; GList * i, * j;
QueryTerm * qt; QueryTerm * qt;
if (!q)
{
printf("Query: null\n");
return;
}
printf("Query: max splits = %d\n", q->max_splits); printf("Query: max splits = %d\n", q->max_splits);
/* print and & or terms */ /* print and & or terms */
@ -1335,7 +1341,7 @@ xaccQueryTermEqual (QueryTerm *qt1, QueryTerm *qt2)
case PD_AMOUNT: case PD_AMOUNT:
if (qt1->data.amount.how != qt2->data.amount.how) return FALSE; if (qt1->data.amount.how != qt2->data.amount.how) return FALSE;
if (qt1->data.amount.amt_sgn != qt2->data.amount.amt_sgn) return FALSE; if (qt1->data.amount.amt_sgn != qt2->data.amount.amt_sgn) return FALSE;
if (!DEQ (qt1->data.amount.amount, qt2->data.amount.amount)) if (qt1->data.amount.amount != qt2->data.amount.amount)
return FALSE; return FALSE;
break; break;
@ -1968,7 +1974,7 @@ DxaccQueryAddSharePriceMatch(Query * q, double amt,
qt->data.base.term_type = PR_PRICE; qt->data.base.term_type = PR_PRICE;
qt->data.base.sense = 1; qt->data.base.sense = 1;
qt->data.amount.how = how; qt->data.amount.how = how;
qt->data.amount.amt_sgn = 0; qt->data.amount.amt_sgn = AMT_SGN_MATCH_EITHER;
qt->data.amount.amount = amt; qt->data.amount.amount = amt;
xaccInitQuery(qs, qt); xaccInitQuery(qs, qt);
@ -1988,7 +1994,7 @@ DxaccQueryAddSharePriceMatch(Query * q, double amt,
/******************************************************************** /********************************************************************
* DxaccQueryAddSharesMatch * DxaccQueryAddSharesMatch
* Add a share-price filter to an existing query. * Add a quantity filter to an existing query.
* FIXME ?? fix what ?? * FIXME ?? fix what ??
********************************************************************/ ********************************************************************/
@ -2005,7 +2011,7 @@ DxaccQueryAddSharesMatch(Query * q, double amt,
qt->data.base.term_type = PR_SHRS; qt->data.base.term_type = PR_SHRS;
qt->data.base.sense = 1; qt->data.base.sense = 1;
qt->data.amount.how = how; qt->data.amount.how = how;
qt->data.amount.amt_sgn = 0; qt->data.amount.amt_sgn = AMT_SGN_MATCH_EITHER;
qt->data.amount.amount = amt; qt->data.amount.amount = amt;
xaccInitQuery(qs, qt); xaccInitQuery(qs, qt);