Ajout de mod�les de num�rotation pour propale, commande, facture qui sont bas� sur emeraude et titan mais ne se remettent pas � 0 en d�but d'ann�e d'exercice.

2006-09-04 10:09:17 +00:00
parent b561530aaf
commit 7d60a68b10
6 changed files with 439 additions and 1 deletions
--- a/htdocs/includes/modules/commande/mod_commande_rubis.php
+++ b/htdocs/includes/modules/commande/mod_commande_rubis.php
@@ -0,0 +1,147 @@
+<?php
+/* Copyright (C) 2005       Rodolphe Quiedeville <rodolphe@quiedeville.org>
+ * Copyright (C) 2005-2006  Regis Houssin        <regis.houssin@cap-networks.com>
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 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
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+ * or see http://www.gnu.org/
+ *
+ * $Id$
+ * $Source$
+ *
+ */
+
+/** 
+    \file       htdocs/includes/modules/commande/mod_commande_rubis.php
+    \ingroup    commande
+    \brief      Fichier contenant la classe du mod<6F>le de num<75>rotation de r<>f<EFBFBD>rence de commande Rubis
+    \version    $Revision$
+*/
+
+include_once("modules_commande.php");
+
+
+/**
+   \class      mod_commande_rubis
+   \brief      Classe du mod<6F>le de num<75>rotation de r<>f<EFBFBD>rence de commande Rubis
+*/
+
+class mod_commande_rubis extends ModeleNumRefCommandes
+{
+
+  /**   \brief      Constructeur
+   */
+  function mod_commande_rubis()
+  {
+    $this->nom = "Rubis";
+  }
+
+
+  /**     \brief      Renvoi la description du modele de num<75>rotation
+   *      \return     string      Texte descripif
+   */
+  function info()
+    {
+    	global $conf;
+    	
+      $texte = "Renvoie le num<75>ro sous la forme CYYNNNNN o<> YY est l'ann<6E>e et NNNNN le num<75>ro d'incr<63>ment qui commence <20> 1.<br>\n";
+      $texte.= "L'ann<6E>e s'incr<63>mente de 1 SANS remise <20> zero en d<>but d'ann<6E>e d'exercice.<br>\n";
+      $texte.= "D<EFBFBD>finir la variable SOCIETE_FISCAL_MONTH_START avec le mois du d<>but d'exercice, ex: 9 pour septembre.<br>\n";
+      $texte.= "Dans cette exemple nous aurons au 1er septembre 2006 une commande nomm<6D>e C0700345.<br>\n";
+      
+      if ($conf->global->SOCIETE_FISCAL_MONTH_START)
+      {
+      	$texte.= "SOCIETE_FISCAL_MONTH_START est d<>finie et vaut: ".$conf->global->SOCIETE_FISCAL_MONTH_START."";
+      }
+      else
+      {
+      	$texte.= "SOCIETE_FISCAL_MONTH_START n'est pas d<>finie.";
+      }
+      return $texte;
+    }
+    
+   /**     \brief      Renvoi un exemple de num<75>rotation
+   *      \return     string      Example
+   */
+   function getExample()
+   {
+       return "C0600001";
+   }
+
+  
+  /**     \brief      Renvoi prochaine valeur attribu<62>e
+   *      \return     string      Valeur
+   */
+    function getNextValue()
+    {
+        global $db,$conf;
+        
+        // D'abord on d<>fini l'ann<6E>e fiscale
+        $prefix='C';
+        $current_month = date("n");
+        if($conf->global->SOCIETE_FISCAL_MONTH_START && $current_month >= $conf->global->SOCIETE_FISCAL_MONTH_START)
+        {
+        	$yy = strftime("%y",mktime(0,0,0,date("m"),date("d"),date("Y")+1));
+        }
+        else
+        {
+        	$yy = strftime("%y",time());
+        }
+        
+        // On r<>cup<75>re la valeur max (r<>ponse imm<6D>diate car champ ind<6E>x<EFBFBD>)
+        $cyy='';
+        $sql = "SELECT MAX(ref)";
+        $sql.= " FROM ".MAIN_DB_PREFIX."commande";
+        $resql=$db->query($sql);
+        if ($resql)
+        {
+            $row = $db->fetch_row($resql);
+            if ($row) $cyy = substr($row[0],0,3);
+        }
+
+        // Si au moins un champ respectant le mod<6F>le a <20>t<EFBFBD> trouv<75>e
+        if (eregi('C[0-9][0-9]',$cyy))
+        {
+            // Recherche rapide car restreint par un like sur champ index<65>
+            $posindice=4;
+            $sql = "SELECT MAX(0+SUBSTRING(ref,$posindice))";
+            $sql.= " FROM ".MAIN_DB_PREFIX."commande";
+            $resql=$db->query($sql);
+            if ($resql)
+            {
+                $row = $db->fetch_row($resql);
+                $max = $row[0];
+            }
+        }
+        else
+        {
+            $max=0;
+        }
+        
+        $num = sprintf("%05s",$max+1);
+        
+        return  "C$yy$num";
+    }
+    
+  
+    /**     \brief      Renvoie la r<>f<EFBFBD>rence de commande suivante non utilis<69>e
+     *      \param      objsoc      Objet soci<63>t<EFBFBD>
+     *      \return     string      Texte descripif
+     */
+    function commande_get_num($objsoc=0)
+    {
+        return $this->getNextValue();
+    }
+}
+?>