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

updates to reflect new engine design

Browse Source 
git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@768 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
Linas Vepstas 1998-04-04 07:25:39 +00:00
parent 088931df8a
commit a9700af853
1 changed files with 20 additions and 21 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

41
src/Ledger.c
View File

@ -125,18 +125,21 @@ xaccSaveRegEntry (BasicRegister *reg)
Account * acc;
unsigned int changed;
/* use the changed flag to avoid heavy-weight updates
* of the split & transaction fields. This will help
* cut down on uneccessary register redraws. */
changed = xaccGetChangeFlag (reg);
if (!changed) return;
/* get the handle to the current split and transaction */
split = xaccGetCurrentSplit (reg);
if (!split) return;
trans = xaccSplitGetParent (split);
/* use the changed flag to avoid heavy-weight updates
* of the split & transaction fields. This will help
* cut down on uneccessary register redraws. */
changed = xaccGetChangeFlag (reg);
/* copy the contents from the cursor to the split */
xaccTransBeginEdit (trans);
if (MOD_DATE & changed)
xaccTransSetDate (trans, reg->dateCell->date.tm_mday,
reg->dateCell->date.tm_mon+1,
@ -155,17 +158,14 @@ xaccSaveRegEntry (BasicRegister *reg)
double new_amount;
new_amount = (reg->creditCell->amount) - (reg->debitCell->amount);
xaccSplitSetValue (split, new_amount);
xaccSplitRebalance (split);
}
if (MOD_SHRS & changed) {
xaccSplitSetShareAmount (split, reg->shrsCell->amount);
xaccSplitRebalance (split);
}
if (MOD_PRIC & changed) {
xaccSplitSetSharePrice (split, reg->priceCell->amount);
xaccSplitRebalance (split);
}
if (MOD_MEMO & changed)
@ -181,23 +181,22 @@ xaccSaveRegEntry (BasicRegister *reg)
if (MOD_XTO & changed) {
/* hack alert -- implement this */
}
xaccTransCommitEdit (trans);
printf ("finished saving %s \n", xaccTransGetDescription(trans));
if (changed) {
/* if the modified split is the "blank split",
* then it is now an official part of the account.
* Set user_hook to null, so that we can be sure of
* getting a new split.
*/
if (split == ((Split *) (reg->user_hook))) {
reg->user_hook = NULL;
}
/* refresh the register windows *only* if something changed */
acc = xaccSplitGetAccount (split);
accRefresh (acc);
/* if the modified split is the "blank split",
* then it is now an official part of the account.
* Set user_hook to null, so that we can be sure of
* getting a new split.
*/
if (split == ((Split *) (reg->user_hook))) {
reg->user_hook = NULL;
}
/* refresh the register windows *only* if something changed */
acc = xaccSplitGetAccount (split);
accRefresh (acc);
}
/* ======================================================== */