Code clean-up
[fa-stable.git] / reporting / rep708.php
index 2c8ebb32084c0c9fd81a5f754eb1a72d425446d2..dd027188395336bf1ca0936948e6e5edffe40c10 100644 (file)
@@ -1,5 +1,14 @@
 <?php
-
+/**********************************************************************
+    Copyright (C) FrontAccounting, LLC.
+       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/gpl-3.0.html>.
+***********************************************************************/
 $page_security = 2;
 // ----------------------------------------------------------------
 // $ Revision: 2.0 $
@@ -7,55 +16,23 @@ $page_security = 2;
 // date_:      2005-05-19
 // Title:      Trial Balance
 // ----------------------------------------------------------------
-$path_to_root="../";
+$path_to_root="..";
 
-include_once($path_to_root . "includes/session.inc");
-include_once($path_to_root . "includes/date_functions.inc");
-include_once($path_to_root . "includes/data_checks.inc");
-include_once($path_to_root . "gl/includes/gl_db.inc");
+include_once($path_to_root . "/includes/session.inc");
+include_once($path_to_root . "/includes/date_functions.inc");
+include_once($path_to_root . "/includes/data_checks.inc");
+include_once($path_to_root . "/gl/includes/gl_db.inc");
 
 //----------------------------------------------------------------------------------------------------
 
-// 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;
 
@@ -68,26 +45,35 @@ function print_trial_balance()
                $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);
+       //$cols2 = array(0, 50, 230, 330, 430, 530);
+       $cols2 = array(0, 50, 190, 310, 430, 530);
        //-------------0--1---2----3----4----5--
 
        $headers2 = array('', '', _('Brought Forward'), _('This Period'), _('Balance'));
 
        $aligns2 = array('left', 'left', 'left', 'left', 'left');
 
-       $cols = array(0, 50, 200, 250, 300,     350, 400, 450, 500,     550);
+       //$cols = array(0, 50, 200, 250, 300,   350, 400, 450, 500,     550);
+       $cols = array(0, 50, 150, 210, 270,     330, 390, 450, 510,     570);
        //------------0--1---2----3----4----5----6----7----8----9--
 
        $headers = array(_('Account'), _('Account Name'), _('Debit'), _('Credit'), _('Debit'),
@@ -117,7 +103,7 @@ function print_trial_balance()
                                    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);
@@ -125,6 +111,7 @@ function print_trial_balance()
 
        $accounts = get_gl_accounts();
 
+       $pdeb = $pcre = $cdeb = $ccre = $tdeb = $tcre = $pbal = $cbal = $tbal = 0;
        $begin = begin_fiscalyear();
        if (date1_greater_date2($begin, $from))
                $begin = $from;
@@ -142,27 +129,37 @@ function print_trial_balance()
                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'];
+                       $ccre += $curr['credit'];
+                       $tdeb += $tot['debit'];
+                       $tcre += $tot['credit'];
+                       
                }       
+               $pbal += $prev['balance'];
+               $cbal += $curr['balance'];
+               $tbal += $tot['balance'];
                $rep->NewLine();
 
                if ($rep->row < $rep->bottomMargin + $rep->lineHeight)
@@ -175,37 +172,38 @@ function print_trial_balance()
        $rep->NewLine();
        $rep->Font('bold');
 
-       $prev = get_balance(null, $dimension, $dimension2, $begin, $from, false, false);
-       $curr = get_balance(null, $dimension, $dimension2, $from, $to, true, true);
-       $tot = get_balance(null, $dimension, $dimension2, $begin, $to, false, true);
+       //$prev = get_balance(null, $dimension, $dimension2, $begin, $from, false, false);
+       //$curr = get_balance(null, $dimension, $dimension2, $from, $to, true, true);
+       //$tot = get_balance(null, $dimension, $dimension2, $begin, $to, false, true);
 
        if ($balances == 0)
        {
                $rep->TextCol(0, 2, _("Total"));
-               $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, $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 ($prev['balance'] >= 0.0)
-               $rep->TextCol(2, 3,     number_format2($prev['balance'], $dec));
+       if ($pbal >= 0.0)
+               $rep->AmountCol(2, 3, $pbal, $dec);
        else
-               $rep->TextCol(3, 4,     number_format2(abs($prev['balance']), $dec));
-       if ($curr['balance'] >= 0.0)
-               $rep->TextCol(4, 5,     number_format2($curr['balance'], $dec));
+               $rep->AmountCol(3, 4, abs($pbal), $dec);
+       if ($cbal >= 0.0)
+               $rep->AmountCol(4, 5, $cbal, $dec);
        else
-               $rep->TextCol(5, 6,     number_format2(abs($curr['balance']), $dec));
-       if ($tot['balance'] >= 0.0)
-               $rep->TextCol(6, 7,     number_format2($tot['balance'], $dec));
+               $rep->AmountCol(5, 6, abs($cbal), $dec);
+       if ($tbal >= 0.0)
+               $rep->AmountCol(6, 7, $tbal, $dec);
        else
-               $rep->TextCol(7, 8,     number_format2(abs($tot['balance']), $dec));
+               $rep->AmountCol(7, 8, abs($tbal), $dec);
+       $rep->NewLine();
        
-       $rep->Line($rep->row - 6);
+       $rep->Line($rep->row);
        
        $rep->End();
 }