minor safety valves

git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@1028 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
Linas Vepstas 1998-08-23 01:11:56 +00:00
parent 6edef836fa
commit f08a6d77a0

View File

@ -1007,48 +1007,56 @@ xaccSplitSetReconcile (Split *split, char recn)
Transaction *
xaccSplitGetParent (Split *split)
{
if (!split) return NULL;
return (split->parent);
}
Account *
xaccSplitGetAccount (Split *split)
{
if (!split) return NULL;
return (split->acc);
}
char *
xaccSplitGetMemo (Split *split)
{
if (!split) return NULL;
return (split->memo);
}
char *
xaccSplitGetAction (Split *split)
{
if (!split) return NULL;
return (split->action);
}
char
xaccSplitGetReconcile (Split *split)
{
if (!split) return ' ';
return (split->reconciled);
}
double
xaccSplitGetShareAmount (Split * split)
{
if (!split) return 0.0;
return (split->damount);
}
double
xaccSplitGetValue (Split * split)
{
if (!split) return 0.0;
return ((split->damount) * (split->share_price));
}
double
xaccSplitGetSharePrice (Split * split)
{
if (!split) return 1.0;
return (split->share_price);
}