[Gnucash-changes] r13425 - gnucash/trunk/src/register/ledger-core - Make register use engine-provided xaccTransGetAccountBalance() instead

Chris Shoemaker chris at cvs.gnucash.org
Tue Feb 28 14:46:20 EST 2006


Author: chris
Date: 2006-02-28 14:46:19 -0500 (Tue, 28 Feb 2006)
New Revision: 13425
Trac: http://svn.gnucash.org/trac/changeset/13425

Modified:
   gnucash/trunk/src/register/ledger-core/split-register-model.c
Log:
   Make register use engine-provided xaccTransGetAccountBalance() instead
   of writing its own.


Modified: gnucash/trunk/src/register/ledger-core/split-register-model.c
===================================================================
--- gnucash/trunk/src/register/ledger-core/split-register-model.c	2006-02-28 19:38:29 UTC (rev 13424)
+++ gnucash/trunk/src/register/ledger-core/split-register-model.c	2006-02-28 19:46:19 UTC (rev 13425)
@@ -341,48 +341,17 @@
   return xaccTransGetAccountAmount(trans, account);
 }
 
-static Split *
-get_trans_last_split (SplitRegister *reg, Transaction *trans)
+static gnc_numeric
+get_trans_total_balance (SplitRegister *reg, Transaction *trans)
 {
-  GList *node;
   Account *account;
-  Split *last_split = NULL;
 
   account = gnc_split_register_get_default_account (reg);
+  if (!trans || !account) return gnc_numeric_zero();
 
-  if (!account)
-    return last_split;
-
-  for (node = xaccTransGetSplitList (trans); node; node = node->next)
-  {
-    Split *split = node->data;
-
-    if (xaccSplitGetAccount (split) != account)
-      continue;
-
-    if (!last_split)
-    {
-      last_split = split;
-      continue;
-    }
-
-    if (xaccSplitDateOrder (last_split, split) < 0)
-      last_split = split;
-  }
-
-  return last_split;
+  return xaccTransGetAccountBalance(trans, account);
 }
 
-static gnc_numeric
-get_trans_total_balance (SplitRegister *reg, Transaction *trans)
-{
-  Split *last_split;
-
-  last_split = get_trans_last_split (reg, trans);
-
-  return xaccSplitGetBalance (last_split);
-}
-
 static guint32
 gnc_split_register_get_shares_fg_color (VirtualLocation virt_loc,
                                         gpointer user_data)



More information about the gnucash-changes mailing list