Period presentation bug in tax report/inquiry
[fa-stable.git] / reporting / rep705.php
index 2c5ce3f53b36949a910141c35dc0d835f259c706..699cc28a063b258a87d339ed603e40e29e96c40f 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,25 +16,21 @@ $page_security = 2;
 // date_:      2005-05-19
 // Title:      Annual expense breakdown
 // ----------------------------------------------------------------
-$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_annual_expense_breakdown();
 
 //----------------------------------------------------------------------------------------------------
 
 function getPeriods($year, $account, $dimension, $dimension2)
 {
-       //$yr = date('Y');
-       //$mo = date('m'):
-       // from now
        $yr = $year;
        $mo = 12;
        $date13 = date('Y-m-d',mktime(0,0,0,$mo+1,1,$yr));
@@ -72,7 +77,6 @@ function print_annual_expense_breakdown()
 {
        global $path_to_root, $date_system;
 
-       include_once($path_to_root . "reporting/includes/pdf_report.inc");
        $dim = get_company_pref('use_dimension');
        $dimension = $dimension2 = 0;
 
@@ -82,24 +86,32 @@ function print_annual_expense_breakdown()
                $dimension = $_POST['PARAM_1'];
                $dimension2 = $_POST['PARAM_2'];
                $comments = $_POST['PARAM_3'];
+               $destination = $_POST['PARAM_4'];
        }
        else if ($dim == 1)
        {
                $year = $_POST['PARAM_0'];
                $dimension = $_POST['PARAM_1'];
                $comments = $_POST['PARAM_2'];
+               $destination = $_POST['PARAM_3'];
        }
        else
        {
                $year = $_POST['PARAM_0'];
                $comments = $_POST['PARAM_1'];
+               $destination = $_POST['PARAM_2'];
        }
+       if ($destination)
+               include_once($path_to_root . "/reporting/includes/excel_report.inc");
+       else
+               include_once($path_to_root . "/reporting/includes/pdf_report.inc");
+
        $dec = 1;
        //$pdec = user_percent_dec();
 
        $cols = array(0, 40, 150, 180, 210, 240, 270, 300, 330, 360, 390, 420, 450, 480, 510);
        //------------0--1---2----3----4----5----6----7----8----10---11---12---13---14---15-
-       
+
        //$yr = date('Y');
        //$mo = date('m'):
        // from now
@@ -108,7 +120,7 @@ function print_annual_expense_breakdown()
        $da = 1;
        if ($date_system == 1)
                list($yr, $mo, $da) = jalali_to_gregorian($yr, $mo, $da);
-       else if ($date_system == 2)
+       elseif ($date_system == 2)
                list($yr, $mo, $da) = islamic_to_gregorian($yr, $mo, $da);
        $per12 = strftime('%b',mktime(0,0,0,$mo,$da,$yr));
        $per11 = strftime('%b',mktime(0,0,0,$mo-1,$da,$yr));
@@ -122,21 +134,21 @@ function print_annual_expense_breakdown()
        $per03 = strftime('%b',mktime(0,0,0,$mo-9,$da,$yr));
        $per02 = strftime('%b',mktime(0,0,0,$mo-10,$da,$yr));
        $per01 = strftime('%b',mktime(0,0,0,$mo-11,$da,$yr));
-       
+
        $headers = array(_('Account'), _('Account Name'), $per01, $per02, $per03, $per04,
                $per05, $per06, $per07, $per08, $per09, $per10, $per11, $per12);
-       
+
        $aligns = array('left', 'left', 'right', 'right', 'right',      'right', 'right', 'right',
                'right', 'right', 'right',      'right', 'right', 'right');
-    
+
     if ($dim == 2)
     {
        $params =   array(      0 => $comments,
-                       1 => array('text' => _("Year"), 
+                       1 => array('text' => _("Year"),
                                'from' => $year, 'to' => ''),
-                       2 => array('text' => _("Dimension")." 1", 
+                       2 => array('text' => _("Dimension")." 1",
                                'from' => get_dimension_string($dimension), 'to' => ''),
-                       3 => array('text' => _("Dimension")." 2", 
+                       3 => array('text' => _("Dimension")." 2",
                                'from' => get_dimension_string($dimension2), 'to' => ''),
                        4 => array('text' => _('Info'), 'from' => _('Amounts in thousands'),
                                'to' => ''));
@@ -144,9 +156,9 @@ function print_annual_expense_breakdown()
     else if ($dim == 1)
     {
        $params =   array(      0 => $comments,
-                       1 => array('text' => _("Year"), 
+                       1 => array('text' => _("Year"),
                                'from' => $year, 'to' => ''),
-                       2 => array('text' => _('Dimension'), 
+                       2 => array('text' => _('Dimension'),
                                'from' => get_dimension_string($dimension), 'to' => ''),
                        3 => array('text' => _('Info'), 'from' => _('Amounts in thousands'),
                                'to' => ''));
@@ -154,13 +166,13 @@ function print_annual_expense_breakdown()
     else
     {
        $params =   array(      0 => $comments,
-                       1 => array('text' => _("Year"), 
+                       1 => array('text' => _("Year"),
                                'from' => $year, 'to' => ''),
                        2 => array('text' => _('Info'), 'from' => _('Amounts in thousands'),
                                'to' => ''));
     }
 
-       $rep = new FrontReport(_('Annual Expense Breakdown'), "AnnualBreakDown.pdf", user_pagesize());
+       $rep = new FrontReport(_('Annual Expense Breakdown'), "AnnualBreakDown", user_pagesize());
 
        $rep->Font();
        $rep->Info($params, $cols, $headers, $aligns);
@@ -168,30 +180,21 @@ function print_annual_expense_breakdown()
 
        $classname = '';
        $group = '';
-       $total = Array();
-       $total2 = Array();
-       $sales = Array();
-       $calc = Array();
-       unset($total);
-       unset($total2);
-       unset($sales);
-       unset($calc);
+       $total = Array(1 => 0,0,0,0,0,0,0,0,0,0,0,0);
+       $total2 = Array(1 => 0,0,0,0,0,0,0,0,0,0,0,0);
+       $sales = Array(1 => 0,0,0,0,0,0,0,0,0,0,0,0);
+       $calc = Array(1 => 0,0,0,0,0,0,0,0,0,0,0,0);
        $accounts = get_gl_accounts_all(0);
 
        while ($account = db_fetch($accounts))
        {
                $bal = getPeriods($year, $account["account_code"], $dimension, $dimension2);
-               if (!$bal['per01'] && !$bal['per02'] && !$bal['per03'] && !$bal['per04'] && 
-                       !$bal['per05'] && !$bal['per06'] && !$bal['per07'] && !$bal['per08'] && 
+               if (!$bal['per01'] && !$bal['per02'] && !$bal['per03'] && !$bal['per04'] &&
+                       !$bal['per05'] && !$bal['per06'] && !$bal['per07'] && !$bal['per08'] &&
                        !$bal['per09'] && !$bal['per10'] && !$bal['per11'] && !$bal['per12'])
                        continue;
-               //if (array_sum($bal) == 0.0)
-               //$i = 1;
-               //foreach ($bal as $b)
-               //      $balance[$i++] = $b;
-               //$balance = $bal;
-               $balance = Array(1 => $bal['per01'], $bal['per02'], $bal['per03'], $bal['per04'], 
-                       $bal['per05'], $bal['per06'], $bal['per07'], $bal['per08'], 
+               $balance = array(1 => $bal['per01'], $bal['per02'], $bal['per03'], $bal['per04'],
+                       $bal['per05'], $bal['per06'], $bal['per07'], $bal['per08'],
                        $bal['per09'], $bal['per10'], $bal['per11'], $bal['per12']);
                if ($account['AccountClassName'] != $classname)
                {
@@ -205,27 +208,29 @@ function print_annual_expense_breakdown()
                {
                        if ($group != '')
                        {
-                               $rep->Line($rep->row + 6);
-                               $rep->row -= 6;
+                               $rep->row += 6;
+                               $rep->Line($rep->row);
+                               $rep->NewLine();
                                $rep->TextCol(0, 2,     _('Total') . " " . $group);
                                for ($i = 1; $i <= 12; $i++)
-                                       $rep->TextCol($i + 1, $i + 2, number_format2($total[$i], $dec));
-                               unset($total);
-                               $rep->row -= ($rep->lineHeight + 4);
+                                       $rep->AmountCol($i + 1, $i + 2, $total[$i], $dec);
+                               $total = Array(1 => 0,0,0,0,0,0,0,0,0,0,0,0);
+                               $rep->NewLine();
                                if ($closeclass)
                                {
-                                       $rep->Line($rep->row + 6);
-                                       $rep->row -= 6;
+                                       $rep->row += 6;
+                                       $rep->Line($rep->row);
+                                       $rep->NewLine();
                                        $rep->Font('bold');
                                        $rep->TextCol(0, 2,     _('Total') . " " . $classname);
                                        for ($i = 1; $i <= 12; $i++)
                                        {
-                                               $rep->TextCol($i + 1, $i + 2, number_format2($total2[$i], $dec));
+                                               $rep->AmountCol($i + 1, $i + 2, $total2[$i], $dec);
                                                $sales[$i] += $total2[$i];
-                                       }       
+                                       }
                                        $rep->Font();
-                                       unset($total2);
-                                       $rep->NewLine(3);
+                                       $total2 = Array(1 => 0,0,0,0,0,0,0,0,0,0,0,0);
+                                       $rep->NewLine(2);
                                        $closeclass = false;
                                }
                        }
@@ -234,22 +239,24 @@ function print_annual_expense_breakdown()
                                $rep->Font('bold');
                                $rep->TextCol(0, 5, $account['AccountClassName']);
                                $rep->Font();
-                               $rep->row -= ($rep->lineHeight + 4);
+                               $rep->NewLine();
                        }
                        $group = $account['AccountTypeName'];
+                       $rep->row -= 4;
                        $rep->TextCol(0, 5, $account['AccountTypeName']);
-                       $rep->Line($rep->row - 4);
-                       $rep->row -= ($rep->lineHeight + 4);
+                       $rep->row -= 4;
+                       $rep->Line($rep->row);
+                       $rep->NewLine();
                }
                $classname = $account['AccountClassName'];
                $rep->TextCol(0, 1,     $account['account_code']);
                $rep->TextCol(1, 2,     $account['account_name']);
                for ($i = 1; $i <= 12; $i++)
                {
-                       $rep->TextCol($i + 1, $i + 2, number_format2($balance[$i], $dec));
+                       $rep->AmountCol($i + 1, $i + 2, $balance[$i], $dec);
                        $total[$i] += $balance[$i];
                        $total2[$i] += $balance[$i];
-               }                       
+               }
 
                $rep->NewLine();
 
@@ -270,29 +277,31 @@ function print_annual_expense_breakdown()
        {
                if ($group != '')
                {
-                       $rep->Line($rep->row + 6);
-                       $rep->row -= 6;
+                       $rep->row += 6;
+                       $rep->Line($rep->row);
+                       $rep->NewLine();
                        $rep->TextCol(0, 2,     _('Total') . " " . $group);
                        for ($i = 1; $i <= 12; $i++)
-                               $rep->TextCol($i + 1, $i + 2, number_format2($total[$i], $dec));
-                       $rep->row -= ($rep->lineHeight + 4);
+                               $rep->AmountCol($i + 1, $i + 2, $total[$i], $dec);
+                       $rep->NewLine();
                        if ($closeclass)
                        {
-                               $rep->Line($rep->row + 6);
-                               $rep->row -= 6;
+                               $rep->row += 6;
+                               $rep->Line($rep->row);
+                               $rep->NewLine();
 
                                $rep->Font('bold');
                                $rep->TextCol(0, 2,     _('Total') . " " . $classname);
                                for ($i = 1; $i <= 12; $i++)
                                {
-                                       $rep->TextCol($i + 1, $i + 2, number_format2($total2[$i], $dec));
+                                       $rep->AmountCol($i + 1, $i + 2, $total2[$i], $dec);
                                        $calc[$i] = $sales[$i] + $total2[$i];
-                               }       
+                               }
 
-                               $rep->row -= ($rep->lineHeight + 8);
+                               $rep->NewLine(2);
                                $rep->TextCol(0, 2,     _('Calculated Return'));
                                for ($i = 1; $i <= 12; $i++)
-                                       $rep->TextCol($i + 1, $i + 2, number_format2($calc[$i], $dec));
+                                       $rep->AmountCol($i + 1, $i + 2, $calc[$i], $dec);
                                $rep->Font();
 
                                $rep->NewLine();