mirror of
https://github.com/Gnucash/gnucash.git
synced 2025-02-25 18:55:30 -06:00
add a few utility routines
git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@8173 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
parent
e5d7cd62ee
commit
9184bf7a1c
@ -366,7 +366,29 @@ lot_scrub_cb (Account *acc, gpointer data)
|
|||||||
void
|
void
|
||||||
xaccGroupScrubLotsBalance (AccountGroup *grp)
|
xaccGroupScrubLotsBalance (AccountGroup *grp)
|
||||||
{
|
{
|
||||||
|
if (!grp) return;
|
||||||
xaccGroupForEachAccount (grp, lot_scrub_cb, NULL, TRUE);
|
xaccGroupForEachAccount (grp, lot_scrub_cb, NULL, TRUE);
|
||||||
}
|
}
|
||||||
|
|
||||||
|
void
|
||||||
|
xaccAccountScrubLotsBalance (Account *acc)
|
||||||
|
{
|
||||||
|
if (!acc) return;
|
||||||
|
if (FALSE == xaccAccountHasTrades (acc)) return;
|
||||||
|
xaccAccountScrubLots (acc);
|
||||||
|
xaccAccountScrubDoubleBalance (acc);
|
||||||
|
}
|
||||||
|
|
||||||
|
void
|
||||||
|
xaccAccountTreeScrubLotsBalance (Account *acc)
|
||||||
|
{
|
||||||
|
if (!acc) return;
|
||||||
|
|
||||||
|
xaccGroupScrubLotsBalance (acc->children);
|
||||||
|
|
||||||
|
if (FALSE == xaccAccountHasTrades (acc)) return;
|
||||||
|
xaccAccountScrubLots (acc);
|
||||||
|
xaccAccountScrubDoubleBalance (acc);
|
||||||
|
}
|
||||||
|
|
||||||
/* =========================== END OF FILE ======================= */
|
/* =========================== END OF FILE ======================= */
|
||||||
|
@ -90,6 +90,8 @@ void xaccAccountScrubDoubleBalance (Account *acc);
|
|||||||
* that are trading accounts.
|
* that are trading accounts.
|
||||||
*/
|
*/
|
||||||
void xaccGroupScrubLotsBalance (AccountGroup *grp);
|
void xaccGroupScrubLotsBalance (AccountGroup *grp);
|
||||||
|
void xaccAccountScrubLotsBalance (Account *acc);
|
||||||
|
void xaccAccountTreeScrubLotsBalance (Account *acc);
|
||||||
|
|
||||||
#endif /* XACC_SCRUB2_H */
|
#endif /* XACC_SCRUB2_H */
|
||||||
/** @} */
|
/** @} */
|
||||||
|
Loading…
Reference in New Issue
Block a user