Nouveau fichier

2026-01-04 08:02:22 +01:00 · 2005-04-04 19:43:40 +00:00
parent 721e1086ba
commit fe4569615d
1 changed files with 85 additions and 0 deletions
--- a/htdocs/includes/modules/commande/mod_commande_opale.php
+++ b/htdocs/includes/modules/commande/mod_commande_opale.php
@@ -0,0 +1,85 @@
+<?php
+/* Copyright (C) 2005 Rodolphe Quiedeville <rodolphe@quiedeville.org>
+ *
+ * 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_opale.php
+    \ingroup    commande
+    \brief      Fichier contenant la classe du mod<6F>le de num<75>rotation de r<>f<EFBFBD>rence de commande Opale
+    \version    $Revision$
+*/
+
+include_once("modules_commande.php");
+
+
+/**
+   \class      mod_commande_opale
+   \brief      Classe du mod<6F>le de num<75>rotation de r<>f<EFBFBD>rence de commande Opale
+*/
+
+class mod_commande_opale extends ModeleNumRefCommandes
+{
+
+  /**   \brief      Constructeur
+   */
+  function mod_commande_opale()
+  {
+    $this->nom = "Opale";
+  }
+
+
+  /**     \brief      Renvoi la description du modele de num<75>rotation
+   *      \return     string      Texte descripif
+   */
+  function info()
+  {
+    return "Renvoie le num<75>ro sous la forme num<75>rique COMhexa, o<> hexa repr<70>sente un incr<63>ment global cod<6F> en h<>xad<61>cimal. (COM-000-001 <20> COM-FFF-FFF)";
+  }
+
+  
+  /**   \brief      Renvoie le prochaine num<75>ro de r<>f<EFBFBD>rence de commande non utilis<69>
+        \param      obj_soc     objet soci<63>t<EFBFBD>
+        \return     string      num<75>ro de r<>f<EFBFBD>rence de commande non utilis<69>
+   */
+  function commande_get_num($obj_soc=0)
+  { 
+    global $db;
+    
+    $sql = "SELECT count(*) FROM ".MAIN_DB_PREFIX."commande WHERE fk_statut <> 0";
+    
+    $resql = $db->query($sql);
+
+    if ( $resql ) 
+      {
+	$row = $db->fetch_row($resql);
+	
+	$num = $row[0];
+      }
+    
+    $hex = strtoupper(dechex($num+1));
+
+    $ref = substr("000000".($hex),-6);
+
+    return 'COM-'.substr($ref,0,3)."-".substr($ref,3,3);
+  }
+}
+?>