<?php
/**********************************************************************
Copyright (C) FrontAccounting, LLC.
- Released under the terms of the GNU Affero General Public License,
- AGPL, as published by the Free Software Foundation, either version
- 3 of the License, or (at your option) any later version.
+ Released under the terms of the GNU General Public License, GPL,
+ as published by the Free Software Foundation, either version 3
+ of the License, or (at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
- See the License here <http://www.gnu.org/licenses/agpl-3.0.html>.
+ See the License here <http://www.gnu.org/licenses/gpl-3.0.html>.
***********************************************************************/
-$page_security = 2;
+$page_security = 'SA_GLANALYTIC';
// ----------------------------------------------------------------
// $ Revision: 2.0 $
// Creator: Joe Hunt
//----------------------------------------------------------------------------------------------------
-// trial_inquiry_controls();
print_trial_balance();
-//----------------------------------------------------------------------------------------------------
-function get_balance($account, $dimension, $dimension2, $from, $to, $from_incl=true, $to_incl=true)
-{
- $sql = "SELECT SUM(IF(amount >= 0, amount, 0)) as debit, SUM(IF(amount < 0, -amount, 0)) as credit, SUM(amount) as balance
- FROM ".TB_PREF."gl_trans,".TB_PREF."chart_master,".TB_PREF."chart_types, ".TB_PREF."chart_class
- WHERE ".TB_PREF."gl_trans.account=".TB_PREF."chart_master.account_code AND ".TB_PREF."chart_master.account_type=".TB_PREF."chart_types.id
- AND ".TB_PREF."chart_types.class_id=".TB_PREF."chart_class.cid AND";
-
- if ($account != null)
- $sql .= " account='$account' AND";
- if ($dimension > 0)
- $sql .= " dimension_id=$dimension AND";
- if ($dimension2 > 0)
- $sql .= " dimension2_id=$dimension2 AND";
- $from_date = date2sql($from);
- if ($from_incl)
- $sql .= " tran_date >= '$from_date' AND";
- else
- $sql .= " tran_date > IF(".TB_PREF."chart_class.balance_sheet=1, '0000-00-00', '$from_date') AND";
- $to_date = date2sql($to);
- if ($to_incl)
- $sql .= " tran_date <= '$to_date' ";
- else
- $sql .= " tran_date < '$to_date' ";
-
- $result = db_query($sql,"No general ledger accounts were returned");
-
- return db_fetch($result);
-}
-
//----------------------------------------------------------------------------------------------------
function print_trial_balance()
{
global $path_to_root;
- include_once($path_to_root . "/reporting/includes/pdf_report.inc");
$dim = get_company_pref('use_dimension');
$dimension = $dimension2 = 0;
$dimension = $_POST['PARAM_4'];
$dimension2 = $_POST['PARAM_5'];
$comments = $_POST['PARAM_6'];
+ $destination = $_POST['PARAM_7'];
}
else if ($dim == 1)
{
$dimension = $_POST['PARAM_4'];
$comments = $_POST['PARAM_5'];
+ $destination = $_POST['PARAM_6'];
}
else
{
$comments = $_POST['PARAM_4'];
+ $destination = $_POST['PARAM_5'];
}
+ if ($destination)
+ include_once($path_to_root . "/reporting/includes/excel_report.inc");
+ else
+ include_once($path_to_root . "/reporting/includes/pdf_report.inc");
$dec = user_price_dec();
//$cols2 = array(0, 50, 230, 330, 430, 530);
1 => array('text' => _('Period'),'from' => $from, 'to' => $to));
}
- $rep = new FrontReport(_('Trial Balance'), "TrialBalance.pdf", user_pagesize());
+ $rep = new FrontReport(_('Trial Balance'), "TrialBalance", user_pagesize());
$rep->Font();
$rep->Info($params, $cols, $headers, $aligns, $cols2, $headers2, $aligns2);
- $rep->Header();
+ $rep->NewPage();
$accounts = get_gl_accounts();
if ($balances != 0)
{
if ($prev['balance'] >= 0.0)
- $rep->TextCol(2, 3, number_format2($prev['balance'], $dec));
+ $rep->AmountCol(2, 3, $prev['balance'], $dec);
else
- $rep->TextCol(3, 4, number_format2(abs($prev['balance']), $dec));
+ $rep->AmountCol(3, 4, abs($prev['balance']), $dec);
if ($curr['balance'] >= 0.0)
- $rep->TextCol(4, 5, number_format2($curr['balance'], $dec));
+ $rep->AmountCol(4, 5, $curr['balance'], $dec);
else
- $rep->TextCol(5, 6, number_format2(abs($curr['balance']), $dec));
+ $rep->AmountCol(5, 6, abs($curr['balance']), $dec);
if ($tot['balance'] >= 0.0)
- $rep->TextCol(6, 7, number_format2($tot['balance'], $dec));
+ $rep->AmountCol(6, 7, $tot['balance'], $dec);
else
- $rep->TextCol(7, 8, number_format2(abs($tot['balance']), $dec));
+ $rep->AmountCol(7, 8, abs($tot['balance']), $dec);
}
else
{
- $rep->TextCol(2, 3, number_format2($prev['debit'], $dec));
- $rep->TextCol(3, 4, number_format2($prev['credit'], $dec));
- $rep->TextCol(4, 5, number_format2($curr['debit'], $dec));
- $rep->TextCol(5, 6, number_format2($curr['credit'], $dec));
- $rep->TextCol(6, 7, number_format2($tot['debit'], $dec));
- $rep->TextCol(7, 8, number_format2($tot['credit'], $dec));
+ $rep->AmountCol(2, 3, $prev['debit'], $dec);
+ $rep->AmountCol(3, 4, $prev['credit'], $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'];
$cdeb += $curr['debit'];
if ($rep->row < $rep->bottomMargin + $rep->lineHeight)
{
$rep->Line($rep->row - 2);
- $rep->Header();
+ $rep->NewPage();
}
}
$rep->Line($rep->row);
if ($balances == 0)
{
$rep->TextCol(0, 2, _("Total"));
- $rep->TextCol(2, 3, number_format2($pdeb, $dec));
- $rep->TextCol(3, 4, number_format2($pcre, $dec));
- $rep->TextCol(4, 5, number_format2($cdeb, $dec));
- $rep->TextCol(5, 6, number_format2($ccre, $dec));
- $rep->TextCol(6, 7, number_format2($tdeb, $dec));
- $rep->TextCol(7, 8, number_format2($tcre, $dec));
+ $rep->AmountCol(2, 3, $pdeb, $dec);
+ $rep->AmountCol(3, 4, $pcre, $dec);
+ $rep->AmountCol(4, 5, $cdeb, $dec);
+ $rep->AmountCol(5, 6, $ccre, $dec);
+ $rep->AmountCol(6, 7, $tdeb, $dec);
+ $rep->AmountCol(7, 8, $tcre, $dec);
$rep->NewLine();
}
$rep->TextCol(0, 2, _("Ending Balance"));
if ($pbal >= 0.0)
- $rep->TextCol(2, 3, number_format2($pbal, $dec));
+ $rep->AmountCol(2, 3, $pbal, $dec);
else
- $rep->TextCol(3, 4, number_format2(abs($pbal), $dec));
+ $rep->AmountCol(3, 4, abs($pbal), $dec);
if ($cbal >= 0.0)
- $rep->TextCol(4, 5, number_format2($cbal, $dec));
+ $rep->AmountCol(4, 5, $cbal, $dec);
else
- $rep->TextCol(5, 6, number_format2(abs($cbal), $dec));
+ $rep->AmountCol(5, 6, abs($cbal), $dec);
if ($tbal >= 0.0)
- $rep->TextCol(6, 7, number_format2($tbal, $dec));
+ $rep->AmountCol(6, 7, $tbal, $dec);
else
- $rep->TextCol(7, 8, number_format2(abs($tbal), $dec));
+ $rep->AmountCol(7, 8, abs($tbal), $dec);
+ $rep->NewLine();
- $rep->Line($rep->row - 6);
+ $rep->Line($rep->row);
$rep->End();
}