lainwir3d/dolibarr
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Merge branch '3.7' of git@github.com:Dolibarr/dolibarr.git into 3.7

Browse Source
This commit is contained in:
Laurent Destailleur 2015-01-17 16:40:53 +01:00
commit 06eda34b56
1 changed files with 22 additions and 22 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

44
htdocs/compta/prelevement/class/bonprelevement.class.php
View File

@ -893,31 +893,31 @@ class BonPrelevement extends CommonObject
*/ */
if (!$error) if (!$error)
{ {
$ref = "T".substr($year,-2).$month; $ref = substr($year,-2).$month;
$sql = "SELECT substring(ref from char_length(ref) - 1)";
$sql.= " FROM ".MAIN_DB_PREFIX."prelevement_bons";
$sql.= " WHERE ref LIKE '%".$ref."%'";
$sql.= " AND entity = ".$conf->entity;
$sql.= " ORDER BY ref DESC LIMIT 1";
dol_syslog(get_class($this)."::Create sql=".$sql, LOG_DEBUG);
$resql = $this->db->query($sql);
$sql = "SELECT CAST(RIGHT(ref,2) AS SIGNED INTEGER)"; if ($resql)
$sql.= " FROM ".MAIN_DB_PREFIX."prelevement_bons"; {
$sql.= " WHERE ref LIKE '".$ref."%'"; $row = $this->db->fetch_row($resql);
$sql.= " AND entity = ".$conf->entity; }
$sql.= " ORDER BY ref DESC LIMIT 1"; else
{
$error++;
dol_syslog("Erreur recherche reference");
}
dol_syslog(get_class($this)."::Create", LOG_DEBUG); $ref = "T".$ref.str_pad(dol_substr("00".intval($row[0])+1),2,"0",STR_PAD_LEFT);
$resql = $this->db->query($sql);
if ($resql)
{
$row = $this->db->fetch_row($resql);
}
else
{
$error++;
dol_syslog("Erreur recherche reference");
}
$ref = $ref . substr("00".($row[0]+1), -2);
$filebonprev = $ref;
$filebonprev = $ref;
// Create withdraw receipt in database // Create withdraw receipt in database
$sql = "INSERT INTO ".MAIN_DB_PREFIX."prelevement_bons ("; $sql = "INSERT INTO ".MAIN_DB_PREFIX."prelevement_bons (";
$sql.= " ref, entity, datec"; $sql.= " ref, entity, datec";