Changement de mthode de numrotation - essai avec l'hexa

This commit is contained in:
Regis Houssin
2006-05-03 13:08:40 +00:00
parent b4902ee21d
commit 93ccd02a21

View File

@@ -64,11 +64,70 @@ class mod_commande_opale extends ModeleNumRefCommandes
}
/** \brief Renvoi prochaine valeur attribu<62>e
* \return string Valeur
*/
function getNextValue()
{
global $db;
// D'abord on r<>cup<75>re la valeur max (r<>ponse imm<6D>diate car champ ind<6E>x<EFBFBD>)
$com='';
$sql = "SELECT MAX(ref)";
$sql.= " FROM ".MAIN_DB_PREFIX."commande";
$resql=$db->query($sql);
if ($resql)
{
$row = $db->fetch_row($resql);
if ($row)
{
$com = substr($row[0],0,3);
$max = hexdec(substr($row[0],4,3)).(substr($row[0],8,3))
}
/*
// Si au moins un champ respectant le mod<6F>le a <20>t<EFBFBD> trouv<75>e
if (eregi('COM',$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";
$sql.= " WHERE ref like '${cyy}%'";
$resql=$db->query($sql);
if ($resql)
{
$row = $db->fetch_row($resql);
$max = $row[0];
}
*/
}
else
{
$max=0;
}
$yy = strftime("%y",time());
$hex = strtoupper(dechex($max+1));
$ref = substr("000000".($hex),-6);
return 'COM-'.substr($ref,0,3)."-".substr($ref,3,3);
}
/** \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();
}
/** \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)
/* function commande_get_num($obj_soc=0)
{
global $db;
@@ -89,5 +148,6 @@ class mod_commande_opale extends ModeleNumRefCommandes
return 'COM-'.substr($ref,0,3)."-".substr($ref,3,3);
}
*/
}
?>