contact.class.php

Go to the documentation of this file.

<?php
/* Copyright (C) 2002-2004  Rodolphe Quiedeville    <rodolphe@quiedeville.org>
 * Copyright (C) 2004       Benoit Mortier              <benoit.mortier@opensides.be>
 * Copyright (C) 2004-2013  Laurent Destailleur         <eldy@users.sourceforge.net>
 * Copyright (C) 2005-2012  Regis Houssin               <regis.houssin@inodbox.com>
 * Copyright (C) 2007       Franky Van Liedekerke       <franky.van.liedekerker@telenet.be>
 * Copyright (C) 2008       Raphael Bertrand (Resultic) <raphael.bertrand@resultic.fr>
 * Copyright (C) 2013       Florian Henry           <florian.henry@open-concept.pro>
 * Copyright (C) 2013       Alexandre Spangaro          <aspangaro@open-dsi.fr>
 * Copyright (C) 2013       Juanjo Menent           <jmenent@2byte.es>
 * Copyright (C) 2015       Marcos García               <marcosgdf@gmail.com>
 * Copyright (C) 2019       Nicolas ZABOURI             <info@inovea-conseil.com>
 * Copyright (C) 2020       Open-Dsi                    <support@open-dsi.fr>
 * Copyright (C) 2024-2025  Frédéric France             <frederic.france@free.fr>
 * Copyright (C) 2024-2026  MDW             <mdeweerd@users.noreply.github.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 3 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, see <https://www.gnu.org/licenses/>.
 */
 
require_once DOL_DOCUMENT_ROOT.'/core/class/commonobject.class.php';
require_once DOL_DOCUMENT_ROOT.'/core/class/commonsocialnetworks.class.php';
require_once DOL_DOCUMENT_ROOT.'/core/class/commonpeople.class.php';
 
 
class Contact extends CommonObject
{
  use CommonSocialNetworks;
  use CommonPeople;
 
  public $TRIGGER_PREFIX = 'CONTACT';
 
  public const MERGE_FIELDS_FILL_IF_EMPTY = array(
    'civility_code', 'lastname', 'firstname', 'name_alias', 'address', 'zip', 'town',
    'state_id', 'country_id', 'poste', 'phone_pro', 'phone_perso', 'phone_mobile', 'fax',
    'email', 'socialnetworks', 'birthday', 'default_lang', 'ref_ext',
    'fk_prospectlevel', 'stcomm_id', 'socid'
  );
 
  public const MERGE_FIELDS_CONCAT = array('note_public', 'note_private');
 
  public const MERGE_MAX_PARENT_DEPTH = 100;
 
  public $element = 'contact';
 
  public $table_element = 'socpeople';
 
  public $picto = 'contact';
 
  // BEGIN MODULEBUILDER PROPERTIES
  public $fields = array(
    'rowid' => array('type' => 'integer', 'label' => 'TechnicalID', 'enabled' => 1, 'visible' => -2, 'noteditable' => 1, 'notnull' => 1, 'index' => 1, 'position' => 1, 'comment' => 'Id', 'css' => 'left'),
    'entity' => array('type' => 'integer', 'label' => 'Entity', 'default' => '1', 'enabled' => 1, 'visible' => 3, 'notnull' => 1, 'position' => 30, 'index' => 1),
    'ref_ext' => array('type' => 'varchar(255)', 'label' => 'RefExt', 'enabled' => 1, 'visible' => 0, 'position' => 35),
    'civility' => array('type' => 'varchar(6)', 'label' => 'Civility', 'enabled' => 1, 'visible' => 3, 'position' => 40),
    'lastname' => array('type' => 'varchar(50)', 'label' => 'Lastname', 'enabled' => 1, 'visible' => 1, 'position' => 45, 'showoncombobox' => 1, 'searchall' => 1),
    'name_alias' => array('type' => 'varchar(255)', 'label' => 'Name alias', 'enabled' => 1, 'visible' => -1, 'position' => 46, 'searchall' => 1),
    'firstname' => array('type' => 'varchar(50)', 'label' => 'Firstname', 'enabled' => 1, 'visible' => 1, 'position' => 50, 'showoncombobox' => 1, 'searchall' => 1),
    'poste' => array('type' => 'varchar(80)', 'label' => 'PostOrFunction', 'enabled' => 1, 'visible' => -1, 'position' => 52),
    'address' => array('type' => 'varchar(255)', 'label' => 'Address', 'enabled' => 1, 'visible' => -1, 'position' => 55),
    'zip' => array('type' => 'varchar(25)', 'label' => 'Zip', 'enabled' => 1, 'visible' => -1, 'position' => 60),
    'town' => array('type' => 'varchar(50)', 'label' => 'Town', 'enabled' => 1, 'visible' => -1, 'position' => 65),
    'fk_departement' => array('type' => 'integer', 'label' => 'Fk departement', 'enabled' => 1, 'visible' => 3, 'position' => 70),
    'fk_pays' => array('type' => 'integer', 'label' => 'Fk pays', 'enabled' => 1, 'visible' => 3, 'position' => 75),
    'fk_soc' => array('type' => 'integer:Societe:societe/class/societe.class.php', 'label' => 'ThirdParty', 'enabled' => 1, 'visible' => 1, 'position' => 77, 'searchall' => 1),
    'birthday' => array('type' => 'date', 'label' => 'Birthday', 'enabled' => 1, 'visible' => -1, 'position' => 80),
    'phone' => array('type' => 'varchar(30)', 'label' => 'Phone', 'enabled' => 1, 'visible' => 1, 'position' => 90, 'searchall' => 1),
    'phone_perso' => array('type' => 'varchar(30)', 'label' => 'PhonePerso', 'enabled' => 1, 'visible' => -1, 'position' => 95, 'searchall' => 1),
    'phone_mobile' => array('type' => 'varchar(30)', 'label' => 'PhoneMobile', 'enabled' => 1, 'visible' => 1, 'position' => 100, 'searchall' => 1),
    'fax' => array('type' => 'varchar(30)', 'label' => 'Fax', 'enabled' => 1, 'visible' => -1, 'position' => 105, 'searchall' => 1),
    'email' => array('type' => 'varchar(255)', 'label' => 'Email', 'enabled' => 1, 'visible' => 1, 'position' => 110, 'searchall' => 1),
    'socialnetworks' => array('type' => 'text', 'label' => 'SocialNetworks', 'enabled' => 1, 'visible' => 3, 'position' => 115),
    'photo' => array('type' => 'varchar(255)', 'label' => 'Photo', 'enabled' => 1, 'visible' => 3, 'position' => 170),
    'priv' => array('type' => 'smallint(6)', 'label' => 'ContactVisibility', 'enabled' => 1, 'visible' => 1, 'notnull' => 1, 'position' => 175),
    'fk_stcommcontact' => array('type' => 'integer', 'label' => 'ProspectStatus', 'enabled' => 1, 'visible' => -1, 'notnull' => 1, 'position' => 220),
    'fk_prospectcontactlevel' => array('type' => 'varchar(12)', 'label' => 'ProspectLevel', 'enabled' => 1, 'visible' => -1, 'position' => 255),
    //no more used. Replace by a scan of email into mailing_unsubscribe. 'no_email' =>array('type'=>'smallint(6)', 'label'=>'No_Email', 'enabled'=>1, 'visible'=>-1, 'notnull'=>1, 'position'=>180),
    'note_private' => array('type' => 'html', 'label' => 'NotePrivate', 'enabled' => 1, 'visible' => 0, 'position' => 195, 'searchall' => 1),
    'note_public' => array('type' => 'html', 'label' => 'NotePublic', 'enabled' => 1, 'visible' => 0, 'position' => 200, 'searchall' => 1),
    'default_lang' => array('type' => 'varchar(6)', 'label' => 'Default lang', 'enabled' => 1, 'visible' => 3, 'position' => 205),
    'canvas' => array('type' => 'varchar(32)', 'label' => 'Canvas', 'enabled' => 1, 'visible' => 3, 'position' => 210),
    'ip' => array('type' => 'ip', 'label' => 'IPAddress', 'enabled' => '1', 'position' => 700, 'notnull' => 0, 'visible' => '-2', 'comment' => 'ip used to create record (for public submission page)'),
    'datec' => array('type' => 'datetime', 'label' => 'DateCreation', 'enabled' => 1, 'visible' => -1, 'position' => 300),
    'tms' => array('type' => 'timestamp', 'label' => 'DateModification', 'enabled' => 1, 'visible' => -1, 'notnull' => 1, 'position' => 305),
    'fk_user_creat' => array('type' => 'integer:User:user/class/user.class.php', 'label' => 'UserAuthor', 'enabled' => 1, 'visible' => 3, 'position' => 310),
    'fk_user_modif' => array('type' => 'integer:User:user/class/user.class.php', 'label' => 'UserModif', 'enabled' => 1, 'visible' => 3, 'position' => 315),
    'statut' => array('type' => 'tinyint(4)', 'label' => 'Status', 'enabled' => 1, 'visible' => 1, 'notnull' => 1, 'position' => 500),
    'import_key' => array('type' => 'varchar(14)', 'label' => 'ImportId', 'enabled' => 1, 'visible' => -1, 'position' => 1000),
  );
 
  public $civility_id; // In fact we store civility_code
  public $civility_code;
  public $civility;
 
  public $gender;
 
  public $birthday_alert;
 
  public $civilite;
 
  public $fullname;
 
  public $name_alias;
 
  public $address;
 
  public $zip;
 
  public $town;
 
  public $state_id;
 
  public $state_code;
 
  public $state;
 
  public $poste;
 
  public $socid;    // both socid and fk_soc are used
  public $fk_soc;   // both socid and fk_soc are used
 
  public $socname;
 
  public $statut;
 
  public $code;
 
  public $email;
 
  public $mail;
 
  public $url;
 
  public $no_email;
 
  public $socialnetworks;
 
  public $photo;
 
  public $phone_pro;
 
  public $phone_perso;
 
  public $phone_mobile;
 
  public $fax;
 
  public $priv;
 
  public $birthday;
 
  public $default_lang;
 
  public $ref_facturation;
 
  public $ref_contrat;
 
  public $ref_commande;
 
  public $ref_propal;
 
  public $user_id;
 
  public $user_login;
 
  public $ip;
  // END MODULEBUILDER PROPERTIES
 
  public $roles;
 
  public $cacheprospectstatus = array();
 
  public $fk_prospectlevel;
 
  public $stcomm_id;
 
  public $statut_commercial;
 
  public $stcomm_picto;
 
 
  public function __construct($db)
  {
    $this->db = $db;
    $this->statut = 1; // By default, status is enabled
    $this->status = 1; // By default, status is enabled
    $this->ismultientitymanaged = 1;
    $this->isextrafieldmanaged = 1;
 
    $this->fields['ref_ext']['visible'] = getDolGlobalInt('MAIN_LIST_SHOW_REF_EXT');
 
    if (!isModEnabled('mailing')) {
      $this->fields['no_email']['enabled'] = 0;
    }
    // typical ['s.nom'] is used for third-parties
    if (!getDolGlobalString('SOCIETE_DISABLE_CONTACTS')) {
      $this->fields['fk_soc']['enabled'] = 0;
      $this->fields['fk_soc']['searchall'] = 0;
    }
 
    // If THIRDPARTY_ENABLE_PROSPECTION_ON_ALTERNATIVE_ADRESSES not set, there is no prospect level on contact level, only on thirdparty
    if (getDolGlobalString('SOCIETE_DISABLE_PROSPECTS') || !getDolGlobalString('THIRDPARTY_ENABLE_PROSPECTION_ON_ALTERNATIVE_ADRESSES')) {  // Default behaviour
      $this->fields['fk_stcommcontact']['enabled'] = 0;
      $this->fields['fk_prospectcontactlevel']['enabled'] = 0;
    }
 
    // Unset fields that are disabled
    foreach ($this->fields as $key => $val) {
      if (isset($val['enabled']) && empty($val['enabled'])) {
        unset($this->fields[$key]);
      }
    }
 
    // Translate some data of arrayofkeyval
    /*if (is_object($langs))
    {
      foreach($this->fields as $key => $val)
      {
        if (!empty($val['arrayofkeyval']) && is_array($val['arrayofkeyval']))
        {
          foreach($val['arrayofkeyval'] as $key2 => $val2)
          {
            $this->fields[$key]['arrayofkeyval'][$key2]=$langs->trans($val2);
          }
        }
      }
    }*/
  }
 
