[Sommaire] [Imprimer]

   1  <?php
   2  /* Copyright (C) 2003 Rodolphe Quiedeville <rodolphe@quiedeville.org>
   3   * Copyright (C) 2004 Laurent Destailleur  <eldy@users.sourceforge.net>
   4   *
   5   * This program is free software; you can redistribute it and/or modify
   6   * it under the terms of the GNU General Public License as published by
   7   * the Free Software Foundation; either version 2 of the License, or
   8   * (at your option) any later version.
   9   *
  10   * This program is distributed in the hope that it will be useful,
  11   * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12   * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13   * GNU General Public License for more details.
  14   *
  15   * You should have received a copy of the GNU General Public License
  16   * along with this program; if not, write to the Free Software
  17   * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  18   *
  19   * $Id: constall.php,v 1.8 2004/10/23 16:57:27 eldy Exp $
  20   * $Source: /cvsroot/dolibarr/dolibarr/htdocs/admin/system/constall.php,v $
  21   */
  22  
  23  /*!    \file htdocs/admin/system/constall.php
  24          \brief      Page d'info de toutes les constantes
  25          \version    $Revision: 1.8 $
  26  */
  27  
  28  require ("./pre.inc.php");
  29  
  30  $langs->load("admin");
  31  
  32  
  33  if (!$user->admin)
  34    accessforbidden();
  35  
  36  
  37  llxHeader();
  38  
  39  print_titre($langs->trans("SummaryConst"));
  40  
  41  print '<br>';
  42  print '<table class="noborder">';
  43  print '<tr class="liste_titre">';
  44  print '<td>'.$langs->trans("Parameter").'</td>';
  45  print '<td>'.$langs->trans("Value").'</td>';
  46  print "</tr>\n";
  47  
  48  $sql = "SELECT rowid, name, value, type, note FROM ".MAIN_DB_PREFIX."const ORDER BY name ASC";
  49  $result = $db->query($sql);
  50  if ($result) 
  51  {
  52    $num = $db->num_rows();
  53    $i = 0;
  54    $var=True;
  55  
  56    while ($i < $num)
  57      {
  58        $obj = $db->fetch_object($result);
  59        $var=!$var;
  60  
  61        print "<tr $bc[$var]><td>$obj->name</td>\n";
  62  
  63        print '<td>';
  64        print $obj->value;
  65        print "</td></tr>\n";
  66  
  67        $i++;
  68      }
  69  }
  70  $var=!$var;
  71  
  72  
  73  print '</table>';
  74  
  75  $db->close();
  76  
  77  llxFooter();
  78  ?>