[Sommaire] [Imprimer]

   1  <?php
   2  /* Copyright (C) 2001-2004 Rodolphe Quiedeville <rodolphe@quiedeville.org>
   3   * Copyright (C) 2004-2005 Laurent Destailleur  <eldy@users.sourceforge.net>
   4   * Copyright (C) 2005 Simon Tosser  <simon@kornog-computing.com>
   5   *
   6   * This program is free software; you can redistribute it and/or modify
   7   * it under the terms of the GNU General Public License as published by
   8   * the Free Software Foundation; either version 2 of the License, or
   9   * (at your option) any later version.
  10   *
  11   * This program is distributed in the hope that it will be useful,
  12   * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13   * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14   * GNU General Public License for more details.
  15   *
  16   * You should have received a copy of the GNU General Public License
  17   * along with this program; if not, write to the Free Software
  18   * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  19   *
  20   * $Id: delais.php,v 1.4 2005/10/14 21:05:13 eldy Exp $
  21   * $Source: /cvsroot/dolibarr/dolibarr/htdocs/admin/delais.php,v $
  22   */
  23  
  24  /**
  25          \file       htdocs/admin/delais.php
  26          \brief      Page d'administration des d?lais de retard
  27          \version    $Revision: 1.4 $
  28  */
  29  
  30  require ("./pre.inc.php");
  31  
  32  $langs->load("admin");
  33  $langs->load("orders");
  34  $langs->load("propal");
  35  $langs->load("contracts");
  36  $langs->load("bills");
  37  $langs->load("banks");
  38  
  39  if (!$user->admin)
  40    accessforbidden();
  41  if ( (isset($_POST["action"]) && $_POST["action"] == 'update')
  42    || (isset($_POST["action"]) && $_POST["action"] == 'updateedit') )
  43  {
  44      //Conversion des jours en secondes
  45      dolibarr_set_const($db, "MAIN_DELAY_ACTIONS_TODO",$_POST["ActionsToDo"]);
  46      dolibarr_set_const($db, "MAIN_DELAY_ORDERS_TO_PROCESS",$_POST["OrdersToProcess"]);
  47      dolibarr_set_const($db, "MAIN_DELAY_PROPALS_TO_CLOSE",$_POST["PropalsToClose"]);
  48      dolibarr_set_const($db, "MAIN_DELAY_PROPALS_TO_BILL",$_POST["PropalsToBill"]);
  49      dolibarr_set_const($db, "MAIN_DELAY_NOT_ACTIVATED_SERVICES",$_POST["BoardNotActivatedServices"]);
  50      dolibarr_set_const($db, "MAIN_DELAY_RUNNING_SERVICES",$_POST["BoardRunningServices"]);
  51      dolibarr_set_const($db, "MAIN_DELAY_SUPPLIER_BILLS_TO_PAY",$_POST["SupplierBillsToPay"]);
  52      dolibarr_set_const($db, "MAIN_DELAY_CUSTOMER_BILLS_UNPAYED",$_POST["CustomerBillsUnpayed"]);
  53      dolibarr_set_const($db, "MAIN_DELAY_TRANSACTIONS_TO_CONCILIATE",$_POST["TransactionsToConciliate"]);
  54      dolibarr_set_const($db, "MAIN_DELAY_MEMBERS",$_POST["Members"]);
  55      if ($_POST['action'] != 'updateedit')
  56      {
  57          Header("Location: delais.php");
  58      }
  59  }
  60  
  61  
  62  
  63  llxHeader();
  64  
  65  $form = new Form($db);
  66  $countrynotdefined='<font class="error">'.$langs->trans("ErrorSetACountryFirst").' ('.$langs->trans("SeeAbove").')</font>';
  67  
  68  
  69  print_fiche_titre($langs->trans("DelaysOfToleranceBeforeWarning"));
  70  
  71  print $langs->transnoentities("DelaysOfToleranceDesc",img_warning())."<br>\n";
  72  
  73  print "<br>\n";
  74  
  75  if ((isset($_GET["action"]) && $_GET["action"] == 'edit')
  76   || (isset($_POST["action"]) && $_POST["action"] == 'updateedit') )
  77  {
  78      /*
  79       * Edition des param?tres
  80       */
  81      print '
  82      <script language="javascript" type="text/javascript">
  83      <!--
  84      function save_refresh()
  85      {
  86          document.form_index.action.value="updateedit";
  87          document.form_index.submit();
  88      //    location.href = "delais.php?action=updateedit";
  89      }
  90      -->
  91      </script>
  92      ';
  93  
  94      print '<form method="post" action="delais.php" name="form_index">';
  95      print '<input type="hidden" name="action" value="update">';
  96      $var=true;
  97  
  98      print '<table class="noborder" width="100%">';
  99      print '<tr class="liste_titre"><td width="60%">'.$langs->trans("DolibarrWorkBoard").'</td><td>'.$langs->trans("Value").'</td></tr>';
 100  
 101      //
 102      if (1 == 1)
 103      {
 104          $var=!$var;
 105          print '<tr '.$bc[$var].'><td>'.$langs->trans("DelaysOfToleranceActionsToDo").'</td><td>';
 106          print '<input size="5" name="ActionsToDo" value="'. $conf->global->MAIN_DELAY_ACTIONS_TODO . '"> ' . $langs->trans("days") . '</td></tr>';
 107      }
 108      if ($conf->commande->enabled)
 109      {
 110          $var=!$var;
 111          print '<tr '.$bc[$var].'><td>'.$langs->trans("DelaysOfToleranceOrdersToProcess").'</td><td>';
 112          print '<input size="5" name="OrdersToProcess" value="'. $conf->global->MAIN_DELAY_ORDERS_TO_PROCESS . '"> ' . $langs->trans("days") . '</td></tr>';
 113      }
 114      if ($conf->propal->enabled)
 115      {
 116          $var=!$var;
 117          print '<tr '.$bc[$var].'><td>'.$langs->trans("DelaysOfTolerancePropalsToClose").'</td><td>';
 118          print '<input size="5" name="PropalsToClose" value="'. $conf->global->MAIN_DELAY_PROPALS_TO_CLOSE . '"> ' . $langs->trans("days") . '</td></tr>';    
 119      }
 120      if ($conf->propal->enabled)
 121      {
 122          $var=!$var;
 123          print '<tr '.$bc[$var].'><td>'.$langs->trans("DelaysOfTolerancePropalsToBill").'</td><td>';
 124          print '<input size="5" name="PropalsToBill" value="'. $conf->global->MAIN_DELAY_PROPALS_TO_BILL . '"> ' . $langs->trans("days") . '</td></tr>';    
 125      }
 126      if ($conf->service->enabled)
 127      {
 128          $var=!$var;
 129          print '<tr '.$bc[$var].'><td>'.$langs->trans("DelaysOfToleranceNotActivatedServices").'</td><td>';
 130          print '<input size="5" name="BoardNotActivatedServices" value="'. $conf->global->MAIN_DELAY_NOT_ACTIVATED_SERVICES . '"> ' . $langs->trans("days") . '</td></tr>';
 131      }
 132      if ($conf->service->enabled)
 133      {
 134          $var=!$var;
 135          print '<tr '.$bc[$var].'><td>'.$langs->trans("DelaysOfToleranceRunningServices").'</td><td>';
 136          print '<input size="5" name="BoardRunningServices" value="'. $conf->global->MAIN_DELAY_RUNNING_SERVICES . '"> ' . $langs->trans("days") . '</td></tr>';
 137      }
 138      if ($conf->fournisseur->enabled)
 139      {
 140          $var=!$var;
 141          print '<tr '.$bc[$var].'><td>'.$langs->trans("DelaysOfToleranceSupplierBillsToPay").'</td><td>';
 142          print '<input size="5" name="SupplierBillsToPay" value="'. $conf->global->MAIN_DELAY_SUPPLIER_BILLS_TO_PAY . '"> ' . $langs->trans("days") . '</td></tr>';
 143      }    
 144      if ($conf->facture->enabled)
 145      {
 146          $var=!$var;
 147          print '<tr '.$bc[$var].'><td>'.$langs->trans("DelaysOfToleranceCustomerBillsUnpayed").'</td><td>';
 148          print '<input size="5" name="CustomerBillsUnpayed" value="'. $conf->global->MAIN_DELAY_CUSTOMER_BILLS_UNPAYED . '"> ' . $langs->trans("days") . '</td></tr>';
 149      }    
 150      if ($conf->banque->enabled)
 151      {
 152          $var=!$var;
 153          print '<tr '.$bc[$var].'><td>'.$langs->trans("DelaysOfToleranceTransactionsToConciliate").'</td><td>';
 154          print '<input size="5" name="TransactionsToConciliate" value="'. $conf->global->MAIN_DELAY_TRANSACTIONS_TO_CONCILIATE . '"> ' . $langs->trans("days") . '</td></tr>'; 
 155      }
 156      if ($conf->adherent->enabled)
 157      {
 158          $var=!$var;
 159          print '<tr '.$bc[$var].'><td>'.$langs->trans("DelaysOfToleranceMembers").'</td><td>';
 160          print '<input size="5" name="Members" value="'. $conf->global->MAIN_DELAY_MEMBERS . '"> ' . $langs->trans("days") . '</td></tr>';
 161      }
 162          
 163      print '</table>';
 164  
 165  
 166      print '<br><center><input type="submit" class="button" value="'.$langs->trans("Save").'"></center>';
 167      print '<br>';
 168      
 169      print '</form>';
 170  }
 171  else
 172  {
 173      /*
 174       * Affichage des parametres
 175       */
 176  
 177      print '<table class="noborder" width="100%">';
 178      print '<tr class="liste_titre"><td width="60%">'.$langs->trans("DolibarrWorkBoard").'</td><td>'.$langs->trans("Value").'</td></tr>';
 179      $var=true;
 180  
 181      $var=!$var;
 182  
 183      if (1== 1)
 184      {
 185          print '<tr '.$bc[$var].'><td>'.$langs->trans("DelaysOfToleranceActionsToDo").'</td><td>' . $conf->global->MAIN_DELAY_ACTIONS_TODO . ' ' . $langs->trans("days") . '</td></tr>';
 186      }
 187      
 188      if ($conf->commande->enabled)
 189      {
 190          $var=!$var;
 191          print '<tr '.$bc[$var].'><td>'.$langs->trans("DelaysOfToleranceOrdersToProcess").'</td><td>' . $conf->global->MAIN_DELAY_ORDERS_TO_PROCESS . ' ' . $langs->trans("days") . '</td></tr>';
 192      }
 193       
 194      if ($conf->propal->enabled)
 195      {
 196          $var=!$var;
 197          print '<tr '.$bc[$var].'><td>'.$langs->trans("DelaysOfTolerancePropalsToClose").'</td><td>' . $conf->global->MAIN_DELAY_PROPALS_TO_CLOSE . ' ' . $langs->trans("days") . '</td></tr>';
 198      }
 199  
 200      if ($conf->propal->enabled)
 201      {
 202          $var=!$var;
 203          print '<tr '.$bc[$var].'><td>'.$langs->trans("DelaysOfTolerancePropalsToBill").'</td><td>' . $conf->global->MAIN_DELAY_PROPALS_TO_BILL . ' ' . $langs->trans("days") . '</td></tr>';
 204      }
 205  
 206      if ($conf->service->enabled)
 207      {
 208          $var=!$var;
 209          print '<tr '.$bc[$var].'><td>'.$langs->trans("DelaysOfToleranceNotActivatedServices").'</td><td>' . $conf->global->MAIN_DELAY_NOT_ACTIVATED_SERVICES . ' ' . $langs->trans("days") . '</td></tr>';
 210      }
 211      
 212      if ($conf->service->enabled)
 213      {
 214          $var=!$var;
 215          print '<tr '.$bc[$var].'><td>'.$langs->trans("DelaysOfToleranceRunningServices").'</td><td>' . $conf->global->MAIN_DELAY_RUNNING_SERVICES . ' ' . $langs->trans("days") . '</td></tr>';
 216      }
 217  
 218      if ($conf->fournisseur->enabled)
 219      {
 220          $var=!$var;
 221          print '<tr '.$bc[$var].'><td>'.$langs->trans("DelaysOfToleranceSupplierBillsToPay").'</td><td>' . $conf->global->MAIN_DELAY_SUPPLIER_BILLS_TO_PAY . ' ' . $langs->trans("days") . '</td></tr>';
 222      }
 223      
 224      if ($conf->facture->enabled)
 225      {
 226          $var=!$var;
 227          print '<tr '.$bc[$var].'><td>'.$langs->trans("DelaysOfToleranceCustomerBillsUnpayed").'</td><td>' . $conf->global->MAIN_DELAY_CUSTOMER_BILLS_UNPAYED . ' ' . $langs->trans("days") . '</td></tr>';
 228      }
 229  
 230      if ($conf->banque->enabled)
 231      {
 232          $var=!$var;
 233          print '<tr '.$bc[$var].'><td>'.$langs->trans("DelaysOfToleranceTransactionsToConciliate").'</td><td>' . $conf->global->MAIN_DELAY_TRANSACTIONS_TO_CONCILIATE . ' ' . $langs->trans("days") . '</td></tr>';    
 234      }
 235  
 236      if ($conf->adherent->enabled)
 237      {
 238          $var=!$var;
 239          print '<tr '.$bc[$var].'><td>'.$langs->trans("DelaysOfToleranceMembers").'</td><td>' . $conf->global->MAIN_DELAY_MEMBERS . ' ' . $langs->trans("days") . '</td></tr>';
 240      }
 241  
 242      print '</table>';
 243  
 244      // Boutons d'action
 245      print '<div class="tabsAction">';
 246      print '<a class="tabAction" href="delais.php?action=edit">'.$langs->trans("Edit").'</a>';
 247      print '</div>';
 248  
 249  }
 250  
 251  
 252  llxFooter('$Date: 2005/10/14 21:05:13 $ - $Revision: 1.4 $');
 253  
 254  ?>