Ajout d'une notion de version sur les modules de numrotation des codes clients. Les modules au statut "development" ne s'affiche que si la constante MAIN_ENABLE_DEVELOPMENT est a on.
Dbut ajout du modle personnalisable "tigre" avec numrotation automatique pour les codes clients et fournisseurs.
This commit is contained in:
Regis Houssin
parent
3f0d124eaf
commit
a9edcd57e8
@ -125,6 +125,9 @@ if ($handle)
|
||||
require_once(DOL_DOCUMENT_ROOT ."/includes/modules/societe/".$file.".php");
|
||||
|
||||
$modCodeTiers = new $file;
|
||||
|
||||
if ($modCodeTiers->version == 'development' && ! $conf->global->MAIN_ENABLE_DEVELOPMENT) continue;
|
||||
|
||||
$var = !$var;
|
||||
print "<tr ".$bc[$var].">\n <td width=\"140\">".$modCodeTiers->nom."</td>\n <td>";
|
||||
print $modCodeTiers->info($langs);
|
||||
|
||||
@ -49,7 +49,8 @@ class mod_codeclient_leopard extends ModeleThirdPartyCode
|
||||
var $code_modifiable; // Code modifiable
|
||||
var $code_modifiable_invalide; // Code modifiable si il est invalide
|
||||
var $code_modifiable_null; // Code modifiables si il est null
|
||||
var $code_null; // Code facultatif
|
||||
var $code_null; // Code facultatif
|
||||
var $version='dolibarr'; // 'development', 'experimental', 'dolibarr'
|
||||
|
||||
|
||||
/** \brief Constructeur classe
|
||||
|
||||
@ -41,7 +41,8 @@ class mod_codeclient_lion extends ModeleThirdPartyCode
|
||||
var $code_modifiable; // Code modifiable
|
||||
var $code_modifiable_invalide; // Code modifiable si il est invalide
|
||||
var $code_modifiable_null; // Code modifiables si il est null
|
||||
var $code_null; // Code facultatif
|
||||
var $code_null; // Code facultatif
|
||||
var $version='dolibarr'; // 'development', 'experimental', 'dolibarr'
|
||||
|
||||
|
||||
/** \brief Constructeur classe
|
||||
|
||||
264
htdocs/includes/modules/societe/mod_codeclient_tigre.php
Normal file
264
htdocs/includes/modules/societe/mod_codeclient_tigre.php
Normal file
@ -0,0 +1,264 @@
|
||||
<?php
|
||||
/* Copyright (C) 2004 Rodolphe Quiedeville <rodolphe@quiedeville.org>
|
||||
* Copyright (C) 2006-2007 Laurent Destailleur <eldy@users.sourceforge.net>
|
||||
* Copyright (C) 2007 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/societe/mod_codeclient_tigre.class.php
|
||||
\ingroup societe
|
||||
\brief Fichier de la classe des gestion tigre des codes clients
|
||||
\version $Revision$
|
||||
*/
|
||||
|
||||
require_once(DOL_DOCUMENT_ROOT."/includes/modules/societe/modules_societe.class.php");
|
||||
|
||||
|
||||
/**
|
||||
\class mod_codeclient_tigre
|
||||
\brief Classe permettant la gestion tigre des codes tiers
|
||||
*/
|
||||
class mod_codeclient_tigre extends ModeleThirdPartyCode
|
||||
{
|
||||
var $nom; // Nom du modele
|
||||
var $code_modifiable; // Code modifiable
|
||||
var $code_modifiable_invalide; // Code modifiable si il est invalide
|
||||
var $code_modifiable_null; // Code modifiables si il est null
|
||||
var $code_null; // Code facultatif
|
||||
var $version='development'; // 'development', 'experimental', 'dolibarr'
|
||||
|
||||
|
||||
/** \brief Constructeur classe
|
||||
*/
|
||||
function mod_codeclient_tigre()
|
||||
{
|
||||
$this->nom = "Tigre";
|
||||
$this->code_modifiable = 0;
|
||||
$this->code_modifiable_invalide = 1;
|
||||
$this->code_modifiable_null = 1;
|
||||
$this->code_null = 0;
|
||||
}
|
||||
|
||||
|
||||
/** \brief Renvoi la description du module
|
||||
* \return string Texte descripif
|
||||
*/
|
||||
function info($langs)
|
||||
{
|
||||
global $conf,$langs;
|
||||
|
||||
$langs->load("companies");
|
||||
|
||||
$form = new Form($db);
|
||||
|
||||
$texte = $langs->trans('TigreNumRefModelDesc1')."<br>\n";
|
||||
$texte.= '<form action="'.$_SERVER["PHP_SELF"].'" method="POST">';
|
||||
$texte.= '<input type="hidden" name="action" value="updateMask">';
|
||||
$texte.= '<table class="nobordernopadding" width="100%">';
|
||||
|
||||
// Paramétrage du masque
|
||||
$texte.= '<tr><td>Modele code client</td>';
|
||||
$texte.= '<td align="right">'.$form->textwithhelp('<input type="text" class="flat" size="24" name="maskcustomer" value="'.$conf->global->CODE_TIGRE_MASK_CUSTOMER.'">',$langs->trans("TigreMaskCodes"),1,1).'</td>';
|
||||
$texte.= '</tr>';
|
||||
|
||||
$texte.= '<tr><td>Modele code fournisseur</td>';
|
||||
$texte.= '<td align="right">'.$form->textwithhelp('<input type="text" class="flat" size="24" name="masksupplier" value="'.$conf->global->CODE_TIGRE_MASK_SUPPLIER.'">',$langs->trans("TigreMaskCodes"),1,1).'</td>';
|
||||
$texte.= '</tr>';
|
||||
|
||||
$texte.= '<tr><td> </td><td align="left"><input type="submit" class="button" value="'.$langs->trans("Modify").'" name="Button"></td></tr>';
|
||||
|
||||
$texte.= '</table>';
|
||||
$texte.= '</form>';
|
||||
|
||||
return $texte;
|
||||
}
|
||||
|
||||
|
||||
/** \brief Renvoi la description du module
|
||||
* \return string Texte descripif
|
||||
*/
|
||||
function getExample($langs)
|
||||
{
|
||||
return "CC0001<br>CF0001";
|
||||
}
|
||||
|
||||
|
||||
/**
|
||||
* \brief Vérifie la validité du code
|
||||
* \param $db Handler acces base
|
||||
* \param $code Code a vérifier/corriger
|
||||
* \param $soc Objet societe
|
||||
* \return int <0 si KO, 0 si OK
|
||||
*/
|
||||
function verif($db, &$code, $soc)
|
||||
{
|
||||
$result=0;
|
||||
$code = strtoupper(trim($code));
|
||||
|
||||
if (! $code && $this->code_null)
|
||||
{
|
||||
$result=0;
|
||||
}
|
||||
else
|
||||
{
|
||||
if ($this->verif_syntax($code) >= 0)
|
||||
{
|
||||
$is_dispo = $this->verif_dispo($db, $code, $soc);
|
||||
if ($is_dispo <> 0)
|
||||
{
|
||||
$result=-3;
|
||||
}
|
||||
else
|
||||
{
|
||||
$result=0;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
if (strlen($code) == 0)
|
||||
{
|
||||
$result=-2;
|
||||
}
|
||||
else
|
||||
{
|
||||
$result=-1;
|
||||
}
|
||||
}
|
||||
}
|
||||
dolibarr_syslog("mod_codeclient_tigre::verif result=".$result);
|
||||
return $result;
|
||||
}
|
||||
|
||||
|
||||
/**
|
||||
* \brief Renvoi une valeur correcte
|
||||
* \param $db Handler acces base
|
||||
* \param $code Code reference eventuel
|
||||
* \return string Code correct, <0 si KO
|
||||
*/
|
||||
function get_correct($db, $code)
|
||||
{
|
||||
$return='001';
|
||||
|
||||
$sql = "SELECT MAX(code_client) as maxval FROM ".MAIN_DB_PREFIX."societe";
|
||||
$resql=$db->query($sql);
|
||||
if ($resql)
|
||||
{
|
||||
$obj=$db->fetch_object($resql);
|
||||
if ($obj)
|
||||
{
|
||||
$newval=$obj->maxval+1;
|
||||
$return=sprintf('%03d',$newval);
|
||||
return $return;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
return -1;
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
/**
|
||||
* \brief Renvoi si un code est pris ou non (par autre tiers)
|
||||
* \param $db Handler acces base
|
||||
* \param $code Code a verifier
|
||||
* \param $soc Objet societe
|
||||
* \return int 0 si dispo, <0 si erreur
|
||||
*/
|
||||
function verif_dispo($db, $code, $soc)
|
||||
{
|
||||
$sql = "SELECT code_client FROM ".MAIN_DB_PREFIX."societe";
|
||||
$sql.= " WHERE code_client = '".$code."'";
|
||||
$sql.= " AND rowid != '".$soc->id."'";
|
||||
|
||||
$resql=$db->query($sql);
|
||||
if ($resql)
|
||||
{
|
||||
if ($db->num_rows($resql) == 0)
|
||||
{
|
||||
return 0;
|
||||
}
|
||||
else
|
||||
{
|
||||
return -1;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
return -2;
|
||||
}
|
||||
|
||||
}
|
||||
|
||||
|
||||
/**
|
||||
* \brief Renvoi si un code respecte la syntaxe
|
||||
* \param $code Code a verifier
|
||||
* \return int 0 si OK, <0 si KO
|
||||
*/
|
||||
function verif_syntax($code)
|
||||
{
|
||||
$res = 0;
|
||||
|
||||
if (strlen($code) < 3)
|
||||
{
|
||||
$res = -1;
|
||||
}
|
||||
else
|
||||
{
|
||||
if (eregi('[0-9][0-9][0-9]+',$code))
|
||||
{
|
||||
$res = 0;
|
||||
}
|
||||
else
|
||||
{
|
||||
$res = -2;
|
||||
}
|
||||
|
||||
}
|
||||
return $res;
|
||||
}
|
||||
|
||||
|
||||
/**
|
||||
* Renvoi 0 si numerique, sinon renvoi nb de car non numerique
|
||||
*/
|
||||
function is_num($str)
|
||||
{
|
||||
$ok = 0;
|
||||
|
||||
$alpha = '0123456789';
|
||||
|
||||
for ($i = 0 ; $i < length($str) ; $i++)
|
||||
{
|
||||
if (strpos($alpha, substr($str,$i, 1)) === false)
|
||||
{
|
||||
$ok++;
|
||||
}
|
||||
}
|
||||
|
||||
return $ok;
|
||||
}
|
||||
|
||||
}
|
||||
|
||||
?>
|
||||
@ -41,7 +41,8 @@ class mod_codeclient_zebre extends ModeleThirdPartyCode
|
||||
var $code_modifiable; // Code modifiable
|
||||
var $code_modifiable_invalide; // Code modifiable si il est invalide
|
||||
var $code_modifiable_null; // Code modifiables si il est null
|
||||
var $code_null; // Code facultatif
|
||||
var $code_null; // Code facultatif
|
||||
var $version='dolibarr'; // 'development', 'experimental', 'dolibarr'
|
||||
|
||||
|
||||
/** \brief Constructeur classe
|
||||
|
||||
Loading…
Reference in New Issue
Block a user