forked from Wavyzz/dolibarr
375 lines
12 KiB
PHP
375 lines
12 KiB
PHP
<?php
|
|
/* Copyright (C) 2006 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/commonobject.class.php
|
|
\ingroup core
|
|
\brief Fichier de la classe mere des classes metiers (facture, contrat, propal, commande, etc...)
|
|
\version $Revision$
|
|
*/
|
|
|
|
require_once(DOL_DOCUMENT_ROOT."/contact.class.php");
|
|
|
|
|
|
/**
|
|
\class CommonObject
|
|
\brief Classe mere pour héritage des classes metiers
|
|
*/
|
|
|
|
class CommonObject
|
|
{
|
|
|
|
/**
|
|
* \brief Ajoute un contact associé au l'entité définie dans $this->element
|
|
* \param fk_socpeople Id du contact a ajouter
|
|
* \param type_contact Type de contact (code ou id)
|
|
* \param source external=Contact externe (llx_socpeople), internal=Contact interne (llx_user)
|
|
* \return int <0 si erreur, >0 si ok
|
|
*/
|
|
function add_contact($fk_socpeople, $type_contact, $source='external')
|
|
{
|
|
global $langs;
|
|
|
|
dolibarr_syslog("CommonObject::add_contact $fk_socpeople, $type_contact, $source");
|
|
|
|
// Vérification parametres
|
|
if ($fk_socpeople <= 0)
|
|
{
|
|
$this->error=$langs->trans("ErrorWrongValueForParameter","1");
|
|
dolibarr_syslog("CommonObject::add_contact ".$this->error,LOG_ERR);
|
|
return -1;
|
|
}
|
|
if (! $type_contact)
|
|
{
|
|
$this->error=$langs->trans("ErrorWrongValueForParameter","2");
|
|
dolibarr_syslog("CommonObject::add_contact ".$this->error,LOG_ERR);
|
|
return -2;
|
|
}
|
|
|
|
$id_type_contact=0;
|
|
if (is_numeric($type_contact))
|
|
{
|
|
$id_type_contact=$type_contact;
|
|
}
|
|
else
|
|
{
|
|
// On recherche id type_contact
|
|
$sql = "SELECT tc.rowid";
|
|
$sql.= " FROM ".MAIN_DB_PREFIX."c_type_contact as tc";
|
|
$sql.= " WHERE element='".$this->element."'";
|
|
$sql.= " AND source='".$source."'";
|
|
$sql.= " AND code='".$type_contact."' AND active=1";
|
|
$resql=$this->db->query($sql);
|
|
if ($resql)
|
|
{
|
|
$obj = $this->db->fetch_object($resql);
|
|
$id_type_contact=$obj->rowid;
|
|
}
|
|
}
|
|
|
|
$datecreate = time();
|
|
|
|
// Insertion dans la base
|
|
$sql = "INSERT INTO ".MAIN_DB_PREFIX."element_contact";
|
|
$sql.= " (element_id, fk_socpeople, datecreate, statut, fk_c_type_contact) ";
|
|
$sql.= " VALUES (".$this->id.", ".$fk_socpeople." , " ;
|
|
$sql.= $this->db->idate($datecreate);
|
|
$sql.= ", 4, '". $id_type_contact . "' ";
|
|
$sql.= ")";
|
|
dolibarr_syslog("CommonObject::add_contact sql=".$sql);
|
|
|
|
$resql=$this->db->query($sql);
|
|
if ($resql)
|
|
{
|
|
return 1;
|
|
}
|
|
else
|
|
{
|
|
$this->error=$this->db->error()." - $sql";
|
|
dolibarr_syslog($this->error,LOG_ERR);
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* \brief Mise a jour du statut d'un contact
|
|
* \param rowid La reference du lien contact-entité
|
|
* \param statut Le nouveau statut
|
|
* \param type_contact_id Description du type de contact
|
|
* \return int <0 si erreur, =0 si ok
|
|
*/
|
|
function update_contact($rowid, $statut, $type_contact_id)
|
|
{
|
|
// Insertion dans la base
|
|
$sql = "UPDATE ".MAIN_DB_PREFIX."element_contact set";
|
|
$sql.= " statut = $statut,";
|
|
$sql.= " fk_c_type_contact = '".$type_contact_id ."'";
|
|
$sql.= " where rowid = ".$rowid;
|
|
// Retour
|
|
if ( $this->db->query($sql) )
|
|
{
|
|
return 0;
|
|
}
|
|
else
|
|
{
|
|
dolibarr_print_error($this->db);
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* \brief Supprime une ligne de contact
|
|
* \param rowid La reference du contact
|
|
* \return statur >0 si ok, <0 si ko
|
|
*/
|
|
function delete_contact($rowid)
|
|
{
|
|
|
|
$sql = "DELETE FROM ".MAIN_DB_PREFIX."element_contact";
|
|
$sql.= " WHERE rowid =".$rowid;
|
|
if ($this->db->query($sql))
|
|
{
|
|
return 1;
|
|
}
|
|
else
|
|
{
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* \brief Récupère les lignes de contact de l'objet
|
|
* \param statut Statut des lignes detail à récupérer
|
|
* \param source Source du contact external (llx_socpeople) ou internal (llx_user)
|
|
* \return array Tableau des rowid des contacts
|
|
*/
|
|
function liste_contact($statut=-1,$source='external')
|
|
{
|
|
global $langs;
|
|
|
|
$tab=array();
|
|
|
|
$sql = "SELECT ec.rowid, ec.statut, ec.fk_socpeople as id,";
|
|
if ($source == 'internal') $sql.=" '-1' as socid,";
|
|
if ($source == 'external') $sql.=" t.fk_soc as socid,";
|
|
if ($source == 'internal') $sql.=" t.name as nom,";
|
|
if ($source == 'external') $sql.=" t.name as nom,";
|
|
$sql.= "tc.source, tc.element, tc.code, tc.libelle";
|
|
$sql.= " FROM ".MAIN_DB_PREFIX."element_contact ec,";
|
|
if ($source == 'internal') $sql.=" ".MAIN_DB_PREFIX."user t,";
|
|
if ($source == 'external') $sql.=" ".MAIN_DB_PREFIX."socpeople t,";
|
|
$sql.= " ".MAIN_DB_PREFIX."c_type_contact tc";
|
|
$sql.= " WHERE element_id =".$this->id;
|
|
$sql.= " AND ec.fk_c_type_contact=tc.rowid";
|
|
$sql.= " AND tc.element='".$this->element."'";
|
|
if ($source == 'internal') $sql.= " AND tc.source = 'internal'";
|
|
if ($source == 'external') $sql.= " AND tc.source = 'external'";
|
|
$sql.= " AND tc.active=1";
|
|
if ($source == 'internal') $sql.= " AND ec.fk_socpeople = t.rowid";
|
|
if ($source == 'external') $sql.= " AND ec.fk_socpeople = t.idp";
|
|
if ($statut >= 0) $sql.= " AND statut = '$statut'";
|
|
$sql.=" ORDER BY t.name ASC";
|
|
|
|
$resql=$this->db->query($sql);
|
|
if ($resql)
|
|
{
|
|
$num=$this->db->num_rows($resql);
|
|
$i=0;
|
|
while ($i < $num)
|
|
{
|
|
$obj = $this->db->fetch_object($resql);
|
|
|
|
$transkey="TypeContact_".$obj->element."_".$obj->source."_".$obj->code;
|
|
$libelle_type=($langs->trans($transkey)!=$transkey ? $langs->trans($transkey) : $obj->libelle);
|
|
$tab[$i]=array('source'=>$obj->source,'socid'=>$obj->socid,'id'=>$obj->id,'nom'=>$obj->nom,
|
|
'rowid'=>$obj->rowid,'code'=>$obj->code,'libelle'=>$libelle_type,'status'=>$obj->statut);
|
|
$i++;
|
|
}
|
|
return $tab;
|
|
}
|
|
else
|
|
{
|
|
$this->error=$this->db->error();
|
|
dolibarr_print_error($this->db);
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* \brief Le détail d'un contact
|
|
* \param rowid L'identifiant du contact
|
|
* \return object L'objet construit par DoliDb.fetch_object
|
|
*/
|
|
function detail_contact($rowid)
|
|
{
|
|
$sql = "SELECT ec.datecreate, ec.statut, ec.fk_socpeople, ec.fk_c_type_contact,";
|
|
$sql.= " tc.code, tc.libelle, s.fk_soc";
|
|
$sql.= " FROM ".MAIN_DB_PREFIX."element_contact as ec, ".MAIN_DB_PREFIX."c_type_contact as tc, ";
|
|
$sql.= " ".MAIN_DB_PREFIX."socpeople as s";
|
|
$sql.= " WHERE ec.rowid =".$rowid;
|
|
$sql.= " AND ec.fk_socpeople=s.idp";
|
|
$sql.= " AND ec.fk_c_type_contact=tc.rowid";
|
|
$sql.= " AND tc.element = '".$this->element."'";
|
|
|
|
$resql=$this->db->query($sql);
|
|
if ($resql)
|
|
{
|
|
$obj = $this->db->fetch_object($resql);
|
|
return $obj;
|
|
}
|
|
else
|
|
{
|
|
$this->error=$this->db->error();
|
|
dolibarr_print_error($this->db);
|
|
return null;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* \brief La liste des valeurs possibles de type de contacts
|
|
* \param source internal ou externam
|
|
* \return array La liste des natures
|
|
*/
|
|
function liste_type_contact($source)
|
|
{
|
|
global $langs;
|
|
|
|
$tab = array();
|
|
|
|
$sql = "SELECT distinct tc.rowid, tc.code, tc.libelle";
|
|
$sql.= " FROM ".MAIN_DB_PREFIX."c_type_contact as tc";
|
|
$sql.= " WHERE element='".$this->element."'";
|
|
$sql.= " AND source='".$source."'";
|
|
$sql.= " ORDER by tc.code";
|
|
|
|
$resql=$this->db->query($sql);
|
|
if ($resql)
|
|
{
|
|
$num=$this->db->num_rows($resql);
|
|
$i=0;
|
|
while ($i < $num)
|
|
{
|
|
$obj = $this->db->fetch_object($resql);
|
|
|
|
$transkey="TypeContact_".$this->element."_".$source."_".$obj->code;
|
|
$libelle_type=($langs->trans($transkey)!=$transkey ? $langs->trans($transkey) : $obj->libelle);
|
|
$tab[$obj->rowid]=$libelle_type;
|
|
$i++;
|
|
}
|
|
return $tab;
|
|
}
|
|
else
|
|
{
|
|
$this->error=$this->db->error();
|
|
// dolibarr_print_error($this->db);
|
|
return null;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* \brief Retourne id des contacts d'une source et d'un type donné
|
|
* Exemple: contact client de facturation ('external', 'BILLING')
|
|
* Exemple: contact client de livraison ('external', 'SHIPPING')
|
|
* Exemple: contact interne suivi paiement ('internal', 'SALESREPFOLL')
|
|
* \return array Liste des id contacts
|
|
*/
|
|
function getIdContact($source,$code)
|
|
{
|
|
$result=array();
|
|
$i=0;
|
|
|
|
$sql = "SELECT ec.fk_socpeople";
|
|
$sql.= " FROM ".MAIN_DB_PREFIX."element_contact as ec, ".MAIN_DB_PREFIX."c_type_contact as tc";
|
|
$sql.= " WHERE ec.element_id = ".$this->id;
|
|
$sql.= " AND ec.fk_c_type_contact=tc.rowid";
|
|
$sql.= " AND tc.element = '".$this->element."'";
|
|
$sql.= " AND tc.source = '".$source."'";
|
|
$sql.= " AND tc.code = '".$code."'";
|
|
|
|
$resql=$this->db->query($sql);
|
|
if ($resql)
|
|
{
|
|
while ($obj = $this->db->fetch_object($resql))
|
|
{
|
|
$result[$i]=$obj->fk_socpeople;
|
|
$i++;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
$this->error=$this->db->error();
|
|
return null;
|
|
}
|
|
|
|
return $result;
|
|
}
|
|
|
|
/**
|
|
* \brief Retourne le détail d'un contact
|
|
* \param id id du contact
|
|
* \return array détail du contact
|
|
*/
|
|
function fetch_contact($id)
|
|
{
|
|
$idcontact = $id;
|
|
$contact = new Contact($this->db);
|
|
$contact->fetch($idcontact);
|
|
$this->contact = $contact;
|
|
}
|
|
|
|
/*
|
|
* \brief Charge l'objet client depuis la base
|
|
*/
|
|
function fetch_client()
|
|
{
|
|
$client = new Societe($this->db);
|
|
$client->fetch($this->socid);
|
|
$this->client = $client;
|
|
}
|
|
|
|
/*
|
|
* \brief Charge l'objet projet depuis la base
|
|
*
|
|
*/
|
|
function fetch_projet()
|
|
{
|
|
$projet = new Project($this->db);
|
|
$projet->fetch($this->projet_id);
|
|
$this->projet = $projet;
|
|
}
|
|
|
|
/**
|
|
* \brief Retourne le détail d'un utilisateur
|
|
* \param id id du contact
|
|
* \return array détail du contact
|
|
*/
|
|
function fetch_user($id)
|
|
{
|
|
$iduser = $id;
|
|
$user = new User($this->db, $iduser);
|
|
$user->fetch();
|
|
$this->user = $user;
|
|
}
|
|
|
|
}
|
|
|
|
?>
|