Add extra debugging (#165571).

* src/engine/Scrub.c:
	* src/engine/Transaction.c:
	  Add the transaction guid to some error warning messages.
	  Fixes #165571.


git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@10445 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
Derek Atkins 2005-01-31 01:20:52 +00:00
parent 408f77d8b8
commit ca6e053320
2 changed files with 18 additions and 4 deletions

View File

@ -16,6 +16,11 @@
* src/engine/Account.c:
- updated implementation of qofAccountSetParent().
* src/engine/Scrub.c:
* src/engine/Transaction.c:
Add the transaction guid to some error warning messages.
Fixes #165571.
2005-01-29 Derek Atkins <derek@ihtfp.com>
David Montenegro's patch for bugs #95551, #124367.

View File

@ -573,16 +573,21 @@ xaccTransFindOldCommonCurrency (Transaction *trans, QofBook *book)
}
else if (!gnc_commodity_equiv (retval,trans->common_currency))
{
PWARN ("expected common currency %s but found %s\n",
char guid_str[GUID_ENCODING_LENGTH+1];
guid_to_string_buff(xaccTransGetGUID(trans), guid_str);
PWARN ("expected common currency %s but found %s in txn %s\n",
gnc_commodity_get_unique_name (trans->common_currency),
gnc_commodity_get_unique_name (retval));
gnc_commodity_get_unique_name (retval), guid_str);
}
if (NULL == retval)
{
/* In every situation I can think of, this routine should return
* common currency. So make note of this ... */
PWARN ("unable to find a common currency, and that is strange.");
char guid_str[GUID_ENCODING_LENGTH+1];
guid_to_string_buff(xaccTransGetGUID(trans), guid_str);
PWARN ("unable to find a common currency in txn %s, and that is strange.",
guid_str);
}
return retval;
@ -623,7 +628,11 @@ xaccTransScrubCurrency (Transaction *trans)
else
{
SplitList *node;
PWARN ("no common transaction currency found for trans=\"%s\"", trans->description);
char guid_str[GUID_ENCODING_LENGTH+1];
guid_to_string_buff(xaccTransGetGUID(trans), guid_str);
PWARN ("no common transaction currency found for trans=\"%s\" (%s)",
trans->description, guid_str);
for (node=trans->splits; node; node=node->next)
{
Split *split = node->data;