  public function loadStateBoard()
  {
    global $user, $hookmanager;
 
    $this->nb = array();
    $clause = "WHERE";
 
    $sql = "SELECT count(sp.rowid) as nb";
    $sql .= " FROM ".MAIN_DB_PREFIX."socpeople as sp";
    if (!$user->hasRight('societe', 'client', 'voir')) {
      $sql .= ", ".MAIN_DB_PREFIX."societe as s";
      $sql .= ", ".MAIN_DB_PREFIX."societe_commerciaux as sc";
      $sql .= " WHERE sp.fk_soc = s.rowid AND s.rowid = sc.fk_soc AND sc.fk_user = ".((int) $user->id);
      $clause = "AND";
    }
    $sql .= " ".$clause." sp.entity IN (".getEntity($this->element).")";
    $sql .= " AND (sp.priv='0' OR (sp.priv='1' AND sp.fk_user_creat = ".((int) $user->id)."))";
    if ($user->socid > 0) {
      $sql .= " AND sp.fk_soc = ".((int) $user->socid);
    }
    // Add where from hooks
    if (is_object($hookmanager)) {
      $parameters = array();
      $reshook = $hookmanager->executeHooks('printFieldListWhere', $parameters, $this); // Note that $action and $object may have been modified by hook
      $sql .= $hookmanager->resPrint;
    }
 
    $resql = $this->db->query($sql);
    if ($resql) {
      while ($obj = $this->db->fetch_object($resql)) {
        $this->nb["contacts"] = $obj->nb;
      }
      $this->db->free($resql);
      return 1;
    } else {
      dol_print_error($this->db);
      $this->error = $this->db->lasterror();
      return -1;
    }
  }
 
  public function create($user, $notrigger = 0)
  {
    global $conf;
 
    $error = 0;
    $now = dol_now();
 
    if (empty($this->date_creation)) {
      $this->date_creation = $now;
    }
 
    $this->db->begin();
 
    // Clean parameters
    $this->name_alias = trim($this->name_alias);
    $this->lastname = $this->lastname ? trim($this->lastname) : trim($this->name);
    $this->firstname = trim($this->firstname);
    $this->setUpperOrLowerCase();
    if (empty($this->socid)) {
      $this->socid = 0;
    }
    if (empty($this->priv)) {
      $this->priv = 0;
    }
    if (!empty($this->statut) && empty($this->status)) {
      $this->status = 1;
    }
    if (empty($this->status)) {
      $this->status = 0; // This is to convert '' into '0' to avoid bad sql request
      $this->statut = 0; // This is to convert '' into '0' to avoid bad sql request
    }
 
    // setEntity will set entity with the right value if empty or change it for the right value if multicompany module is active
    $this->entity = setEntity($this);
 
    $sql = "INSERT INTO ".MAIN_DB_PREFIX."socpeople (";
    $sql .= " datec";
    $sql .= ", fk_soc";
    $sql .= ", name_alias";
    $sql .= ", lastname";
    $sql .= ", firstname";
    $sql .= ", fk_user_creat";
    $sql .= ", priv";
    $sql .= ", fk_stcommcontact";
    $sql .= ", statut";
    $sql .= ", canvas";
    $sql .= ", entity";
    $sql .= ", ref_ext";
    $sql .= ", import_key";
    $sql .= ", ip";
    $sql .= ") VALUES (";
    $sql .= "'".$this->db->idate($now)."',";
    if ($this->socid > 0) {
      $sql .= " ".((int) $this->socid).",";
    } else {
      $sql .= "null,";
    }
    $sql .= "'".$this->db->escape($this->name_alias)."',";
    $sql .= "'".$this->db->escape($this->lastname)."',";
    $sql .= "'".$this->db->escape($this->firstname)."',";
    $sql .= " ".($user->id > 0 ? ((int) $user->id) : "null").",";
    $sql .= " ".((int) $this->priv).",";
    $sql .= " 0,";
    $sql .= " ".((int) $this->status).",";
    $sql .= " ".(!empty($this->canvas) ? "'".$this->db->escape($this->canvas)."'" : "null").",";
    $sql .= " ".((int) $this->entity).",";
    $sql .= "'".$this->db->escape($this->ref_ext)."',";
    $sql .= " ".(!empty($this->import_key) ? "'".$this->db->escape($this->import_key)."'" : "null").",";
    $sql .= " ".(!empty($this->ip) ? "'".$this->db->escape($this->ip)."'" : "null");
    $sql .= ")";
 
    dol_syslog(get_class($this)."::create", LOG_DEBUG);
    $resql = $this->db->query($sql);
    if ($resql) {
      $this->id = $this->db->last_insert_id(MAIN_DB_PREFIX."socpeople");
 
      $result = $this->update($this->id, $user, 1, 'add'); // This include updateRoles(), ...
      if ($result < 0) {
        $error++;
        $this->error = $this->db->lasterror();
      }
 
      if (!$error) {
        $result = $this->update_perso($this->id, $user, 1); // TODO Remove function update_perso, should be same than update
        if ($result < 0) {
          $error++;
          $this->error = $this->db->lasterror();
        }
      }
 
      if (!$error && !$notrigger) {
        // Call trigger
        $result = $this->call_trigger('CONTACT_CREATE', $user);
        if ($result < 0) {
          $error++;
        }
        // End call triggers
      }
 
      if (!$error) {
        $this->db->commit();
        return $this->id;
      } else {
        $this->db->rollback();
        dol_syslog(get_class($this)."::create ".$this->error, LOG_ERR);
        return -2;
      }
    } else {
      $this->error = $this->db->lasterror();
 
      $this->db->rollback();
      dol_syslog(get_class($this)."::create ".$this->error, LOG_ERR);
      return -1;
    }
  }
 
