[Sommaire] [Imprimer]

   1  <?php
   2  /* Copyright (C) 2002 Rodolphe Quiedeville <rodolphe@quiedeville.org>
   3   * Copyright (C) 2004 Laurent Destailleur  <eldy@users.sourceforge.net>
   4   *
   5   * $Id: config.php,v 1.8 2004/10/31 13:01:15 eldy Exp $
   6   * $Source: /cvsroot/dolibarr/dolibarr/htdocs/compta/config.php,v $
   7   *
   8   * This program is free software; you can redistribute it and/or modify
   9   * it under the terms of the GNU General Public License as published by
  10   * the Free Software Foundation; either version 2 of the License, or
  11   * (at your option) any later version.
  12   *
  13   * This program is distributed in the hope that it will be useful,
  14   * but WITHOUT ANY WARRANTY; without even the implied warranty of
  15   * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16   * GNU General Public License for more details.
  17   *
  18   * You should have received a copy of the GNU General Public License
  19   * along with this program; if not, write to the Free Software
  20   * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  21   *
  22   */
  23  require ("./pre.inc.php");
  24  
  25  llxHeader();
  26  
  27  
  28  if ($action == 'add') {
  29  
  30  }
  31  /*
  32   *
  33   * Mode creation
  34   *
  35   *
  36   *
  37   */
  38  
  39  if ($action == 'create') {
  40  
  41  
  42  } else {
  43  
  44      /*
  45       *
  46       * Liste
  47       *
  48       *
  49       */
  50      print_barre_liste("Comptes comptable",$page,"config.php");
  51  
  52      $sql = "SELECT number, label";
  53      $sql .= " FROM ".MAIN_DB_PREFIX."compta_account";
  54      $sql .= " ORDER BY number";
  55    
  56      $result = $db->query($sql);
  57      if ($result) {
  58        $num = $db->num_rows();
  59      
  60        $i = 0;
  61        print "<table class=\"noborder\" width=\"100%\">";
  62        print '<tr class="liste_titre">';
  63        print "<td>Num&eacute;ro</td>";
  64        print_liste_field_titre($langs->trans("Label"),"config.php","label");
  65        print "</tr>\n";
  66      
  67        if ($num > 0) {
  68      $var=True;
  69      while ($i < $num) {
  70        $objp = $db->fetch_object();
  71        $var=!$var;
  72      
  73        print "<tr $bc[$var]>";
  74        print '<td>'.$objp->number.'</td>';
  75        print '<td>'.$objp->label.'</td>';
  76  
  77        print "</tr>\n";
  78        $i++;
  79      }
  80        }
  81      
  82        print "</table>";
  83        $db->free();
  84      } else {
  85        print $db->error();
  86      }
  87  
  88  
  89  
  90  }
  91  
  92  $db->close();
  93  
  94  llxFooter("<em>Derni&egrave;re modification $Date: 2004/10/31 13:01:15 $ r&eacute;vision $Revision: 1.8 $</em>");
  95  ?>