function display_type ($type, $typename, &$dec, &$rep, $from, $to, $zero, $balances, $dimension, $dimension2)
{
- global $pdeb, $pcre, $cdeb, $ccre, $tdeb, $tcre, $pbal, $cbal, $tbal;
+ global $pdeb, $pcre, $cdeb, $ccre, $tdeb, $tcre, $pbal, $cbal, $tbal, $SysPrefs;
$printtitle = 0; //Flag for printing type name
$rep->NewLine();
}
+ // FA doesn't really clear the closed year, therefore the brought forward balance includes all the transactions from the past, even though the balance is null.
+ // If we want to remove the balanced part for the past years, this option removes the common part from from the prev and tot figures.
+ if (@$SysPrefs->clear_trial_balance_opening)
+ {
+ $open = get_balance($account["account_code"], $dimension, $dimension2, $begin, $begin, false, true);
+ $offset = min($open['debit'], $open['credit']);
+ } else
+ $offset = 0;
+
$prev = get_balance($account["account_code"], $dimension, $dimension2, $begin, $from, false, false);
$curr = get_balance($account["account_code"], $dimension, $dimension2, $from, $to, true, true);
$tot = get_balance($account["account_code"], $dimension, $dimension2, $begin, $to, false, true);
}
else
{
- $rep->AmountCol(2, 3, $prev['debit'], $dec);
- $rep->AmountCol(3, 4, $prev['credit'], $dec);
+ $rep->AmountCol(2, 3, $prev['debit']-$offset, $dec);
+ $rep->AmountCol(3, 4, $prev['credit']-$offset, $dec);
$rep->AmountCol(4, 5, $curr['debit'], $dec);
$rep->AmountCol(5, 6, $curr['credit'], $dec);
- $rep->AmountCol(6, 7, $tot['debit'], $dec);
- $rep->AmountCol(7, 8, $tot['credit'], $dec);
- $pdeb += $prev['debit'];
- $pcre += $prev['credit'];
+ $rep->AmountCol(6, 7, $tot['debit']-$offset, $dec);
+ $rep->AmountCol(7, 8, $tot['credit']-$offset, $dec);
+ $pdeb += $prev['debit']-$offset;
+ $pcre += $prev['credit']-$offset;
$cdeb += $curr['debit'];
$ccre += $curr['credit'];
- $tdeb += $tot['debit'];
- $tcre += $tot['credit'];
+ $tdeb += $tot['debit']-$offset;
+ $tcre += $tot['credit']-$offset;
}
$pbal += $prev['balance'];
3 => array('text' => _('Dimension')." 2",
'from' => get_dimension_string($dimension2), 'to' => ''));
}
- else if ($dim == 1)
+ elseif ($dim == 1)
{
$params = array( 0 => $comments,
1 => array('text' => _('Period'),'from' => $from, 'to' => $to),
$rep = new FrontReport(_('Trial Balance'), "TrialBalance", user_pagesize(), 9, $orientation);
if ($orientation == 'L')
{
- $rep->recalculate_cols($cols);
- $rep->recalculate_cols($cols2);
+ recalculate_cols($cols);
+ recalculate_cols($cols2);
}
+
$rep->Font();
$rep->Info($params, $cols, $headers, $aligns, $cols2, $headers2, $aligns2);
$rep->NewPage();
$rep->End();
}
-?>
\ No newline at end of file