  public function update($id, $user = null, $notrigger = 0, $action = 'update', $nosyncuser = 0)
  {
    global $conf;
 
    if (empty($this->country_id) && !empty($this->country_code)) {
      $country_id = getCountry($this->country_code, '3');
      $this->country_id = is_int($country_id) ? $country_id : 0;
    }
 
    $error = 0;
 
    $this->id = $id;
 
    $this->entity = ((isset($this->entity) && is_numeric($this->entity)) ? $this->entity : $conf->entity);
 
    // Clean parameters
    $this->ref_ext = (empty($this->ref_ext) ? '' : trim($this->ref_ext));
    $this->name_alias = trim($this->name_alias);
    $this->lastname = trim($this->lastname) ? trim($this->lastname) : trim($this->lastname);
    $this->firstname = trim($this->firstname);
    $this->email = trim($this->email ?? '');
    $this->phone_pro = trim($this->phone_pro);
    $this->phone_perso = trim($this->phone_perso);
    $this->phone_mobile = trim($this->phone_mobile);
    $this->photo = trim($this->photo);
    $this->fax = trim($this->fax);
    $this->zip = (empty($this->zip) ? '' : trim($this->zip));
    $this->town = (empty($this->town) ? '' : trim($this->town));
    $this->country_id = (empty($this->country_id) || $this->country_id < 0) ? 0 : $this->country_id;
    if (!empty($this->statut) && empty($this->status)) {
      $this->status = 1;
    }
    if (empty($this->status)) {
      $this->status = 0;
      $this->statut = 0;
    }
    if (empty($this->civility_code) && !is_numeric($this->civility_id)) {
      $this->civility_code = $this->civility_id; // For backward compatibility
    }
    $this->setUpperOrLowerCase();
 
    $this->db->begin();
 
    $sql = "UPDATE ".MAIN_DB_PREFIX."socpeople SET";
    if ($this->socid > 0) {
      $sql .= " fk_soc = ".((int) $this->socid).",";
    } elseif ($this->socid == -1) {
      $sql .= " fk_soc = NULL,";
    }
    $sql .= " civility='".$this->db->escape($this->civility_code)."'";
    $sql .= ", name_alias='".$this->db->escape($this->name_alias)."'";
    $sql .= ", lastname='".$this->db->escape($this->lastname)."'";
    $sql .= ", firstname='".$this->db->escape($this->firstname)."'";
    $sql .= ", address='".$this->db->escape((string) $this->address)."'";
    $sql .= ", zip='".$this->db->escape($this->zip)."'";
    $sql .= ", town='".$this->db->escape($this->town)."'";
    $sql .= ", ref_ext = ".(!empty($this->ref_ext) ? "'".$this->db->escape($this->ref_ext)."'" : "NULL");
    $sql .= ", fk_pays=".($this->country_id > 0 ? ((int) $this->country_id) : 'NULL');
    $sql .= ", fk_departement=".($this->state_id > 0 ? ((int) $this->state_id) : 'NULL');
    $sql .= ", poste='".$this->db->escape($this->poste)."'";
    $sql .= ", fax='".$this->db->escape($this->fax)."'";
    $sql .= ", email='".$this->db->escape($this->email)."'";
    $sql .= ", socialnetworks = '".$this->db->escape(json_encode($this->socialnetworks))."'";
    $sql .= ", photo='".$this->db->escape($this->photo)."'";
    $sql .= ", birthday=".($this->birthday ? "'".$this->db->idate($this->birthday)."'" : "null");
    $sql .= ", note_private = ".(isset($this->note_private) ? "'".$this->db->escape($this->note_private)."'" : "NULL");
    $sql .= ", note_public = ".(isset($this->note_public) ? "'".$this->db->escape($this->note_public)."'" : "NULL");
    $sql .= ", phone = ".(isset($this->phone_pro) ? "'".$this->db->escape($this->phone_pro)."'" : "NULL");
    $sql .= ", phone_perso = ".(isset($this->phone_perso) ? "'".$this->db->escape($this->phone_perso)."'" : "NULL");
    $sql .= ", phone_mobile = ".(isset($this->phone_mobile) ? "'".$this->db->escape($this->phone_mobile)."'" : "NULL");
    $sql .= ", priv = ".((int) $this->priv);
    $sql .= ", fk_prospectlevel = '".$this->db->escape($this->fk_prospectlevel)."'";
    if (isset($this->stcomm_id)) {
      $sql .= ", fk_stcommcontact = ".($this->stcomm_id > 0 || $this->stcomm_id == -1 ? ((int) $this->stcomm_id) : "0");
    }
    $sql .= ", statut = ".((int) $this->status);
    $sql .= ", fk_user_modif=".($user->id > 0 ? "'".$this->db->escape((string) $user->id)."'" : "NULL");
    $sql .= ", default_lang=".($this->default_lang ? "'".$this->db->escape($this->default_lang)."'" : "NULL");
    $sql .= ", entity = ".((int) $this->entity);
    $sql .= " WHERE rowid = ".((int) $id);
 
    dol_syslog(get_class($this)."::update", LOG_DEBUG);
    $result = $this->db->query($sql);
    if ($result) {
      unset($this->country_code);
      unset($this->country);
      unset($this->state_code);
      unset($this->state);
 
      $action = 'update';
 
      // Actions on extra fields
      $result = $this->insertExtraFields();
      if ($result < 0) {
        $error++;
      }
 
      if (!$error) {
        $result = $this->updateRoles();
        if ($result < 0) {
          $error++;
        }
      }
 
      if (!$error && $this->user_id > 0) {
        // If contact is linked to a user
        $tmpobj = new User($this->db);
        $tmpobj->fetch($this->user_id);
        $usermustbemodified = 0;
        if ($tmpobj->office_phone != $this->phone_pro) {
          $tmpobj->office_phone = $this->phone_pro;
          $usermustbemodified++;
        }
        if ($tmpobj->office_fax != $this->fax) {
          $tmpobj->office_fax = $this->fax;
          $usermustbemodified++;
        }
        if ($tmpobj->address != $this->address) {
          $tmpobj->address = $this->address;
          $usermustbemodified++;
        }
        if ($tmpobj->town != $this->town) {
          $tmpobj->town = $this->town;
          $usermustbemodified++;
        }
        if ($tmpobj->zip != $this->zip) {
          $tmpobj->zip = $this->zip;
          $usermustbemodified++;
        }
        if ($tmpobj->zip != $this->zip) {
          $tmpobj->state_id = $this->state_id;
          $usermustbemodified++;
        }
        if ($tmpobj->country_id != $this->country_id) {
          $tmpobj->country_id = $this->country_id;
          $usermustbemodified++;
        }
        if ($tmpobj->email != $this->email) {
          $tmpobj->email = $this->email;
          $usermustbemodified++;
        }
        if (!empty(array_diff($tmpobj->socialnetworks, $this->socialnetworks))) {
          $tmpobj->socialnetworks = $this->socialnetworks;
          $usermustbemodified++;
        }
        if ($usermustbemodified) {
          $result = $tmpobj->update($user, 0, 1, 1, 1);
          if ($result < 0) {
            $error++;
          }
        }
      }
 
      if (!$error && !$notrigger) {
        // Call trigger
        $result = $this->call_trigger('CONTACT_MODIFY', $user);
        if ($result < 0) {
          $error++;
        }
        // End call triggers
      }
 
      if (!$error) {
        $this->db->commit();
        return 1;
      } else {
        dol_syslog(get_class($this)."::update Error ".$this->error, LOG_ERR);
        $this->db->rollback();
        return -$error;
      }
    } else {
      $this->error = $this->db->lasterror().' sql='.$sql;
      $this->db->rollback();
      return -1;
    }
  }
 
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.PublicUnderscore
  public function _load_ldap_dn($info, $mode = 0)
  {
    // phpcs:enable
    global $conf;
    $dn = '';
    if ($mode == 0) {
      $dn = getDolGlobalString('LDAP_KEY_CONTACTS') . "=".$info[getDolGlobalString('LDAP_KEY_CONTACTS')]."," . getDolGlobalString('LDAP_CONTACT_DN');
    } elseif ($mode == 1) {
      $dn = getDolGlobalString('LDAP_CONTACT_DN');
    } elseif ($mode == 2) {
      $dn = getDolGlobalString('LDAP_KEY_CONTACTS') . "=".$info[getDolGlobalString('LDAP_KEY_CONTACTS')];
    }
    return $dn;
  }
 
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.PublicUnderscore
  public function _load_ldap_info()
  {
    // phpcs:enable
    global $conf, $langs;
 
    $info = array();
 
    // Object classes
    $info["objectclass"] = explode(',', getDolGlobalString('LDAP_CONTACT_OBJECT_CLASS'));
 
    $this->fullname = $this->getFullName($langs);
 
    // Fields
    if ($this->fullname && getDolGlobalString('LDAP_CONTACT_FIELD_FULLNAME')) {
      $info[getDolGlobalString('LDAP_CONTACT_FIELD_FULLNAME')] = $this->fullname;
    }
    if ($this->lastname && getDolGlobalString('LDAP_CONTACT_FIELD_NAME')) {
      $info[getDolGlobalString('LDAP_CONTACT_FIELD_NAME')] = $this->lastname;
    }
    if ($this->firstname && getDolGlobalString('LDAP_CONTACT_FIELD_FIRSTNAME')) {
      $info[getDolGlobalString('LDAP_CONTACT_FIELD_FIRSTNAME')] = $this->firstname;
    }
 
    if ($this->poste) {
      $info["title"] = $this->poste;
    }
    if ($this->socid > 0) {
      $soc = new Societe($this->db);
      $soc->fetch($this->socid);
 
      $info[getDolGlobalString('LDAP_CONTACT_FIELD_COMPANY')] = $soc->name;
      if ($soc->client == 1) {
        $info["businessCategory"] = "Customers";
      }
      if ($soc->client == 2) {
        $info["businessCategory"] = "Prospects";
      }
      if ($soc->fournisseur == 1) {
        $info["businessCategory"] = "Suppliers";
      }
    }
    if ($this->address && getDolGlobalString('LDAP_CONTACT_FIELD_ADDRESS')) {
      $info[getDolGlobalString('LDAP_CONTACT_FIELD_ADDRESS')] = $this->address;
    }
    if ($this->zip && getDolGlobalString('LDAP_CONTACT_FIELD_ZIP')) {
      $info[getDolGlobalString('LDAP_CONTACT_FIELD_ZIP')] = $this->zip;
    }
    if ($this->town && getDolGlobalString('LDAP_CONTACT_FIELD_TOWN')) {
      $info[getDolGlobalString('LDAP_CONTACT_FIELD_TOWN')] = $this->town;
    }
    if ($this->country_code && getDolGlobalString('LDAP_CONTACT_FIELD_COUNTRY')) {
      $info[getDolGlobalString('LDAP_CONTACT_FIELD_COUNTRY')] = $this->country_code;
    }
    if ($this->phone_pro && getDolGlobalString('LDAP_CONTACT_FIELD_PHONE')) {
      $info[getDolGlobalString('LDAP_CONTACT_FIELD_PHONE')] = $this->phone_pro;
    }
    if ($this->phone_perso && getDolGlobalString('LDAP_CONTACT_FIELD_HOMEPHONE')) {
      $info[getDolGlobalString('LDAP_CONTACT_FIELD_HOMEPHONE')] = $this->phone_perso;
    }
    if ($this->phone_mobile && getDolGlobalString('LDAP_CONTACT_FIELD_MOBILE')) {
      $info[getDolGlobalString('LDAP_CONTACT_FIELD_MOBILE')] = $this->phone_mobile;
    }
    if ($this->fax && getDolGlobalString('LDAP_CONTACT_FIELD_FAX')) {
      $info[getDolGlobalString('LDAP_CONTACT_FIELD_FAX')] = $this->fax;
    }
    if ($this->note_private && getDolGlobalString('LDAP_CONTACT_FIELD_DESCRIPTION')) {
      $info[getDolGlobalString('LDAP_CONTACT_FIELD_DESCRIPTION')] = dol_string_nohtmltag($this->note_private, 2);
    }
    if ($this->email && getDolGlobalString('LDAP_CONTACT_FIELD_MAIL')) {
      $info[getDolGlobalString('LDAP_CONTACT_FIELD_MAIL')] = $this->email;
    }
 
    if (getDolGlobalString('LDAP_SERVER_TYPE') == 'egroupware') {
      $info["objectclass"][4] = "phpgwContact"; // compatibilite egroupware
 
      $info['uidnumber'] = $this->id;
 
      $info['phpgwTz'] = 0;
      $info['phpgwMailType'] = 'INTERNET';
      $info['phpgwMailHomeType'] = 'INTERNET';
 
      $info["phpgwContactTypeId"] = 'n';
      $info["phpgwContactCatId"] = 0;
      $info["phpgwContactAccess"] = "public";
 
      $info["phpgwContactOwner"] = 1;
 
      if ($this->email) {
        $info["rfc822Mailbox"] = $this->email;
      }
      if ($this->phone_mobile) {
        $info["phpgwCellTelephoneNumber"] = $this->phone_mobile;
      }
    }
 
    return $info;
  }
 
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function update_perso($id, $user = null, $notrigger = 0)
  {
    // phpcs:enable
    $error = 0;
    $result = false;
 
    $this->db->begin();
 
    // Update the contact
    $sql = "UPDATE ".MAIN_DB_PREFIX."socpeople SET";
    $sql .= " birthday = ".($this->birthday ? "'".$this->db->idate($this->birthday)."'" : "null");
    $sql .= ", photo = ".($this->photo ? "'".$this->db->escape($this->photo)."'" : "null");
    if ($user) {
      $sql .= ", fk_user_modif = ".((int) $user->id);
    }
    $sql .= " WHERE rowid = ".((int) $id);
 
    dol_syslog(get_class($this)."::update_perso this->birthday=".$this->birthday." -", LOG_DEBUG);
    $resql = $this->db->query($sql);
    if (!$resql) {
      $error++;
      $this->error = $this->db->lasterror();
    }
 
    if ($user) {
      // Update birthday alert
      if (!empty($this->birthday_alert)) {
        //check existing
        $sql_check = "SELECT rowid FROM " . MAIN_DB_PREFIX . "user_alert WHERE type = 1 AND fk_contact = " . ((int) $id) . " AND fk_user = " . ((int) $user->id);
        $result_check = $this->db->query($sql_check);
        if (!$result_check || ($this->db->num_rows($result_check) < 1)) {
          //insert
          $sql = "INSERT INTO " . MAIN_DB_PREFIX . "user_alert(type, fk_contact, fk_user) ";
          $sql .= "VALUES (1," . ((int) $id) . "," . ((int) $user->id) . ")";
          $result = $this->db->query($sql);
          if (!$result) {
            $error++;
            $this->error = $this->db->lasterror();
          }
        } else {
          $result = true;
        }
      } else {
        $sql = "DELETE FROM " . MAIN_DB_PREFIX . "user_alert ";
        $sql .= "WHERE type=1 AND fk_contact=" . ((int) $id) . " AND fk_user=" . ((int) $user->id);
        $result = $this->db->query($sql);
        if (!$result) {
          $error++;
          $this->error = $this->db->lasterror();
        }
      }
 
      if (!$error && !$notrigger) {
        // Call trigger
        $result = $this->call_trigger('CONTACT_MODIFY', $user);
        if ($result < 0) {
          $error++;
        }
        // End call triggers
      }
    }
 
    if (!$error) {
      $this->db->commit();
      return 1;
    } else {
      dol_syslog(get_class($this)."::update Error ".$this->error, LOG_ERR);
      $this->db->rollback();
      return -$error;
    }
  }
 
 
  public function fetch($id, $user = null, $ref_ext = '', $email = '', $loadalsoroles = 0, $socid = 0)
  {
    global $langs;
 
    dol_syslog(get_class($this)."::fetch id=".$id." ref_ext=".$ref_ext." email=".$email, LOG_DEBUG);
 
    if (empty($id) && empty($ref_ext) && empty($email)) {
      $this->error = 'BadParameter';
      return -1;
    }
 
    $langs->loadLangs(array("dict", "companies"));
 
    $sql = "SELECT c.rowid, c.entity, c.fk_soc, c.ref_ext, c.civility as civility_code, c.name_alias, c.lastname, c.firstname,";
    $sql .= " c.address, c.statut as status, c.zip, c.town,";
    $sql .= " c.fk_pays as country_id,";
    $sql .= " c.fk_departement as state_id,";
    $sql .= " c.birthday,";
    $sql .= " c.poste, c.phone, c.phone_perso, c.phone_mobile, c.fax, c.email,";
    $sql .= " c.socialnetworks,";
    $sql .= " c.photo,";
    $sql .= " c.priv, c.note_private, c.note_public, c.default_lang, c.canvas,";
    $sql .= " c.fk_prospectlevel, c.fk_stcommcontact, st.libelle as stcomm, st.picto as stcomm_picto,";
    $sql .= " c.import_key,";
    $sql .= " c.datec as date_creation, GREATEST(c.tms, cef.tms) as date_modification, c.fk_user_creat, c.fk_user_modif,";
    $sql .= " co.label as country, co.code as country_code,";
    $sql .= " d.nom as state, d.code_departement as state_code,";
    $sql .= " u.rowid as user_id, u.login as user_login,";
    $sql .= " s.nom as socname, s.address as socaddress, s.zip as soccp, s.town as soccity, s.default_lang as socdefault_lang";
    $sql .= " FROM ".MAIN_DB_PREFIX."socpeople as c";
    $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."socpeople_extrafields as cef ON cef.fk_object=c.rowid";
    $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."c_country as co ON c.fk_pays = co.rowid";
    $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."c_departements as d ON c.fk_departement = d.rowid";
    $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."user as u ON c.rowid = u.fk_socpeople";
    $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."societe as s ON c.fk_soc = s.rowid";
    $sql .= ' LEFT JOIN '.MAIN_DB_PREFIX.'c_stcommcontact as st ON c.fk_stcommcontact = st.id';
    if ($id) {
      $sql .= " WHERE c.rowid = ".((int) $id);
    } else {
      $sql .= " WHERE c.entity IN (".getEntity($this->element).")";
      if ($ref_ext) {
        $sql .= " AND c.ref_ext = '".$this->db->escape($ref_ext)."'";
      }
      if ($email) {
        $sql .= " AND c.email = '".$this->db->escape($email)."'";
      }
      if ($socid) {
        $sql .= " AND c.fk_soc = ".((int) $socid);
      }
    }
 
    $resql = $this->db->query($sql);
    if ($resql) {
      $num = $this->db->num_rows($resql);
      if ($num > 1) {
        $this->error = 'Fetch found several records. Rename one of contact to avoid duplicate.';
        dol_syslog($this->error, LOG_ERR);
 
        return 2;
      } elseif ($num) {   // $num = 1
        $obj = $this->db->fetch_object($resql);
 
        $this->id = $obj->rowid;
        $this->entity = $obj->entity;
        $this->ref = $obj->rowid;
        $this->ref_ext = $obj->ref_ext;
 
        $this->civility_code = $obj->civility_code;
        $this->civility = $obj->civility_code ? ($langs->trans("Civility".$obj->civility_code) != "Civility".$obj->civility_code ? $langs->trans("Civility".$obj->civility_code) : $obj->civility_code) : '';
 
        $this->name_alias = $obj->name_alias;
        $this->lastname   = $obj->lastname;
        $this->firstname  = $obj->firstname;
        $this->address    = $obj->address;
        $this->zip      = $obj->zip;
        $this->town     = $obj->town;
 
        $this->date_creation = $this->db->jdate($obj->date_creation);
        $this->date_modification = $this->db->jdate($obj->date_modification);
        $this->user_creation_id = $obj->fk_user_creat;
        $this->user_modification_id = $obj->fk_user_modif;
 
        $this->state_id   = $obj->state_id;
        $this->state_code = $obj->state_code;
        $this->state    = $obj->state;
 
        $this->country_id = $obj->country_id;
        $this->country_code = $obj->country_id ? $obj->country_code : '';
        $this->country    = $obj->country_id ? ($langs->trans('Country'.$obj->country_code) != 'Country'.$obj->country_code ? $langs->transnoentities('Country'.$obj->country_code) : $obj->country) : '';
 
        $this->fk_soc   = $obj->fk_soc;   // Both fk_soc and socid are used
        $this->socid    = $obj->fk_soc;   // Both fk_soc and socid are used
        $this->socname    = $obj->socname;
        $this->poste    = $obj->poste;
        $this->status   = $obj->status;
        $this->statut   = $obj->status; // deprecated
 
        $this->fk_prospectlevel = $obj->fk_prospectlevel;
 
        $transcode = $langs->trans('StatusProspect'.$obj->fk_stcommcontact);
        $label_sale_status = ($transcode != 'StatusProspect'.$obj->fk_stcommcontact ? $transcode : $obj->stcomm);
        $this->stcomm_id = $obj->fk_stcommcontact; // id statut commercial
        $this->statut_commercial = $label_sale_status; // libelle statut commercial
        $this->stcomm_picto = $obj->stcomm_picto; // Picto statut commercial
 
        $this->phone_pro = trim($obj->phone);
        $this->fax = trim($obj->fax);
        $this->phone_perso = trim($obj->phone_perso);
        $this->phone_mobile = trim($obj->phone_mobile);
 
        $this->email      = $obj->email;
        $this->socialnetworks = ($obj->socialnetworks ? (array) json_decode($obj->socialnetworks, true) : array());
        $this->photo      = $obj->photo;
        $this->priv       = $obj->priv;
        $this->mail       = $obj->email;
 
        $this->birthday   = $this->db->jdate($obj->birthday);
        $this->note     = $obj->note_private; // deprecated
        $this->note_private = $obj->note_private;
        $this->note_public  = $obj->note_public;
        $this->default_lang = $obj->default_lang;
        $this->user_id    = $obj->user_id;
        $this->user_login = $obj->user_login;
        $this->canvas   = $obj->canvas;
 
        $this->import_key = $obj->import_key;
 
        // Define gender according to civility
        $this->setGenderFromCivility();
 
        // Search Dolibarr user linked to this contact
        $sql = "SELECT u.rowid ";
        $sql .= " FROM ".MAIN_DB_PREFIX."user as u";
        $sql .= " WHERE u.fk_socpeople = ".((int) $this->id);
 
        $resql = $this->db->query($sql);
        if ($resql) {
          if ($this->db->num_rows($resql)) {
            $uobj = $this->db->fetch_object($resql);
 
            $this->user_id = $uobj->rowid;
          }
          $this->db->free($resql);
        } else {
          $this->error = $this->db->error();
          return -1;
        }
 
        // Retrieve all extrafield
        // fetch optionals attributes and labels
        $this->fetch_optionals();
 
        // Load also alerts of this user
        if ($user) {
          $sql = "SELECT fk_user";
          $sql .= " FROM ".MAIN_DB_PREFIX."user_alert";
          $sql .= " WHERE fk_user = ".((int) $user->id)." AND fk_contact = ".((int) $id);
 
          $resql = $this->db->query($sql);
          if ($resql) {
            if ($this->db->num_rows($resql)) {
              $obj = $this->db->fetch_object($resql);
 
              $this->birthday_alert = 1;
            }
            $this->db->free($resql);
          } else {
            $this->error = $this->db->error();
            return -1;
          }
        }
 
        // Load also roles of this address
        if ($loadalsoroles) {
          $resultRole = $this->fetchRoles();
          if ($resultRole < 0) {
            return $resultRole;
          }
        }
 
        return $this->id;
      } else {
        $langs->load('errors');
        $this->error = $langs->trans("ErrorRecordNotFound");
        return 0;
      }
    } else {
      $this->error = $this->db->error();
      return -1;
    }
  }
 
