reporting/rep701.php

   1 <?php
   2 /**********************************************************************
   3     Copyright (C) FrontAccounting, LLC.
   4         Released under the terms of the GNU General Public License, GPL,
   5         as published by the Free Software Foundation, either version 3
   6         of the License, or (at your option) any later version.
   7     This program is distributed in the hope that it will be useful,
   8     but WITHOUT ANY WARRANTY; without even the implied warranty of
   9     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
  10     See the License here <http://www.gnu.org/licenses/gpl-3.0.html>.
  11 ***********************************************************************/
  12 $page_security = 2;
  13 // ----------------------------------------------------------------
  14 // $ Revision:  2.0 $
  15 // Creator:     Joe Hunt
  16 // date_:       2005-05-19
  17 // Title:       Chart of GL Accounts
  18 // ----------------------------------------------------------------
  19 $path_to_root="..";
  20
  21 include_once($path_to_root . "/includes/session.inc");
  22 include_once($path_to_root . "/includes/date_functions.inc");
  23 include_once($path_to_root . "/includes/data_checks.inc");
  24 include_once($path_to_root . "/gl/includes/gl_db.inc");
  25
  26 //----------------------------------------------------------------------------------------------------
  27
  28 // trial_inquiry_controls();
  29 print_Chart_of_Accounts();
  30
  31 //----------------------------------------------------------------------------------------------------
  32
  33 function print_Chart_of_Accounts()
  34 {
  35         global $path_to_root;
  36
  37         include_once($path_to_root . "/reporting/includes/pdf_report.inc");
  38
  39         $showbalance = $_POST['PARAM_0'];
  40         $comments = $_POST['PARAM_1'];
  41         $dec = 0;
  42
  43         $cols = array(0, 50, 300, 425, 500);
  44
  45         $headers = array(_('Account'), _('Account Name'), _('Account Code'), _('Balance'));
  46
  47         $aligns = array('left', 'left', 'left', 'right');
  48
  49         $params = array(0 => $comments);
  50
  51         $rep = new FrontReport(_('Chart of Accounts'), "ChartOfAccounts.pdf", user_pagesize());
  52
  53         $rep->Font();
  54         $rep->Info($params, $cols, $headers, $aligns);
  55         $rep->Header();
  56
  57         $classname = '';
  58         $group = '';
  59
  60         $accounts = get_gl_accounts_all();
  61
  62         while ($account=db_fetch($accounts))
  63         {
  64                 if ($showbalance == 1)
  65                 {
  66                         $begin = begin_fiscalyear();
  67                         if (is_account_balancesheet($account["account_code"]))
  68                                 $begin = "";
  69                         $balance = get_gl_trans_from_to($begin, ToDay(), $account["account_code"], 0);
  70                 }
  71                 if ($account['AccountTypeName'] != $group)
  72                 {
  73                         if ($classname != '')
  74                                 $rep->row -= 4;
  75                         if ($account['AccountClassName'] != $classname)
  76                         {
  77                                 $rep->Font('bold');
  78                                 $rep->TextCol(0, 4, $account['AccountClassName']);
  79                                 $rep->Font();
  80                                 $rep->row -= ($rep->lineHeight + 4);
  81                         }
  82                         $group = $account['AccountTypeName'];
  83                         $rep->TextCol(0, 4, $account['AccountTypeName']);
  84                         //$rep->Line($rep->row - 4);
  85                         $rep->row -= ($rep->lineHeight + 4);
  86                 }
  87                 $classname = $account['AccountClassName'];
  88
  89                 $rep->TextCol(0, 1,     $account['account_code']);
  90                 $rep->TextCol(1, 2,     $account['account_name']);
  91                 $rep->TextCol(2, 3,     $account['account_code2']);
  92                 if ($showbalance == 1)
  93                         $rep->TextCol(3, 4,     number_format2($balance, $dec));
  94
  95                 $rep->NewLine();
  96                 if ($rep->row < $rep->bottomMargin + 3 * $rep->lineHeight)
  97                 {
  98                         $rep->Line($rep->row - 2);
  99                         $rep->Header();
 100                 }
 101         }
 102         $rep->Line($rep->row);
 103         $rep->End();
 104 }
 105
 106 ?>