405 lines
10 KiB
PHP
405 lines
10 KiB
PHP
<?php
|
|
/* Copyright (C) 2003-2006 Rodolphe Quiedeville <rodolphe@quiedeville.org>
|
|
* Copyright (C) 2004-2005 Laurent Destailleur <eldy@users.sourceforge.net>
|
|
*
|
|
* 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.
|
|
*
|
|
* $Id$
|
|
* $Source$
|
|
*/
|
|
|
|
/**
|
|
\file htdocs/product/stock/entrepot.class.php
|
|
\ingroup stock
|
|
\brief Fichier de la classe de gestion des entrepots
|
|
\version $Revision$
|
|
*/
|
|
|
|
|
|
/**
|
|
\class Entrepot
|
|
\brief Classe permettant la gestion des entrepots
|
|
*/
|
|
|
|
class Entrepot
|
|
{
|
|
var $db;
|
|
var $error;
|
|
|
|
var $id;
|
|
var $libelle;
|
|
var $description;
|
|
//! Statut 1 pour ouvert, 0 pour ferme
|
|
var $statut;
|
|
var $lieu;
|
|
var $address;
|
|
//! Code Postal
|
|
var $cp;
|
|
var $ville;
|
|
var $pays_id;
|
|
|
|
/*
|
|
* \brief Constructeur de l'objet entrepot
|
|
* \param DB Handler d'accès à la base de donnée
|
|
*/
|
|
function Entrepot($DB)
|
|
{
|
|
global $langs;
|
|
$this->db = $DB;
|
|
|
|
$this->statuts[0] = $langs->trans("Closed2");
|
|
$this->statuts[1] = $langs->trans("Opened");
|
|
}
|
|
|
|
/*
|
|
* \brief Creation d'un entrepot en base
|
|
* \param Objet user qui crée l'entrepot
|
|
*/
|
|
function create($user)
|
|
{
|
|
// Si libelle non defini, erreur
|
|
if ($this->libelle == '') {
|
|
$this->error = "Libellé obligatoire";
|
|
return 0;
|
|
}
|
|
|
|
$this->db->begin();
|
|
|
|
$sql = "INSERT INTO ".MAIN_DB_PREFIX."entrepot (datec, fk_user_author)";
|
|
$sql .= " VALUES (now(),".$user->id.")";
|
|
|
|
$result=$this->db->query($sql);
|
|
if ($result)
|
|
{
|
|
$id = $this->db->last_insert_id(MAIN_DB_PREFIX."entrepot");
|
|
if ($id > 0)
|
|
{
|
|
$this->id = $id;
|
|
|
|
if ( $this->update($id, $user) > 0)
|
|
{
|
|
$this->db->commit();
|
|
return $id;
|
|
}
|
|
else
|
|
{
|
|
dolibarr_syslog("Entrepot::Create return -3");
|
|
$this->db->rollback();
|
|
return -3;
|
|
}
|
|
}
|
|
else {
|
|
$this->error="Failed to get insert id";
|
|
dolibarr_syslog("Entrepot::Create return -2");
|
|
return -2;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
$this->error="Failed to insert warehouse";
|
|
dolibarr_syslog("Entrepot::Create return -1");
|
|
dolibarr_syslog("Entrepot::Create ".$this->error);
|
|
dolibarr_syslog("Entrepot::Create ".$this->db->error());
|
|
$this->db->rollback();
|
|
return -1;
|
|
}
|
|
|
|
}
|
|
|
|
/*
|
|
* \brief Mise a jour des information d'un entrepot
|
|
* \param id id de l'entrepot à modifier
|
|
* \param user
|
|
*/
|
|
function update($id, $user)
|
|
{
|
|
$this->libelle=addslashes(trim($this->libelle));
|
|
$this->description=addslashes(trim($this->description));
|
|
|
|
$this->lieu=addslashes(trim($this->lieu));
|
|
$this->address=addslashes(trim($this->address));
|
|
$this->cp=trim($this->cp);
|
|
$this->ville=addslashes(trim($this->ville));
|
|
$this->pays_id=trim($this->pays_id?$this->pays_id:0);
|
|
|
|
$sql = "UPDATE ".MAIN_DB_PREFIX."entrepot ";
|
|
$sql .= " SET label = '" . $this->libelle ."'";
|
|
$sql .= ",description = '" . $this->description ."'";
|
|
$sql .= ",statut = " . $this->statut ;
|
|
$sql .= ",lieu = '" . $this->lieu ."'";
|
|
$sql .= ",address = '" . $this->address ."'";
|
|
$sql .= ",cp = '" . $this->cp ."'";
|
|
$sql .= ",ville = '" . $this->ville ."'";
|
|
$sql .= ",fk_pays = " . $this->pays_id;
|
|
$sql .= " WHERE rowid = " . $id;
|
|
|
|
if ( $this->db->query($sql) )
|
|
{
|
|
return 1;
|
|
}
|
|
else
|
|
{
|
|
$this->error=$this->db->error()." sql=$sql";;
|
|
dolibarr_syslog("Entrepot::Update return -1");
|
|
dolibarr_syslog("Entrepot::Update ".$this->error);
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
* \brief Recupéeration de la base d'un entrepot
|
|
* \param id id de l'entrepot a récupérer
|
|
*/
|
|
function fetch ($id)
|
|
{
|
|
$sql = "SELECT rowid, label, description, statut, lieu, address, cp, ville, fk_pays";
|
|
$sql .= " FROM ".MAIN_DB_PREFIX."entrepot";
|
|
$sql .= " WHERE rowid = $id";
|
|
|
|
$result = $this->db->query($sql);
|
|
if ($result)
|
|
{
|
|
$obj=$this->db->fetch_object($result);
|
|
|
|
$this->id = $obj->rowid;
|
|
$this->ref = $obj->rowid;
|
|
$this->libelle = $obj->label;
|
|
$this->description = $obj->description;
|
|
$this->statut = $obj->statut;
|
|
$this->lieu = $obj->lieu;
|
|
$this->address = $obj->address;
|
|
$this->cp = $obj->cp;
|
|
$this->ville = $obj->ville;
|
|
$this->pays_id = $obj->fk_pays;
|
|
|
|
if ($this->pays_id)
|
|
{
|
|
$sqlp = "SELECT libelle from ".MAIN_DB_PREFIX."c_pays where rowid = ".$this->pays_id;
|
|
$resql=$this->db->query($sqlp);
|
|
if ($resql)
|
|
{
|
|
$objp = $this->db->fetch_object($resql);
|
|
}
|
|
else
|
|
{
|
|
dolibarr_print_error($db);
|
|
}
|
|
$this->pays=$objp->libelle;
|
|
}
|
|
|
|
$this->db->free($result);
|
|
return 1;
|
|
}
|
|
else
|
|
{
|
|
$this->error=$this->db->error();
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
|
|
/*
|
|
* \brief Charge les informations d'ordre info dans l'objet entrepot
|
|
* \param id id de l'entrepot a charger
|
|
*/
|
|
function info($id)
|
|
{
|
|
$sql = "SELECT e.rowid, ".$this->db->pdate("datec")." as datec,";
|
|
$sql .= " ".$this->db->pdate("tms")." as datem,";
|
|
$sql .= " fk_user_author";
|
|
$sql .= " FROM ".MAIN_DB_PREFIX."entrepot as e";
|
|
$sql .= " WHERE e.rowid = ".$id;
|
|
|
|
$result=$this->db->query($sql);
|
|
if ($result)
|
|
{
|
|
if ($this->db->num_rows($result))
|
|
{
|
|
$obj = $this->db->fetch_object($result);
|
|
|
|
$this->id = $obj->rowid;
|
|
|
|
if ($obj->fk_user_author) {
|
|
$cuser = new User($this->db, $obj->fk_user_author);
|
|
$cuser->fetch();
|
|
$this->user_creation = $cuser;
|
|
}
|
|
|
|
if ($obj->fk_user_valid) {
|
|
$vuser = new User($this->db, $obj->fk_user_valid);
|
|
$vuser->fetch();
|
|
$this->user_validation = $vuser;
|
|
}
|
|
|
|
$this->date_creation = $obj->datec;
|
|
$this->date_modification = $obj->datem;
|
|
|
|
}
|
|
|
|
$this->db->free($result);
|
|
|
|
}
|
|
else
|
|
{
|
|
dolibarr_print_error($this->db);
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
* \brief Renvoie la liste des entrepôts ouverts
|
|
*/
|
|
function list_array()
|
|
{
|
|
$liste = array();
|
|
|
|
$sql = "SELECT rowid, label FROM ".MAIN_DB_PREFIX."entrepot WHERE statut = 1";
|
|
|
|
$result = $this->db->query($sql) ;
|
|
$i = 0;
|
|
$num = $this->db->num_rows();
|
|
|
|
if ( $result )
|
|
{
|
|
while ($i < $num)
|
|
{
|
|
$row = $this->db->fetch_row($i);
|
|
$liste[$row[0]] = $row[1];
|
|
$i++;
|
|
}
|
|
$this->db->free();
|
|
}
|
|
return $liste;
|
|
}
|
|
|
|
/**
|
|
* \brief Renvoie le stock (nombre de produits) de l'entrepot
|
|
*/
|
|
function nb_products()
|
|
{
|
|
global $conf,$user;
|
|
|
|
$sql = "SELECT sum(ps.reel)";
|
|
$sql .= " FROM llx_product_stock as ps";
|
|
if ($conf->categorie->enabled && !$user->rights->categorie->voir)
|
|
{
|
|
$sql.= " LEFT JOIN ".MAIN_DB_PREFIX."categorie_product as cp ON cp.fk_product = p.rowid";
|
|
$sql.= " LEFT JOIN ".MAIN_DB_PREFIX."categorie as c ON cp.fk_categorie = c.rowid";
|
|
}
|
|
$sql .= " WHERE ps.fk_entrepot = ".$this->id;
|
|
if ($conf->categorie->enabled && !$user->rights->categorie->voir)
|
|
{
|
|
$sql.= ' AND IFNULL(c.visible,1)=1';
|
|
}
|
|
|
|
$result = $this->db->query($sql) ;
|
|
|
|
if ( $result )
|
|
{
|
|
$row = $this->db->fetch_row(0);
|
|
return $row[0];
|
|
|
|
$this->db->free();
|
|
}
|
|
else
|
|
{
|
|
return 0;
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
* \brief Retourne le libellé du statut d'un entrepot (ouvert, ferme)
|
|
* \param mode 0=libellé long, 1=libellé court, 2=Picto + Libellé court, 3=Picto, 4=Picto + Libellé long
|
|
* \return string Libelle
|
|
*/
|
|
function getLibStatut($mode=0)
|
|
{
|
|
return $this->LibStatut($this->statut,$mode);
|
|
}
|
|
|
|
/**
|
|
* \brief Renvoi le libellé d'un statut donné
|
|
* \param statut Id statut
|
|
* \param mode 0=libellé long, 1=libellé court, 2=Picto + Libellé court, 3=Picto, 4=Picto + Libellé long, 5=Libellé court + Picto
|
|
* \return string Libellé du statut
|
|
*/
|
|
function LibStatut($statut,$mode=0)
|
|
{
|
|
global $langs;
|
|
$langs->load('stocks');
|
|
|
|
if ($mode == 0)
|
|
{
|
|
$prefix='';
|
|
if ($statut == 0) return $langs->trans('Closed2');
|
|
if ($statut == 1) return $langs->trans('Opened');
|
|
}
|
|
if ($mode == 1)
|
|
{
|
|
$prefix='Short';
|
|
if ($statut == 0) return $langs->trans('Closed2');
|
|
if ($statut == 1) return $langs->trans('Opened');
|
|
}
|
|
if ($mode == 2)
|
|
{
|
|
$prefix='Short';
|
|
if ($statut == 0) return img_picto($langs->trans('Closed2'),'statut5').' '.$langs->trans('Closed2');
|
|
if ($statut == 1) return img_picto($langs->trans('Opened'),'statut4').' '.$langs->trans('Opened');
|
|
}
|
|
if ($mode == 3)
|
|
{
|
|
$prefix='Short';
|
|
if ($statut == 0) return img_picto($langs->trans('Closed2'),'statut5');
|
|
if ($statut == 1) return img_picto($langs->trans('Opened'),'statut4');
|
|
}
|
|
if ($mode == 4)
|
|
{
|
|
if ($statut == 0) return img_picto($langs->trans('Closed2'),'statut5').' '.$langs->trans('Closed2');
|
|
if ($statut == 1) return img_picto($langs->trans('Opened'),'statut4').' '.$langs->trans('Opened');
|
|
}
|
|
if ($mode == 5)
|
|
{
|
|
$prefix='Short';
|
|
if ($statut == 0) return $langs->trans('Closed2').' '.img_picto($langs->trans('Closed2'),'statut5');
|
|
if ($statut == 1) return $langs->trans('Opened').' '.img_picto($langs->trans('Opened'),'statut4');
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
* \brief Renvoie nom clicable (avec eventuellement le picto)
|
|
* \param withpicto Inclut le picto dans le lien
|
|
* \param option Sur quoi pointe le lien
|
|
* \return string Chaine avec URL
|
|
*/
|
|
function getNomUrl($withpicto=0,$option='')
|
|
{
|
|
global $langs;
|
|
|
|
$result='';
|
|
|
|
$lien='<a href="'.DOL_URL_ROOT.'/product/stock/fiche.php?id='.$this->id.'">';
|
|
$lienfin='</a>';
|
|
|
|
if ($withpicto) $result.=($lien.img_object($langs->trans("ShowStock"),'stock').$lienfin.' ');
|
|
$result.=$lien.$this->libelle.$lienfin;
|
|
return $result;
|
|
}
|
|
|
|
}
|
|
?>
|