  public function findNearest($id = 0, $lastname = '', $firstname = '', $ref_ext = '', $email = '', $ref_alias = '', $socid = 0)
  {
    // A rowid is known, it is a unique key so we found it
    if ($id) {
      return $id;
    }
 
    // We try to find the contact with exact matching on all fields
    // TODO Replace this with step by step search
    // Then search on email
    // Then search on lastname + firstname
    // Then search ref_ext or alias with a OR
    $tmpcontact = new Contact($this->db);
    $result = $tmpcontact->fetch($id, null, $ref_ext, $email, 0, $socid);
 
    return $result;
  }
 
 
 
  public function setGenderFromCivility()
  {
    unset($this->gender);
 
    if (in_array($this->civility_id, array('MR')) || in_array($this->civility_code, array('MR'))) {
      $this->gender = 'man';
    } elseif (in_array($this->civility_id, array('MME', 'MLE')) || in_array($this->civility_code, array('MME', 'MLE'))) {
      $this->gender = 'woman';
    }
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function load_ref_elements()
  {
    // phpcs:enable
    // Count the elements for which it is contact
    $sql = "SELECT tc.element, count(ec.rowid) as nb";
    $sql .= " FROM ".MAIN_DB_PREFIX."element_contact as ec, ".MAIN_DB_PREFIX."c_type_contact as tc";
    $sql .= " WHERE ec.fk_c_type_contact = tc.rowid";
    $sql .= " AND fk_socpeople = ".((int) $this->id);
    $sql .= " AND tc.source = 'external'";
    $sql .= " GROUP BY tc.element";
 
    dol_syslog(get_class($this)."::load_ref_elements", LOG_DEBUG);
 
    $resql = $this->db->query($sql);
    if ($resql) {
      while ($obj = $this->db->fetch_object($resql)) {
        if ($obj->nb) {
          if ($obj->element == 'facture') {
            $this->ref_facturation = $obj->nb;
          } elseif ($obj->element == 'contrat') {
            $this->ref_contrat = $obj->nb;
          } elseif ($obj->element == 'commande') {
            $this->ref_commande = $obj->nb;
          } elseif ($obj->element == 'propal') {
            $this->ref_propal = $obj->nb;
          }
        }
      }
      $this->db->free($resql);
      return 0;
    } else {
      $this->error = $this->db->lasterror();
      return -1;
    }
  }
 
  public function delete($user, $notrigger = 0)
  {
    $error = 0;
 
    $this->db->begin();
 
    if (!$notrigger) {
      // Call trigger
      $result = $this->call_trigger('CONTACT_DELETE', $user);
      if ($result < 0) {
        $error++;
      }
      // End call triggers
    }
 
    if (!$error) {
      // Get all rowid of element_contact linked to a type that is link to llx_socpeople
      $sql = "SELECT ec.rowid";
      $sql .= " FROM ".MAIN_DB_PREFIX."element_contact ec,";
      $sql .= " ".MAIN_DB_PREFIX."c_type_contact tc";
      $sql .= " WHERE ec.fk_socpeople=".((int) $this->id);
      $sql .= " AND ec.fk_c_type_contact=tc.rowid";
      $sql .= " AND tc.source='external'";
      dol_syslog(__METHOD__, LOG_DEBUG);
      $resql = $this->db->query($sql);
      if ($resql) {
        $num = $this->db->num_rows($resql);
 
        $i = 0;
        while ($i < $num && !$error) {
          $obj = $this->db->fetch_object($resql);
 
          $sqldel = "DELETE FROM ".MAIN_DB_PREFIX."element_contact";
          $sqldel .= " WHERE rowid = ".((int) $obj->rowid);
          dol_syslog(__METHOD__, LOG_DEBUG);
          $result = $this->db->query($sqldel);
          if (!$result) {
            $error++;
            $this->error = $this->db->error().' sql='.$sqldel;
          }
 
          $i++;
        }
      } else {
        $error++;
        $this->error = $this->db->error().' sql='.$sql;
      }
    }
 
    if (!$error) {
      // Remove Roles
      $sql = "DELETE FROM ".MAIN_DB_PREFIX."societe_contacts WHERE fk_socpeople = ".((int) $this->id);
      dol_syslog(__METHOD__, LOG_DEBUG);
      $resql = $this->db->query($sql);
      if (!$resql) {
        $error++;
        $this->error .= $this->db->lasterror();
        $errorflag = -1;
      }
    }
 
    if (!$error) {
      // Remove Notifications
      $sql = "DELETE FROM ".MAIN_DB_PREFIX."notify_def WHERE fk_contact = ".((int) $this->id);
      dol_syslog(__METHOD__, LOG_DEBUG);
      $resql = $this->db->query($sql);
      if (!$resql) {
        $error++;
        $this->error .= $this->db->lasterror();
        $errorflag = -1;
      }
    }
 
    if (!$error) {
      // Remove category
      $sql = "DELETE FROM ".MAIN_DB_PREFIX."categorie_contact WHERE fk_socpeople = ".((int) $this->id);
      dol_syslog(__METHOD__, LOG_DEBUG);
      $resql = $this->db->query($sql);
      if (!$resql) {
        $error++;
        $this->error .= $this->db->lasterror();
        $errorflag = -1;
      }
    }
 
    if (!$error) {
      $sql = "DELETE FROM ".MAIN_DB_PREFIX."socpeople";
      $sql .= " WHERE rowid = ".((int) $this->id);
      dol_syslog(__METHOD__, LOG_DEBUG);
      $result = $this->db->query($sql);
      if (!$result) {
        $error++;
        $this->error = $this->db->error().' sql='.$sql;
      }
    }
 
    // Remove extrafields
    if (!$error) {
      // For avoid conflicts if trigger used
      $result = $this->deleteExtraFields();
      if ($result < 0) {
        $error++;
      }
    }
 
    if (!$error) {
      $this->db->commit();
      return 1;
    } else {
      $this->db->rollback();
      dol_syslog("Error ".$this->error, LOG_ERR);
      return -1;
    }
  }
 
 
  public function info($id)
  {
    $sql = "SELECT c.rowid, c.datec as datec, c.fk_user_creat,";
    $sql .= " GREATEST(c.tms, cef.tms) as tms, c.fk_user_modif";
    $sql .= " FROM ".MAIN_DB_PREFIX."socpeople as c";
    $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."socpeople_extrafields as cef ON cef.fk_object=c.rowid";
    $sql .= " WHERE c.rowid = ".((int) $id);
 
    $resql = $this->db->query($sql);
    if ($resql) {
      if ($this->db->num_rows($resql)) {
        $obj = $this->db->fetch_object($resql);
 
        $this->id = $obj->rowid;
 
        $this->user_creation_id = $obj->fk_user_creat;
        $this->user_modification_id = $obj->fk_user_modif;
        $this->date_creation     = $this->db->jdate($obj->datec);
        $this->date_modification = $this->db->jdate($obj->tms);
      }
 
      $this->db->free($resql);
    } else {
      print $this->db->error();
    }
  }
 
  public function getNbOfEMailings()
  {
    $sql = "SELECT count(mc.email) as nb";
    $sql .= " FROM ".MAIN_DB_PREFIX."mailing_cibles as mc, ".MAIN_DB_PREFIX."mailing as m";
    $sql .= " WHERE mc.fk_mailing=m.rowid AND mc.email = '".$this->db->escape($this->email)."' ";
    $sql .= " AND m.entity IN (".getEntity($this->element).") AND mc.statut NOT IN (-1,0)"; // -1 error, 0 not sent, 1 sent with success
 
    $resql = $this->db->query($sql);
    if ($resql) {
      $obj = $this->db->fetch_object($resql);
      $nb = (int) $obj->nb;
 
      $this->db->free($resql);
      return $nb;
    } else {
      $this->error = $this->db->error();
      return -1;
    }
  }
 
  public function getTooltipContentArray($params)
  {
    global $conf, $langs, $user;
 
    $datas = [];
 
    if (getDolGlobalString('MAIN_OPTIMIZEFORTEXTBROWSER')) {
      return ['optimize' => $langs->trans("ShowContact")];
    }
    if (!empty($this->photo) && class_exists('Form')) {
      $photo = '<div class="photointooltip floatright">';
      $photo .= Form::showphoto('contact', $this, 0, 40, 0, 'photoref', 'mini', 0); // Important, we must force height so image will have height tags and if image is inside a tooltip, the tooltip manager can calculate height and position correctly the tooltip.
      $photo .= '</div>';
      $datas['photo'] = $photo;
    }
 
    $datas['picto'] = img_picto('', $this->picto).' <u class="paddingrightonly">'.$langs->trans("Contact").'</u> ' . $this->getLibStatut(4);
    $datas['name'] = '<br><b>'.$langs->trans("Name").':</b> '.$this->getFullName($langs);
    // if ($this->civility_id) $datas['civility'] = '<br><b>' . $langs->trans("Civility") . ':</b> '.$this->civility_id;    // TODO Translate civilty_id code
    if (!empty($this->poste)) {
      $datas['job'] = '<br><b>'.$langs->trans("Poste").':</b> '.$this->poste;
    }
    $datas['email'] = '<br><b>'.$langs->trans("EMail").':</b> '.$this->email;
    $phonelist = array();
    $country_code = empty($this->country_code) ? '' : $this->country_code;
    if ($this->phone_pro) {
      $phonelist[] = dol_print_phone($this->phone_pro, $country_code, $this->id, 0, '', '&nbsp;', 'phone');
    }
    if ($this->phone_mobile) {
      $phonelist[] = dol_print_phone($this->phone_mobile, $country_code, $this->id, 0, '', '&nbsp;', 'mobile');
    }
    if ($this->phone_perso) {
      $phonelist[] = dol_print_phone($this->phone_perso, $country_code, $this->id, 0, '', '&nbsp;', 'phone');
    }
    $datas['phonelist'] = '<br><b>'.$langs->trans("Phone").':</b> '.implode('&nbsp;', $phonelist);
    $datas['address'] = '<br><b>'.$langs->trans("Address").':</b> '.dol_format_address($this, 1, ' ', $langs);
 
    return $datas;
  }
 
  public function getNomUrl($withpicto = 0, $option = '', $notooltip = 0, $moreparam = '', $save_lastsearch_value = -1, $maxlen = 0, $morecss = 'valignmiddle')
  {
    global $conf, $langs, $hookmanager;
 
    if (!empty($conf->dol_no_mouse_hover)) {
      $notooltip = 1; // Force disable tooltips
    }
 
    $result = '';
    $params = [
      'id' => $this->id,
      'objecttype' => $this->element,
      'option' => $option,
    ];
    $classfortooltip = 'classfortooltip';
    $dataparams = '';
    if (getDolGlobalInt('MAIN_ENABLE_AJAX_TOOLTIP')) {
      $classfortooltip = 'classforajaxtooltip';
      $dataparams = ' data-params="'.dol_escape_htmltag(json_encode($params)).'"';
      $label = '';
    } else {
      $label = implode($this->getTooltipContentArray($params));
    }
 
    $baseurl = DOL_URL_ROOT . '/contact/card.php';
    $query = ['id' => $this->id];
    if ($option !== 'nolink') {
      // Add param to save lastsearch_values or not
      $add_save_lastsearch_values = ($save_lastsearch_value == 1 ? 1 : 0);
      if ($save_lastsearch_value == -1 && isset($_SERVER["PHP_SELF"]) && preg_match('/list\.php/', $_SERVER["PHP_SELF"])) {
        $add_save_lastsearch_values = 1;
      }
      if ($add_save_lastsearch_values) {
        $query = array_merge($query, ['save_lastsearch_values' => 1]);
      }
    }
    $url = dolBuildUrl($baseurl, $query);
 
    $url .= $moreparam;
 
    $linkclose = '';
    if (empty($notooltip)) {
      if (getDolGlobalString('MAIN_OPTIMIZEFORTEXTBROWSER')) {
        $label = $langs->trans("ShowContact");
        $linkclose .= ' alt="'.dolPrintHTMLForAttribute($label).'"';
      }
      $linkclose .= ($label ? ' title="'.dolPrintHTMLForAttribute($label).'"' : ' title="tocomplete"');
      $linkclose .= $dataparams.' class="'.$classfortooltip.($morecss ? ' '.$morecss : '').'"';
    } else {
      $linkclose = ($morecss ? ' class="'.$morecss.'"' : '');
    }
 
    if ($option == 'nolink') {
      $linkstart = '<span';
    } else {
      $linkstart = '<a href="'.$url.'"';
    }
    $linkstart .= $linkclose.'>';
    if ($option == 'nolink') {
      $linkend = '</span>';
    } else {
      $linkend = '</a>';
    }
 
    $result .= $linkstart;
 
    if ($withpicto) {
      if ($withpicto < 0) {
        $result .= '<!-- picto photo contact --><span class="nopadding userimg'.($morecss ? ' '.$morecss : '').'">'.Form::showphoto('contact', $this, 0, 0, 0, 'userphoto'.($withpicto == -3 ? 'small' : ''), 'mini', 0, 1).'</span>';
        if ($withpicto != 2 && $withpicto != -2) {
          $result .= ' ';
        }
      } else {
        $result .= img_object(($notooltip ? '' : $label), ($this->picto ? $this->picto : 'generic'), ($notooltip ? (($withpicto != 2) ? 'class="pictofixedwidth valignmiddle"' : '') : 'class="'.(($withpicto != 2) ? 'pictofixedwidth valignmiddle' : '').'"'), 0, 0, $notooltip ? 0 : 1);
      }
    }
    if ($withpicto != 2 && $withpicto != -2) {
      $result .= '<span class="valignmiddle">'.($maxlen ? dol_trunc($this->getFullName($langs), $maxlen) : $this->getFullName($langs)).'</span>';
    }
 
    $result .= $linkend;
 
    global $action;
    $hookmanager->initHooks(array('contactdao'));
    $parameters = array('id' => $this->id, 'getnomurl' => &$result);
    $reshook = $hookmanager->executeHooks('getNomUrl', $parameters, $this, $action); // Note that $action and $object may have been modified by some hooks
    if ($reshook > 0) {
      $result = $hookmanager->resPrint;
    } else {
      $result .= $hookmanager->resPrint;
    }
 
    return $result;
  }
 
  public function getCivilityLabel()
  {
    global $langs;
 
    $code = ($this->civility_code ? $this->civility_code : (!empty($this->civility_id) ? $this->civility : (!empty($this->civilite) ? $this->civilite : '')));
    if (empty($code)) {
      return '';
    }
 
    $langs->load("dict");
    return $langs->getLabelFromKey($this->db, "Civility".$code, "c_civility", "code", "label", $code);
  }
 
  public function getLibStatut($mode)
  {
    return $this->LibStatut($this->status, $mode);
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function LibStatut($status, $mode)
  {
    // phpcs:enable
    global $langs;
 
    $labelStatus = array(
      0 => 'ActivityCeased',
      1 => 'InActivity',
      4 => 'InActivity',
      5 => 'ActivityCeased',
    );
    $labelStatusShort = array(
      0 => 'ActivityCeased',
      1 => 'InActivity',
      4 => 'InActivity',
      5 => 'ActivityCeased',
    );
 
    $statusType = 'status4';
    if ($status == 0 || $status == 5) {
      $statusType = 'status5';
    }
 
    $label = $langs->transnoentitiesnoconv($labelStatus[$status]);
    $labelshort = $langs->transnoentitiesnoconv($labelStatusShort[$status]);
 
    return dolGetStatus($label, $labelshort, '', $statusType, $mode);
  }
 
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function LibPubPriv($status, $decorate = 0)
  {
    // phpcs:enable
    global $langs;
    if ($status == '1') {
      $s = ($decorate == 2 ? '' : $langs->trans('ContactPrivate'));
      if ($decorate) {
        $s = '<span title="'.$langs->trans('ContactPrivateDesc').'">'.img_picto('', 'private', 'class="paddingrightonly"').$s.'</span>';
      }
      return $s;
    } else {
      $s = ($decorate == 2 ? '' : $langs->trans('ContactPublic'));
      if ($decorate) {
        $s = '<span title="'.$langs->trans('ContactPublicDesc').'">'.img_picto('', 'public', 'class="paddingrightonly"').$s.'</span>';
      }
      return $s;
    }
  }
 
 
  public function initAsSpecimen()
  {
    // Get first id of existing company and save it into $socid
    $socid = 0;
    $sql = "SELECT rowid FROM ".MAIN_DB_PREFIX."societe ORDER BY rowid LIMIT 1";
    $resql = $this->db->query($sql);
    if ($resql) {
      $obj = $this->db->fetch_object($resql);
      if ($obj) {
        $socid = $obj->rowid;
      }
    }
 
    // Initialise parameters
    $this->id = 0;
    $this->entity = 1;
    $this->specimen = 1;
    $this->lastname = 'DOLIBARR';
    $this->firstname = 'SPECIMEN';
    $this->address = '21 jump street';
    $this->zip = '99999';
    $this->town = 'MyTown';
    $this->country_id = 1;
    $this->country_code = 'FR';
    $this->country = 'France';
    $this->email = 'specimen@specimen.com';
    $this->socialnetworks = array(
      'skype' => 'tom.hanson',
      'twitter' => 'tomhanson',
      'linkedin' => 'tomhanson',
    );
    $this->phone_pro = '0909090901';
    $this->phone_perso = '0909090902';
    $this->phone_mobile = '0909090903';
    $this->fax = '0909090909';
 
    $this->note_public = 'This is a comment (public)';
    $this->note_private = 'This is a comment (private)';
 
    $this->socid = $socid;
    $this->status = 1;
 
    return 1;
  }
 
  public function setstatus($status)
  {
    global $conf, $langs, $user;
 
    $error = 0;
 
    // Check parameters
    if (!empty($this->statut) && empty($this->status)) {
      $this->status = 1;
    }
    if ($this->status == $status) {
      return 0;
    } else {
      $this->status = $status;
      $this->statut = $status;
    }
 
    $this->db->begin();
 
    // User disable
    $sql = "UPDATE ".MAIN_DB_PREFIX."socpeople";
    $sql .= " SET statut = ".((int) $this->status);
    $sql .= ", fk_user_modif = ".((int) $user->id);
    $sql .= " WHERE rowid = ".((int) $this->id);
    $result = $this->db->query($sql);
 
    dol_syslog(get_class($this)."::setstatus", LOG_DEBUG);
    if ($result) {
      // Call trigger
      $result = $this->call_trigger('CONTACT_ENABLEDISABLE', $user);
      if ($result < 0) {
        $error++;
      }
      // End call triggers
    }
 
    if ($error) {
      $this->db->rollback();
      return -$error;
    } else {
      $this->db->commit();
      return 1;
    }
  }
 
  public function setCategories($categories, $remove_existing = true)
  {
    require_once DOL_DOCUMENT_ROOT.'/categories/class/categorie.class.php';
    return parent::setCategoriesCommon($categories, Categorie::TYPE_CONTACT, $remove_existing);
  }
 
  public static function replaceThirdparty(DoliDB $dbs, $origin_id, $dest_id)
  {
    $tables = array(
      'socpeople', 'societe_contacts'
    );
 
    return CommonObject::commonReplaceThirdparty($dbs, $origin_id, $dest_id, $tables);
  }
 
  public static function replaceContact(DoliDB $dbs, $origin_id, $dest_id)
  {
    // llx_societe_contacts: UNIQUE(entity, fk_soc, fk_c_type_contact, fk_socpeople).
    // Delete the roles the target contact already has, then move the remaining ones.
    $sql = 'DELETE FROM '.$dbs->prefix().'societe_contacts WHERE rowid IN (';
    $sql .= ' SELECT x.rowid FROM (';
    $sql .= '  SELECT origin.rowid FROM '.$dbs->prefix().'societe_contacts as origin';
    $sql .= '  INNER JOIN '.$dbs->prefix().'societe_contacts as dest ON dest.entity = origin.entity';
    $sql .= '   AND dest.fk_soc = origin.fk_soc AND dest.fk_c_type_contact = origin.fk_c_type_contact';
    $sql .= '  WHERE origin.fk_socpeople = '.((int) $origin_id).' AND dest.fk_socpeople = '.((int) $dest_id);
    $sql .= ' ) as x)';
    if (!$dbs->query($sql)) {
      return false;
    }
 
    if (!CommonObject::commonReplaceContact($dbs, $origin_id, $dest_id, array('societe_contacts'))) {
      return false;
    }
 
    // llx_element_contact.fk_socpeople points to llx_socpeople only when c_type_contact.source is
    // 'external'. It points to llx_user when source is 'internal', so both queries below MUST filter
    // on it, otherwise internal (user) assignments would be moved to the merged contact.
 
 
    // llx_element_contact: UNIQUE(element_id, fk_c_type_contact, fk_socpeople)
    $sql = 'DELETE FROM '.$dbs->prefix().'element_contact WHERE rowid IN (';
    $sql .= ' SELECT x.rowid FROM (';
    $sql .= '  SELECT origin.rowid FROM '.$dbs->prefix().'element_contact as origin';
    $sql .= '  INNER JOIN '.$dbs->prefix().'element_contact as dest ON dest.element_id = origin.element_id';
    $sql .= '   AND dest.fk_c_type_contact = origin.fk_c_type_contact';
    $sql .= '  WHERE origin.fk_socpeople = '.((int) $origin_id).' AND dest.fk_socpeople = '.((int) $dest_id);
    $sql .= "   AND origin.fk_c_type_contact IN (SELECT rowid FROM ".$dbs->prefix()."c_type_contact WHERE source = 'external')";
    $sql .= ' ) as x)';
    if (!$dbs->query($sql)) {
      return false;
    }
 
    $sql = 'UPDATE '.$dbs->prefix().'element_contact SET fk_socpeople = '.((int) $dest_id);
    $sql .= ' WHERE fk_socpeople = '.((int) $origin_id);
    $sql .= " AND fk_c_type_contact IN (SELECT rowid FROM ".$dbs->prefix()."c_type_contact WHERE source = 'external')";
    if (!$dbs->query($sql)) {
      return false;
    }
 
    // References to a contact stored as a (type, id) couple. All the names below are literals, so
    // they are safe to concatenate. 'unique' lists the other columns of the unique index of the
    // table, if any, so the rows the target contact already has can be dropped before the update.
    $polymorphic = array(
      array('table' => 'object_lang', 'id' => 'fk_object', 'type' => 'type_object',
        'values' => array('contact', 'socpeople'), 'unique' => array('property', 'lang')),
      array('table' => 'links', 'id' => 'objectid', 'type' => 'objecttype',
        'values' => array('contact'), 'unique' => array('label')),
      array('table' => 'element_element', 'id' => 'fk_source', 'type' => 'sourcetype',
        'values' => array('contact'), 'unique' => array('fk_target', 'targettype')),
      array('table' => 'element_element', 'id' => 'fk_target', 'type' => 'targettype',
        'values' => array('contact'), 'unique' => array('fk_source', 'sourcetype')),
      // An event can be linked to a contact as its related object
      array('table' => 'actioncomm', 'id' => 'fk_element', 'type' => 'elementtype',
        'values' => array('contact'), 'unique' => array()),
      // dol_move() updates the path of the indexed files but never their source object, so the
      // index rows have to be moved here or they would point to the deleted contact. The unique
      // index of the table is on (filepath, filename, entity), which is left untouched.
      array('table' => 'ecm_files', 'id' => 'src_object_id', 'type' => 'src_object_type',
        'values' => array('contact', 'socpeople'), 'unique' => array()),
      array('table' => 'quickmemo_memo', 'id' => 'fk_element', 'type' => 'element_type',
        'values' => array('contact'), 'unique' => array()),
      array('table' => 'comment', 'id' => 'fk_element', 'type' => 'element_type',
        'values' => array('contact'), 'unique' => array()),
    );
 
    foreach ($polymorphic as $ref) {
      // Some of these tables are provided by modules that may not be installed
      $sanitizedtable = $dbs->sanitize($ref['table']);
      $sanitizedidcol = $dbs->sanitize($ref['id']);
      $sanitizedtypecol = $dbs->sanitize($ref['type']);
      if (!$dbs->DDLListTables((string) $dbs->database_name, $dbs->prefix().$sanitizedtable)) {
        continue;
      }
      // Each value is escaped on its own: sanitize() removes the quotes inside the string it is
      // given, so sanitizing an already assembled list would collapse it into a single value
      $quotedvalues = array();
      foreach ($ref['values'] as $refvalue) {
        $quotedvalues[] = "'".$dbs->escape($refvalue)."'";
      }
      $sanitizedvalues = implode(', ', $quotedvalues);  // @phan-suppress-current-line SqlInjection
      $sanitizedtypefilter = $sanitizedtypecol." IN (".$sanitizedvalues.")";
 
      if (!empty($ref['unique'])) {
        $sql = "DELETE FROM ".$dbs->prefix().$sanitizedtable." WHERE rowid IN (";
        $sql .= " SELECT x.rowid FROM (";
        $sql .= "  SELECT origin.rowid FROM ".$dbs->prefix().$sanitizedtable." as origin";
        $sql .= "  INNER JOIN ".$dbs->prefix().$sanitizedtable." as dest";
        $sql .= "   ON dest.".$sanitizedtypecol." = origin.".$sanitizedtypecol;
        foreach ($ref['unique'] as $uniquecol) {
          $sanitizeduniquecol = $dbs->sanitize($uniquecol);
          $sql .= " AND dest.".$sanitizeduniquecol." = origin.".$sanitizeduniquecol;
        }
        $sql .= "  WHERE origin.".$sanitizedidcol." = ".((int) $origin_id);
        $sql .= "   AND dest.".$sanitizedidcol." = ".((int) $dest_id);
        $sql .= "   AND origin.".$sanitizedtypefilter;
        $sql .= " ) as x)";
        if (!$dbs->query($sql)) {
          return false;
        }
      }
 
      $sql = "UPDATE ".$dbs->prefix().$sanitizedtable." SET ".$sanitizedidcol." = ".((int) $dest_id);
      $sql .= " WHERE ".$sanitizedtypefilter;
      $sql .= " AND ".$sanitizedidcol." = ".((int) $origin_id);
      if (!$dbs->query($sql)) {
        return false;
      }
    }
 
    // A link between the two contacts became a link of the target contact to itself, which the
    // linked objects box would then display. There is no unique index violation, so nothing failed.
    $sql = "DELETE FROM ".$dbs->prefix()."element_element WHERE fk_source = fk_target";
    $sql .= " AND sourcetype = targettype AND fk_source = ".((int) $dest_id);
    $sql .= " AND sourcetype = 'contact'";
    if (!$dbs->query($sql)) {
      return false;
    }
 
    return true;
  }
 
  public function mergeContact($contact_origin_id)
  {
    global $langs, $hookmanager, $user, $action;
 
    $error = 0;
    $langs->loadLangs(array('errors', 'companies'));
 
    // The target contact must have been loaded: update() would silently update no row and the
    // satellite data would then be moved to the contact id 0.
    if (!($this->id > 0) || empty($this->entity)) {
      $this->error = $langs->trans('ErrorBadParameters');
      dol_syslog(__METHOD__.' Called on a contact that was not loaded', LOG_ERR);
      return -1;
    }
    if ($contact_origin_id <= 0 || $contact_origin_id == $this->id) {
      $this->error = $langs->trans('ErrorBadParameters');
      return -1;
    }
    // A merge deletes a contact, so it requires the permission to delete one, whatever the caller
    if (!$user->hasRight('societe', 'contact', 'creer') || !$user->hasRight('societe', 'contact', 'supprimer')) {
      $this->error = $langs->trans('ErrorForbidden');
      return -1;
    }
    // An external user never merges anything, as on the third party card
    if ($user->socid > 0) {
      $this->error = $langs->trans('ErrorForbidden');
      return -1;
    }
 
    $contact_origin = new Contact($this->db); // The contact that we will delete
    $resultfetch = $contact_origin->fetch($contact_origin_id);
    // fetch() returns the id when found, 2 when several records were found, 0 when not found and -1 on error
    if ($resultfetch != $contact_origin_id) {
      $this->error = $langs->trans('ErrorRecordNotFound');
      dol_syslog(__METHOD__.' Cannot fetch contact id='.$contact_origin_id.', result='.$resultfetch, LOG_ERR);
      return -1;
    }
 
    // Access guards. fetch() by rowid applies neither an entity filter nor a permission filter, so
    // the two contacts are revalidated here, including the current one: an id coming from a POST is
    // not to be trusted, and the checks must also protect the callers that are not the contact card.
    $entities = explode(',', getEntity('contact'));
    foreach (array($this, $contact_origin) as $tmpcontact) {
      if (!in_array($tmpcontact->entity, $entities) || $tmpcontact->entity != $this->entity) {
        $this->error = $langs->trans('ErrorContactsMergeDifferentEntity');
        return -1;
      }
      if (!empty($tmpcontact->priv) && $tmpcontact->user_creation_id != $user->id) {
        $this->error = $langs->trans('ErrorContactsMergePrivate');
        return -1;
      }
      // A contact without a third party is shared, so the perimeter of the sales representatives
      // does not apply to it, as in restrictedArea()
      if ($tmpcontact->socid > 0 && !$user->hasRight('societe', 'client', 'voir')
        && !$this->isSalesRepresentativeOf($tmpcontact->socid)) {
        $this->error = $langs->trans('ErrorForbidden');
        return -1;
      }
    }
    // Absorbing a shared contact into a private one would hide its data from everybody else,
    // including the administrators, and the merged contact is deleted so it is not reversible
    if (!empty($this->priv) && empty($contact_origin->priv)) {
      $this->error = $langs->trans('ErrorContactsMergeIntoPrivate');
      return -1;
    }
    $originlinked = $this->isLinkedToUser($contact_origin->id);
    $destlinked = $this->isLinkedToUser($this->id);
    if ($originlinked < 0 || $destlinked < 0) {
      // The guard below is a security one, so it must refuse and not let the merge through
      $this->error = $langs->trans('ErrorContactsMerge');
      return -1;
    }
    // Moving llx_user.fk_socpeople would give the contact of a user account to another contact,
    // and Contact::update() then propagates the email of that contact to the user, which is a way
    // to take over the account. Changing the contact of a user requires the permission to do so.
    if (($originlinked > 0 || $destlinked > 0) && !$user->hasRight('user', 'user', 'creer')) {
      $this->error = $langs->trans('ErrorContactsMergeLinkedToUser');
      return -1;
    }
    // llx_user.fk_socpeople has a unique key: refuse rather than silently break a user link
    if ($originlinked > 0 && $destlinked > 0) {
      $this->error = $langs->trans('ErrorContactsMergeBothLinkedToUser');
      return -1;
    }
 
    dol_syslog(__METHOD__.' merge contact id='.$contact_origin->id.' (will be deleted) into the contact id='.$this->id);
 
    $this->db->begin();
 
    // Recopy some data
    foreach (self::MERGE_FIELDS_FILL_IF_EMPTY as $property) {
      if (empty($this->$property) && !empty($contact_origin->$property)) {
        $this->$property = $contact_origin->$property;
      }
    }
 
    // Concat some data, with a dated mention so a targeted erasure stays possible later
    $mention = '['.$langs->transnoentitiesnoconv('MergedFromContact', dol_print_date(dol_now(), 'day'), (string) $contact_origin->id).']';
    foreach (self::MERGE_FIELDS_CONCAT as $property) {
      if (!empty($contact_origin->$property)) {
        $this->$property = dol_concatdesc($this->$property, $mention."\n".$contact_origin->$property);
      }
    }
 
    // A merge must never make the data of a private contact visible to everybody
    if (!empty($contact_origin->priv)) {
      $this->priv = 1;
    }
 
    // If alias name is not defined on target contact, we can store in it the old name of the contact
    if (empty($this->name_alias) && $this->getFullName($langs) != $contact_origin->getFullName($langs)) {
      $this->name_alias = $contact_origin->getFullName($langs);
    }
 
    // Merge extrafields. They are saved by the update() below.
    if (is_array($contact_origin->array_options)) {
      foreach ($contact_origin->array_options as $key => $val) {
        if (empty($this->array_options[$key])) {
          $this->array_options[$key] = $val;
        }
      }
    }
 
    // updateRoles(), called by update(), deletes then reinserts every societe_contacts row of the
    // contact from $this->roles, which would wipe the roles we are about to move. It is a no-op
    // when roles is not set. Set it to null instead of using unset(): roles is a declared property
    // and unset() would make any later access emit an "Undefined property" warning.
    $this->roles = null;
 
    // Update. The trigger is called once at the end of the merge, hence $notrigger = 1.
    if ($this->update($this->id, $user, 1) <= 0) {
      $error++;
      dol_syslog(__METHOD__.' Failed to update the target contact: '.$this->errorsToString(), LOG_ERR);
    }
 
    // Merge categories, before the deletion below: llx_categorie_contact has a foreign key on
    // llx_socpeople without ON DELETE.
    if (!$error) {
      include_once DOL_DOCUMENT_ROOT.'/categories/class/categorie.class.php';
      $static_cat = new Categorie($this->db);
      $cats_origin = $static_cat->containing($contact_origin->id, 'contact', 'id');
      $cats_dest = $static_cat->containing($this->id, 'contact', 'id');
      // containing() returns the int -1 on SQL error. Reading it as an empty list would replace
      // the categories of the target contact by the ones of the merged contact only.
      if (!is_array($cats_origin) || !is_array($cats_dest)) {
        $this->error = $static_cat->error;
        dol_syslog(__METHOD__.' Cannot read the categories of the contacts: '.$this->error, LOG_ERR);
        $error++;
      } else {
        // array_merge() must be used here: the + operator on arrays is a union on keys, it
        // would silently drop categories.
        $cats = array_merge($cats_origin, $cats_dest);
        if ($this->setCategories(array_values(array_unique($cats))) < 0) {
          $error++;
        }
      }
    }
 
    // Children contacts
    if (!$error) {
      $error += $this->mergeContactChildren($contact_origin);
    }
 
    // Move links
    if (!$error) {
      $objects = array(
        'ActionComm' => '/comm/action/class/actioncomm.class.php',
        'Contact' => '/contact/class/contact.class.php',
        'User' => '/user/class/user.class.php',
      );
      foreach ($objects as $object_name => $object_file) {
        require_once DOL_DOCUMENT_ROOT.$object_file;
 
        if (!$object_name::replaceContact($this->db, $contact_origin->id, $this->id)) {
          $error++;
          $this->error = $this->db->lasterror();
          dol_syslog(__METHOD__.' '.$object_name.'::replaceContact failed: '.$this->error, LOG_ERR);
          break;
        }
      }
    }
 
    // Tables of the optional modules
    if (!$error) {
      $error += $this->mergeContactOptionalTables($contact_origin);
    }
 
    // External modules should update their ones too
    if (!$error) {
      $parameters = array('contact_origin' => $contact_origin->id, 'contact_dest' => $this->id);
      $reshook = $hookmanager->executeHooks('replaceContact', $parameters, $this, $action);
 
      if ($reshook < 0) {
        $this->error = $hookmanager->error;
        $this->errors = $hookmanager->errors;
        $error++;
      }
    }
 
    if (!$error) {
      $this->context = array(
        'merge' => 1,
        'mergefromid' => $contact_origin->id,
        'mergefromname' => $contact_origin->getFullName($langs)
      );
 
      // Call trigger
      $result = $this->call_trigger('CONTACT_MODIFY', $user);
      if ($result < 0) {
        $error++;
      }
      // End call triggers
    }
 
    if (!$error) {
      // We finally remove the old contact
      if ($contact_origin->delete($user) < 1) {
        $this->error = $contact_origin->error;
        $this->errors = $contact_origin->errors;
        $error++;
      }
    }
 
    if ($error) {
      $this->error = $langs->trans('ErrorContactsMerge').' '.$this->error;
      $this->db->rollback();
      // The object still holds the merged values in memory, reload it so the caller does not
      // display data that was rolled back
      $this->fetch($this->id);
      return -1;
    }
 
    $this->db->commit();
 
    // Files are moved once the transaction is committed: dol_move() is not transactional, and
    // Contact::delete() does not remove the directory of the contact, so the files are still there.
    $this->mergeContactFiles($contact_origin->id);
 
    return 0;
  }
 
  private function isLinkedToUser($contactid)
  {
    $sql = "SELECT rowid FROM ".$this->db->prefix()."user WHERE fk_socpeople = ".((int) $contactid);
 
    $resql = $this->db->query($sql);
    if (!$resql) {
      $this->error = $this->db->lasterror();
      dol_syslog(__METHOD__.' '.$this->error, LOG_ERR);
      return -1;
    }
    $found = ($this->db->num_rows($resql) > 0 ? 1 : 0);
    $this->db->free($resql);
 
    return $found;
  }
 
  private function isSalesRepresentativeOf($socid)
  {
    global $user;
 
    if (empty($socid)) {
      return false; // A shared contact with no third party is out of any portfolio
    }
 
    $sql = "SELECT fk_soc FROM ".$this->db->prefix()."societe_commerciaux";
    $sql .= " WHERE fk_soc = ".((int) $socid)." AND fk_user = ".((int) $user->id);
 
    $resql = $this->db->query($sql);
    if (!$resql) {
      $this->error = $this->db->lasterror();
      dol_syslog(__METHOD__.' '.$this->error, LOG_ERR);
      return false;
    }
    $found = ($this->db->num_rows($resql) > 0);
    $this->db->free($resql);
 
    return $found;
  }
 
  private function mergeContactChildren($contact_origin)
  {
    $error = 0;
 
    // fk_parent is not loaded by fetch()
    $parentofdest = $this->getParentId($this->id);
 
    // The target contact is a child of the merged one: its parent is about to be deleted
    if ($parentofdest == $contact_origin->id) {
      $newparent = $this->getParentId($contact_origin->id);
      // A dedicated query is used rather than setValueFrom(): the 'int' format of the latter
      // casts null to 0, while fk_parent is nullable, and its trigger key would fetch the
      // record again and overwrite the values merged into memory.
      $sql = 'UPDATE '.$this->db->prefix().'socpeople';
      $sql .= ' SET fk_parent = '.($newparent > 0 ? ((int) $newparent) : 'NULL');
      $sql .= ' WHERE rowid = '.((int) $this->id);
      if (!$this->db->query($sql)) {
        $this->error = $this->db->lasterror();
        dol_syslog(__METHOD__.' '.$this->error, LOG_ERR);
        return 1;
      }
    }
 
    // Collect the ancestors of the target contact, they must not become its children
    $ancestors = array();
    $currentid = $this->getParentId($this->id);
    $depth = 0;
    while ($currentid > 0 && $depth < self::MERGE_MAX_PARENT_DEPTH) {
      if (in_array($currentid, $ancestors)) {
        break;  // The hierarchy already contains a cycle, stop walking it
      }
      $ancestors[] = (int) $currentid;
      $currentid = $this->getParentId($currentid);
      $depth++;
    }
 
    $sql = 'UPDATE '.$this->db->prefix().'socpeople SET fk_parent = '.((int) $this->id);
    $sql .= ' WHERE fk_parent = '.((int) $contact_origin->id);
    $sql .= ' AND rowid <> '.((int) $this->id);
    if (!empty($ancestors)) {
      // $ancestors only contains ids already cast to int
      $sanitizedancestors = implode(',', $ancestors);  // @phan-suppress-current-line SqlInjection
      $sql .= " AND rowid NOT IN (".$sanitizedancestors.")";
    }
    if (!$this->db->query($sql)) {
      $this->error = $this->db->lasterror();
      dol_syslog(__METHOD__.' '.$this->error, LOG_ERR);
      $error++;
    }
 
    // The children excluded above, being ancestors of the target contact, still point to the
    // contact about to be deleted. Detach them rather than leave a dangling parent.
    if (!$error) {
      $sql = 'UPDATE '.$this->db->prefix().'socpeople SET fk_parent = NULL';
      $sql .= ' WHERE fk_parent = '.((int) $contact_origin->id);
      if (!$this->db->query($sql)) {
        $this->error = $this->db->lasterror();
        dol_syslog(__METHOD__.' '.$this->error, LOG_ERR);
        $error++;
      }
    }
 
    return $error;
  }
 
  private function getParentId($contactid)
  {
    $sql = "SELECT fk_parent FROM ".$this->db->prefix()."socpeople WHERE rowid = ".((int) $contactid);
 
    $resql = $this->db->query($sql);
    if (!$resql) {
      $this->error = $this->db->lasterror();
      dol_syslog(__METHOD__.' '.$this->error, LOG_ERR);
      return 0;
    }
    $parentid = 0;
    if ($obj = $this->db->fetch_object($resql)) {
      $parentid = (empty($obj->fk_parent) ? 0 : (int) $obj->fk_parent);
    }
    $this->db->free($resql);
 
    return $parentid;
  }
 
  private function mergeContactOptionalTables($contact_origin)
  {
    $error = 0;
 
    // Notifications. llx_notify_def has no unique key, but a duplicated row means the same
    // notification sent twice, so it must be deduplicated as well.
    $sql = 'DELETE FROM '.$this->db->prefix().'notify_def WHERE rowid IN (';
    $sql .= ' SELECT x.rowid FROM (';
    $sql .= '  SELECT origin.rowid FROM '.$this->db->prefix().'notify_def as origin';
    $sql .= '  INNER JOIN '.$this->db->prefix().'notify_def as dest ON dest.fk_action = origin.fk_action';
    // A row is a duplicate only if the whole definition matches, recipient included: fk_soc,
    // entity, type, threshold, context, fk_user and email are nullable, hence the NULL safe
    // comparisons, the MySQL <=> operator not being portable to PostgreSQL.
    $sql .= '   AND (dest.fk_soc = origin.fk_soc OR (dest.fk_soc IS NULL AND origin.fk_soc IS NULL))';
    $sql .= '   AND (dest.entity = origin.entity OR (dest.entity IS NULL AND origin.entity IS NULL))';
    $sql .= '   AND (dest.type = origin.type OR (dest.type IS NULL AND origin.type IS NULL))';
    $sql .= '   AND (dest.threshold = origin.threshold OR (dest.threshold IS NULL AND origin.threshold IS NULL))';
    $sql .= '   AND (dest.context = origin.context OR (dest.context IS NULL AND origin.context IS NULL))';
    $sql .= '   AND (dest.fk_user = origin.fk_user OR (dest.fk_user IS NULL AND origin.fk_user IS NULL))';
    $sql .= '   AND (dest.email = origin.email OR (dest.email IS NULL AND origin.email IS NULL))';
    $sql .= '  WHERE origin.fk_contact = '.((int) $contact_origin->id).' AND dest.fk_contact = '.((int) $this->id);
    $sql .= ' ) as x)';
    if (!$this->db->query($sql)) {
      $this->error = $this->db->lasterror();
      dol_syslog(__METHOD__.' '.$this->error, LOG_ERR);
      return 1;
    }
 
    if (!CommonObject::commonReplaceContact($this->db, $contact_origin->id, $this->id, array('notify', 'notify_def'), 'fk_contact')) {
      dol_syslog(__METHOD__.' Failed to move the notifications: '.$this->db->lasterror(), LOG_ERR);
      return 1;
    }
 
    // Mass emailing targets
    if ($this->db->DDLListTables((string) $this->db->database_name, $this->db->prefix().'mailing_cibles')) {
      // No deduplication here: uk_mailing_cibles is (fk_mailing, email), it does not contain
      // fk_contact, so moving fk_contact cannot violate it, and the rows hold the send history.
      if (!CommonObject::commonReplaceContact($this->db, $contact_origin->id, $this->id, array('mailing_cibles'), 'fk_contact')) {
        dol_syslog(__METHOD__.' Failed to move the mass emailing targets: '.$this->db->lasterror(), LOG_ERR);
        return 1;
      }
 
      // The source of a target is also stored as a (source_type, source_id) couple
      $sql = 'UPDATE '.$this->db->prefix().'mailing_cibles SET source_id = '.((int) $this->id);
      $sql .= " WHERE source_type = 'contact' AND source_id = ".((int) $contact_origin->id);
      if (!$this->db->query($sql)) {
        $this->error = $this->db->lasterror();
        dol_syslog(__METHOD__.' '.$this->error, LOG_ERR);
        return 1;
      }
    }
 
    return $error;
  }
 
  private function mergeContactFiles($contact_origin_id)
  {
    global $conf, $langs;
 
    if (empty($conf->societe->multidir_output[$this->entity])) {
      return;
    }
 
    // files.lib.php is not loaded when the merge is called outside of a web context
    require_once DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php';
 
    // The id is used and not $this->ref, which is null unless the contact was loaded by fetch()
    $srcdir = $conf->societe->multidir_output[$this->entity].'/contact/'.((int) $contact_origin_id);
    $destdir = $conf->societe->multidir_output[$this->entity].'/contact/'.((int) $this->id);
 
    if (!dol_is_dir($srcdir)) {
      return;
    }
 
    $failed = array();
    $dirlist = dol_dir_list($srcdir, 'files', 1);
    foreach ($dirlist as $filetomove) {
      $destfile = $destdir.'/'.$filetomove['relativename'];
      // dol_move() is called below with $overwriteifexists = 0, so a file already existing on
      // the target contact is renamed rather than lost
      if (dol_is_file($destfile)) {
        $info = pathinfo($filetomove['relativename']);
        $suffix = (empty($info['extension']) ? '' : '.'.$info['extension']);
        $destfile = $destdir.'/'.(empty($info['dirname']) || $info['dirname'] == '.' ? '' : $info['dirname'].'/');
        $destfile .= $info['filename'].'-'.((int) $contact_origin_id).$suffix;
      }
      // dol_move() does not create the target directory, and the target contact usually has
      // none yet, so it has to be created for every level of the source tree
      dol_mkdir(dirname($destfile));
      if (!dol_move($filetomove['fullname'], $destfile, '0', 0, 0, 1)) {
        $failed[] = $filetomove['relativename'];
      }
    }
 
    if (!empty($failed)) {
      dol_syslog(__METHOD__.' Failed to move '.count($failed).' file(s) from '.$srcdir, LOG_ERR);
      // The merge itself is committed, so this is reported as a warning and not as a failure
      $this->warnings[] = $langs->trans('WarningContactsMergeFilesNotMoved', implode(', ', $failed));
    }
  }
 
  public function fetchRoles()
  {
    global $langs;
    $error = 0;
    $num = 0;
 
    $sql = "SELECT tc.rowid, tc.element, tc.source, tc.code, tc.libelle as label, sc.rowid as contactroleid, sc.fk_soc as socid";
    $sql .= " FROM ".MAIN_DB_PREFIX."societe_contacts as sc, ".MAIN_DB_PREFIX."c_type_contact as tc";
    $sql .= " WHERE tc.rowid = sc.fk_c_type_contact";
    $sql .= " AND tc.source = 'external' AND tc.active=1";
    $sql .= " AND sc.fk_socpeople = ".((int) $this->id);
    $sql .= " AND sc.entity IN (".getEntity('societe').')';
 
    $resql = $this->db->query($sql);
    if ($resql) {
      $this->roles = array();
 
      $num = $this->db->num_rows($resql);
      if ($num > 0) {
        while ($obj = $this->db->fetch_object($resql)) {
          $transkey = "TypeContact_".$obj->element."_".$obj->source."_".$obj->code;
          $label_element = $langs->trans('ContactDefault_'.$obj->element);
          $this->roles[$obj->contactroleid] = array('id' => $obj->rowid, 'socid' => $obj->socid, 'element' => $obj->element, 'source' => $obj->source, 'code' => $obj->code, 'label' => $label_element.' - '.($langs->trans($transkey) != $transkey ? $langs->trans($transkey) : $obj->label));
        }
      }
    } else {
      $error++;
      $this->error = $this->db->lasterror();
      $this->errors[] = $this->db->lasterror();
    }
 
    if (empty($error)) {
      return $num;
    } else {
      return $error * -1;
    }
  }
 
  public function getContactRoles($element = '')
  {
    $tab = array();
 
    if ($element == 'action') {
      $element = 'agenda';
    }
 
    $sql = "SELECT sc.fk_socpeople as id, sc.fk_c_type_contact";
    $sql .= " FROM ".MAIN_DB_PREFIX."c_type_contact tc";
    $sql .= ", ".MAIN_DB_PREFIX."societe_contacts sc";
    $sql .= " INNER JOIN ".MAIN_DB_PREFIX."socpeople sp";
    $sql .= " ON sc.fk_socpeople = sp.rowid AND sp.statut = 1";
    $sql .= " WHERE sc.fk_soc = ".((int) $this->socid);
    $sql .= " AND sc.fk_c_type_contact=tc.rowid";
    $sql .= " AND tc.element = '".$this->db->escape($element)."'";
    $sql .= " AND sp.entity IN (".getEntity('contact').")";
    $sql .= " AND tc.active = 1";
 
    $resql = $this->db->query($sql);
    if ($resql) {
      $num = $this->db->num_rows($resql);
      $i = 0;
      while ($i < $num) {
        $obj = $this->db->fetch_object($resql);
        $tab[$obj->id] = array('fk_socpeople' => $obj->id, 'type_contact' => $obj->fk_c_type_contact);
 
        $i++;
      }
 
      return $tab;
    } else {
      $this->error = $this->db->error();
      dol_print_error($this->db);
      return -1;
    }
  }
 
  public function updateRoles()
  {
    global $conf;
 
    $error = 0;
 
    if (!isset($this->roles)) {
      return 0; // Avoid to loose roles when property not set
    }
 
    $this->db->begin();
 
    $sql = "DELETE FROM ".MAIN_DB_PREFIX."societe_contacts WHERE fk_socpeople=".((int) $this->id)." AND entity IN (".getEntity("contact").")";
 
    $result = $this->db->query($sql);
    if (!$result) {
      $this->errors[] = $this->db->lasterror().' sql='.$sql;
      $error++;
    } else {
      if (count($this->roles) > 0) {
        foreach ($this->roles as $keyRoles => $valRoles) {
          if (empty($valRoles)) {
            continue;
          }
          $idrole = 0;
          if (is_array($valRoles)) {
            $idrole = $valRoles['id'];
          } else {
            $idrole = $valRoles;
          }
 
          $socid = 0;
          if (is_array($valRoles)) {
            $socid = $valRoles['socid'];
          } else {
            $socid = $this->socid;
          }
 
          if ($socid > 0) {
            $sql = "INSERT INTO ".MAIN_DB_PREFIX."societe_contacts";
            $sql .= " (entity,";
            $sql .= "date_creation,";
            $sql .= "fk_soc,";
            $sql .= "fk_c_type_contact,";
            $sql .= "fk_socpeople) ";
            $sql .= " VALUES (".((int) $conf->entity).",";
            $sql .= "'".$this->db->idate(dol_now())."',";
            $sql .= ((int) $socid).", ";
            $sql .= ((int) $idrole)." , ";
            $sql .= ((int) $this->id);
            $sql .= ")";
 
            $result = $this->db->query($sql);
            if (!$result) {
              $this->errors[] = $this->db->lasterror().' sql='.$sql;
              $error++;
            }
          }
        }
      }
    }
    if (empty($error)) {
      $this->db->commit();
      return 1;
    } else {
      $this->error = implode(' ', $this->errors);
      $this->db->rollback();
      return $error * -1;
    }
  }
 
  public function loadCacheOfProspStatus($active = 1)
  {
    global $langs;
 
    $sql = "SELECT id, code, libelle as label, picto FROM ".MAIN_DB_PREFIX."c_stcommcontact";
    if ($active >= 0) {
      $sql .= " WHERE active = ".((int) $active);
    }
    $resql = $this->db->query($sql);
    $num = $this->db->num_rows($resql);
    $i = 0;
    while ($i < $num) {
      $obj = $this->db->fetch_object($resql);
      $this->cacheprospectstatus[$obj->id] = array('id' => $obj->id, 'code' => $obj->code, 'label' => ($langs->trans("ST_".strtoupper($obj->code)) == "ST_".strtoupper($obj->code)) ? $obj->label : $langs->trans("ST_".strtoupper($obj->code)), 'picto' => $obj->picto);
      $i++;
    }
    return 1;
  }
 
  public function getLibProspLevel()
  {
    return $this->libProspLevel($this->fk_prospectlevel);
  }
 
  public function libProspLevel($fk_prospectlevel)
  {
    global $langs;
 
    $lib = $langs->trans("ProspectLevel".$fk_prospectlevel);
    // If lib not found in language file, we get label from cache/database
    if ($lib == "ProspectLevel".$fk_prospectlevel) {
      $lib = $langs->getLabelFromKey($this->db, $fk_prospectlevel, 'c_prospectlevel', 'code', 'label');
    }
    return $lib;
  }
 
 
  public function setProspectLevel(User $user)
  {
    return $this->update($this->id, $user);
  }
 
  public function getLibProspCommStatut($mode = 0, $label = '')
  {
    return $this->libProspCommStatut($this->stcomm_id, $mode, $label, $this->stcomm_picto);
  }
 
  public function libProspCommStatut($statut, $mode = 0, $label = '', $picto = '')
  {
    global $langs;
    $langs->load('customers');
 
    if ($mode == 2) {
      if ($statut == '-1' || $statut == 'ST_NO') {
        return img_action($langs->trans("StatusProspect-1"), '-1', $picto).' '.$langs->trans("StatusProspect-1");
      } elseif ($statut == '0' || $statut == 'ST_NEVER') {
        return img_action($langs->trans("StatusProspect0"), '0', $picto).' '.$langs->trans("StatusProspect0");
      } elseif ($statut == '1' || $statut == 'ST_TODO') {
        return img_action($langs->trans("StatusProspect1"), '1', $picto).' '.$langs->trans("StatusProspect1");
      } elseif ($statut == '2' || $statut == 'ST_PEND') {
        return img_action($langs->trans("StatusProspect2"), '2', $picto).' '.$langs->trans("StatusProspect2");
      } elseif ($statut == '3' || $statut == 'ST_DONE') {
        return img_action($langs->trans("StatusProspect3"), '3', $picto).' '.$langs->trans("StatusProspect3");
      } else {
        return img_action(($langs->trans("StatusProspect".$statut) != "StatusProspect".$statut) ? $langs->trans("StatusProspect".$statut) : $label, '0', $picto).' '.(($langs->trans("StatusProspect".$statut) != "StatusProspect".$statut) ? $langs->trans("StatusProspect".$statut) : $label);
      }
    }
    if ($mode == 3) {
      if ($statut == '-1' || $statut == 'ST_NO') {
        return img_action($langs->trans("StatusProspect-1"), '-1', $picto);
      } elseif ($statut == '0' || $statut == 'ST_NEVER') {
        return img_action($langs->trans("StatusProspect0"), '0', $picto);
      } elseif ($statut == '1' || $statut == 'ST_TODO') {
        return img_action($langs->trans("StatusProspect1"), '1', $picto);
      } elseif ($statut == '2' || $statut == 'ST_PEND') {
        return img_action($langs->trans("StatusProspect2"), '2', $picto);
      } elseif ($statut == '3' || $statut == 'ST_DONE') {
        return img_action($langs->trans("StatusProspect3"), '3', $picto);
      } else {
        return img_action(($langs->trans("StatusProspect".$statut) != "StatusProspect".$statut) ? $langs->trans("StatusProspect".$statut) : $label, '0', $picto);
      }
    }
    if ($mode == 4) {
      if ($statut == '-1' || $statut == 'ST_NO') {
        return img_action($langs->trans("StatusProspect-1"), '-1', $picto).' '.$langs->trans("StatusProspect-1");
      } elseif ($statut == '0' || $statut == 'ST_NEVER') {
        return img_action($langs->trans("StatusProspect0"), '0', $picto).' '.$langs->trans("StatusProspect0");
      } elseif ($statut == '1' || $statut == 'ST_TODO') {
        return img_action($langs->trans("StatusProspect1"), '1', $picto).' '.$langs->trans("StatusProspect1");
      } elseif ($statut == '2' || $statut == 'ST_PEND') {
        return img_action($langs->trans("StatusProspect2"), '2', $picto).' '.$langs->trans("StatusProspect2");
      } elseif ($statut == '3' || $statut == 'ST_DONE') {
        return img_action($langs->trans("StatusProspect3"), '3', $picto).' '.$langs->trans("StatusProspect3");
      } else {
        return img_action(($langs->trans("StatusProspect".$statut) != "StatusProspect".$statut) ? $langs->trans("StatusProspect".$statut) : $label, '0', $picto).' '.(($langs->trans("StatusProspect".$statut) != "StatusProspect".$statut) ? $langs->trans("StatusProspect".$statut) : $label);
      }
    }
 
    return "Error, mode/status not found";
  }
 
 
  public function setNoEmail($no_email)
  {
    $error = 0;
 
    // Update mass emailing flag into table mailing_unsubscribe
    if ($this->email) {
      $this->db->begin();
 
      if ($no_email) {
        $sql = "SELECT COUNT(rowid) as nb FROM ".MAIN_DB_PREFIX."mailing_unsubscribe WHERE entity IN (".getEntity('mailing', 0).") AND email = '".$this->db->escape($this->email)."'";
        $resql = $this->db->query($sql);
        if ($resql) {
          $obj = $this->db->fetch_object($resql);
          $noemail = $obj->nb;
          if (empty($noemail)) {
            $sql = "INSERT INTO ".MAIN_DB_PREFIX."mailing_unsubscribe(email, entity, date_creat) VALUES ('".$this->db->escape($this->email)."', ".getEntity('mailing', 0).", '".$this->db->idate(dol_now())."')";
            $resql = $this->db->query($sql);
            if (!$resql) {
              $error++;
              $this->error = $this->db->lasterror();
              $this->errors[] = $this->error;
            }
          }
        } else {
          $error++;
          $this->error = $this->db->lasterror();
          $this->errors[] = $this->error;
        }
      } else {
        $sql = "DELETE FROM ".MAIN_DB_PREFIX."mailing_unsubscribe WHERE email = '".$this->db->escape($this->email)."' AND entity IN (".getEntity('mailing', 0).")";
        $resql = $this->db->query($sql);
        if (!$resql) {
          $error++;
          $this->error = $this->db->lasterror();
          $this->errors[] = $this->error;
        }
      }
 
      if (empty($error)) {
        $this->no_email = $no_email;
        $this->db->commit();
        return 1;
      } else {
        $this->db->rollback();
        return $error * -1;
      }
    }
 
    return 0;
  }
 
  public function getNoEmail()
  {
    if ($this->email) {
      $sql = "SELECT COUNT(rowid) as nb FROM ".MAIN_DB_PREFIX."mailing_unsubscribe WHERE entity IN (".getEntity('mailing').") AND email = '".$this->db->escape($this->email)."'";
      $resql = $this->db->query($sql);
      if ($resql) {
        $obj = $this->db->fetch_object($resql);
        $this->no_email = $obj->nb;
        return 1;
      } else {
        $this->error = $this->db->lasterror();
        $this->errors[] = $this->error;
        return -1;
      }
    }
    return 0;
  }
 
 
  public function getKanbanView($option = '', $arraydata = null)
  {
    $selected = (empty($arraydata['selected']) ? 0 : $arraydata['selected']);
 
    $return = '<div class="box-flex-item box-flex-grow-zero">';
    $return .= '<div class="info-box info-box-sm">';
    $return .= '<span class="info-box-icon bg-infobox-action">';
    if (!is_null($this->photo)) {
      $return .= Form::showphoto('contact', $this, 0, 60, 0, 'photokanban photoref photowithmargin photologintooltip', 'small', 0, 1);
    } else {
      $return .= img_picto('', $this->picto);
    }
    $return .= '</span>';
    $return .= '<div class="info-box-content">';
    $return .= '<div class="info-box-ref inline-block tdoverflowmax150 valignmiddle">' . $this->getNomUrl(0) . '</div>';
    if ($selected >= 0) {
      $return .= '<input id="cb'.$this->id.'" class="flat checkforselect fright" type="checkbox" name="toselect[]" value="'.$this->id.'"'.($selected ? ' checked="checked"' : '').'>';
    }
    if (is_object($this->thirdparty)) {
      $return .= '<div class="info-box-ref tdoverflowmax150">'.$this->thirdparty->getNomUrl(1).'</div>';
    }
    /*if (property_exists($this, 'phone_pro') && !empty($this->phone_pro)) {
      $return .= '<br>'.img_picto($langs->trans("Phone"), 'phone');
      $return .= ' <span class="info-box-label">'.$this->phone_pro.'</span>';
    }*/
    /*if (method_exists($this, 'LibPubPriv')) {
      $return .= '<br><span class="info-box-label opacitymedium">'.$langs->trans("Visibility").'</span>';
      $return .= '<span> : '.$this->LibPubPriv($this->priv).'</span>';
    }*/
    $return .= '<br><div class="info-box-status">'.$this->getLibStatut(3).'</div>';
    $return .= '</div>';
    $return .= '</div>';
    $return .= '</div>';
    return $return;
  }
}