societe.class.php

Go to the documentation of this file.

<?php
/* Copyright (C) 2002-2006  Rodolphe Quiedeville    <rodolphe@quiedeville.org>
 * Copyright (C) 2004-2021  Laurent Destailleur     <eldy@users.sourceforge.net>
 * Copyright (C) 2004   Eric Seigne         <eric.seigne@ryxeo.com>
 * Copyright (C) 2003   Brian Fraval        <brian@fraval.org>
 * Copyright (C) 2006   Andre Cianfarani      <acianfa@free.fr>
 * Copyright (C) 2005-2017  Regis Houssin       <regis.houssin@inodbox.com>
 * Copyright (C) 2008   Patrick Raguin        <patrick.raguin@auguria.net>
 * Copyright (C) 2010-2018  Juanjo Menent       <jmenent@2byte.es>
 * Copyright (C) 2013   Florian Henry       <florian.henry@open-concept.pro>
 * Copyright (C) 2013-2026  Alexandre Spangaro      <alexandre@inovea-conseil.com>
 * Copyright (C) 2013   Peter Fontaine        <contact@peterfontaine.fr>
 * Copyright (C) 2014-2015  Marcos García       <marcosgdf@gmail.com>
 * Copyright (C) 2015   Raphaël Doursenaud      <rdoursenaud@gpcsolutions.fr>
 * Copyright (C) 2017   Rui Strecht         <rui.strecht@aliartalentos.com>
 * Copyright (C) 2018   Philippe Grand        <philippe.grand@atoo-net.com>
 * Copyright (C) 2019-2020  Josep Lluís Amador      <joseplluis@lliuretic.cat>
 * Copyright (C) 2019-2026  Frédéric France       <frederic.france@free.fr>
 * Copyright (C) 2020   Open-Dsi          <support@open-dsi.fr>
 * Copyright (C) 2022   ButterflyOfFire       <butterflyoffire+dolibarr@protonmail.com>
 * Copyright (C) 2023-2024  Alexandre Janniaux      <alexandre.janniaux@gmail.com>
 * Copyright (C) 2024   William Mead        <william.mead@manchenumerique.fr>
 * Copyright (C) 2024-2026  MDW             <mdeweerd@users.noreply.github.com>
 * Copyright (C) 2026   Vincent de Grandpré     <vincent@de-grandpre.quebec>
 *
 * 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/commonincoterm.class.php';
require_once DOL_DOCUMENT_ROOT.'/core/class/commonsocialnetworks.class.php';
require_once DOL_DOCUMENT_ROOT.'/core/class/commonpeople.class.php';
require_once DOL_DOCUMENT_ROOT.'/core/lib/company.lib.php';
require_once DOL_DOCUMENT_ROOT.'/multicurrency/class/multicurrency.class.php';
 
 
class Societe extends CommonObject
{
  use CommonIncoterm;
  use CommonSocialNetworks;
  use CommonPeople;
 
  public $TRIGGER_PREFIX = 'COMPANY';   // to be overridden in child class implementations, i.e. 'BILL', 'TASK', 'PROPAL', etc.
 
  public $module = 'societe';
 
  public $element = 'societe';
 
  public $table_element = 'societe';
 
  public $fk_element = 'fk_soc';
 
  public $fieldsforcombobox = 'nom,name_alias';
 
  protected $childtables = array(
    'supplier_proposal' => array('name' => 'SupplierProposal'),
    'propal' => array('name' => 'Proposal'),
    'commande' => array('name' => 'Order'),
    'facture' => array('name' => 'Invoice'),
    'facture_rec' => array('name' => 'RecurringInvoiceTemplate'),
    'contrat' => array('name' => 'Contract'),
    'fichinter' => array('name' => 'Fichinter'),
    'facture_fourn' => array('name' => 'SupplierInvoice'),
    'commande_fournisseur' => array('name' => 'SupplierOrder'),
    'projet' => array('name' => 'Project'),
    'expedition' => array('name' => 'Shipment'),
    'prelevement_lignes' => array('name' => 'DirectDebitRecord'),
    'adherent' => array('name' => 'Member')
  );
 
  protected $childtablesoncascade = array(
    'societe_prices',
    'product_fournisseur_price',
    'product_customer_price_log',
    'product_customer_price',
    '@Contact:/contact/class/contact.class.php:fk_soc',
    'adherent',
    'societe_account',
    'societe_rib',
    'societe_remise',
    'societe_remise_except',
    'societe_commerciaux',
    'categorie',
    'notify',
    'notify_def',
    'actioncomm',
  );
 
  public $picto = 'company';
 
  public $restrictiononfksoc = 1;
 
  public $SupplierCategories = array();
 
  public $prefixCustomerIsRequired;
 
  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'),
    'parent' => array('type' => 'integer', 'label' => 'Parent', 'enabled' => 1, 'visible' => -1, 'position' => 20),
    'tms' => array('type' => 'timestamp', 'label' => 'DateModification', 'enabled' => 1, 'visible' => -1, 'notnull' => 1, 'position' => 25),
    'datec' => array('type' => 'datetime', 'label' => 'DateCreation', 'enabled' => 1, 'visible' => -1, 'position' => 30),
    'nom' => array('type' => 'varchar(128)', 'length' => 128, 'label' => 'Nom', 'enabled' => 1, 'visible' => -1, 'position' => 35, 'showoncombobox' => 1, 'csslist' => 'tdoverflowmax150'),
    'name_alias' => array('type' => 'varchar(128)', 'label' => 'Name alias', 'enabled' => 1, 'visible' => -1, 'position' => 36, 'showoncombobox' => 2),
    'entity' => array('type' => 'integer', 'label' => 'Entity', 'default' => '1', 'enabled' => 1, 'visible' => -2, 'notnull' => 1, 'position' => 40, 'index' => 1),
    'ref_ext' => array('type' => 'varchar(255)', 'label' => 'RefExt', 'enabled' => 1, 'visible' => 0, 'position' => 45),
    'code_client' => array('type' => 'varchar(24)', 'label' => 'CustomerCode', 'enabled' => 1, 'visible' => -1, 'position' => 55),
    'code_fournisseur' => array('type' => 'varchar(24)', 'label' => 'SupplierCode', 'enabled' => 1, 'visible' => -1, 'position' => 60),
    'code_compta' => array('type' => 'varchar(24)', 'label' => 'CustomerAccountancyCode', 'enabled' => 1, 'visible' => -1, 'position' => 65),
    'code_compta_fournisseur' => array('type' => 'varchar(24)', 'label' => 'SupplierAccountancyCode', 'enabled' => 1, 'visible' => -1, 'position' => 70),
    'address' => array('type' => 'varchar(255)', 'label' => 'Address', 'enabled' => 1, 'visible' => -1, 'position' => 75),
    'zip' => array('type' => 'varchar(25)', 'label' => 'Zip', 'enabled' => 1, 'visible' => -1, 'position' => 80),
    'town' => array('type' => 'varchar(50)', 'label' => 'Town', 'enabled' => 1, 'visible' => -1, 'position' => 85),
    'fk_departement' => array('type' => 'integer', 'label' => 'State', 'enabled' => 1, 'visible' => -1, 'position' => 90),
    'fk_pays' => array('type' => 'integer:Ccountry:core/class/ccountry.class.php', 'label' => 'Country', 'enabled' => 1, 'visible' => -1, 'position' => 95),
    'phone' => array('type' => 'varchar(20)', 'label' => 'Phone', 'enabled' => 1, 'visible' => -1, 'position' => 100),
    'phone_mobile' => array('type' => 'varchar(20)', 'label' => 'PhoneMobile', 'enabled' => 1, 'visible' => -1, 'position' => 102),
    'fax' => array('type' => 'varchar(20)', 'label' => 'Fax', 'enabled' => 1, 'visible' => -1, 'position' => 105),
    'url' => array('type' => 'varchar(255)', 'label' => 'Url', 'enabled' => 1, 'visible' => -1, 'position' => 110),
    'email' => array('type' => 'varchar(128)', 'label' => 'Email', 'enabled' => 1, 'visible' => -1, 'position' => 115),
    'socialnetworks' => array('type' => 'text', 'label' => 'Socialnetworks', 'enabled' => 1, 'visible' => -1, 'position' => 120),
    'fk_effectif' => array('type' => 'integer', 'label' => 'Workforce', 'enabled' => 1, 'visible' => -1, 'position' => 170),
    'fk_typent' => array('type' => 'integer', 'label' => 'ThirdPartyType', 'enabled' => 1, 'visible' => -1, 'position' => 175, 'csslist' => 'minwidth200'),
    'fk_forme_juridique' => array('type' => 'integer', 'label' => 'JuridicalStatus', 'enabled' => 1, 'visible' => -1, 'position' => 180),
    'birth' => array('type' => 'date', 'label' => 'CompanyBirthDate', 'enabled' => 1, 'visible' => -1, 'position' => 182),
    'fk_currency' => array('type' => 'varchar(3)', 'label' => 'Currency', 'enabled' => 1, 'visible' => -1, 'position' => 185),
    'siren' => array('type' => 'varchar(128)', 'label' => 'Idprof1', 'enabled' => 1, 'visible' => -1, 'position' => 190),
    'siret' => array('type' => 'varchar(128)', 'label' => 'Idprof2', 'enabled' => 1, 'visible' => -1, 'position' => 195),
    'ape' => array('type' => 'varchar(128)', 'label' => 'Idprof3', 'enabled' => 1, 'visible' => -1, 'position' => 200),
    'idprof4' => array('type' => 'varchar(128)', 'label' => 'Idprof4', 'enabled' => 1, 'visible' => -1, 'position' => 205),
    'idprof5' => array('type' => 'varchar(128)', 'label' => 'Idprof5', 'enabled' => 1, 'visible' => -1, 'position' => 206),
    'idprof6' => array('type' => 'varchar(128)', 'label' => 'Idprof6', 'enabled' => 1, 'visible' => -1, 'position' => 207),
    'tva_intra' => array('type' => 'varchar(20)', 'label' => 'VATIntra', 'enabled' => 1, 'visible' => -1, 'position' => 210),
    'euid' => array('type' => 'varchar(20)', 'label' => 'EUIDShort', 'enabled' => 1, 'visible' => -1, 'position' => 213),
    'capital' => array('type' => 'double(24,8)', 'label' => 'Capital', 'enabled' => 1, 'visible' => -1, 'position' => 215),
    'fk_stcomm' => array('type' => 'integer', 'label' => 'CommercialStatus', 'enabled' => 1, 'visible' => -1, 'notnull' => 1, 'position' => 220),
    'note_public' => array('type' => 'html', 'label' => 'NotePublic', 'enabled' => 1, 'visible' => 0, 'position' => 225),
    'note_private' => array('type' => 'html', 'label' => 'NotePrivate', 'enabled' => 1, 'visible' => 0, 'position' => 230),
    'client' => array('type' => 'tinyint(4)', 'label' => 'Customer', 'enabled' => 1, 'visible' => -1, 'position' => 240),
    'fournisseur' => array('type' => 'tinyint(4)', 'label' => 'Supplier', 'enabled' => 1, 'visible' => -1, 'position' => 245),
    'supplier_account' => array('type' => 'varchar(32)', 'label' => 'Supplier account', 'enabled' => 1, 'visible' => -1, 'position' => 250),
    'fk_prospectlevel' => array('type' => 'varchar(12)', 'label' => 'ProspectLevel', 'enabled' => 1, 'visible' => -1, 'position' => 255),
    'customer_bad' => array('type' => 'tinyint(4)', 'label' => 'Customer bad', 'enabled' => 1, 'visible' => -1, 'position' => 260),
    'customer_rate' => array('type' => 'double', 'label' => 'Customer rate', 'enabled' => 1, 'visible' => -1, 'position' => 265),
    'supplier_rate' => array('type' => 'double', 'label' => 'Supplier rate', 'enabled' => 1, 'visible' => -1, 'position' => 270),
    'fk_user_creat' => array('type' => 'integer:User:user/class/user.class.php', 'label' => 'UserAuthor', 'enabled' => 1, 'visible' => -2, 'position' => 275),
    'fk_user_modif' => array('type' => 'integer:User:user/class/user.class.php', 'label' => 'UserModif', 'enabled' => 1, 'visible' => -2, 'notnull' => -1, 'position' => 280),
    //'remise_client' =>array('type'=>'double', 'label'=>'CustomerDiscount', 'enabled'=>1, 'visible'=>-1, 'position'=>285, 'isameasure'=>1),
    //'remise_supplier' =>array('type'=>'double', 'label'=>'SupplierDiscount', 'enabled'=>1, 'visible'=>-1, 'position'=>290, 'isameasure'=>1),
    'mode_reglement' => array('type' => 'smallint(6)', 'label' => 'Mode reglement', 'enabled' => 1, 'visible' => -1, 'position' => 295),
    'cond_reglement' => array('type' => 'tinyint(4)', 'label' => 'Cond reglement', 'enabled' => 1, 'visible' => -1, 'position' => 300),
    'deposit_percent' => array('type' => 'varchar(63)', 'label' => 'DepositPercent', 'enabled' => 1, 'visible' => -1, 'position' => 301),
    'mode_reglement_supplier' => array('type' => 'integer', 'label' => 'Mode reglement supplier', 'enabled' => 1, 'visible' => -1, 'position' => 305),
    'cond_reglement_supplier' => array('type' => 'integer', 'label' => 'Cond reglement supplier', 'enabled' => 1, 'visible' => -1, 'position' => 308),
    'outstanding_limit' => array('type' => 'double(24,8)', 'label' => 'OutstandingBill', 'enabled' => 1, 'visible' => -1, 'position' => 310, 'isameasure' => 1),
    'order_min_amount' => array('type' => 'double(24,8)', 'label' => 'Order min amount', 'enabled' => 'isModEnabled("order") && getDolGlobalInt("ORDER_MANAGE_MIN_AMOUNT")', 'visible' => -1, 'position' => 315, 'isameasure' => 1),
    'supplier_order_min_amount' => array('type' => 'double(24,8)', 'label' => 'Supplier order min amount', 'enabled' => 'isModEnabled("order") && getDolGlobalInt("ORDER_MANAGE_MIN_AMOUNT")', 'visible' => -1, 'position' => 320, 'isameasure' => 1),
    'fk_shipping_method' => array('type' => 'integer', 'label' => 'ShippingMode', 'enabled' => 1, 'visible' => -1, 'position' => 330),
    'tva_assuj' => array('type' => 'tinyint(4)', 'label' => 'VATIsUsed', 'enabled' => 1, 'visible' => -1, 'position' => 335),
    'localtax1_assuj' => array('type' => 'tinyint(4)', 'label' => 'LocalTax1IsUsed', 'enabled' => 1, 'visible' => -1, 'position' => 340),
    'localtax1_value' => array('type' => 'double(6,3)', 'label' => 'LocalTax1 value', 'enabled' => 1, 'visible' => -1, 'position' => 345),
    'localtax2_assuj' => array('type' => 'tinyint(4)', 'label' => 'LocalTax2IsUsed', 'enabled' => 1, 'visible' => -1, 'position' => 350),
    'localtax2_value' => array('type' => 'double(6,3)', 'label' => 'LocalTax2 value', 'enabled' => 1, 'visible' => -1, 'position' => 355),
    'vat_reverse_charge' => array('type' => 'tinyint(4)', 'label' => 'Vat reverse charge', 'enabled' => 1, 'visible' => -1, 'position' => 335),
    'barcode' => array('type' => 'varchar(255)', 'label' => 'Barcode', 'enabled' => 1, 'visible' => -1, 'position' => 360),
    'price_level' => array('type' => 'integer', 'label' => 'Price level', 'enabled' => 'getDolGlobalString("PRODUIT_MULTIPRICES") || getDolGlobalString("PRODUIT_CUSTOMER_PRICES_BY_QTY_MULTIPRICES") || getDolGlobalString("PRODUIT_CUSTOMER_PRICES_AND_MULTIPRICES")', 'visible' => -1, 'position' => 365),
    'default_lang' => array('type' => 'varchar(6)', 'label' => 'Default lang', 'enabled' => 1, 'visible' => -1, 'position' => 370),
    'canvas' => array('type' => 'varchar(32)', 'label' => 'Canvas', 'enabled' => 1, 'visible' => -1, 'position' => 375),
    'fk_barcode_type' => array('type' => 'integer', 'label' => 'Fk barcode type', 'enabled' => 1, 'visible' => -1, 'position' => 405),
    'webservices_url' => array('type' => 'varchar(255)', 'label' => 'Webservices url', 'enabled' => 1, 'visible' => -1, 'position' => 410),
    'webservices_key' => array('type' => 'varchar(128)', 'label' => 'Webservices key', 'enabled' => 1, 'visible' => -1, 'position' => 415),
    'fk_incoterms' => array('type' => 'integer', 'label' => 'Fk incoterms', 'enabled' => 1, 'visible' => -1, 'position' => 425),
    'location_incoterms' => array('type' => 'varchar(255)', 'label' => 'Location incoterms', 'enabled' => 1, 'visible' => -1, 'position' => 430),
    'model_pdf' => array('type' => 'varchar(255)', 'label' => 'Model pdf', 'enabled' => 1, 'visible' => 0, 'position' => 435),
    'last_main_doc' => array('type' => 'varchar(255)', 'label' => 'LastMainDoc', 'enabled' => 1, 'visible' => -1, 'position' => 270),
    'fk_multicurrency' => array('type' => 'integer', 'label' => 'Fk multicurrency', 'enabled' => 1, 'visible' => -1, 'position' => 440),
    'multicurrency_code' => array('type' => 'varchar(255)', 'label' => 'Multicurrency code', 'enabled' => 1, 'visible' => -1, 'position' => 445),
    'fk_account' => array('type' => 'integer', 'label' => 'PaymentBankAccount', 'enabled' => 1, 'visible' => -1, 'position' => 450),
    'fk_warehouse' => array('type' => 'integer', 'label' => 'Warehouse', 'enabled' => 1, 'visible' => -1, 'position' => 455),
    'logo' => array('type' => 'varchar(255)', 'label' => 'Logo', 'enabled' => 1, 'visible' => -1, 'position' => 400),
    'logo_squarred' => array('type' => 'varchar(255)', 'label' => 'Logo squarred', 'enabled' => 1, 'visible' => -1, 'position' => 401),
    'status' => array('type' => 'tinyint(4)', 'label' => 'Status', 'enabled' => 1, 'visible' => -1, 'position' => 500),
    'import_key' => array('type' => 'varchar(14)', 'label' => 'ImportId', 'enabled' => 1, 'visible' => -2, 'position' => 1000),
  );
 
  public $nom;
 
  public $name;
 
  public $name_alias;
 
  public $particulier;
 
  public $status = 1;
 
  public $region_code;
 
  public $region;
 
  public $country_id;
 
  public $departement_code;
 
  public $departement;
 
  public $pays;
 
  public $phone;
  public $phone_mobile;
  public $fax;
 
  public $email;
 
  public $no_email;
 
  public $skype;
 
  public $twitter;
 
  public $facebook;
 
  public $linkedin;
 
  public $url;
 
  public $barcode;
 
  // 6 professional id (usage depends on country)
 
  public $idprof1;
 
  public $siren;
 
 
  public $idprof2;
 
  public $siret;
 
  public $idprof3;
 
  public $ape;
 
  public $idprof4;
 
  public $idprof5;
 
  public $idprof6;
 
  public $idprof7;
 
  public $idprof8;
 
  public $idprof9;
 
  public $idprof10;
 
  public $socialobject;
 
  public $prefix_comm;
 
  public $tva_assuj = 1;
 
  public $tva_intra;
 
  public $euid;
 
  public $vat_reverse_charge = 0;
 
  // Local taxes
  public $localtax1_assuj;
  public $localtax1_value;
  public $localtax2_assuj;
  public $localtax2_value;
 
  public $managers;
 
  public $capital;
 
  public $typent_id = 0;
 
  public $typent_code;
 
  public $effectif;
 
  public $effectif_id = 0;
  public $forme_juridique_code = 0;
  public $forme_juridique;
  public $birth;
 
  public $remise_percent;
  public $remise_supplier_percent;
 
  public $mode_reglement_id;
  public $cond_reglement_id;
  public $deposit_percent;
  public $mode_reglement_supplier_id;
  public $cond_reglement_supplier_id;
  public $transport_mode_supplier_id;
 
  public $fk_prospectlevel;
 
  public $name_bis;
 
  public $user_modification;
 
  public $user_creation;
 
  public $client = 0;
 
  public $prospect = 0;
 
  public $fournisseur;
 
  public $code_client;
 
  public $code_fournisseur;
 
  public $code_compta_client;
 
  public $accountancy_code_customer_general;
 
  public $accountancy_code_customer;
 
  public $code_compta_fournisseur;
 
  public $accountancy_code_supplier_general;
 
  public $accountancy_code_supplier;
 
  public $code_compta_product;
 
  public $note;
 
  public $note_private;
 
  public $note_public;
 
  public $stcomm_id;
 
  public $stcomm_picto;
 
  public $status_prospect_label;
 
  public $price_level;
 
  public $outstanding_limit;
 
  public $order_min_amount;
 
  public $supplier_order_min_amount;
 
  public $commercial_id;
 
  public $parent;
 
  public $default_lang;
 
  public $ref;
 
  public $ref_ext;
 
  public $ip;
 
  public $import_key;
 
  public $webservices_url;
 
  public $webservices_key;
 
  public $logo;
 
  public $logo_small;
 
  public $logo_mini;
 
  public $logo_squarred;
 
  public $logo_squarred_small;
 
  public $logo_squarred_mini;
 
  public $accountancy_code_sell;
 
  public $accountancy_code_buy;
 
  public $currency_code;
 
  // Multicurrency
  public $fk_multicurrency;
 
  public $multicurrency_code;
 
  // Warehouse
  public $fk_warehouse;
 
  public $termsofsale;
 
 
  // Fields loaded by fetchPartnerships()
 
  public $partnerships = array();
 
 
  public $bank_account;
 
  public $code_compta;
 
 
  const STATUS_CEASED = 0;
  const STATUS_INACTIVITY = 1;
 
  const NO_CUSTOMER = 0;
 
  const CUSTOMER = 1;
 
  const PROSPECT = 2;
 
  const CUSTOMER_AND_PROSPECT = 3;
 
  const NO_SUPPLIER = 0;
 
  const SUPPLIER = 1;
 
  protected function deprecatedProperties()
  {
    return
      array(
        'code_compta' => 'code_compta_client',
      )
      + parent::deprecatedProperties();
  }
 
 
 
  public function __construct($db)
  {
    $this->db = $db;
 
    $this->ismultientitymanaged = 1;
    $this->isextrafieldmanaged = 1;
    $this->client = 0;
    $this->prospect = 0;
    $this->fournisseur = 0;
    $this->typent_id = 0;
    $this->effectif_id = 0;
    $this->forme_juridique_code = 0;
    $this->tva_assuj = 1;
    $this->vat_reverse_charge = 0;
    $this->status = 1;
 
    if (getDolGlobalString('COMPANY_SHOW_ADDRESS_SELECTLIST')) {
      $this->fields['address']['showoncombobox'] = getDolGlobalInt('COMPANY_SHOW_ADDRESS_SELECTLIST');
      $this->fields['zip']['showoncombobox'] = getDolGlobalInt('COMPANY_SHOW_ADDRESS_SELECTLIST');
      $this->fields['town']['showoncombobox'] = getDolGlobalInt('COMPANY_SHOW_ADDRESS_SELECTLIST');
      //$this->fields['fk_pays']['showoncombobox'] = $conf->global->COMPANY_SHOW_ADDRESS_SELECTLIST;
    }
  }
 
 
  public function create(User $user, $notrigger = 0)
  {
    global $langs, $conf;
 
    $error = 0;
 
    // Clean parameters
    if (empty($this->status)) {
      $this->status = 0;
    }
    $this->name = $this->name ? trim($this->name) : trim((string) $this->nom);
    $this->setUpperOrLowerCase();
    $this->nom = $this->name; // For backward compatibility
 
    if (empty($this->client)) {
      $this->client = 0;
    }
    if (empty($this->fournisseur)) {
      $this->fournisseur = 0;
    }
    $this->import_key = trim((string) $this->import_key);
 
    $this->code_compta_client = trim($this->code_compta_client ?? '');
 
    $this->accountancy_code_customer_general = trim($this->accountancy_code_customer_general ?? '');
    if ($this->accountancy_code_customer_general === '-1') {
      $this->accountancy_code_customer_general = '';
    }
    $this->accountancy_code_customer = trim((string) $this->code_compta_client);
    $this->accountancy_code_supplier_general = trim($this->accountancy_code_supplier_general ?? '');
    if ($this->accountancy_code_supplier_general === '-1') {
      $this->accountancy_code_supplier_general = '';
    }
    $this->accountancy_code_supplier = trim((string) $this->code_compta_fournisseur);
    $this->accountancy_code_buy = trim((string) $this->accountancy_code_buy);
    $this->accountancy_code_sell = trim((string) $this->accountancy_code_sell);
 
    if (!empty($this->multicurrency_code)) {
      $this->fk_multicurrency = MultiCurrency::getIdFromCode($this->db, $this->multicurrency_code);
    }
    if (empty($this->fk_multicurrency)) {
      $this->multicurrency_code = '';
      $this->fk_multicurrency = 0;
    }
 
    dol_syslog(get_class($this)."::create ".$this->name);
 
    $now = dol_now();
 
    if (empty($this->date_creation)) {
      $this->date_creation = $now;
    }
 
    $this->db->begin();
 
    // For automatic creation during create action (not used by Dolibarr GUI, can be used by scripts)
    if ($this->code_client == -1 || $this->code_client === 'auto') {
      $this->get_codeclient($this, 0);
    }
    if ($this->code_fournisseur == '-1' || $this->code_fournisseur === 'auto') {
      $this->get_codefournisseur($this, 1);
    }
 
    // Check more parameters (including mandatory setup
    // If error, this->errors[] is filled
    $result = $this->verify();
 
    if ($result >= 0) {
      $this->entity = setEntity($this);
 
      $sql = "INSERT INTO ".MAIN_DB_PREFIX."societe (";
      $sql .= "nom";
      $sql .= ", name_alias";
      $sql .= ", entity";
      $sql .= ", datec";
      $sql .= ", fk_user_creat";
      $sql .= ", fk_typent";
      $sql .= ", canvas";
      $sql .= ", status";
      $sql .= ", ref_ext";
      $sql .= ", fk_stcomm";
      $sql .= ", fk_incoterms";
      $sql .= ", location_incoterms";
      $sql .= ", import_key";
      $sql .= ", fk_multicurrency";
      $sql .= ", multicurrency_code";
      $sql .= ", ip";
      if (!getDolGlobalString('MAIN_COMPANY_PERENTITY_SHARED')) {
        $sql .= ", vat_reverse_charge";
        $sql .= ", accountancy_code_buy";
        $sql .= ", accountancy_code_sell";
      }
      $sql .= ") VALUES ('".$this->db->escape($this->name)."',";
      $sql .= " '".$this->db->escape($this->name_alias)."',";
      $sql .= " ".((int) $this->entity).",";
      $sql .= " '".$this->db->idate($this->date_creation)."'";
      $sql .= ", ".(!empty($user->id) ? ((int) $user->id) : "null");
      $sql .= ", ".(!empty($this->typent_id) ? ((int) $this->typent_id) : "null");
      $sql .= ", ".(!empty($this->canvas) ? "'".$this->db->escape($this->canvas)."'" : "null");
      $sql .= ", ".((int) $this->status);
      $sql .= ", ".(!empty($this->ref_ext) ? "'".$this->db->escape($this->ref_ext)."'" : "null");
      $sql .= ", 0";
      $sql .= ", ".(int) $this->fk_incoterms;
      $sql .= ", '".$this->db->escape($this->location_incoterms)."'";
      $sql .= ", ".(!empty($this->import_key) ? "'".$this->db->escape($this->import_key)."'" : "null");
      $sql .= ", ".(int) $this->fk_multicurrency;
      $sql .= ", '".$this->db->escape($this->multicurrency_code)."'";
      $sql .= ", ".(empty($this->ip) ? "null" : "'".$this->db->escape($this->ip)."'");
      if (!getDolGlobalString('MAIN_COMPANY_PERENTITY_SHARED')) {
        $sql .= ", ".(empty($this->vat_reverse_charge) ? '0' : '1');
        $sql .= ", '" . $this->db->escape($this->accountancy_code_buy) . "'";
        $sql .= ", '" . $this->db->escape($this->accountancy_code_sell) . "'";
      }
      $sql .= ")";
 
      dol_syslog(get_class($this)."::create", LOG_DEBUG);
 
      $result = $this->db->query($sql);
      if ($result) {
        $this->id = $this->db->last_insert_id(MAIN_DB_PREFIX."societe");
 
        $ret = $this->update($this->id, $user, 0, 1, 1, 'add');
 
        // Addition of the assigned sales representative
        if ($this->commercial_id != '' && $this->commercial_id != -1) {
          $this->add_commercial($user, $this->commercial_id);
        } elseif (!$user->hasRight('societe', 'client', 'voir')) {
          // If a sales representative creates a customer, they are automatically assigned to them.
          $this->add_commercial($user, $user->id);
        }
 
        if ($ret >= 0) {
          if (! $notrigger) {
            // Call trigger
            $result = $this->call_trigger('COMPANY_CREATE', $user);
            if ($result < 0) {
              $error++;
            }
            // End call triggers
          }
        } else {
          $error++;
        }
 
        if (!$error) {
          dol_syslog(get_class($this)."::Create success id=".$this->id);
          $this->db->commit();
          return $this->id;
        } else {
          dol_syslog(get_class($this)."::Create echec update ".$this->error.(empty($this->errors) ? '' : ' '.implode(',', $this->errors)), LOG_ERR);
          $this->db->rollback();
          return -4;
        }
      } else {
        if ($this->db->lasterrno() == 'DB_ERROR_RECORD_ALREADY_EXISTS') {
          $this->error = $langs->trans("ErrorCompanyNameAlreadyExists", $this->name); // duplicate on a field (code or profid or ...)
          $result = -1;
        } else {
          $this->error = $this->db->lasterror();
          $result = -2;
        }
        $this->db->rollback();
        return $result;
      }
    } else {
      $this->db->rollback();
      dol_syslog(get_class($this)."::Create fails verify ".implode(',', $this->errors), LOG_WARNING);
      return -3;
    }
  }
 
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function create_individual(User $user, $no_email = 0, $tags = array(), $notrigger = 0)
  {
    $error = 0;
 
    $this->db->begin();
 
    // phpcs:enable
    require_once DOL_DOCUMENT_ROOT.'/contact/class/contact.class.php';
    $contact = new Contact($this->db);
 
    $contact->name            = $this->name_bis;
    $contact->firstname       = $this->firstname;
    $contact->civility_id     = $this->civility_id;
    $contact->socid           = $this->id; // fk_soc
    $contact->statut          = 1; // deprecated
    $contact->status          = 1;
    $contact->priv            = 0;
    $contact->country_id      = $this->country_id;
    $contact->state_id        = $this->state_id;
    $contact->address         = $this->address;
    $contact->email           = $this->email;
    $contact->zip             = $this->zip;
    $contact->town            = $this->town;
    $this->setUpperOrLowerCase();
    $contact->phone_pro = $this->phone;
    if (getDolGlobalString('CONTACTS_DEFAULT_ROLES')) {
      $contact->roles = explode(',', getDolGlobalString('CONTACTS_DEFAULT_ROLES'));
    }
 
    $contactId = $contact->create($user, $notrigger);
    if ($contactId < 0) {
      $error++;
      $this->setErrorsFromObject($contact);
      dol_syslog(get_class($this)."::create_individual ERROR:".$this->error, LOG_ERR);
    }
 
    if (empty($error) && is_array($tags) && !empty($tags)) {
      $result = $contact->setCategories($tags);
      if ($result < 0) {
        $error++;
        $this->setErrorsFromObject($contact);
        dol_syslog(get_class($this)."::create_individual Affect Tag ERROR:".$this->error, LOG_ERR);
        $contactId = $result;
      }
    }
 
    if (empty($error) && isModEnabled('mailing') && !empty($contact->email) && isset($no_email)) {
      $result = $contact->setNoEmail($no_email);
      if ($result < 0) {
        $this->setErrorsFromObject($contact);
        dol_syslog(get_class($this)."::create_individual set mailing status ERROR:".$this->error, LOG_ERR);
        $contactId = $result;
      }
    }
 
    if (empty($error)) {
      dol_syslog(get_class($this)."::create_individual success");
      $this->db->commit();
    } else {
      $this->db->rollback();
    }
 
    return $contactId;
  }
 
  public function verify()
  {
    global $langs, $mysoc;
 
    $error = 0;
    $this->errors = array();
 
    $result = 0;
    $this->name = trim($this->name);
    $this->nom = $this->name; // For backward compatibility
 
    if (!$this->name) {
      $this->errors[] = 'ErrorBadThirdPartyName';
      $result = -2;
    }
 
    if ($this->client) {
      $rescode = $this->check_codeclient();
      if ($rescode != 0 && $rescode != -5) {
        if ($rescode == -1) {
          $this->errors[] = 'ErrorBadCustomerCodeSyntax';
        } elseif ($rescode == -2) {
          $this->errors[] = 'ErrorCustomerCodeRequired';
        } elseif ($rescode == -3) {
          $this->errors[] = 'ErrorCustomerCodeAlreadyUsed';
        } elseif ($rescode == -4) {
          $this->errors[] = 'ErrorPrefixRequired';
        } else {
          $this->errors[] = 'ErrorUnknownOnCustomerCodeCheck';
        }
 
        $result = -3;
      }
    }
 
    if ($this->fournisseur) {
      $rescode = $this->check_codefournisseur();
      if ($rescode != 0 && $rescode != -5) {
        if ($rescode == -1) {
          $this->errors[] = 'ErrorBadSupplierCodeSyntax';
        } elseif ($rescode == -2) {
          $this->errors[] = 'ErrorSupplierCodeRequired';
        } elseif ($rescode == -3) {
          $this->errors[] = 'ErrorSupplierCodeAlreadyUsed';
        } elseif ($rescode == -4) {
          $this->errors[] = 'ErrorPrefixRequired';
        } else {
          $this->errors[] = 'ErrorUnknownOnSupplierCodeCheck';
        }
        $result = -3;
      }
    }
 
    // Check for duplicate or mandatory fields defined into setup
    $array_to_check = array('IDPROF1', 'IDPROF2', 'IDPROF3', 'IDPROF4', 'IDPROF5', 'IDPROF6', 'EMAIL', 'TVA_INTRA', 'EUID', 'ACCOUNTANCY_CODE_CUSTOMER', 'ACCOUNTANCY_CODE_SUPPLIER');
    foreach ($array_to_check as $key) {
      $keymin = strtolower($key);
      $keyfield_db = $keymin;
      if ($key == 'ACCOUNTANCY_CODE_CUSTOMER') {
        $keymin = 'code_compta_client';
        $keyfield_db = 'code_compta';
      } elseif ($key == 'ACCOUNTANCY_CODE_SUPPLIER') {
        $keymin = 'code_compta_fournisseur';
        $keyfield_db = 'code_compta_fournisseur';
      }
      $i = (int) preg_replace('/[^0-9]/', '', $key);
      $vallabel = $this->$keymin;
 
      if ($i > 0) {
        if ($mysoc != null && $this->isACompany()) {
          // Check for mandatory prof id (but only if country is same than ours)
          if ($mysoc->country_id > 0 && $this->country_id == $mysoc->country_id) {
            $idprof_mandatory = 'SOCIETE_'.$key.'_MANDATORY';
            if (!$vallabel && getDolGlobalString($idprof_mandatory)) {
              $langs->load("errors");
              $error++;
              $this->errors[] = $langs->trans("ErrorProdIdIsMandatory", $langs->transcountry('ProfId'.$i, $this->country_code)).' ('.$langs->trans("ForbiddenBySetupRules").')';
            }
          }
        }
 
        // Check for unicity on profid
        if (!$error && $vallabel && $this->id_prof_verifiable($i)) {
          if ($this->id_prof_exists($keymin, $vallabel, ($this->id > 0 ? $this->id : 0))) {
            $langs->load("errors");
            $error++;
            $this->errors[] = $langs->transcountry('ProfId'.$i, $this->country_code)." ".$langs->trans("ErrorProdIdAlreadyExist", $vallabel).' ('.$langs->trans("ForbiddenBySetupRules").')';
          }
        }
      } else {
        if ($key == 'EMAIL') {
          // Check for mandatory
          if (getDolGlobalString('SOCIETE_EMAIL_MANDATORY') && !isValidEmail($this->email)) {
            $langs->load("errors");
            $error++;
            $this->errors[] = $langs->trans("ErrorBadEMail", $this->email).' ('.$langs->trans("ForbiddenBySetupRules").')';
          }
 
          // Check for unicity
          if (!$error && $vallabel && getDolGlobalString('SOCIETE_EMAIL_UNIQUE')) {
            if ($this->id_prof_exists($keymin, $vallabel, ($this->id > 0 ? $this->id : 0))) {
              $langs->load("errors");
              $error++;
              $this->errors[] = $langs->trans('Email')." ".$langs->trans("ErrorProdIdAlreadyExist", $vallabel).' ('.$langs->trans("ForbiddenBySetupRules").')';
            }
          }
        } elseif ($key == 'TVA_INTRA') {
          // Check for unicity
          if ($vallabel && getDolGlobalString('SOCIETE_VAT_INTRA_UNIQUE')) {
            if ($this->id_prof_exists($keymin, $vallabel, ($this->id > 0 ? $this->id : 0))) {
              $langs->load("errors");
              $error++;
              $this->errors[] = $langs->trans('VATIntra')." ".$langs->trans("ErrorProdIdAlreadyExist", $vallabel).' ('.$langs->trans("ForbiddenBySetupRules").')';
            }
          }
          if ($this->tva_assuj && !$vallabel && getDolGlobalString('SOCIETE_VAT_INTRA_MANDATORY')) {
            $langs->load("errors");
            $error++;
            $this->errors[] = $langs->trans("ErrorProdIdIsMandatory", $langs->trans('VATIntra')).' ('.$langs->trans("ForbiddenBySetupRules").')';
          }
        } elseif ($key == 'EUID') {
          // Check for unicity
          if ($vallabel && getDolGlobalString('SOCIETE_EUID_UNIQUE')) {
            if ($this->id_prof_exists($keymin, $vallabel, ($this->id > 0 ? $this->id : 0))) {
              $langs->load("errors");
              $error++;
              $this->errors[] = $langs->trans('EUIDShort')." ".$langs->trans("ErrorProdIdAlreadyExist", $vallabel).' ('.$langs->trans("ForbiddenBySetupRules").')';
            }
          }
 
          // Check for mandatory
          if (getDolGlobalString('SOCIETE_EUID_MANDATORY') && (!isset($vallabel) || trim($vallabel) === '')) {
            $langs->load("errors");
            $error++;
            $this->errors[] = $langs->trans("ErrorProdIdIsMandatory", $langs->trans('EUIDShort')).' ('.$langs->trans("ForbiddenBySetupRules").')';
          }
        } elseif ($key == 'ACCOUNTANCY_CODE_CUSTOMER' && !empty($this->client)) {
          // Check for unicity
          if ($vallabel && getDolGlobalString('SOCIETE_ACCOUNTANCY_CODE_CUSTOMER_UNIQUE')) {
            if ($this->id_prof_exists($keyfield_db, $vallabel, ($this->id > 0 ? $this->id : 0))) {
              $langs->loadLangs(array("errors", 'compta'));
              $error++;
              $this->errors[] = $langs->trans('CustomerAccountancyCodeShort') . " " . $langs->trans("ErrorProdIdAlreadyExist", $vallabel) . ' (' . $langs->trans("ForbiddenBySetupRules") . ')';
            }
          }
 
          // Check for mandatory
          if (getDolGlobalString('SOCIETE_ACCOUNTANCY_CODE_CUSTOMER_MANDATORY') && (!isset($vallabel) || trim($vallabel) === '')) {
            $langs->loadLangs(array("errors", 'compta'));
            $error++;
            $this->errors[] = $langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv('CustomerAccountancyCodeShort')) . ' (' . $langs->trans("ForbiddenBySetupRules") . ')';
          }
        } elseif ($key == 'ACCOUNTANCY_CODE_SUPPLIER' && !empty($this->fournisseur)) {
          // Check for unicity
          if ($vallabel && getDolGlobalString('SOCIETE_ACCOUNTANCY_CODE_SUPPLIER_UNIQUE')) {
            if ($this->id_prof_exists($keyfield_db, $vallabel, ($this->id > 0 ? $this->id : 0))) {
              $langs->loadLangs(array("errors", 'compta'));
              $error++;
              $this->errors[] = $langs->trans('SupplierAccountancyCodeShort') . " " . $langs->trans("ErrorProdIdAlreadyExist", $vallabel) . ' (' . $langs->trans("ForbiddenBySetupRules") . ')';
            }
          }
 
          // Check for mandatory
          if (getDolGlobalString('SOCIETE_ACCOUNTANCY_CODE_SUPPLIER_MANDATORY') && (!isset($vallabel) || trim($vallabel) === '')) {
            $langs->loadLangs(array("errors", 'compta'));
            $error++;
            $this->errors[] = $langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv('SupplierAccountancyCodeShort')) . ' (' . $langs->trans("ForbiddenBySetupRules") . ')';
          }
        }
      }
    }
 
    if ($error) {
      $result = -4;
    }
 
    return $result;
  }
 
  public function update($id, User $user, $call_trigger = 1, $allowmodcodeclient = 0, $allowmodcodefournisseur = 0, $action = 'update', $nosyncmember = 1)
  {
    global $langs, $conf, $hookmanager;
 
    require_once DOL_DOCUMENT_ROOT.'/core/lib/functions2.lib.php';
 
    if (empty($id)) {
      $id = $this->id;
    }
    if (empty($this->country_id) && !empty($this->country_code)) {
      $this->country_id = dol_getIdFromCode($this->db, $this->country_code, 'c_country', 'code', 'rowid');
    }
 
    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;
 
    dol_syslog(get_class($this)."::Update id=".$id." call_trigger=".$call_trigger." allowmodcodeclient=".$allowmodcodeclient." allowmodcodefournisseur=".$allowmodcodefournisseur);
 
    $now = dol_now();
 
    // Clean parameters
    $this->id       = $id;
    $this->entity     = ((isset($this->entity) && is_numeric($this->entity)) ? $this->entity : $conf->entity);
    $this->name     = $this->name ? trim($this->name) : trim((string) $this->nom);
    $this->nom      = $this->name; // For backward compatibility
    $this->name_alias   = trim((string) $this->name_alias);
    $this->ref_ext    = (empty($this->ref_ext) ? '' : trim($this->ref_ext));
    $this->address    = trim((string) $this->address);
    $this->zip      = trim((string) $this->zip);
    $this->town     = trim((string) $this->town);
    $this->state_id   = (is_numeric($this->state_id)) ? (int) $this->state_id : 0;
    $this->country_id   = ($this->country_id > 0) ? $this->country_id : 0;
    $this->phone    = trim((string) $this->phone);
    $this->phone    = preg_replace("/\s/", "", $this->phone);
    $this->phone    = preg_replace("/\./", "", $this->phone);
    $this->phone_mobile = trim((string) $this->phone_mobile);
    $this->phone_mobile = preg_replace("/\s/", "", $this->phone_mobile);
    $this->phone_mobile = preg_replace("/\./", "", $this->phone_mobile);
    $this->fax      = trim((string) $this->fax);
    $this->fax      = preg_replace("/\s/", "", $this->fax);
    $this->fax      = preg_replace("/\./", "", $this->fax);
    $this->email    = trim((string) $this->email);
    $this->url      = $this->url ? clean_url($this->url, 0) : '';
    $this->note_private = (empty($this->note_private) ? '' : trim($this->note_private));
    $this->note_public = (empty($this->note_public) ? '' : trim($this->note_public));
    $this->idprof1 = trim((string) $this->idprof1);
    $this->idprof2 = trim((string) $this->idprof2);
    $this->idprof3 = trim((string) $this->idprof3);
    $this->idprof4 = trim((string) $this->idprof4);
    $this->idprof5 = (!empty($this->idprof5) ? trim($this->idprof5) : '');
    $this->idprof6 = (!empty($this->idprof6) ? trim($this->idprof6) : '');
    $this->prefix_comm = trim((string) $this->prefix_comm);
    $this->outstanding_limit = price2num($this->outstanding_limit);
    $this->order_min_amount = price2num($this->order_min_amount);
    $this->supplier_order_min_amount = price2num($this->supplier_order_min_amount);
    $this->tva_assuj = (is_numeric($this->tva_assuj)) ? (int) trim((string) $this->tva_assuj) : 0;
    $this->tva_intra = trim((string) $this->tva_intra);
    $this->vat_reverse_charge = empty($this->vat_reverse_charge) ? 0 : 1;
    $this->euid = trim((string) $this->euid);
 
    if (empty($this->status)) {
      $this->status = 0;
    }
 
    if (!empty($this->multicurrency_code)) {
      $this->fk_multicurrency = MultiCurrency::getIdFromCode($this->db, $this->multicurrency_code);
    }
    if (empty($this->fk_multicurrency)) {
      $this->multicurrency_code = '';
      $this->fk_multicurrency = 0;
    }
 
    // Local taxes
    $this->localtax1_assuj = (int) trim((string) $this->localtax1_assuj);
    $this->localtax2_assuj = (int) trim((string) $this->localtax2_assuj);
 
    $this->localtax1_value = trim($this->localtax1_value);
    $this->localtax2_value = trim($this->localtax2_value);
 
    $this->capital = (!is_null($this->capital) && (string) $this->capital != '') ? (float) price2num(trim((string) $this->capital)) : null;
 
    $this->effectif_id = (int) $this->effectif_id;
    $this->forme_juridique_code = (int) $this->forme_juridique_code;
 
    //Gencod
    $this->barcode = trim((string) $this->barcode);
 
    // For automatic creation
    if ($this->code_client == -1 || $this->code_client === 'auto') {
      $this->get_codeclient($this, 0);
    }
    if ($this->code_fournisseur == '-1' || $this->code_fournisseur === 'auto') {
      $this->get_codefournisseur($this, 1);
    }
 
    $this->accountancy_code_customer_general = trim((string) $this->accountancy_code_customer_general);
    if ($this->accountancy_code_customer_general === '-1') {
      $this->accountancy_code_customer_general = '';
    }
    $this->code_compta_client = trim((string) $this->code_compta_client);
    $this->accountancy_code_supplier_general = trim((string) $this->accountancy_code_supplier_general);
    if ($this->accountancy_code_supplier_general === '-1') {
      $this->accountancy_code_supplier_general = '';
    }
    $this->code_compta_fournisseur = trim((string) $this->code_compta_fournisseur);
 
    // Check parameters. More tests are done later in the ->verify()
    if (!is_numeric($this->client) && !is_numeric($this->fournisseur)) {
      $langs->load("errors");
      $this->error = $langs->trans("BadValueForParameterClientOrSupplier");
      return -1;
    }
 
    $customer = false;
    if (!empty($allowmodcodeclient) && !empty($this->client)) {
      // If $allowmodcodeclient is set and value is not set, we generate it
      if (empty($this->code_compta_client)) {
        $ret = $this->get_codecompta('customer');
        if ($ret < 0) {
          return -1;
        }
      }
 
      $customer = true;
    }
 
    $supplier = false;
    if (!empty($allowmodcodefournisseur) && !empty($this->fournisseur)) {
      // If $allowmodcodefournisseur is set and value is not set, we generate it
      if (empty($this->code_compta_fournisseur)) {
        $ret = $this->get_codecompta('supplier');
        if ($ret < 0) {
          return -1;
        }
      }
 
      $supplier = true;
    }
 
    //Web services
    $this->webservices_url = empty($this->webservices_url) ? '' : clean_url($this->webservices_url, 0);
    $this->webservices_key = trim((string) $this->webservices_key);
 
    $this->accountancy_code_buy = (empty($this->accountancy_code_buy) ? '' : trim($this->accountancy_code_buy));
    $this->accountancy_code_sell = (empty($this->accountancy_code_sell) ? '' : trim($this->accountancy_code_sell));
 
    //Incoterms
    $this->fk_incoterms = (int) $this->fk_incoterms;
    $this->location_incoterms = trim((string) $this->location_incoterms);
 
    $this->db->begin();
 
    // Check name is required and codes are ok or unique.
    // If error, this->errors[] is filled
    $result = 0;
    if ($action != 'add' && $action != 'merge') {
      // We don't check when update called during a create because verify was already done.
      // For a merge, we suppose source data is clean and a customer code of a deleted thirdparty must be accepted into a target thirdparty with empty code without duplicate error
      $result = $this->verify();
 
      // If there is only one error and error is ErrorBadCustomerCodeSyntax and we don't change customer code, we allow the update
      // So we can update record that were using and old numbering rule.
      if (is_array($this->errors)) {
        if (in_array('ErrorBadCustomerCodeSyntax', $this->errors) && is_object($this->oldcopy) && $this->oldcopy->code_client == $this->code_client) {
          if (($key = array_search('ErrorBadCustomerCodeSyntax', $this->errors)) !== false) {
            unset($this->errors[$key]); // Remove error message
          }
        }
        if (in_array('ErrorBadSupplierCodeSyntax', $this->errors) && is_object($this->oldcopy) && $this->oldcopy->code_fournisseur == $this->code_fournisseur) {
          if (($key = array_search('ErrorBadSupplierCodeSyntax', $this->errors)) !== false) {
            unset($this->errors[$key]); // Remove error message
          }
        }
        if (empty($this->errors)) { // If there is no more error, we can make like if there is no error at all
          $result = 0;
        }
      }
    }
    $this->setUpperOrLowerCase();
    if ($result >= 0) {
      dol_syslog(get_class($this)."::update verify ok or not done");
 
      $sql  = "UPDATE ".MAIN_DB_PREFIX."societe SET ";
      $sql .= "entity = ".((int) $this->entity);
      $sql .= ",nom = '".$this->db->escape($this->name)."'"; // Required
      $sql .= ",name_alias = '".$this->db->escape($this->name_alias)."'";
      $sql .= ",ref_ext = ".(!empty($this->ref_ext) ? "'".$this->db->escape($this->ref_ext)."'" : "null");
      $sql .= ",address = '".$this->db->escape($this->address)."'";
 
      $sql .= ",zip = ".(!empty($this->zip) ? "'".$this->db->escape($this->zip)."'" : "null");
      $sql .= ",town = ".(!empty($this->town) ? "'".$this->db->escape($this->town)."'" : "null");
 
      $sql .= ",fk_departement = ".((!empty($this->state_id) && $this->state_id > 0) ? ((int) $this->state_id) : 'null');
      $sql .= ",fk_pays = ".((!empty($this->country_id) && $this->country_id > 0) ? ((int) $this->country_id) : 'null');
 
      $sql .= ",phone = ".(!empty($this->phone) ? "'".$this->db->escape($this->phone)."'" : "null");
      $sql .= ",phone_mobile = ".(!empty($this->phone_mobile) ? "'".$this->db->escape($this->phone_mobile)."'" : "null");
      $sql .= ",fax = ".(!empty($this->fax) ? "'".$this->db->escape($this->fax)."'" : "null");
      $sql .= ",email = ".(!empty($this->email) ? "'".$this->db->escape($this->email)."'" : "null");
      $sql .= ",socialnetworks = '".$this->db->escape(json_encode($this->socialnetworks))."'";
      $sql .= ",url = ".(!empty($this->url) ? "'".$this->db->escape($this->url)."'" : "null");
 
      $sql .= ",parent = ".($this->parent > 0 ? ((int) $this->parent) : "null");
 
      $sql .= ",note_private = ".(!empty($this->note_private) ? "'".$this->db->escape($this->note_private)."'" : "null");
      $sql .= ",note_public = ".(!empty($this->note_public) ? "'".$this->db->escape($this->note_public)."'" : "null");
 
      $sql .= ",siren   = '".$this->db->escape($this->idprof1)."'";
      $sql .= ",siret   = '".$this->db->escape($this->idprof2)."'";
      $sql .= ",ape     = '".$this->db->escape($this->idprof3)."'";
      $sql .= ",idprof4 = '".$this->db->escape($this->idprof4)."'";
      $sql .= ",idprof5 = '".$this->db->escape($this->idprof5)."'";
      $sql .= ",idprof6 = '".$this->db->escape($this->idprof6)."'";
 
      $sql .= ",tva_assuj = ".($this->tva_assuj != '' ? "'".$this->db->escape((string) $this->tva_assuj)."'" : "null");
      $sql .= ",tva_intra = '".$this->db->escape($this->tva_intra)."'";
      if (!getDolGlobalString('MAIN_COMPANY_PERENTITY_SHARED')) {
        $sql .= ",vat_reverse_charge = " . ($this->vat_reverse_charge != '' ? "'" . $this->db->escape((string) $this->vat_reverse_charge) . "'" : 0);
      }
      $sql .= ",euid = '".$this->db->escape($this->euid)."'";
      $sql .= ",status = ".((int) $this->status);
 
      // Local taxes
      $sql .= ",localtax1_assuj = ".($this->localtax1_assuj != '' ? "'".$this->db->escape((string) $this->localtax1_assuj)."'" : "null");
      $sql .= ",localtax2_assuj = ".($this->localtax2_assuj != '' ? "'".$this->db->escape((string) $this->localtax2_assuj)."'" : "null");
      if ($this->localtax1_assuj == 1) {
        if ($this->localtax1_value != '') {
          $sql .= ", localtax1_value = ".((float) $this->localtax1_value);
        } else {
          $sql .= ", localtax1_value = 0.000";
        }
      } else {
        $sql .= ",localtax1_value =0.000";
      }
 
      if ($this->localtax2_assuj == 1) {
        if ($this->localtax2_value != '') {
          $sql .= ",localtax2_value = ".((float) $this->localtax2_value);
        } else {
          $sql .= ",localtax2_value = 0.000";
        }
      } else {
        $sql .= ",localtax2_value = 0.000";
      }
 
      $sql .= ",capital = ".($this->capital === null ? "null" : (float) $this->capital);
 
      $sql .= ",prefix_comm = ".(!empty($this->prefix_comm) ? "'".$this->db->escape($this->prefix_comm)."'" : "null");
 
      $sql .= ",fk_effectif = ".($this->effectif_id > 0 ? ((int) $this->effectif_id) : "null");
      if (isset($this->stcomm_id)) {
        $sql .= ",fk_stcomm=".(int) $this->stcomm_id;
      }
      if (isset($this->typent_id)) {
        $sql .= ",fk_typent = ".($this->typent_id > 0 ? ((int) $this->typent_id) : "0");
      }
 
      $sql .= ",fk_forme_juridique = ".(!empty($this->forme_juridique_code) ? "'".$this->db->escape((string) $this->forme_juridique_code)."'" : "null");
      $sql .= ",birth = ".(!empty($this->birth) ? "'".$this->db->idate($this->birth)."'" : "null");
 
      $sql .= ",deposit_percent = ".(!empty($this->deposit_percent) ? "'".$this->db->escape((string) $this->deposit_percent)."'" : "null");
      $sql .= ",transport_mode = ".(!empty($this->transport_mode_id) ? "'".$this->db->escape((string) $this->transport_mode_id)."'" : "null");
      $sql .= ",transport_mode_supplier = ".(!empty($this->transport_mode_supplier_id) ? "'".$this->db->escape((string) $this->transport_mode_supplier_id)."'" : "null");
      $sql .= ",fk_shipping_method = ".(!empty($this->shipping_method_id) ? "'".$this->db->escape((string) $this->shipping_method_id)."'" : "null");
 
      $sql .= ",client = ".(!empty($this->client) ? ((int) $this->client) : 0);
      $sql .= ",fournisseur = ".(!empty($this->fournisseur) ? ((int) $this->fournisseur) : 0);
      $sql .= ",barcode = ".(!empty($this->barcode) ? "'".$this->db->escape($this->barcode)."'" : "null");
      $sql .= ",default_lang = ".(!empty($this->default_lang) ? "'".$this->db->escape($this->default_lang)."'" : "null");
      $sql .= ",logo = ".(!empty($this->logo) ? "'".$this->db->escape($this->logo)."'" : "null");
      $sql .= ",logo_squarred = ".(!empty($this->logo_squarred) ? "'".$this->db->escape($this->logo_squarred)."'" : "null");
      $sql .= ",outstanding_limit= ".($this->outstanding_limit != '' ? ((float) $this->outstanding_limit) : 'null');
      $sql .= ",order_min_amount= ".($this->order_min_amount != '' ? ((float) $this->order_min_amount) : 'null');
      $sql .= ",supplier_order_min_amount= ".($this->supplier_order_min_amount != '' ? ((float) $this->supplier_order_min_amount) : 'null');
      $sql .= ",fk_prospectlevel='".$this->db->escape($this->fk_prospectlevel)."'";
      if (!getDolGlobalString('MAIN_COMPANY_PERENTITY_SHARED')) {
        $sql .= ", accountancy_code_buy = '" . $this->db->escape($this->accountancy_code_buy) . "'";
        $sql .= ", accountancy_code_sell= '" . $this->db->escape($this->accountancy_code_sell) . "'";
        $sql .= ", mode_reglement = ".(!empty($this->mode_reglement_id) ? "'".$this->db->escape((string) $this->mode_reglement_id)."'" : "null");
        $sql .= ", cond_reglement = ".(!empty($this->cond_reglement_id) ? "'".$this->db->escape((string) $this->cond_reglement_id)."'" : "null");
        $sql .= ", mode_reglement_supplier = ".(!empty($this->mode_reglement_supplier_id) ? "'".$this->db->escape((string) $this->mode_reglement_supplier_id)."'" : "null");
        $sql .= ", cond_reglement_supplier = ".(!empty($this->cond_reglement_supplier_id) ? "'".$this->db->escape((string) $this->cond_reglement_supplier_id)."'" : "null");
        $sql .= ", fk_account = ".($this->fk_account > 0 ? (int) $this->fk_account : "null");
        if ($customer) {
          $sql .= ", accountancy_code_customer_general = ".(!empty($this->accountancy_code_customer_general) ? "'".$this->db->escape($this->accountancy_code_customer_general)."'" : "null");
          $sql .= ", code_compta = ".(!empty($this->code_compta_client) ? "'".$this->db->escape($this->code_compta_client)."'" : "null");
        }
 
        if ($supplier) {
          $sql .= ", accountancy_code_supplier_general = ".(!empty($this->accountancy_code_supplier_general) ? "'".$this->db->escape($this->accountancy_code_supplier_general)."'" : "null");
          $sql .= ", code_compta_fournisseur = ".(($this->code_compta_fournisseur != "") ? "'".$this->db->escape($this->code_compta_fournisseur)."'" : "null");
        }
      }
      $sql .= ",webservices_url = ".(!empty($this->webservices_url) ? "'".$this->db->escape($this->webservices_url)."'" : "null");
      $sql .= ",webservices_key = ".(!empty($this->webservices_key) ? "'".$this->db->escape($this->webservices_key)."'" : "null");
 
      //Incoterms
      $sql .= ", fk_incoterms = ".((int) $this->fk_incoterms);
      $sql .= ", location_incoterms = ".(!empty($this->location_incoterms) ? "'".$this->db->escape($this->location_incoterms)."'" : "null");
 
      if ($customer) {
        $sql .= ", code_client = ".(!empty($this->code_client) ? "'".$this->db->escape($this->code_client)."'" : "null");
      }
 
      if ($supplier) {
        $sql .= ", code_fournisseur = ".(!empty($this->code_fournisseur) ? "'".$this->db->escape($this->code_fournisseur)."'" : "null");
      }
      $sql .= ", fk_user_modif = ".($user->id > 0 ? ((int) $user->id) : "null");
      $sql .= ", fk_multicurrency = ".(int) $this->fk_multicurrency;
      $sql .= ", multicurrency_code = '".$this->db->escape($this->multicurrency_code)."'";
      $sql .= ", model_pdf = '".$this->db->escape($this->model_pdf)."'";
      $sql .= " WHERE rowid = ".(int) $id;
 
      $resql = $this->db->query($sql);
      if ($resql) {
        if (is_object($this->oldcopy)) {  // If we have information on old values
          if ($this->oldcopy->country_id != $this->country_id) {
            unset($this->country_code);
            unset($this->country);
          }
          if ($this->oldcopy->state_id != $this->state_id) {
            unset($this->state_code);
            unset($this->state);
          }
        } else {
          unset($this->country_code); // We clean this, in the doubt, because it may have been changed after an update of country_id
          unset($this->country);
          unset($this->state_code);
          unset($this->state);
        }
 
        $nbrowsaffected = $this->db->affected_rows($resql);
 
        if ($nbrowsaffected) {
          // Update information on linked member if it is an update
          if (!$nosyncmember && isModEnabled('member')) {
            require_once DOL_DOCUMENT_ROOT.'/adherents/class/adherent.class.php';
 
            dol_syslog(get_class($this)."::update update linked member");
 
            $lmember = new Adherent($this->db);
            $result = $lmember->fetch(0, '0', $this->id);
 
            if ($result > 0) {
              $lmember->company = $this->name;
              //$lmember->firstname=$this->firstname?$this->firstname:$lmember->firstname;  // We keep firstname and lastname of member unchanged
              //$lmember->lastname=$this->lastname?$this->lastname:$lmember->lastname;    // We keep firstname and lastname of member unchanged
              $lmember->address = $this->address;
              $lmember->zip = $this->zip;
              $lmember->town = $this->town;
              $lmember->email = $this->email;
              $lmember->socialnetworks = $this->socialnetworks;
              $lmember->phone = $this->phone;
              $lmember->state_id = $this->state_id;
              $lmember->country_id = $this->country_id;
              $lmember->default_lang = $this->default_lang;
 
              $result = $lmember->update($user, 0, 1, 1, 1); // Use nosync to 1 to avoid cyclic updates
              if ($result < 0) {
                $this->setErrorsFromObject($lmember);
                dol_syslog(get_class($this)."::update ".$this->error, LOG_ERR);
                $error++;
              }
            } elseif ($result < 0) {
              $this->error = $lmember->error;
              $error++;
            }
          }
        }
 
        $action = 'update';
 
        // update accountancy for this entity
        if (!$error && getDolGlobalString('MAIN_COMPANY_PERENTITY_SHARED')) {
          $this->db->query("DELETE FROM ".MAIN_DB_PREFIX."societe_perentity WHERE fk_soc = ".((int) $this->id)." AND entity = ".((int) $conf->entity));
 
          $sql = "INSERT INTO ".MAIN_DB_PREFIX."societe_perentity (";
          $sql .= " fk_soc";
          $sql .= ", entity";
          $sql .= ", vat_reverse_charge";
          $sql .= ", accountancy_code_customer_general";
          $sql .= ", accountancy_code_customer";
          $sql .= ", accountancy_code_supplier_general";
          $sql .= ", accountancy_code_supplier";
          $sql .= ", accountancy_code_buy";
          $sql .= ", accountancy_code_sell";
          $sql .= ", fk_account";
          $sql .= ", mode_reglement";
          $sql .= ", cond_reglement";
          $sql .= ", mode_reglement_supplier";
          $sql .= ", cond_reglement_supplier";
          $sql .= ") VALUES (";
          $sql .= ((int) $this->id);
          $sql .= ", ".((int) $conf->entity);
          $sql .= ", ".(empty($this->vat_reverse_charge) ? '0' : '1');
          $sql .= ", '".$this->db->escape($this->accountancy_code_customer_general)."'";
          $sql .= ", '".$this->db->escape($this->code_compta_client)."'";
          $sql .= ", '".$this->db->escape($this->accountancy_code_supplier_general)."'";
          $sql .= ", '".$this->db->escape($this->code_compta_fournisseur)."'";
          $sql .= ", '".$this->db->escape($this->accountancy_code_buy)."'";
          $sql .= ", '".$this->db->escape($this->accountancy_code_sell)."'";
          $sql .= ", ".($this->fk_account > 0 ? (int) $this->fk_account : "null");
          $sql .= ", ".(!empty($this->mode_reglement_id) ? (int) $this->mode_reglement_id : "null");
          $sql .= ", ".(!empty($this->cond_reglement_id) ? (int) $this->cond_reglement_id : "null");
          $sql .= ", ".(!empty($this->mode_reglement_supplier_id) ? (int) $this->mode_reglement_supplier_id : "null");
          $sql .= ", ".(!empty($this->cond_reglement_supplier_id) ? (int) $this->cond_reglement_supplier_id : "null");
          $sql .= ")";
          $result = $this->db->query($sql);
          if (!$result) {
            $error++;
            $this->error = 'ErrorFailedToUpdateAccountancyForEntity';
          }
        }
 
        // Actions on extra fields
        if (!$error) {
          $result = $this->insertExtraFields();
          if ($result < 0) {
            $error++;
          }
        }
        // Actions on extra languages
        if (!$error && !getDolGlobalString('MAIN_EXTRALANGUAGES_DISABLED')) { // For avoid conflicts if trigger used
          $result = $this->insertExtraLanguages();
          if ($result < 0) {
            $error++;
          }
        }
 
        if (!$error && $call_trigger) {
          // Call trigger
          $result = $this->call_trigger('COMPANY_MODIFY', $user);
          if ($result < 0) {
            $error++;
          }
          // End call triggers
        }
 
        if (!$error) {
          dol_syslog(get_class($this)."::Update success");
          $this->db->commit();
          return 1;
        } else {
          $this->db->rollback();
          return -1;
        }
      } else {
        if ($this->db->errno() == 'DB_ERROR_RECORD_ALREADY_EXISTS') {
          // Duplicate
          $this->error = $langs->trans("ErrorDuplicateField");
          $result = -1;
        } else {
          $this->error = $this->db->lasterror();
          $result = -2;
        }
        $this->db->rollback();
        return $result;
      }
    } else {
      $this->db->rollback();
      dol_syslog(get_class($this)."::Update fails verify ".implode(',', $this->errors), LOG_WARNING);
      return -3;
    }
  }
 
  public function fetch($rowid, $ref = '', $ref_ext = '', $barcode = '', $idprof1 = '', $idprof2 = '', $idprof3 = '', $idprof4 = '', $idprof5 = '', $idprof6 = '', $email = '', $ref_alias = '', $is_client = 0, $is_supplier = 0)
  {
    global $langs;
    global $conf;
 
    if (empty($rowid) && empty($ref) && empty($ref_ext) && empty($barcode) && empty($idprof1) && empty($idprof2) && empty($idprof3) && empty($idprof4) && empty($idprof5) && empty($idprof6) && empty($email) && empty($ref_alias)) {
      return -1;
    }
 
    $sql = 'SELECT s.rowid, s.nom as name, s.name_alias, s.entity, s.ref_ext, s.address, s.datec as date_creation, s.prefix_comm';
    $sql .= ', s.status, s.fk_warehouse';
    $sql .= ', s.price_level';
    $sql .= ', GREATEST(s.tms, sef.tms) as date_modification, s.fk_user_creat, s.fk_user_modif';
    $sql .= ', s.phone, s.phone_mobile, s.fax, s.email';
    $sql .= ', s.socialnetworks';
    $sql .= ', s.url, s.zip, s.town, s.note_private, s.note_public, s.client, s.fournisseur';
    $sql .= ', s.siren as idprof1, s.siret as idprof2, s.ape as idprof3, s.idprof4, s.idprof5, s.idprof6';
    $sql .= ', s.capital, s.tva_intra, s.euid';
    $sql .= ', s.fk_typent as typent_id';
    $sql .= ', s.fk_effectif as effectif_id';
    $sql .= ', s.fk_forme_juridique as forme_juridique_code';
    $sql .= ', s.birth';
    $sql .= ', s.webservices_url, s.webservices_key, s.model_pdf, s.last_main_doc';
    if (!getDolGlobalString('MAIN_COMPANY_PERENTITY_SHARED')) {
      $sql .= ', s.accountancy_code_customer_general, s.code_compta';
      $sql .= ', s.accountancy_code_supplier_general, s.code_compta_fournisseur';
      $sql .= ', s.accountancy_code_buy, s.accountancy_code_sell';
      $sql .= ', s.vat_reverse_charge as soc_vat_reverse_charge';
      $sql .= ', s.mode_reglement, s.cond_reglement, s.fk_account';
      $sql .= ', s.mode_reglement_supplier, s.cond_reglement_supplier';
    } else {
      $sql .= ', spe.accountancy_code_customer_general, spe.accountancy_code_customer as code_compta';
      $sql .= ', spe.accountancy_code_supplier_general, spe.accountancy_code_supplier as code_compta_fournisseur';
      $sql .= ', spe.accountancy_code_buy, spe.accountancy_code_sell';
      $sql .= ', spe.vat_reverse_charge as spe_vat_reverse_charge';
      $sql .= ', spe.mode_reglement, spe.cond_reglement, spe.fk_account';
      $sql .= ', spe.mode_reglement_supplier, spe.cond_reglement_supplier';
    }
    $sql .= ', s.code_client, s.code_fournisseur, s.parent, s.barcode';
    $sql .= ', s.fk_departement as state_id, s.fk_pays as country_id, s.fk_stcomm, s.deposit_percent, s.transport_mode';
    $sql .= ', s.tva_assuj';
    $sql .= ', s.transport_mode_supplier';
    $sql .= ', s.localtax1_assuj, s.localtax1_value, s.localtax2_assuj, s.localtax2_value, s.fk_prospectlevel, s.default_lang, s.logo, s.logo_squarred';
    $sql .= ', s.fk_shipping_method';
    $sql .= ', s.outstanding_limit, s.import_key, s.canvas, s.fk_incoterms, s.location_incoterms';
    $sql .= ', s.order_min_amount, s.supplier_order_min_amount';
    $sql .= ', s.fk_multicurrency, s.multicurrency_code';
    $sql .= ', fj.libelle as forme_juridique';
    $sql .= ', e.libelle as effectif';
    $sql .= ', c.code as country_code, c.label as country';
    $sql .= ', d.code_departement as state_code, d.nom as state';
    $sql .= ', r.rowid as region_id, r.code_region as region_code';
    $sql .= ', st.libelle as stcomm, st.picto as stcomm_picto';
    $sql .= ', te.code as typent_code';
    $sql .= ', i.libelle as label_incoterms';
    if (!isModEnabled('multicompany')) {
      $sql .= ', s.remise_client, s.remise_supplier';
    } else {
      $sql .= ', sr.remise_client, sr2.remise_supplier';
    }
    $sql .= ' FROM '.MAIN_DB_PREFIX.'societe as s';
    $sql .= ' LEFT JOIN '.MAIN_DB_PREFIX.'societe_extrafields as sef ON sef.fk_object=s.rowid';
    if (getDolGlobalString('MAIN_COMPANY_PERENTITY_SHARED')) {
      $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."societe_perentity as spe ON spe.fk_soc = s.rowid AND spe.entity = ".((int) $conf->entity);
    }
    $sql .= ' LEFT JOIN '.MAIN_DB_PREFIX.'c_effectif as e ON s.fk_effectif = e.id';
    $sql .= ' LEFT JOIN '.MAIN_DB_PREFIX.'c_country as c ON s.fk_pays = c.rowid';
    $sql .= ' LEFT JOIN '.MAIN_DB_PREFIX.'c_stcomm as st ON s.fk_stcomm = st.id';
    $sql .= ' LEFT JOIN '.MAIN_DB_PREFIX.'c_forme_juridique as fj ON s.fk_forme_juridique = fj.code';
    $sql .= ' LEFT JOIN '.MAIN_DB_PREFIX.'c_departements as d ON s.fk_departement = d.rowid';
    $sql .= ' LEFT JOIN '.MAIN_DB_PREFIX.'c_regions as r ON d.fk_region = r.code_region ';
    $sql .= ' LEFT JOIN '.MAIN_DB_PREFIX.'c_typent as te ON s.fk_typent = te.id';
    $sql .= ' LEFT JOIN '.MAIN_DB_PREFIX.'c_incoterms as i ON s.fk_incoterms = i.rowid';
    // With default setup, llx_societe_remise is a history table in default setup and current value is in llx_societe.
    // We use it for real value when multicompany is on. A better place would be into llx_societe_perentity.
    if (isModEnabled('multicompany')) {
      $sql .= ' LEFT JOIN '.MAIN_DB_PREFIX.'societe_remise as sr ON sr.rowid = (SELECT MAX(rowid) FROM '.MAIN_DB_PREFIX.'societe_remise WHERE fk_soc = s.rowid AND entity IN ('.getEntity('discount').'))';
      $sql .= ' LEFT JOIN '.MAIN_DB_PREFIX.'societe_remise_supplier as sr2 ON sr2.rowid = (SELECT MAX(rowid) FROM '.MAIN_DB_PREFIX.'societe_remise_supplier WHERE fk_soc = s.rowid AND entity IN ('.getEntity('discount').'))';
    }
    $sql .= ' WHERE s.entity IN ('.getEntity($this->element).')';
 
    // Filter on client or supplier, for Client::fetch() and Fournisseur::fetch()
    if ($is_client) {
      $sql .= ' AND s.client > 0';
    }
    if ($is_supplier) {
      $sql .= ' AND s.fournisseur > 0';
    } // if both false, no test (the thirdparty can be client and/or supplier)
 
    if ($rowid) {
      $sql .= ' AND s.rowid = '.((int) $rowid);
    }
    if ($ref) {
      $sql .= " AND s.nom = '".$this->db->escape($ref)."'";
    }
    if ($ref_alias) {
      $sql .= " AND s.name_alias = '".$this->db->escape($ref_alias)."'";
    }
    if ($ref_ext) {
      $sql .= " AND s.ref_ext = '".$this->db->escape($ref_ext)."'";
    }
    if ($barcode) {
      $sql .= " AND s.barcode = '".$this->db->escape($barcode)."'";
    }
    if ($idprof1) {
      $sql .= " AND s.siren = '".$this->db->escape($idprof1)."'";
    }
    if ($idprof2) {
      $sql .= " AND s.siret = '".$this->db->escape($idprof2)."'";
    }
    if ($idprof3) {
      $sql .= " AND s.ape = '".$this->db->escape($idprof3)."'";
    }
    if ($idprof4) {
      $sql .= " AND s.idprof4 = '".$this->db->escape($idprof4)."'";
    }
    if ($idprof5) {
      $sql .= " AND s.idprof5 = '".$this->db->escape($idprof5)."'";
    }
    if ($idprof6) {
      $sql .= " AND s.idprof6 = '".$this->db->escape($idprof6)."'";
    }
    if ($email) {
      $sql .= " AND s.email = '".$this->db->escape($email)."'";
    }
 
    $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 thirdparties to avoid duplicate.';
        dol_syslog($this->error, LOG_WARNING);
        $result = -2;
      } elseif ($num) {   // $num = 1
        $obj = $this->db->fetch_object($resql);
 
        $this->id           = $obj->rowid;
        $this->entity       = $obj->entity;
        $this->canvas = $obj->canvas;
 
        $this->ref          = $obj->name;
        $this->name = $obj->name;
        $this->nom          = $obj->name; // deprecated
        $this->name_alias = $obj->name_alias;
        $this->ref_ext      = $obj->ref_ext;
 
        $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->address = $obj->address;
        $this->zip      = $obj->zip;
        $this->town     = $obj->town;
 
        $this->country_id   = $obj->country_id;
        $this->country_code = $obj->country_id ? $obj->country_code : '';
        $this->country = $obj->country_id ? (($langs->transnoentities('Country'.$obj->country_code) != 'Country'.$obj->country_code) ? $langs->transnoentities('Country'.$obj->country_code) : $obj->country) : '';
 
        $this->state_id     = $obj->state_id;
        $this->state_code   = $obj->state_code;
        $this->region_id    = $obj->region_id;
        $this->region_code  = $obj->region_code;
        $this->state        = ($obj->state != '-' ? $obj->state : '');
 
        $transcode = $langs->trans('StatusProspect'.$obj->fk_stcomm);
        $label = ($transcode != 'StatusProspect'.$obj->fk_stcomm ? $transcode : $obj->stcomm);
        $this->stcomm_id = $obj->fk_stcomm; // id status prospect
        $this->status_prospect_label = $label; // label status prospect
        $this->stcomm_picto = $obj->stcomm_picto; // commercial status picto
 
        $this->email = $obj->email;
        $this->socialnetworks = ($obj->socialnetworks ? (array) json_decode($obj->socialnetworks, true) : array());
 
        $this->url = $obj->url;
        $this->phone = $obj->phone;
        $this->phone_mobile = $obj->phone_mobile;
        $this->fax = $obj->fax;
 
        $this->parent = $obj->parent;
 
        $this->idprof1    = $obj->idprof1;
        $this->idprof2    = $obj->idprof2;
        $this->idprof3    = $obj->idprof3;
        $this->idprof4    = $obj->idprof4;
        $this->idprof5    = $obj->idprof5;
        $this->idprof6    = $obj->idprof6;
 
        $this->capital = $obj->capital;
 
        $this->code_client = $obj->code_client;
        $this->code_fournisseur = $obj->code_fournisseur;
 
        $this->accountancy_code_customer_general = $obj->accountancy_code_customer_general;
        $this->code_compta_client = $obj->code_compta;
        $this->accountancy_code_supplier_general = $obj->accountancy_code_supplier_general;
        $this->code_compta_fournisseur = $obj->code_compta_fournisseur;
 
        $this->barcode = $obj->barcode;
 
        $this->tva_assuj      = $obj->tva_assuj;
        $this->tva_intra      = $obj->tva_intra;
 
        if (!empty($obj->spe_vat_reverse_charge)) {
          $this->vat_reverse_charge = $obj->spe_vat_reverse_charge;
        } elseif (!empty($obj->soc_vat_reverse_charge)) {
          $this->vat_reverse_charge = $obj->soc_vat_reverse_charge;
        } else {
          $this->vat_reverse_charge = 0;
        }
        $this->euid             = $obj->euid;
 
        $this->status       = $obj->status;
 
        // Local Taxes
        $this->localtax1_assuj      = $obj->localtax1_assuj;
        $this->localtax2_assuj      = $obj->localtax2_assuj;
 
        $this->localtax1_value    = $obj->localtax1_value;
        $this->localtax2_value    = $obj->localtax2_value;
 
        $this->typent_id      = $obj->typent_id;
        $this->typent_code    = $obj->typent_code;
 
        $this->effectif_id    = $obj->effectif_id;
        $this->effectif       = $obj->effectif_id ? $obj->effectif : '';
 
        $this->forme_juridique_code = $obj->forme_juridique_code;
        $this->forme_juridique = $obj->forme_juridique_code ? $obj->forme_juridique : '';
        $this->birth = $this->db->jdate($obj->birth);
 
        $this->fk_prospectlevel = $obj->fk_prospectlevel;
 
        $this->prefix_comm = $obj->prefix_comm;
 
        $this->remise_percent = $obj->remise_client ? price2num($obj->remise_client) : 0; // 0.000000 must be 0
        $this->remise_supplier_percent = $obj->remise_supplier;
 
        $this->mode_reglement_id  = $obj->mode_reglement;
        $this->cond_reglement_id  = $obj->cond_reglement;
        $this->deposit_percent    = $obj->deposit_percent;
        $this->transport_mode_id  = $obj->transport_mode;
        $this->mode_reglement_supplier_id = $obj->mode_reglement_supplier;
        $this->cond_reglement_supplier_id = $obj->cond_reglement_supplier;
        $this->transport_mode_supplier_id = $obj->transport_mode_supplier;
        $this->shipping_method_id = ($obj->fk_shipping_method > 0) ? $obj->fk_shipping_method : null;
        $this->fk_account = $obj->fk_account;
 
        $this->client = $obj->client;
        $this->fournisseur = $obj->fournisseur;
 
        $this->note = $obj->note_private; // TODO Deprecated for backward comtability
        $this->note_private = $obj->note_private;
        $this->note_public = $obj->note_public;
        $this->model_pdf = $obj->model_pdf;
        $this->default_lang = $obj->default_lang;
        $this->logo = $obj->logo;
        $this->logo_squarred = $obj->logo_squarred;
 
        $this->webservices_url = $obj->webservices_url;
        $this->webservices_key = $obj->webservices_key;
 
        $this->accountancy_code_buy     = $obj->accountancy_code_buy;
        $this->accountancy_code_sell    = $obj->accountancy_code_sell;
 
        $this->outstanding_limit    = $obj->outstanding_limit;
        $this->order_min_amount     = $obj->order_min_amount;
        $this->supplier_order_min_amount = $obj->supplier_order_min_amount;
 
        // multi price
        $this->price_level = $obj->price_level;
 
        // warehouse
        $this->fk_warehouse = $obj->fk_warehouse;
 
        $this->import_key = $obj->import_key;
 
        //Incoterms
        $this->fk_incoterms = $obj->fk_incoterms;
        $this->location_incoterms = $obj->location_incoterms;
        $this->label_incoterms = $obj->label_incoterms;
 
        // multicurrency
        $this->fk_multicurrency = $obj->fk_multicurrency;
        $this->multicurrency_code = $obj->multicurrency_code;
 
        // pdf
        $this->model_pdf = $obj->model_pdf;
        $this->last_main_doc = $obj->last_main_doc;
 
        $result = $this->id;
 
        // fetch optionals attributes and labels
        $this->fetch_optionals();
      } else {
        $result = 0;
      }
 
      $this->db->free($resql);
    } else {
      $this->error = $this->db->lasterror();
      $this->errors[] = $this->db->lasterror();
      $result = -3;
    }
 
    // Use first price level if level not defined for third party
    if ((getDolGlobalString('PRODUIT_MULTIPRICES') || getDolGlobalString('PRODUIT_CUSTOMER_PRICES_BY_QTY_MULTIPRICES') || getDolGlobalString('PRODUIT_CUSTOMER_PRICES_AND_MULTIPRICES')) && empty($this->price_level)) {
      $this->price_level = 1;
    }
 
    return $result;
  }
 
  public function setBankAccount($fk_account, $notrigger = 0, $userused = null)
  {
    if (!getDolGlobalString('MAIN_COMPANY_PERENTITY_SHARED')) {
      return parent::setBankAccount($fk_account, $notrigger, $userused);
    }
 
    global $conf, $user;
 
    if (empty($userused)) {
      $userused = $user;
    }
 
    if ($fk_account < 0) {
      $fk_account = 'NULL';
    }
    dol_syslog(get_class($this).'::setBankAccount('.$fk_account.')');
 
    $this->db->begin();
 
    $sql = "UPDATE ".MAIN_DB_PREFIX."societe_perentity SET fk_account = ".((int) $fk_account);
    $sql .= " WHERE fk_soc = ".((int) $this->id)." AND entity = ".((int) $conf->entity);
    $resql = $this->db->query($sql);
    if ($resql && !$this->db->affected_rows($resql)) {
      $sql = "INSERT INTO ".MAIN_DB_PREFIX."societe_perentity (fk_soc, entity, fk_account)";
      $sql .= " VALUES (".((int) $this->id).", ".((int) $conf->entity).", ".((int) $fk_account).")";
      $resql = $this->db->query($sql);
    }
 
    if (!$resql) {
      dol_syslog(get_class($this).'::setBankAccount Error '.$this->db->error());
      $this->error = $this->db->lasterror();
      $this->db->rollback();
      return -1;
    }
 
    if (!$notrigger) {
      $this->context['bankaccountupdate'] = 1;
      $result = $this->call_trigger(strtoupper(get_class($this)).'_MODIFY', $userused);
      if ($result < 0) {
        $this->db->rollback();
        return -1;
      }
    }
 
    $this->fk_account = ($fk_account == 'NULL') ? null : $fk_account;
    $this->db->commit();
    return 1;
  }
 
  public function setPaymentTerms($id, $deposit_percent = null)
  {
    if (!getDolGlobalString('MAIN_COMPANY_PERENTITY_SHARED')) {
      return parent::setPaymentTerms($id, $deposit_percent);
    }
 
    global $conf;
 
    dol_syslog(get_class($this).'::setPaymentTerms('.$id.', '.formatLogObject($deposit_percent).')');
 
    $fieldname = (get_class($this) == 'Fournisseur') ? 'cond_reglement_supplier' : 'cond_reglement';
 
    if (empty($deposit_percent) || $deposit_percent < 0) {
      $deposit_percent = (float) getDictionaryValue('c_payment_term', 'deposit_percent', $id);
    }
    if ($deposit_percent > 100) {
      $deposit_percent = 100;
    }
 
    $sql = "UPDATE ".MAIN_DB_PREFIX."societe SET deposit_percent = ".(empty($deposit_percent) ? 'NULL' : "'".$this->db->escape((string) $deposit_percent)."'");
    $sql .= " WHERE rowid = ".((int) $this->id);
    $resql = $this->db->query($sql);
 
    if ($resql) {
      $sql = "UPDATE ".MAIN_DB_PREFIX."societe_perentity SET ".$this->db->sanitize($fieldname)." = ".(($id > 0 || $id == '0') ? ((int) $id) : 'NULL');
      $sql .= " WHERE fk_soc = ".((int) $this->id)." AND entity = ".((int) $conf->entity);
      $resql = $this->db->query($sql);
      if ($resql && !$this->db->affected_rows($resql)) {
        $sql = "INSERT INTO ".MAIN_DB_PREFIX."societe_perentity (fk_soc, entity, ".$this->db->sanitize($fieldname).")";
        $sql .= " VALUES (".((int) $this->id).", ".((int) $conf->entity).", ".(($id > 0 || $id == '0') ? ((int) $id) : 'NULL').")";
        $resql = $this->db->query($sql);
      }
    }
 
    if (!$resql) {
      dol_syslog(get_class($this).'::setPaymentTerms Error '.$this->db->error());
      $this->error = $this->db->lasterror();
      return -1;
    }
 
    $this->cond_reglement_id = $id;
    if (get_class($this) == 'Fournisseur') {
      $this->cond_reglement_supplier_id = $id;
    }
    $this->deposit_percent = $deposit_percent;
    return 1;
  }
 
  public function setPaymentMethods($id)
  {
    if (!getDolGlobalString('MAIN_COMPANY_PERENTITY_SHARED')) {
      return parent::setPaymentMethods($id);
    }
 
    global $conf;
 
    dol_syslog(get_class($this).'::setPaymentMethods('.$id.')');
 
    $fieldname = (get_class($this) == 'Fournisseur') ? 'mode_reglement_supplier' : 'mode_reglement';
 
    $sql = "UPDATE ".MAIN_DB_PREFIX."societe_perentity SET ".$this->db->sanitize($fieldname)." = ".(($id > 0 || $id == '0') ? ((int) $id) : 'NULL');
    $sql .= " WHERE fk_soc = ".((int) $this->id)." AND entity = ".((int) $conf->entity);
    $resql = $this->db->query($sql);
    if ($resql && !$this->db->affected_rows($resql)) {
      $sql = "INSERT INTO ".MAIN_DB_PREFIX."societe_perentity (fk_soc, entity, ".$this->db->sanitize($fieldname).")";
      $sql .= " VALUES (".((int) $this->id).", ".((int) $conf->entity).", ".(($id > 0 || $id == '0') ? ((int) $id) : 'NULL').")";
      $resql = $this->db->query($sql);
    }
 
    if (!$resql) {
      dol_syslog(get_class($this).'::setPaymentMethods Error '.$this->db->error());
      $this->error = $this->db->lasterror();
      return -1;
    }
 
    $this->mode_reglement_id = $id;
    if (get_class($this) == 'Fournisseur') {
      $this->mode_reglement_supplier_id = $id;
    }
    return 1;
  }
 
  public function findNearest($rowid = 0, $ref = '', $ref_ext = '', $barcode = '', $idprof1 = '', $idprof2 = '', $idprof3 = '', $idprof4 = '', $idprof5 = '', $idprof6 = '', $email = '', $ref_alias = '', $is_client = 0, $is_supplier = 0, $vatnumber = '')
  {
    // A rowid is known, it is a unique key so we found it
    if ($rowid) {
      return $rowid;
    }
 
    dol_syslog(get_class($this)."::findNearest", LOG_DEBUG);
    $tmpthirdparty = new Societe($this->db);
 
    // We try to find the thirdparty with exact matching on all fields
    $result = $tmpthirdparty->fetch($rowid, $ref, $ref_ext, $barcode, $idprof1, $idprof2, $idprof3, $idprof4, $idprof5, $idprof6, $email, $ref_alias, $is_client, $is_supplier);
    if ($result != 0) {
      return $result;
    }
 
    // Then search on barcode if we have it (+ restriction on is_client and is_supplier)
    dol_syslog("Thirdparty not found with exact match so we try barcode search", LOG_DEBUG);
    if ($barcode) {
      $result = $tmpthirdparty->fetch(0, '', '', $barcode, '', '', '', '', '', '', '', '', $is_client, $is_supplier);
      if ($result != 0) {
        return $result;
      }
    }
 
    $sqlstart = "SELECT s.rowid as id FROM ".MAIN_DB_PREFIX."societe as s";
    $sqlstart .= ' WHERE s.entity IN ('.getEntity($this->element).')';
    if ($is_client) {
      $sqlstart .= ' AND s.client > 0';
    }
    if ($is_supplier) {
      $sqlstart .= ' AND s.fournisseur > 0';
    } // if both false, no test (the thirdparty can be client and/or supplier)
 
    // Then search on profids with a OR (+ restriction on is_client and is_supplier)
    dol_syslog("Thirdparty not found with barcode search so we try profids search", LOG_DEBUG);
    $sqlprof = "";
    if ($idprof1) {
      $sqlprof .= " s.siren = '".$this->db->escape($idprof1)."'";
    }
    if ($idprof2) {
      if ($sqlprof) {
        $sqlprof .= " OR";
      }
      $sqlprof .= " s.siret = '".$this->db->escape($idprof2)."'";
    }
    if ($idprof3) {
      if ($sqlprof) {
        $sqlprof .= " OR";
      }
      $sqlprof .= " s.ape = '".$this->db->escape($idprof3)."'";
    }
    if ($idprof4) {
      if ($sqlprof) {
        $sqlprof .= " OR";
      }
      $sqlprof .= " s.idprof4 = '".$this->db->escape($idprof4)."'";
    }
    if ($idprof5) {
      if ($sqlprof) {
        $sqlprof .= " OR";
      }
      $sqlprof .= " s.idprof5 = '".$this->db->escape($idprof5)."'";
    }
    if ($idprof6) {
      if ($sqlprof) {
        $sqlprof .= " OR";
      }
      $sqlprof .= " s.idprof6 = '".$this->db->escape($idprof6)."'";
    }
    if ($vatnumber) {
      if ($sqlprof) {
        $sqlprof .= " OR";
      }
      $sqlprof .= " s.tva_intra = '".$this->db->escape($vatnumber)."'";
    }
 
    if ($sqlprof) {
      $sqlprofquery = $sqlstart . " AND (".$sqlprof." )";
      $resql = $this->db->query($sqlprofquery);
      if ($resql) {
        $num = $this->db->num_rows($resql);
        if ($num > 1) {
          $this->error = 'Fetch found several records. Rename one of thirdparties to avoid duplicate.';
          dol_syslog($this->error, LOG_WARNING);
          $result = -2;
        } elseif ($num) {
          $obj = $this->db->fetch_object($resql);
          $result = $obj->id;
        } else {
          $result = 0;
        }
      } else {
        $this->error = $this->db->lasterror();
        $this->errors[] = $this->db->lasterror();
        $result = -3;
      }
      if ($result != 0) {
        return $result;
      }
    }
 
    // Then search on email (+ restriction on is_client and is_supplier)
    dol_syslog("Thirdparty not found with profids search so we try email search", LOG_DEBUG);
    if ($email) {
      $result = $tmpthirdparty->fetch(0, '', '', '', '', '', '', '', '', '', $email, '', $is_client, $is_supplier);
      if ($result != 0) {
        return $result;
      }
    }
 
    // Then search ref, ref_ext or alias with a OR (+ restriction on is_client and is_supplier)
    dol_syslog("Thirdparty not found with email search so we try ref, ref_ext or ref_alias search", LOG_DEBUG);
    $sqlref = "";
    if ($ref) {
      $sqlref .= " s.nom = '".$this->db->escape($ref)."'";
    }
    if ($ref_alias) {
      if ($sqlref) {
        $sqlref .= " OR";
      }
      $sqlref .= " s.name_alias = '".$this->db->escape($ref_alias)."'";
    }
    if ($ref_ext) {
      if ($sqlref) {
        $sqlref .= " OR";
      }
      $sqlref .= " s.ref_ext = '".$this->db->escape($ref_ext)."'";
    }
 
    if ($sqlref) {
      $sqlrefquery = $sqlstart . " AND (".$sqlref." )";
      $resql = $this->db->query($sqlrefquery);
      if ($resql) {
        $num = $this->db->num_rows($resql);
        if ($num > 1) {
          $this->error = 'Fetch found several records. Rename one of thirdparties to avoid duplicate.';
          dol_syslog($this->error, LOG_WARNING);
          $result = -2;
        } elseif ($num) {
          $obj = $this->db->fetch_object($resql);
          $result = $obj->id;
        } else {
          $result = 0;
        }
      } else {
        $this->error = $this->db->lasterror();
        $this->errors[] = $this->db->lasterror();
        $result = -3;
      }
    }
    return $result;
  }
 
  public function delete($id, $fuser = null, $call_trigger = 1)
  {
    global $conf, $user;
 
    if (empty($fuser)) {
      $fuser = $user;
    }
 
    require_once DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php';
 
    $entity = isset($this->entity) ? $this->entity : $conf->entity;
 
    dol_syslog(get_class($this)."::delete", LOG_DEBUG);
    $error = 0;
 
    // Test if child exists
    $objectisused = $this->isObjectUsed($id);
    if (empty($objectisused)) {
      $this->db->begin();
 
      // User is mandatory for trigger call
      if ($call_trigger) {
        // Call trigger
        $result = $this->call_trigger('COMPANY_DELETE', $fuser);
        if ($result < 0) {
          $error++;
        }
        // End call triggers
      }
 
      if (!$error) {
        require_once DOL_DOCUMENT_ROOT.'/categories/class/categorie.class.php';
        $static_cat = new Categorie($this->db);
        $toute_categs = array();
 
        // Fill $toute_categs array with an array of (type => array of ("Categorie" instance))
        $toute_categs['customer'] = $static_cat->containing($this->id, Categorie::TYPE_CUSTOMER);
        $toute_categs['supplier'] = $static_cat->containing($this->id, Categorie::TYPE_SUPPLIER);
 
        // Remove each "Categorie"
        foreach ($toute_categs as $type => $categs_type) {
          foreach ($categs_type as $cat) {
            $cat->del_type($this, $type);
          }
        }
      }
 
      if (!$error) {
        foreach ($this->childtablesoncascade as $tabletodelete) {
          $deleteFromObject = explode(':', $tabletodelete, 4);
          if (count($deleteFromObject) >= 2) {
            $className = str_replace('@', '', $deleteFromObject[0]);
            $filepath = $deleteFromObject[1];
            $columnName = $deleteFromObject[2];
            if (dol_include_once($filepath)) {
              $child_object = new $className($this->db);
              '@phan-var-force CommonObject $child_object';
              $result = $child_object->deleteByParentField($id, $columnName);
              if ($result < 0) {
                $error++;
                $this->errors[] = $child_object->error;
                break;
              }
            } else {
              $error++;
              $this->errors[] = 'Cannot include child class file '.$filepath;
              break;
            }
          } else {
            $sql = "DELETE FROM ".MAIN_DB_PREFIX.$tabletodelete;
            $sql .= " WHERE fk_soc = ".((int) $id);
            if (!$this->db->query($sql)) {
              $error++;
              $this->errors[] = $this->db->lasterror();
              break;
            }
          }
        }
      }
 
      // Removed extrafields
      if (!$error) {
        $result = $this->deleteExtraFields();
        if ($result < 0) {
          $error++;
          dol_syslog(get_class($this)."::delete error -3 ".$this->error, LOG_ERR);
        }
      }
 
      // Remove links to subsidiaries companies
      if (!$error) {
        $sql = "UPDATE ".MAIN_DB_PREFIX."societe";
        $sql .= " SET parent = NULL";
        $sql .= " WHERE parent = ".((int) $id);
        if (!$this->db->query($sql)) {
          $error++;
          $this->errors[] = $this->db->lasterror();
        }
      }
 
      // Remove third party
      if (!$error) {
        if (getDolGlobalString('MAIN_COMPANY_PERENTITY_SHARED')) {
          $sql = "DELETE FROM ".MAIN_DB_PREFIX."societe_perentity";
          $sql .= " WHERE fk_soc = ".((int) $id);
          if (!$this->db->query($sql)) {
            $error++;
            $this->errors[] = $this->db->lasterror();
          }
        }
 
        $sql = "DELETE FROM ".MAIN_DB_PREFIX."societe";
        $sql .= " WHERE rowid = ".((int) $id);
        if (!$this->db->query($sql)) {
          $error++;
          $this->errors[] = $this->db->lasterror();
        }
      }
 
      if (!$error) {
        $this->db->commit();
 
        // Delete directory
        if (!empty($conf->societe->multidir_output[$entity])) {
          $docdir = $conf->societe->multidir_output[$entity]."/".$id;
          if (dol_is_dir($docdir)) {
            dol_delete_dir_recursive($docdir);
          }
        }
 
        return 1;
      } else {
        dol_syslog($this->error, LOG_ERR);
        $this->db->rollback();
        return -1;
      }
    } else {
      dol_syslog("Can't remove thirdparty with id ".$id.". There are ".$objectisused." children", LOG_WARNING);
    }
    return 0;
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function set_as_client()
  {
    // phpcs:enable
    dol_syslog(get_class($this)."::set_as_client is deprecated use setAsCustomer instead", LOG_NOTICE);
    return $this->setAsCustomer();
  }
 
  public function setAsCustomer()
  {
    global $user;
 
    if ($this->id) {
      $newclient = 1;
      if (($this->client == 2 || $this->client == 3) && !getDolGlobalInt('SOCIETE_DISABLE_PROSPECTSCUSTOMERS')) {
        $newclient = 3; // If prospected, we keep prospect tag
      }
      $sql = "UPDATE ".MAIN_DB_PREFIX.$this->table_element;
      $sql .= " SET client = ".((int) $newclient);
      $sql .= " WHERE rowid = ".((int) $this->id);
 
      $this->db->begin();
 
      $resql = $this->db->query($sql);
      if ($resql) {
        $this->client = $newclient;
 
        // Call trigger
        $result = $this->call_trigger('COMPANY_MODIFY', $user);
        if ($result < 0) {
          $this->db->rollback();
          return -1;
        }
        // End call triggers
 
        $this->db->commit();
        return 1;
      } else {
        $this->db->rollback();
        return -1;
      }
    }
    return 0;
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function set_remise_client($remise, $note, User $user)
  {
    // phpcs:enable
    global $conf, $langs;
 
    // Parameter cleaning
    $note = trim($note);
    if (!$note) {
      $this->error = $langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("NoteReason"));
      return -2;
    }
 
    dol_syslog(get_class($this)."::set_remise_client ".$remise.", ".$note.", ".$user->id);
 
    if ($this->id) {
      $this->db->begin();
 
      $now = dol_now();
 
      // Position current discount
      $sql = "UPDATE ".MAIN_DB_PREFIX."societe ";
      $sql .= " SET remise_client = '".$this->db->escape((string) $remise)."'";
      $sql .= " WHERE rowid = ".((int) $this->id);
      $resql = $this->db->query($sql);
      if (!$resql) {
        $this->db->rollback();
        $this->error = $this->db->error();
        return -1;
      }
 
      // Writes trace in discount history
      $sql = "INSERT INTO ".MAIN_DB_PREFIX."societe_remise";
      $sql .= " (entity, datec, fk_soc, remise_client, note, fk_user_author)";
      $sql .= " VALUES (".((int) $conf->entity).", '".$this->db->idate($now)."', ".((int) $this->id).", '".$this->db->escape((string) $remise)."',";
      $sql .= " '".$this->db->escape($note)."',";
      $sql .= " ".((int) $user->id);
      $sql .= ")";
 
      $resql = $this->db->query($sql);
      if (!$resql) {
        $this->db->rollback();
        $this->error = $this->db->lasterror();
        return -1;
      }
 
      $this->db->commit();
 
      return 1;
    }
    return -1;
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function set_remise_supplier($remise, $note, User $user)
  {
    // phpcs:enable
    global $conf, $langs;
 
    // Parameter cleaning
    $note = trim($note);
    if (!$note) {
      $this->error = $langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("NoteReason"));
      return -2;
    }
 
    dol_syslog(get_class($this)."::set_remise_supplier ".$remise.", ".$note.", ".$user->id);
 
    if ($this->id) {
      $this->db->begin();
 
      $now = dol_now();
 
      // Position current discount
      $sql = "UPDATE ".MAIN_DB_PREFIX."societe ";
      $sql .= " SET remise_supplier = ".((float) $remise);
      $sql .= " WHERE rowid = ".((int) $this->id);
      $resql = $this->db->query($sql);
      if (!$resql) {
        $this->db->rollback();
        $this->error = $this->db->error();
        return -1;
      }
 
      // Writes trace in discount history
      $sql = "INSERT INTO ".MAIN_DB_PREFIX."societe_remise_supplier";
      $sql .= " (entity, datec, fk_soc, remise_supplier, note, fk_user_author)";
      $sql .= " VALUES (".((int) $conf->entity).", '".$this->db->idate($now)."', ".((int) $this->id).", ".((float) $remise).",";
      $sql .= " '".$this->db->escape($note)."',";
      $sql .= " ".((int) $user->id);
      $sql .= ")";
 
      $resql = $this->db->query($sql);
      if (!$resql) {
        $this->db->rollback();
        $this->error = $this->db->lasterror();
        return -1;
      }
 
      $this->db->commit();
      return 1;
    }
 
    return -1;
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function set_remise_except($remise, User $user, $desc, $vatrate = '', $discount_type = 0, $price_base_type = 'HT')
  {
    // phpcs:enable
    global $langs, $mysoc;
 
    // Clean parameters
    $remise = (float) price2num($remise);
    $desc = trim($desc);
 
    // Check parameters
    if (!($remise > 0)) {
      $this->error = $langs->trans("ErrorWrongValueForParameter", "1");
      return -1;
    }
    if (!$desc) {
      $this->error = $langs->trans("ErrorWrongValueForParameter", "3");
      return -2;
    }
 
    if ($this->id > 0) {
      // Separate VAT code from VAT rate string
      // Discount type determines who is buyer and seller
      $taxes = getTaxesFromId($vatrate, ($discount_type == 0 ? $this : $mysoc), ($discount_type == 0 ? $mysoc : $this), 0);
      $reg = array();
      $vat_src_code = '';
      if (preg_match('/\‍((.*)\‍)/', $vatrate, $reg)) {
        $vat_src_code = $reg[1];
        $vatrate = preg_replace('/\s*\‍(.*\‍)/', '', $vatrate); // Remove code into vatrate.
      }
 
      require_once DOL_DOCUMENT_ROOT.'/core/class/discount.class.php';
 
      $discount = new DiscountAbsolute($this->db);
      $discount->fk_soc = $this->id;
      $discount->socid = $this->id;
 
      $discount->discount_type = $discount_type;
      $discount->multicurrency_code = $this->multicurrency_code;
 
      $tmparray = MultiCurrency::getIdAndTxFromCode($this->db, $this->multicurrency_code);
      $this->fk_multicurrency = $tmparray[0];
      $this->multicurrency_tx = $tmparray[1];
 
      $discount->multicurrency_tx = $this->multicurrency_tx;
 
      $vat_tx = (float) price2num($vatrate);
 
      $discount->generateFromAmount($remise, ($price_base_type == 'TTC' ? 1 : 0), $vat_tx, $taxes['localtax1'], $taxes['localtax2'], (int) $taxes['localtax1_type'], (int) $taxes['localtax2_type']);
 
      $discount->vat_src_code = $vat_src_code;
 
      $discount->description = $desc;
 
      $result = $discount->create($user);
      if ($result > 0) {
        return $result;
      } else {
        $this->error = $discount->error;
        return -3;
      }
    } else {
      return 0;
    }
  }
 
  public function getAvailableDiscounts($user = null, $filter = '', $maxvalue = 0, $discount_type = 0)
  {
    require_once DOL_DOCUMENT_ROOT.'/core/class/discount.class.php';
 
    $discountstatic = new DiscountAbsolute($this->db);
    $result = $discountstatic->getAvailableDiscounts($this, $user, $filter, $maxvalue, $discount_type);
    if ($result >= 0) {
      return $result;
    } else {
      $this->error = $discountstatic->error;
      return -1;
    }
  }
 
 
  public function getOpenCreditNotesNotYetConvertedIntoDiscount($discount_type = 0)
  {
    global $conf;
 
    $sql = "SELECT COUNT(f.rowid) as nb, SUM(f.total_ttc) as amount, SUM(f.multicurrency_total_ttc) as multicurrency_amount";
    if (!empty($discount_type)) {
      $sql .= " FROM ".$this->db->prefix()."facture_fourn as f";
    } else {
      $sql .= " FROM ".$this->db->prefix()."facture as f";
    }
    $sql .= " WHERE f.entity = ".((int) $conf->entity);
    $sql .= " AND paye = 0 AND fk_statut = 1";
    $sql .= " AND f.type = ".CommonInvoice::TYPE_CREDIT_NOTE;
    $sql .= " AND NOT EXISTS (SELECT rowid FROM ".$this->db->prefix()."societe_remise_except as rc";
    $sql .= " WHERE rc.discount_type = ".((int) $discount_type);
    if (!empty($discount_type)) {
      $sql .= " AND rc.fk_invoice_supplier = f.rowid";
    } else {
      $sql .= " AND rc.fk_facture = f.rowid";
    }
    $sql .= " AND rc.fk_soc = ".((int) $this->id);
    $sql .= ")";
    $sql .= " AND f.fk_soc = ".((int) $this->id);
 
    $resql = $this->db->query($sql);
    if ($resql) {
      $obj = $this->db->fetch_object($resql);
 
      return $obj->nb;
    }
 
    return -1;
  }
 
 
  public function getSalesRepresentatives(User $user, $mode = 0, $sortfield = null, $sortorder = null)
  {
    global $conf;
 
    $reparray = array();
 
    $sql = "SELECT u.rowid, u.login, u.lastname, u.firstname, u.office_phone, u.job, u.email, u.statut as status, u.entity, u.photo, u.gender";
    $sql .= ", u.office_fax, u.user_mobile, u.personal_mobile";
    $sql .= " FROM ".MAIN_DB_PREFIX."societe_commerciaux as sc, ".MAIN_DB_PREFIX."user as u";
    // Condition here should be the same than into select_dolusers()
    if (isModEnabled('multicompany') && getDolGlobalString('MULTICOMPANY_TRANSVERSE_MODE')) {
      $sql .= " WHERE u.rowid IN (SELECT ug.fk_user FROM ".$this->db->prefix()."usergroup_user as ug WHERE ug.entity IN (".getEntity('usergroup')."))";
    } else {
      $sql .= " WHERE entity IN (0, ".((int) $conf->entity).")";
    }
 
    $sql .= " AND u.rowid = sc.fk_user AND sc.fk_soc = ".((int) $this->id);
    if (empty($sortfield)) {
      $sortfield = 'u.lastname,u.firstname';
    }
    if (empty($sortorder)) {
      $sortorder = str_repeat('ASC,', count(explode(',', $sortfield)) - 1) . 'ASC';
    }
    $sql .= $this->db->order($sortfield, $sortorder);
 
    $resql = $this->db->query($sql);
    if ($resql) {
      $num = $this->db->num_rows($resql);
      $i = 0;
      while ($i < $num) {
        $obj = $this->db->fetch_object($resql);
 
        if (empty($mode)) {
          $reparray[$i]['id'] = (int) $obj->rowid;
          $reparray[$i]['lastname'] = $obj->lastname;
          $reparray[$i]['firstname'] = $obj->firstname;
          $reparray[$i]['email'] = $obj->email;
          $reparray[$i]['phone'] = $obj->office_phone;
          $reparray[$i]['office_phone'] = $obj->office_phone;     // Pro phone
          $reparray[$i]['office_fax'] = $obj->office_fax;
          $reparray[$i]['user_mobile'] = $obj->user_mobile;     // Pro mobile
          $reparray[$i]['personal_mobile'] = $obj->personal_mobile; // Personal mobile
          $reparray[$i]['job'] = $obj->job;
          $reparray[$i]['statut'] = $obj->status; // deprecated
          $reparray[$i]['status'] = $obj->status;
          $reparray[$i]['entity'] = $obj->entity;
          $reparray[$i]['login'] = $obj->login;
          $reparray[$i]['photo'] = $obj->photo;
          $reparray[$i]['gender'] = $obj->gender;
        } else {
          $reparray[] = (int) $obj->rowid;
        }
        $i++;
      }
      return $reparray;
    } else {
      dol_print_error($this->db);
      return -1;
    }
  }
 
  public function setPriceLevel($price_level, User $user)
  {
    if ($this->id) {
      $now = dol_now();
 
      $sql  = "UPDATE ".MAIN_DB_PREFIX."societe";
      $sql .= " SET price_level = ".((int) $price_level);
      $sql .= " WHERE rowid = ".((int) $this->id);
 
      if (!$this->db->query($sql)) {
        dol_print_error($this->db);
        return -1;
      }
 
      $sql  = "INSERT INTO ".MAIN_DB_PREFIX."societe_prices";
      $sql .= " (datec, fk_soc, price_level, fk_user_author)";
      $sql .= " VALUES ('".$this->db->idate($now)."', ".((int) $this->id).", ".((int) $price_level).", ".((int) $user->id).")";
 
      if (!$this->db->query($sql)) {
        dol_print_error($this->db);
        return -1;
      }
      return 1;
    }
    return -1;
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function add_commercial(User $user, $commid)
  {
    // phpcs:enable
    $error = 0;
 
    if ($this->id > 0 && $commid > 0) {
      $this->db->begin();
 
      $sql = "DELETE FROM  ".MAIN_DB_PREFIX."societe_commerciaux";
      $sql .= " WHERE fk_soc = ".((int) $this->id)." AND fk_user = ".((int) $commid);
 
      $resql = $this->db->query($sql);
      if (!$resql) {
        dol_syslog(get_class($this)."::add_commercial Error ".$this->db->lasterror());
        $error++;
      }
 
      if (!$error) {
        $sql = "INSERT INTO ".MAIN_DB_PREFIX."societe_commerciaux";
        $sql .= " (fk_soc, fk_user)";
        $sql .= " VALUES (".((int) $this->id).", ".((int) $commid).")";
 
        $resql = $this->db->query($sql);
        if (!$resql) {
          dol_syslog(get_class($this)."::add_commercial Error ".$this->db->lasterror());
          $error++;
        }
      }
 
      if (!$error) {
        $this->context = array('commercial_modified' => $commid);
 
        $result = $this->call_trigger('COMPANY_LINK_SALE_REPRESENTATIVE', $user);
        if ($result < 0) {
          $error++;
        }
      }
 
      if (!$error) {
        $this->db->commit();
        return 1;
      } else {
        $this->db->rollback();
        return -1;
      }
    }
 
    return 0;
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function del_commercial(User $user, $commid)
  {
    // phpcs:enable
    $error = 0;
    $this->context = array('commercial_modified' => $commid);
 
    $result = $this->call_trigger('COMPANY_UNLINK_SALE_REPRESENTATIVE', $user);
    if ($result < 0) {
      $error++;
    }
 
    if ($this->id > 0 && $commid > 0) {
      $sql  = "DELETE FROM  ".MAIN_DB_PREFIX."societe_commerciaux ";
      $sql .= " WHERE fk_soc = ".((int) $this->id)." AND fk_user = ".((int) $commid);
 
      if (!$this->db->query($sql)) {
        $error++;
        dol_syslog(get_class($this)."::del_commercial Erreur");
      }
    }
 
    if ($error) {
      return -1;
    } else {
      return 1;
    }
  }
 
  public function getTooltipContentArray($params)
  {
    global $conf, $langs, $user;
 
    $langs->loadLangs(['companies', 'commercial']);
 
    $datas = array();
 
    $option = $params['option'] ?? '';
    $nofetch = !empty($params['nofetch']);
 
    $noaliasinname = (empty($params['noaliasinname']) ? 0 : $params['noaliasinname']);
 
    if (getDolGlobalString('MAIN_OPTIMIZEFORTEXTBROWSER')) {
      return ['optimize' => $langs->trans("ShowCompany")];
    }
 
    if (!empty($this->logo) && class_exists('Form')) {
      $photo = '<div class="photointooltip floatright">';
      $photo .= Form::showphoto('societe', $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;
    } //elseif (!empty($this->logo_squarred) && class_exists('Form')) {
    /*$label.= '<div class="photointooltip">';
    $label.= Form::showphoto('societe', $this, 0, 40, 0, 'photowithmargin', '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.
    $label.= '</div><div style="clear: both;"></div>';*/
    // }
 
    $datas['divopen'] = '<div class="centpercent">';
 
    if ($option == 'customer' || $option == 'compta' || $option == 'category') {
      $datas['picto'] = img_picto('', $this->picto).' <u class="paddingrightonly">'.$langs->trans("Customer").'</u>';
    } elseif ($option == 'prospect' && !getDolGlobalString('SOCIETE_DISABLE_PROSPECTS')) {
      $datas['picto'] = img_picto('', $this->picto).' <u class="paddingrightonly">'.$langs->trans("Prospect").'</u>';
    } elseif ($option == 'supplier' || $option == 'category_supplier') {
      $datas['picto'] = img_picto('', $this->picto).' <u class="paddingrightonly">'.$langs->trans("Supplier").'</u>';
    } elseif ($option == 'agenda') {
      $datas['picto'] = img_picto('', $this->picto).' <u class="paddingrightonly">'.$langs->trans("ThirdParty").'</u>';
    } elseif ($option == 'project') {
      $datas['picto'] = img_picto('', $this->picto).' <u class="paddingrightonly">'.$langs->trans("ThirdParty").'</u>';
    } elseif ($option == 'margin') {
      $datas['picto'] = img_picto('', $this->picto).' <u class="paddingrightonly">'.$langs->trans("ThirdParty").'</u>';
    } elseif ($option == 'contact') {
      $datas['picto'] = img_picto('', $this->picto).' <u class="paddingrightonly">'.$langs->trans("ThirdParty").'</u>';
    } elseif ($option == 'ban') {
      $datas['picto'] = img_picto('', $this->picto).' <u class="paddingrightonly">'.$langs->trans("ThirdParty").'</u>';
    }
 
    // By default
    if (empty($datas['picto'])) {
      $datas['picto'] = img_picto('', $this->picto).' <u class="paddingrightonly">'.$langs->trans("ThirdParty").'</u>';
    }
    if (isset($this->status)) {
      $datas['status'] = ' '.$this->getLibStatut(5);
    }
    if (isset($this->client) && isset($this->fournisseur)) {
      $datas['type'] = ' &nbsp; ' . $this->getTypeUrl(1, '', 0, 'span');
    }
    $datas['name'] = '<br><b>'.$langs->trans('Name').':</b> '.dol_escape_htmltag(dol_string_nohtmltag($this->name));
    if (!empty($this->name_alias) && empty($noaliasinname)) {
      $datas['namealias'] = ' ('.dol_escape_htmltag(dol_string_nohtmltag($this->name_alias)).')';
    }
    if (!empty($this->email)) {
      $datas['email'] = '<br>'.img_picto('', 'email', 'class="pictofixedwidth"').$this->email;
    }
    if (!empty($this->url)) {
      $datas['url'] = '<br>'.img_picto('', 'globe', 'class="pictofixedwidth"').$this->url;
    }
    if (!empty($this->phone) || !empty($this->phone_mobile) || !empty($this->fax)) {
      $phonelist = array();
      if ($this->phone) {
        $phonelist[] = dol_print_phone($this->phone, $this->country_code, $this->id, 0, '', '&nbsp', 'phone');
      }
      // deliberately not making new list because fax uses same list as phone
      if ($this->phone_mobile) {
        $phonelist[] = dol_print_phone($this->phone_mobile, $this->country_code, $this->id, 0, '', '&nbsp', 'mobile');
      }
      if ($this->fax) {
        $phonelist[] = dol_print_phone($this->fax, $this->country_code, $this->id, 0, '', '&nbsp', 'fax');
      }
      $datas['phonelist'] = '<br>'.implode('&nbsp;', $phonelist);
    }
 
    if (!empty($this->address)) {
      $datas['address'] = '<br><b>'.$langs->trans("Address").':</b> '.dol_format_address($this, 1, ', ', $langs); // Address + country
    } elseif (!empty($this->country_code)) {
      $datas['address'] = '<br><b>'.$langs->trans('Country').':</b> '.$this->country_code;
    }
    if (!empty($this->tva_intra) || (getDolGlobalString('SOCIETE_SHOW_FIELD_IN_TOOLTIP') && strpos($conf->global->SOCIETE_SHOW_FIELD_IN_TOOLTIP, 'vatnumber') !== false)) {
      $datas['vatintra'] = '<br><b>'.$langs->trans('VATIntra').':</b> '.dol_escape_htmltag($this->tva_intra);
    }
 
    if (!empty($this->euid) || (getDolGlobalString('SOCIETE_SHOW_FIELD_IN_TOOLTIP') && strpos($conf->global->SOCIETE_SHOW_FIELD_IN_TOOLTIP, 'euid') !== false)) {
      $datas['euid'] = '<br><b>'.$langs->trans('EUIDShort').':</b> '.dol_escape_htmltag($this->euid);
    }
 
    if (getDolGlobalString('SOCIETE_SHOW_FIELD_IN_TOOLTIP')) {
      if (strpos($conf->global->SOCIETE_SHOW_FIELD_IN_TOOLTIP, 'profid1') !== false && $langs->trans('ProfId1'.$this->country_code) != '-') {
        $datas['profid1'] = '<br><b>'.$langs->trans('ProfId1'.$this->country_code).':</b> '.$this->idprof1;
      }
      if (strpos($conf->global->SOCIETE_SHOW_FIELD_IN_TOOLTIP, 'profid2') !== false && $langs->trans('ProfId2'.$this->country_code) != '-') {
        $datas['profid2'] = '<br><b>'.$langs->trans('ProfId2'.$this->country_code).':</b> '.$this->idprof2;
      }
      if (strpos($conf->global->SOCIETE_SHOW_FIELD_IN_TOOLTIP, 'profid3') !== false && $langs->trans('ProfId3'.$this->country_code) != '-') {
        $datas['profid3'] = '<br><b>'.$langs->trans('ProfId3'.$this->country_code).':</b> '.$this->idprof3;
      }
      if (strpos($conf->global->SOCIETE_SHOW_FIELD_IN_TOOLTIP, 'profid4') !== false && $langs->trans('ProfId4'.$this->country_code) != '-') {
        $datas['profid4'] = '<br><b>'.$langs->trans('ProfId4'.$this->country_code).':</b> '.$this->idprof4;
      }
      if (strpos($conf->global->SOCIETE_SHOW_FIELD_IN_TOOLTIP, 'profid5') !== false && $langs->trans('ProfId5'.$this->country_code) != '-') {
        $datas['profid5'] = '<br><b>'.$langs->trans('ProfId5'.$this->country_code).':</b> '.$this->idprof5;
      }
      if (strpos($conf->global->SOCIETE_SHOW_FIELD_IN_TOOLTIP, 'profid6') !== false && $langs->trans('ProfId6'.$this->country_code) != '-') {
        $datas['profid6'] = '<br><b>'.$langs->trans('ProfId6'.$this->country_code).':</b> '.$this->idprof6;
      }
    }
 
    $datas['separator'] = '<br>';
 
    if (!empty($this->code_client) && ($this->client == 1 || $this->client == 3)) {
      $datas['customercode'] = '<br><b>'.$langs->trans('CustomerCode').':</b> '.$this->code_client;
    }
    if (isModEnabled('accounting') && ($this->client == 1 || $this->client == 3)) {
      $langs->load('compta');
      $datas['accountancycustomercode'] = '<br><b>'.$langs->trans('CustomerAccountancyCode').':</b> '.$this->code_compta_client;
    }
    // show categories for this record only in ajax to not overload lists
    if (!$nofetch && isModEnabled('category') && $this->client) {
      require_once DOL_DOCUMENT_ROOT . '/categories/class/categorie.class.php';
      $form = new Form($this->db);
      $datas['categories_customer'] = '<br>' . $form->showCategories($this->id, Categorie::TYPE_CUSTOMER, 1, 1);
    }
    if (!empty($this->code_fournisseur) && $this->fournisseur) {
      $datas['suppliercode'] = '<br><b>'.$langs->trans('SupplierCode').':</b> '.$this->code_fournisseur;
    }
    if (isModEnabled('accounting') && $this->fournisseur) {
      $langs->load('compta');
      $datas['accountancysuppliercode'] = '<br><b>'.$langs->trans('SupplierAccountancyCode').':</b> '.$this->code_compta_fournisseur;
    }
    // show categories for this record only in ajax to not overload lists
    if (!$nofetch && isModEnabled('category') && $this->fournisseur) {
      require_once DOL_DOCUMENT_ROOT . '/categories/class/categorie.class.php';
      $form = new Form($this->db);
      $datas['categories_supplier'] = '<br>' . $form->showCategories($this->id, Categorie::TYPE_SUPPLIER, 1, 1);
    }
 
    $datas['divclose'] = '</div>';
 
    return $datas;
  }
 
  public function getNomUrl($withpicto = 0, $option = '', $maxlen = 0, $notooltip = 0, $save_lastsearch_value = -1, $noaliasinname = 0, $target = '', $morecss = 'valignmiddle')
  {
    global $conf, $langs, $hookmanager, $user;
 
    if (!empty($conf->dol_no_mouse_hover)) {
      $notooltip = 1; // Force disable tooltips
    }
 
    $name = $this->name ? $this->name : $this->nom;
 
    if (getDolGlobalString('SOCIETE_ON_SEARCH_AND_LIST_GO_ON_CUSTOMER_OR_SUPPLIER_CARD')) {
      if (empty($option) && $this->client > 0) {
        $option = 'customer';
      }
      if (empty($option) && $this->fournisseur > 0) {
        $option = 'supplier';
      }
    }
 
    if (getDolGlobalString('SOCIETE_ADD_REF_IN_LIST') && (!empty($withpicto))) {
      $code = '';
      if (($this->client) && (!empty($this->code_client)) && (getDolGlobalInt('SOCIETE_ADD_REF_IN_LIST') == 1 || getDolGlobalInt('SOCIETE_ADD_REF_IN_LIST') == 2)) {
        $code = $this->code_client.' - ';
      }
 
      if (($this->fournisseur) && (!empty($this->code_fournisseur)) && (getDolGlobalInt('SOCIETE_ADD_REF_IN_LIST') == 1 || getDolGlobalInt('SOCIETE_ADD_REF_IN_LIST') == 3)) {
        $code .= $this->code_fournisseur.' - ';
      }
 
      if ($code) {
        if (getDolGlobalInt('SOCIETE_ADD_REF_IN_LIST') == 1) {
          $name = $code.' '.$name;
        } else {
          $name = $code;
        }
      }
    }
 
    if (!empty($this->name_alias) && empty($noaliasinname)) {
      $name .= ' ('.$this->name_alias.')';
    }
 
    $result = '';
    $params = [
      'id' => $this->id,
      'objecttype' => $this->element,
      'option' => $option,
      'nofetch' => 1,
    ];
    $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));
    }
 
    $linkstart = '';
    $linkend = '';
 
    if ($option == 'customer' || $option == 'compta' || $option == 'category') {
      $linkstart = '<a href="'.DOL_URL_ROOT.'/comm/card.php?socid='.$this->id;
    } elseif ($option == 'prospect' && !getDolGlobalString('SOCIETE_DISABLE_PROSPECTS')) {
      $linkstart = '<a href="'.DOL_URL_ROOT.'/comm/card.php?socid='.$this->id;
    } elseif ($option == 'supplier' || $option == 'category_supplier') {
      $linkstart = '<a href="'.DOL_URL_ROOT.'/fourn/card.php?socid='.$this->id;
    } elseif ($option == 'agenda') {
      $linkstart = '<a href="'.DOL_URL_ROOT.'/societe/agenda.php?socid='.$this->id;
    } elseif ($option == 'project') {
      $linkstart = '<a href="'.DOL_URL_ROOT.'/societe/project.php?socid='.$this->id;
    } elseif ($option == 'margin') {
      $linkstart = '<a href="'.DOL_URL_ROOT.'/margin/tabs/thirdpartyMargins.php?socid='.$this->id.'&type=1';
    } elseif ($option == 'contact') {
      $linkstart = '<a href="'.DOL_URL_ROOT.'/societe/contact.php?socid='.$this->id;
    } elseif ($option == 'ban') {
      $linkstart = '<a href="'.DOL_URL_ROOT.'/societe/paymentmodes.php?socid='.$this->id;
    }
 
    // By default
    if (empty($linkstart)) {
      $linkstart = '<a href="'.DOL_URL_ROOT.'/societe/card.php?socid='.$this->id;
    }
 
    // Add type of canvas
    $linkstart .= (!empty($this->canvas) ? '&canvas='.$this->canvas : '');
    // 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) {
      $linkstart .= '&save_lastsearch_values=1';
    }
    $linkstart .= '"';
 
    $linkclose = '';
    if (empty($notooltip)) {
      if (getDolGlobalString('MAIN_OPTIMIZEFORTEXTBROWSER')) {
        $label = $langs->trans("ShowCompany");
        $linkclose .= ' alt="'.dolPrintHTMLForAttribute($label).'"';
      }
      $linkclose .= ($label ? ' title="'.dolPrintHTMLForAttribute($label).'"' : ' title="tocomplete"');
      $linkclose .= $dataparams.' class="'.$classfortooltip.($morecss ? ' '.$morecss : '').' refurl'.($withpicto ? ' valignmiddle' : '').'"';
      $target_value = array('_self', '_blank', '_parent', '_top');
      if (in_array($target, $target_value)) {
        $linkclose .= ' target="'.dol_escape_htmltag($target).'"';
      }
    } else {
      $linkclose .= ' class="'.($morecss ? ' '.$morecss : '').'"';
    }
    $linkstart .= $linkclose.'>';
    $linkend = '</a>';
 
    if (!$user->hasRight('societe', 'client', 'voir') && $user->socid > 0 && $this->id != $user->socid) {
      $linkstart = '';
      $linkend = '';
    }
 
    $result .= $linkstart;
    if ($withpicto) {
      $result .= img_object(($notooltip ? '' : $label), ($this->picto ? $this->picto : 'generic'), (' class="'.(($withpicto != 2) ? 'paddingright' : '').'"'), 0, 0, $notooltip ? 0 : 1);
    }
    if ($withpicto != 2) {
      $result .= dol_escape_htmltag($maxlen ? dol_trunc((string) $name, $maxlen) : $name);
    }
    $result .= $linkend;
 
    global $action;
    $hookmanager->initHooks(array('thirdpartydao'));
    $parameters = array(
      'id' => $this->id,
      'getnomurl' => &$result,
      'withpicto ' => $withpicto,
      'option' => $option,
      'maxlen' => $maxlen,
      'notooltip' => $notooltip,
      'save_lastsearch_value' => $save_lastsearch_value
    );
    $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 getTypeUrl($withpicto = 0, $option = '', $notooltip = 0, $tag = 'a')
  {
    global $langs;
 
    $s = '';
    if (empty($option) || preg_match('/prospect/', $option)) {
      if (($this->client == 2 || $this->client == 3) && !getDolGlobalString('SOCIETE_DISABLE_PROSPECTS')) {
        $s .= '<'.$tag.' class="customer-back opacitymedium" title="'.dolPrintHTMLForAttribute($langs->trans("Prospect")).'"';
        $s .= $tag == 'a' ? ' href="'.DOL_URL_ROOT.'/comm/card.php?socid='.$this->id.'"' : '';
        $s .= '>'.dol_substr($langs->trans("Prospect"), 0, 1).'</'.$tag.'>';
      }
    }
    if (empty($option) || preg_match('/customer/', $option)) {
      if (($this->client == 1 || $this->client == 3) && !getDolGlobalString('SOCIETE_DISABLE_CUSTOMERS')) {
        $s .= '<'.$tag.' class="customer-back" title="'.dolPrintHTMLForAttribute($langs->trans("Customer")).'"';
        $s .= $tag == 'a' ? ' href="'.DOL_URL_ROOT.'/comm/card.php?socid='.$this->id.'"' : '';
        $s .= '>'.dol_substr($langs->trans("Customer"), 0, 1).'</'.$tag.'>';
      }
    }
    if (empty($option) || preg_match('/supplier/', $option)) {
      if ((isModEnabled("supplier_order") || isModEnabled("supplier_invoice")) && $this->fournisseur) {
        $s .= '<'.$tag.' class="vendor-back" title="'.dolPrintHTMLForAttribute($langs->trans("Supplier")).'"';
        $s .= $tag == 'a' ? ' href="'.DOL_URL_ROOT.'/fourn/card.php?socid='.$this->id.'"' : '';
        $s .= '>'.dol_substr($langs->trans("Supplier"), 0, 1).'</'.$tag.'>';
      }
    }
 
    return $s;
  }
 
 
  public function getLibStatut($mode = 0)
  {
    return $this->LibStatut($this->status, $mode);
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function LibStatut($status, $mode = 0)
  {
    // phpcs:enable
    global $langs;
    $langs->load('companies');
 
    $statusType = 'status4';
    if ($status == 0) {
      $statusType = 'status6';
    }
 
    if (empty($this->labelStatus) || empty($this->labelStatusShort)) {
      $this->labelStatus[0] = $langs->transnoentitiesnoconv("ActivityCeased");
      $this->labelStatus[1] = $langs->transnoentitiesnoconv("InActivity");
      $this->labelStatusShort[0] = $langs->transnoentitiesnoconv("ActivityCeased");
      $this->labelStatusShort[1] = $langs->transnoentitiesnoconv("InActivity");
    }
 
    return dolGetStatus($this->labelStatus[$status], $this->labelStatusShort[$status], '', $statusType, $mode);
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function thirdparty_and_contact_email_array($addthirdparty = 0)
  {
    // phpcs:enable
    global $langs;
 
    $contact_emails = $this->contact_property_array('email', 1);
 
    if ($this->email && $addthirdparty) {
      if (empty($this->name)) {
        $this->name = $this->nom;
      }
      $contact_emails['thirdparty'] = ($addthirdparty == 2 ? '<span class="opacitymedium">' : '').$langs->transnoentitiesnoconv("ThirdParty").($addthirdparty == 2 ? '</span>' : '').': '.dol_trunc($this->name, 16)." <".$this->email.">";
    }
 
    //var_dump($contact_emails)
    return $contact_emails;
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function thirdparty_and_contact_phone_array()
  {
    // phpcs:enable
    global $langs;
 
    $contact_phone = $this->contact_property_array('mobile');
 
    if (!empty($this->phone)) { // If a phone of thirdparty is defined, we add it to mobile of contacts
      if (empty($this->name)) {
        $this->name = $this->nom;
      }
      // TODO: Test if phone is not already present in contact array
      $contact_phone['thirdparty'] = $langs->transnoentitiesnoconv("ThirdParty").': '.dol_trunc($this->name, 16)." <".$this->phone.">";
    }
    return $contact_phone;
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function contact_property_array($mode = 'email', $hidedisabled = 0)
  {
    // phpcs:enable
    global $langs;
 
    $contact_property = array();
 
 
    $sql = "SELECT rowid, email, statut as status, phone_mobile, lastname, poste, firstname";
    $sql .= " FROM ".MAIN_DB_PREFIX."socpeople";
    $sql .= " WHERE fk_soc = ".((int) $this->id);
    $sql .= " AND entity IN (".getEntity($this->element).")";
    $sql .= " ORDER BY lastname, firstname";
 
    $resql = $this->db->query($sql);
    if ($resql) {
      $nump = $this->db->num_rows($resql);
      if ($nump) {
        $sepa = "(";
        $sepb = ")";
        if ($mode == 'email') {
          //$sepa="&lt;"; $sepb="&gt;";
          $sepa = "<";
          $sepb = ">";
        }
        $i = 0;
        while ($i < $nump) {
          $obj = $this->db->fetch_object($resql);
          if ($mode == 'email') {
            $property = $obj->email;
          } elseif ($mode == 'mobile') {
            $property = $obj->phone_mobile;
          } else {
            $property = $obj->$mode;
          }
 
          // Show all contact. If hidedisabled is 1, showonly contacts with status = 1
          if ($obj->status == 1 || empty($hidedisabled)) {
            if (empty($property)) {
              if ($mode == 'email') {
                $property = $langs->transnoentitiesnoconv("NoEMail");
              } elseif ($mode == 'mobile') {
                $property = $langs->transnoentitiesnoconv("NoMobilePhone");
              }
            }
 
            if (!empty($obj->poste)) {
              $contact_property[$obj->rowid] = trim(dolGetFirstLastname($obj->firstname, $obj->lastname)).($obj->poste ? " - ".$obj->poste : "").(($mode != 'poste' && $property) ? " ".$sepa.$property.$sepb : '');
            } else {
              $contact_property[$obj->rowid] = trim(dolGetFirstLastname($obj->firstname, $obj->lastname)).(($mode != 'poste' && $property) ? " ".$sepa.$property.$sepb : '');
            }
          }
          $i++;
        }
      }
    } else {
      dol_print_error($this->db);
    }
    return $contact_property;
  }
 
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function contact_array()
  {
    // phpcs:enable
    $contacts = array();
 
    $sql = "SELECT rowid, lastname, firstname FROM ".MAIN_DB_PREFIX."socpeople WHERE fk_soc = ".((int) $this->id);
    $resql = $this->db->query($sql);
    if ($resql) {
      $nump = $this->db->num_rows($resql);
      if ($nump) {
        $i = 0;
        while ($i < $nump) {
          $obj = $this->db->fetch_object($resql);
          $contacts[$obj->rowid] = dolGetFirstLastname($obj->firstname, $obj->lastname);
          $i++;
        }
      }
    } else {
      dol_print_error($this->db);
    }
    return $contacts;
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function contact_array_objects()
  {
    // phpcs:enable
    require_once DOL_DOCUMENT_ROOT.'/contact/class/contact.class.php';
    $contacts = array();
 
    $sql = "SELECT rowid FROM ".MAIN_DB_PREFIX."socpeople WHERE fk_soc = ".((int) $this->id);
    $resql = $this->db->query($sql);
    if ($resql) {
      $nump = $this->db->num_rows($resql);
      if ($nump) {
        $i = 0;
        while ($i < $nump) {
          $obj = $this->db->fetch_object($resql);
          $contact = new Contact($this->db);
          $contact->fetch($obj->rowid);
          $contacts[] = $contact;
          $i++;
        }
      }
    } else {
      dol_print_error($this->db);
    }
    return $contacts;
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function contact_get_property($rowid, $mode)
  {
    // phpcs:enable
    $contact_property = '';
 
    if (empty($rowid)) {
      return '';
    }
 
    $sql = "SELECT rowid, email, phone_mobile, lastname, firstname";
    $sql .= " FROM ".MAIN_DB_PREFIX."socpeople";
    $sql .= " WHERE rowid = ".((int) $rowid);
 
    $resql = $this->db->query($sql);
    if ($resql) {
      $nump = $this->db->num_rows($resql);
 
      if ($nump) {
        $obj = $this->db->fetch_object($resql);
 
        if ($mode == 'email') {
          $contact_property = dol_string_nospecial(dolGetFirstLastname($obj->firstname, $obj->lastname), ' ', array(","))." <".$obj->email.">";
        } elseif ($mode == 'mobile') {
          $contact_property = $obj->phone_mobile;
        }
      }
      return $contact_property;
    } else {
      dol_print_error($this->db);
    }
 
    return '';
  }
 
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function display_rib($mode = 'label')
  {
    // phpcs:enable
    require_once DOL_DOCUMENT_ROOT.'/societe/class/companybankaccount.class.php';
 
    $bac = new CompanyBankAccount($this->db);
    // @phan-suppress-next-line PhanPluginSuspiciousParamPosition
    $bac->fetch(0, '', $this->id);
 
    if ($bac->id > 0) {   // If a bank account has been found for company $this->id
      if ($mode == 'label') {
        return $bac->getRibLabel(true);
      } elseif ($mode == 'rum') {
        if (empty($bac->rum)) {
          require_once DOL_DOCUMENT_ROOT.'/compta/prelevement/class/bonprelevement.class.php';
          $prelevement = new BonPrelevement($this->db);
          $bac->fetch_thirdparty();
          $bac->rum = $prelevement->buildRumNumber($bac->thirdparty->code_client, $bac->datec, (string) $bac->id);
        }
        return $bac->rum;
      } elseif ($mode == 'format') {
        return $bac->frstrecur;
      } else {
        return 'BadParameterToFunctionDisplayRib';
      }
    } else {
      return '';
    }
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function get_all_rib()
  {
    // phpcs:enable
    require_once DOL_DOCUMENT_ROOT.'/societe/class/companybankaccount.class.php';
    $sql = "SELECT rowid FROM ".MAIN_DB_PREFIX."societe_rib WHERE type = 'ban' AND fk_soc = ".((int) $this->id);
    $result = $this->db->query($sql);
    if (!$result) {
      $this->error = $this->db->lasterror();
      $this->errors[] = $this->db->lasterror();
      return 0;
    } else {
      $num_rows = $this->db->num_rows($result);
      $rib_array = array();
      if ($num_rows) {
        while ($obj = $this->db->fetch_object($result)) {
          $rib = new CompanyBankAccount($this->db);
          $rib->fetch($obj->rowid);
          $rib_array[] = $rib;
        }
      }
      return $rib_array;
    }
  }
 
  public function getDefaultRib()
  {
    // phpcs:enable
    require_once DOL_DOCUMENT_ROOT.'/societe/class/companybankaccount.class.php';
    $sql = "SELECT rowid FROM ".MAIN_DB_PREFIX."societe_rib WHERE type = 'ban' AND default_rib = 1 AND fk_soc = ". (int) $this->id;
    $resql = $this->db->query($sql);
    if (!$resql) {
      $this->error = $this->db->lasterror();
      $this->errors[] = $this->db->lasterror();
      return -1;
    } else {
      $num_rows = $this->db->num_rows($resql);
      $rib_array = array();
      if ($num_rows) {
        while ($obj = $this->db->fetch_object($resql)) {
          return $obj->rowid;
        }
      }
      return 0;
    }
  }
 
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function get_codeclient($objsoc = null, $type = 0)
  {
    // phpcs:enable
    global $conf;
    if (getDolGlobalString('SOCIETE_CODECLIENT_ADDON')) {
      $module = getDolGlobalString('SOCIETE_CODECLIENT_ADDON');
 
      $dirsociete = array_merge(array('/core/modules/societe/'), $conf->modules_parts['societe']);
      foreach ($dirsociete as $dirroot) {
        $res = dol_include_once($dirroot.$module.'.php');
        if ($res) {
          break;
        }
      }
      $mod = new $module($this->db);
      '@phan-var-force ModeleThirdPartyCode $mod';
 
      $this->code_client = $mod->getNextValue($objsoc, $type);
      $this->prefixCustomerIsRequired = $mod->prefixIsRequired;
 
      dol_syslog(get_class($this)."::get_codeclient code_client=".$this->code_client." module=".$module);
    }
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function get_codefournisseur($objsoc = null, $type = 1)
  {
    // phpcs:enable
    global $conf;
    if (getDolGlobalString('SOCIETE_CODECLIENT_ADDON')) {
      $module = getDolGlobalString('SOCIETE_CODECLIENT_ADDON');
 
      $dirsociete = array_merge(array('/core/modules/societe/'), $conf->modules_parts['societe']);
      foreach ($dirsociete as $dirroot) {
        $res = dol_include_once($dirroot.$module.'.php');
        if ($res) {
          break;
        }
      }
      $mod = new $module($this->db);
      '@phan-var-force ModeleThirdPartyCode $mod';
 
      $this->code_fournisseur = $mod->getNextValue($objsoc, $type);
 
      dol_syslog(get_class($this)."::get_codefournisseur code_fournisseur=".$this->code_fournisseur." module=".$module);
    }
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function codeclient_modifiable()
  {
    // phpcs:enable
    global $conf;
    if (getDolGlobalString('SOCIETE_CODECLIENT_ADDON')) {
      $module = getDolGlobalString('SOCIETE_CODECLIENT_ADDON');
 
      $dirsociete = array_merge(array('/core/modules/societe/'), $conf->modules_parts['societe']);
      foreach ($dirsociete as $dirroot) {
        $res = dol_include_once($dirroot.$module.'.php');
        if ($res) {
          break;
        }
      }
 
      $mod = new $module($this->db);
      '@phan-var-force ModeleThirdPartyCode $mod';
 
      dol_syslog(get_class($this)."::codeclient_modifiable code_client=".$this->code_client." module=".$module);
      if ($mod->code_modifiable_null && !$this->code_client) {
        return 1;
      }
      if ($mod->code_modifiable_invalide && $this->check_codeclient() < 0) {
        return 1;
      }
      if ($mod->code_modifiable) {
        return 1; // To be put last
      }
      return 0;
    } else {
      return 0;
    }
  }
 
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function codefournisseur_modifiable()
  {
    // phpcs:enable
    global $conf;
    if (getDolGlobalString('SOCIETE_CODECLIENT_ADDON')) {
      $module = getDolGlobalString('SOCIETE_CODECLIENT_ADDON');
 
      $dirsociete = array_merge(array('/core/modules/societe/'), $conf->modules_parts['societe']);
      foreach ($dirsociete as $dirroot) {
        $res = dol_include_once($dirroot.$module.'.php');
        if ($res) {
          break;
        }
      }
 
      $mod = new $module($this->db);
      '@phan-var-force ModeleThirdPartyCode $mod';
 
      dol_syslog(get_class($this)."::codefournisseur_modifiable code_founisseur=".$this->code_fournisseur." module=".$module);
      if ($mod->code_modifiable_null && !$this->code_fournisseur) {
        return 1;
      }
      if ($mod->code_modifiable_invalide && $this->check_codefournisseur() < 0) {
        return 1;
      }
      if ($mod->code_modifiable) {
        return 1; // To be put last
      }
      return 0;
    } else {
      return 0;
    }
  }
 
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function check_codeclient()
  {
    // phpcs:enable
    global $conf;
    if (getDolGlobalString('SOCIETE_CODECLIENT_ADDON')) {
      $module = getDolGlobalString('SOCIETE_CODECLIENT_ADDON');
 
      $dirsociete = array_merge(array('/core/modules/societe/'), $conf->modules_parts['societe']);
      foreach ($dirsociete as $dirroot) {
        $res = dol_include_once($dirroot.$module.'.php');
        if ($res) {
          break;
        }
      }
 
      $mod = new $module($this->db);
      '@phan-var-force ModeleThirdPartyCode $mod';
 
      dol_syslog(get_class($this)."::check_codeclient code_client=".$this->code_client." module=".$module);
      $result = $mod->verif($this->db, $this->code_client, $this, 0);
      if ($result) {  // If error
        $this->error = $mod->error;
        $this->errors = $mod->errors;
      }
      return $result;
    } else {
      return 0;
    }
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function check_codefournisseur()
  {
    // phpcs:enable
    global $conf;
    if (getDolGlobalString('SOCIETE_CODECLIENT_ADDON')) {
      $module = getDolGlobalString('SOCIETE_CODECLIENT_ADDON');
 
      $dirsociete = array_merge(array('/core/modules/societe/'), $conf->modules_parts['societe']);
      foreach ($dirsociete as $dirroot) {
        $res = dol_include_once($dirroot.$module.'.php');
        if ($res) {
          break;
        }
      }
 
      $mod = new $module($this->db);
      '@phan-var-force ModeleThirdPartyCode $mod';
 
      dol_syslog(get_class($this)."::check_codefournisseur code_fournisseur=".$this->code_fournisseur." module=".$module);
      $result = $mod->verif($this->db, $this->code_fournisseur, $this, 1);
      if ($result) {  // If error
        $this->error = $mod->error;
        $this->errors = $mod->errors;
      }
      return $result;
    } else {
      return 0;
    }
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function get_codecompta($type)
  {
    // phpcs:enable
    global $conf;
 
    if (getDolGlobalString('SOCIETE_CODECOMPTA_ADDON')) {
      $module = getDolGlobalString('SOCIETE_CODECOMPTA_ADDON');
      $res = false;
      $dirsociete = array_merge(array('/core/modules/societe/'), $conf->modules_parts['societe']);
      foreach ($dirsociete as $dirroot) {
        $res = dol_include_once($dirroot.$module.'.php');
        if ($res) {
          break;
        }
      }
 
      if ($res) {
        $mod = new $module();
        '@phan-var-force ModeleAccountancyCode $mod';
 
        // Set code count in $mod->code
        $result = $mod->get_code($this->db, $this, $type);
 
        if ($type == 'customer') {
          $this->code_compta_client = $mod->code;
        } elseif ($type == 'supplier') {
          $this->code_compta_fournisseur = $mod->code;
        }
 
        return $result;
      } else {
        $this->error = 'ErrorAccountancyCodeNotDefined';
        return -1;
      }
    } else {
      if ($type == 'customer') {
        $this->code_compta_client = '';
      } elseif ($type == 'supplier') {
        $this->code_compta_fournisseur = '';
      }
 
      return 0;
    }
  }
 
  public function setParent($id)
  {
    dol_syslog(get_class($this).'::setParent', LOG_DEBUG);
 
    if ($this->id) {
      // Check if the id we want to add as parent has not already one parent that is the current id we try to update
      if ($id > 0) {
        $sameparent = $this->validateFamilyTree($id, $this->id, 0);
        if ($sameparent < 0) {
          return -1;
        }
        if ($sameparent == 1) {
          setEventMessages('ParentCompanyToAddIsAlreadyAChildOfModifiedCompany', null, 'warnings');
          return -1;
        }
      }
 
      $sql = 'UPDATE '.MAIN_DB_PREFIX.'societe SET parent = '.($id > 0 ? ((int) $id) : 'null').' WHERE rowid = '.((int) $this->id);
 
      $resql = $this->db->query($sql);
      if ($resql) {
        $this->parent = $id;
        return 1;
      } else {
        return -1;
      }
    }
 
    return -1;
  }
 
  public function validateFamilyTree($idparent, $idchild, $counter = 0)
  {
    if ($counter > 100) {
      dol_syslog("Too high level of parent - child for company. May be an infinite loop ?", LOG_WARNING);
    }
 
    $sql = 'SELECT s.parent';
    $sql .= ' FROM '.MAIN_DB_PREFIX.'societe as s';
    $sql .= ' WHERE rowid = '.((int) $idparent);
    $resql = $this->db->query($sql);
    if ($resql) {
      $obj  = $this->db->fetch_object($resql);
 
      if ($obj->parent == '') {
        return 0;
      } elseif ($obj->parent == $idchild) {
        return 1;
      } else {
        $sameparent = $this->validateFamilyTree($obj->parent, $idchild, ($counter + 1));
      }
      return $sameparent;
    } else {
      return -1;
    }
  }
 
  public function getParentsForCompany($company_id, $parents = array())
  {
    global $langs;
 
    if ($company_id > 0) {
      $sql = "SELECT parent FROM " . MAIN_DB_PREFIX . "societe WHERE rowid = ".((int) $company_id);
      $resql = $this->db->query($sql);
      if ($resql) {
        if ($obj = $this->db->fetch_object($resql)) {
          $parent = $obj->parent;
          if ($parent > 0 && !in_array($parent, $parents)) {
            $parents[] = $parent;
            return $this->getParentsForCompany($parent, $parents);
          } else {
            return $parents;
          }
        }
        $this->db->free($resql);
      } else {
        setEventMessage($langs->trans('GetCompanyParentsError', $this->db->lasterror()), 'errors');
      }
    }
    // Return a default value when $company_id is not greater than 0
    return array();
  }
 
  public function getChildrenForCompany($company_id)
  {
    global $langs;
 
    $children = array();
    if ($company_id > 0) {
      $sql = "SELECT rowid FROM " . MAIN_DB_PREFIX . "societe WHERE parent = ".((int) $company_id);
      $resql = $this->db->query($sql);
      if ($resql) {
        while ($obj = $this->db->fetch_object($resql)) {
          $child = $obj->rowid;
          if ($child > 0 && !in_array($child, $children)) {
            $children[] = $child;
          }
        }
        $this->db->free($resql);
      } else {
        setEventMessage($this->db->lasterror(), 'errors');
      }
    }
    // Return a default value when $company_id is not greater than 0
    return $children;
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function id_prof_verifiable($idprof)
  {
    // phpcs:enable
    global $conf;
 
    switch ($idprof) {
      case 1:
        $ret = getDolGlobalBool('SOCIETE_IDPROF1_UNIQUE');
        break;
      case 2:
        $ret = getDolGlobalBool('SOCIETE_IDPROF2_UNIQUE');
        break;
      case 3:
        $ret = getDolGlobalBool('SOCIETE_IDPROF3_UNIQUE');
        break;
      case 4:
        $ret = getDolGlobalBool('SOCIETE_IDPROF4_UNIQUE');
        break;
      case 5:
        $ret = getDolGlobalBool('SOCIETE_IDPROF5_UNIQUE');
        break;
      case 6:
        $ret = getDolGlobalBool('SOCIETE_IDPROF6_UNIQUE');
        break;
      default:
        $ret = false;
    }
 
    return $ret;
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function id_prof_exists($idprof, $value, $socid = 0)
  {
    // phpcs:enable
    $field = $idprof;
 
    switch ($idprof) {  // For backward compatibility
      case '1':
      case 'idprof1':
        $field = "siren";
        break;
      case '2':
      case 'idprof2':
        $field = "siret";
        break;
      case '3':
      case 'idprof3':
        $field = "ape";
        break;
      case '4':
      case 'idprof4':
        $field = "idprof4";
        break;
      case '5':
        $field = "idprof5";
        break;
      case '6':
        $field = "idprof6";
        break;
    }
 
    //Verify duplicate entries
    $sql = "SELECT COUNT(*) as nb FROM ".MAIN_DB_PREFIX."societe WHERE ".$field." = '".$this->db->escape($value)."' AND entity IN (".getEntity('societe').")";
    if ($socid) {
      $sql .= " AND rowid <> ".((int) $socid);
    }
    $resql = $this->db->query($sql);
    if ($resql) {
      $obj = $this->db->fetch_object($resql);
      $count = $obj->nb;
    } else {
      $count = 0;
      print $this->db->error();
    }
    $this->db->free($resql);
 
    if ($count > 0) {
      return true;
    } else {
      return false;
    }
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function id_prof_check($idprof)
  {
    // phpcs:enable
 
    // Load the library necessary to check the professional identifiers
    require_once DOL_DOCUMENT_ROOT.'/core/lib/profid.lib.php';
 
    return isValidProfIds($idprof, $this);
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function id_prof_url($idprof, $thirdparty)
  {
    // phpcs:enable
    global $langs, $hookmanager;
 
    $url = '';
    $action = '';
 
    $hookmanager->initHooks(array('idprofurl'));
    $parameters = array('idprof' => $idprof, 'company' => $thirdparty);
    $reshook = $hookmanager->executeHooks('getIdProfUrl', $parameters, $this, $action); // Note that $action and $object may have been modified by some hooks
    if (empty($reshook)) {
      if (getDolGlobalString('MAIN_DISABLEPROFIDRULES')) {
        return '';
      }
 
      // TODO Move links to validate professional ID into the dictionary table "country" + column "linkidprof1"
      $strippedIdProf1 = str_replace(' ', '', $thirdparty->idprof1);
      if ($idprof == 1 && $thirdparty->country_code == 'FR') {
        $url = 'https://annuaire-entreprises.data.gouv.fr/entreprise/'.urlencode($strippedIdProf1); // See also http://avis-situation-sirene.insee.fr/
      }
      if ($idprof == 1 && ($thirdparty->country_code == 'GB' || $thirdparty->country_code == 'UK')) {
        $url = 'https://beta.companieshouse.gov.uk/company/'.urlencode($strippedIdProf1);
      }
      if ($idprof == 1 && $thirdparty->country_code == 'ES') {
        $url = 'http://www.e-informa.es/servlet/app/portal/ENTP/screen/SProducto/prod/ETIQUETA_EMPRESA/nif/'.urlencode($strippedIdProf1);
      }
      if ($idprof == 1 && $thirdparty->country_code == 'IN') {
        $url = 'http://www.tinxsys.com/TinxsysInternetWeb/dealerControllerServlet?tinNumber='.urlencode($strippedIdProf1).';&searchBy=TIN&backPage=searchByTin_Inter.jsp';
      }
      if ($idprof == 1 && $thirdparty->country_code == 'DZ') {
        $url = 'http://nif.mfdgi.gov.dz/nif.asp?Nif='.urlencode($strippedIdProf1);
      }
      if ($idprof == 1 && $thirdparty->country_code == 'PT') {
        $url = 'http://www.nif.pt/'.urlencode($strippedIdProf1);
      }
 
      if ($url) {
        return '<a target="_blank" rel="noopener noreferrer" href="'.$url.'">'.$langs->trans("Check").'</a>';
      }
    } else {
      return $hookmanager->resPrint;
    }
 
    return '';
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function has_projects()
  {
    // phpcs:enable
    $sql = "SELECT COUNT(*) as numproj FROM ".MAIN_DB_PREFIX."projet WHERE fk_soc = ".((int) $this->id);
    $resql = $this->db->query($sql);
    if ($resql) {
      $obj = $this->db->fetch_object($resql);
      $count = $obj->numproj;
    } else {
      $count = 0;
      print $this->db->error();
    }
    $this->db->free($resql);
    return ($count > 0);
  }
 
 
  public function info($id)
  {
    $sql = "SELECT s.rowid, s.nom as name, s.datec, GREATEST(s.tms, sef.tms) as datem,";
    $sql .= " fk_user_creat, fk_user_modif";
    $sql .= " FROM ".MAIN_DB_PREFIX."societe as s";
    $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."societe_extrafields as sef ON sef.fk_object=s.rowid";
    $sql .= " WHERE s.rowid = ".((int) $id);
 
    $result = $this->db->query($sql);
    if ($result) {
      if ($this->db->num_rows($result)) {
        $obj = $this->db->fetch_object($result);
 
        $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 = empty($obj->datem) ? '' : $this->db->jdate($obj->datem);
 
        $this->ref = $obj->name;
      }
 
      $this->db->free($result);
    } else {
      dol_print_error($this->db);
    }
  }
 
  public function isACompany()
  {
    // Define if third party is treated as company (or not) when nature is unknown
    //$defaultvalue = in_array($mysoc->country_code, array('FR')) ? 0 : 1;  // TODO On old version, default was 1 for everybody, move this to defaultvalue = 0 for everybody
    $defaultvalue = 0;
    $isACompany = getDolGlobalInt('MAIN_UNKNOWN_CUSTOMERS_ARE_COMPANIES', $defaultvalue);
 
    // Now try to guess using different tips
    if (!empty($this->tva_intra)) {
      $isACompany = 2;
    } elseif (!empty($this->idprof1) || !empty($this->idprof2) || !empty($this->idprof3) || !empty($this->idprof4) || !empty($this->idprof5) || !empty($this->idprof6) || !empty($this->euid)) {
      $isACompany = 3;
    } else {
      if (!getDolGlobalString('MAIN_CUSTOMERS_ARE_COMPANIES_EVEN_IF_SET_AS_INDIVIDUAL')) {  // never or rarely set
        if (preg_match('/^TE_PRIVATE/', $this->typent_code)) {  // TODO Add a field is_a_company into dictionary
          $isACompany = 0;
        }
      } else {
        $isACompany = 4;
      }
    }
 
    return $isACompany;
  }
 
  public function isInEEC()
  {
    require_once DOL_DOCUMENT_ROOT.'/core/lib/company.lib.php';
    return isInEEC($this);
  }
 
  public function isInSEPA()
  {
    require_once DOL_DOCUMENT_ROOT.'/core/lib/company.lib.php';
    return isInSEPA($this);
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function LoadSupplierCateg()
  {
    // phpcs:enable
    $this->SupplierCategories = array();
    $sql = "SELECT rowid, label";
    $sql .= " FROM ".MAIN_DB_PREFIX."categorie";
    $sql .= " WHERE type = ".Categorie::TYPE_SUPPLIER;
 
    $resql = $this->db->query($sql);
    if ($resql) {
      while ($obj = $this->db->fetch_object($resql)) {
        $this->SupplierCategories[$obj->rowid] = $obj->label;
      }
      return 0;
    } else {
      return -1;
    }
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function AddFournisseurInCategory($categorie_id)
  {
    // phpcs:enable
    if ($categorie_id > 0 && $this->id > 0) {
      $sql = "INSERT INTO ".MAIN_DB_PREFIX."categorie_fournisseur (fk_categorie, fk_soc) ";
      $sql .= " VALUES (".((int) $categorie_id).", ".((int) $this->id).")";
 
      if ($resql = $this->db->query($sql)) {
        return 0;
      }
    } else {
      return 0;
    }
    return -1;
  }
 
  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 setNoEmail($no_email, $unsubscribegroup = '')
  {
    $error = 0;
 
    // Update mass emailing flag into table mailing_unsubscribe
    if ($this->email) {
      $this->db->begin();
 
      if ($no_email) {
        // TODO Add $unsubscribegroup
        $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)) {
            // TODO Add $unsubscribegroup
            $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 {
        // TODO Add $unsubscribegroup
        $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;
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function create_from_member(Adherent $member, $socname = '', $socalias = '', $customercode = '')
  {
    // phpcs:enable
    global $user, $langs;
 
    dol_syslog(get_class($this)."::create_from_member", LOG_DEBUG);
    $fullname = $member->getFullName($langs);
 
    if ($member->morphy == 'mor') {
      if (empty($socname)) {
        $socname = $member->company ? $member->company : $member->societe;
      }
      if (!empty($fullname) && empty($socalias)) {
        $socalias = $fullname;
      }
    } elseif (empty($socname) && $member->morphy == 'phy') {
      if (empty($socname)) {
        $socname = $fullname;
      }
      if (!empty($member->company) && empty($socalias)) {
        $socalias = $member->company;
      }
    }
 
    $name = (string) $socname;
    $alias = $socalias ? $socalias : '';
 
    // Positionne parameters
    $this->nom = $name; // TODO deprecated
    $this->name = $name;
    $this->name_alias = $alias;
    $this->address = $member->address;
    $this->zip = $member->zip;
    $this->town = $member->town;
    $this->country_code = $member->country_code;
    $this->country_id = $member->country_id;
    $this->phone = $member->phone; // Prof phone
    $this->email = $member->email;
    $this->socialnetworks = $member->socialnetworks;
    $this->entity = $member->entity;
 
    $this->client = 1; // A member is a customer by default
    if (getDolGlobalString('THIRDPARTY_CUSTOMERCODE_EQUALS_MEMBERREF')) {
      $this->code_client = $member->ref; // set Customer Code equal to existing Member Reference
    } else {
      $this->code_client = ($customercode ? $customercode : -1); // set new auto-incremented Customer Code
    }
    $this->code_fournisseur = '-1';
    $this->typent_code = ($member->morphy == 'phy' ? 'TE_PRIVATE' : 0);
    $this->typent_id = $this->typent_code ? dol_getIdFromCode($this->db, $this->typent_code, 'c_typent', 'id', 'code') : 0;
 
    $this->db->begin();
 
    // Creates and positions $this->id
    $result = $this->create($user);
 
    if ($result >= 0) {
      // Auto-create contact on thirdparty creation
      if (getDolGlobalString('THIRDPARTY_DEFAULT_CREATE_CONTACT')) {
        // Fill fields needed by contact
        $this->name_bis = $member->lastname;
        $this->firstname = $member->firstname;
        $this->civility_id = (empty($member->civility_code) ? $member->civility_id : $member->civility_code);
        $this->civility_code = (empty($member->civility_code) ? $member->civility_id : $member->civility_code);
 
        dol_syslog("We ask to create a contact/address too", LOG_DEBUG);
        $result = $this->create_individual($user);
 
        if ($result < 0) {
          setEventMessages($this->error, $this->errors, 'errors');
          $this->db->rollback();
          return -1;
        }
      }
 
      $sql = "UPDATE ".MAIN_DB_PREFIX."adherent";
      $sql .= " SET fk_soc = ".((int) $this->id);
      $sql .= " WHERE rowid = ".((int) $member->id);
 
      $resql = $this->db->query($sql);
      if ($resql) {
        $this->db->commit();
        return $this->id;
      } else {
        $this->error = $this->db->error();
 
        $this->db->rollback();
        return -1;
      }
    } else {
      // $this->error already positioned
      dol_syslog(get_class($this)."::create_from_member - 2 - ".$this->error." - ".implode(',', $this->errors), LOG_ERR);
 
      $this->db->rollback();
      return $result;
    }
  }
 
  public function setMysoc(Conf $conf)
  {
    global $langs;
 
    $this->id = 0;
    $this->entity = $conf->entity;
    $this->name = getDolGlobalString('MAIN_INFO_SOCIETE_NOM');
    $this->nom = $this->name; // deprecated
    $this->address = getDolGlobalString('MAIN_INFO_SOCIETE_ADDRESS');
    $this->zip = getDolGlobalString('MAIN_INFO_SOCIETE_ZIP');
    $this->town = getDolGlobalString('MAIN_INFO_SOCIETE_TOWN');
    $this->region_code = getDolGlobalString('MAIN_INFO_SOCIETE_REGION');
 
    $this->currency_code = getDolGlobalString('MAIN_MONNAIE');
 
    $this->socialobject = getDolGlobalString('MAIN_INFO_SOCIETE_OBJECT');
 
    $this->note_private = getDolGlobalString('MAIN_INFO_SOCIETE_NOTE');
 
    // We define country_id, country_code and country
    $country_id = 0;
    $country_code = $country_label = '';
    if (getDolGlobalString('MAIN_INFO_SOCIETE_COUNTRY')) {
      $tmp = explode(':', getDolGlobalString('MAIN_INFO_SOCIETE_COUNTRY'));
      $country_id =  (is_numeric($tmp[0])) ? (int) $tmp[0] : 0;
      if (!empty($tmp[1]) && !empty($tmp[2])) {   // MAIN_INFO_SOCIETE_COUNTRY is the canonical "id:code:label"
        $country_code = $tmp[1];
        $country_label = $tmp[2];
      } elseif ($country_id > 0) {
        // For backward compatibility. The value is "id" only, or a legacy "id:label" where the
        // second token is a country label (e.g. 'Suisse') and not an ISO code. In both cases we
        // must not keep a label in country_code (it would break code-based lookups like VAT rates),
        // so we rebuild code and label from the authoritative country id.
        dol_syslog("Your country setup use an old syntax. Reedit it using setup area.", LOG_WARNING);
        include_once DOL_DOCUMENT_ROOT.'/core/lib/company.lib.php';
        $country_code = getCountry($country_id, '2', $this->db); // This need a SQL request, but it's the old feature that should not be used anymore
        $country_label = getCountry($country_id, '', $this->db); // This need a SQL request, but it's the old feature that should not be used anymore
      }
    }
    $this->country_id = $country_id;
    $this->country_code = $country_code;
    $this->country = $country_label;
    if (is_object($langs)) {
      $this->country = ($langs->trans('Country'.$country_code) != 'Country'.$country_code) ? $langs->trans('Country'.$country_code) : $country_label;
    }
 
    //TODO This could be replicated for region but function `getRegion` didn't exist, so I didn't added it.
    // We define state_id, state_code and state
    $state_id = 0;
    $state_code = '';
    $state_label = '';
    if (getDolGlobalString('MAIN_INFO_SOCIETE_STATE')) {
      $tmp = explode(':', getDolGlobalString('MAIN_INFO_SOCIETE_STATE'));
      $state_id = (int) $tmp[0];
      if (!empty($tmp[1])) {   // If $conf->global->MAIN_INFO_SOCIETE_STATE is "id:code:label"
        $state_code = $tmp[1];
        $state_label = $tmp[2];
      } else { // For backward compatibility
        dol_syslog("Your setup of State has an old syntax (entity=".$conf->entity."). Go in Home - Setup - Organization then Save should remove this error.", LOG_ERR);
        include_once DOL_DOCUMENT_ROOT.'/core/lib/company.lib.php';
        $state_code = getState($state_id, '2', $this->db); // This need a SQL request, but it's the old feature that should not be used anymore
        $state_label = getState($state_id, '0', $this->db); // This need a SQL request, but it's the old feature that should not be used anymore
      }
    }
    $this->state_id = $state_id;
    $this->state_code = $state_code;
    $this->state = $state_label;
    if (is_object($langs)) {
      $this->state = ($langs->trans('State'.$state_code) != 'State'.$state_code) ? $langs->trans('State'.$state_code) : $state_label;
    }
 
    $this->phone = getDolGlobalString('MAIN_INFO_SOCIETE_TEL');
    $this->phone_mobile = getDolGlobalString('MAIN_INFO_SOCIETE_MOBILE');
    $this->fax = getDolGlobalString('MAIN_INFO_SOCIETE_FAX');
    $this->url = getDolGlobalString('MAIN_INFO_SOCIETE_WEB');
 
    // Social networks
    $facebook_url = getDolGlobalString('MAIN_INFO_SOCIETE_FACEBOOK_URL');
    $twitter_url = getDolGlobalString('MAIN_INFO_SOCIETE_TWITTER_URL');
    $linkedin_url = getDolGlobalString('MAIN_INFO_SOCIETE_LINKEDIN_URL');
    $instagram_url = getDolGlobalString('MAIN_INFO_SOCIETE_INSTAGRAM_URL');
    $youtube_url = getDolGlobalString('MAIN_INFO_SOCIETE_YOUTUBE_URL');
    $github_url = getDolGlobalString('MAIN_INFO_SOCIETE_GITHUB_URL');
    $this->socialnetworks = array();
    if (!empty($facebook_url)) {
      $this->socialnetworks['facebook'] = $facebook_url;
    }
    if (!empty($twitter_url)) {
      $this->socialnetworks['twitter'] = $twitter_url;
    }
    if (!empty($linkedin_url)) {
      $this->socialnetworks['linkedin'] = $linkedin_url;
    }
    if (!empty($instagram_url)) {
      $this->socialnetworks['instagram'] = $instagram_url;
    }
    if (!empty($youtube_url)) {
      $this->socialnetworks['youtube'] = $youtube_url;
    }
    if (!empty($github_url)) {
      $this->socialnetworks['github'] = $github_url;
    }
 
    // Id prof generic
    $this->idprof1 = getDolGlobalString('MAIN_INFO_SIREN');
    $this->idprof2 = getDolGlobalString('MAIN_INFO_SIRET');
    $this->idprof3 = getDolGlobalString('MAIN_INFO_APE');
    $this->idprof4 = getDolGlobalString('MAIN_INFO_RCS');
    $this->idprof5 = getDolGlobalString('MAIN_INFO_PROFID5');
    $this->idprof6 = getDolGlobalString('MAIN_INFO_PROFID6');
    $this->idprof7 = getDolGlobalString('MAIN_INFO_PROFID7');
    $this->idprof8 = getDolGlobalString('MAIN_INFO_PROFID8');
    $this->idprof9 = getDolGlobalString('MAIN_INFO_PROFID9');
    $this->idprof10 = getDolGlobalString('MAIN_INFO_PROFID10');
    $this->tva_intra = getDolGlobalString('MAIN_INFO_TVAINTRA'); // VAT number, not necessarily INTRA.
    $this->euid = getDolGlobalString('MAIN_INFO_EUID');
    $this->managers = getDolGlobalString('MAIN_INFO_SOCIETE_MANAGERS');
    $this->capital = is_numeric(price2num(getDolGlobalString('MAIN_INFO_CAPITAL'))) ? (float) price2num(getDolGlobalString('MAIN_INFO_CAPITAL')) : null;
    $this->forme_juridique_code = getDolGlobalInt('MAIN_INFO_SOCIETE_FORME_JURIDIQUE');
    $this->email = getDolGlobalString('MAIN_INFO_SOCIETE_MAIL');
    $this->default_lang = getDolGlobalString('MAIN_LANG_DEFAULT', 'auto');
    $this->logo = getDolGlobalString('MAIN_INFO_SOCIETE_LOGO');
    $this->logo_small = getDolGlobalString('MAIN_INFO_SOCIETE_LOGO_SMALL');
    $this->logo_mini = getDolGlobalString('MAIN_INFO_SOCIETE_LOGO_MINI');
    $this->logo_squarred = getDolGlobalString('MAIN_INFO_SOCIETE_LOGO_SQUARRED');
    $this->logo_squarred_small = getDolGlobalString('MAIN_INFO_SOCIETE_LOGO_SQUARRED_SMALL');
    $this->logo_squarred_mini = getDolGlobalString('MAIN_INFO_SOCIETE_LOGO_SQUARRED_MINI');
 
    // Define if company use vat or not
    $this->tva_assuj = getDolGlobalInt('FACTURE_TVAOPTION');
 
    // Define if company use local taxes
    $this->localtax1_assuj = ((isset($conf->global->FACTURE_LOCAL_TAX1_OPTION) && (getDolGlobalString('FACTURE_LOCAL_TAX1_OPTION') == '1' || getDolGlobalString('FACTURE_LOCAL_TAX1_OPTION') == 'localtax1on')) ? 1 : 0);
    $this->localtax2_assuj = ((isset($conf->global->FACTURE_LOCAL_TAX2_OPTION) && (getDolGlobalString('FACTURE_LOCAL_TAX2_OPTION') == '1' || getDolGlobalString('FACTURE_LOCAL_TAX2_OPTION') == 'localtax2on')) ? 1 : 0);
 
    $this->termsofsale = getDolGlobalString('MAIN_INFO_SOCIETE_TERMSOFSALE');
  }
 
  public function initAsSpecimen()
  {
    $now = dol_now();
 
    // Initialize parameters
    $this->id = 0;
    $this->entity = 1;
    $this->name = 'THIRDPARTY SPECIMEN '.dol_print_date($now, 'dayhourlog');
    $this->ref_ext = 'Ref ext';
    $this->specimen = 1;
    $this->address = '21 jump street';
    $this->zip = '99999';
    $this->town = 'MyTown';
    $this->state_id = 1;
    $this->state_code = 'AA';
    $this->state = 'MyState';
    $this->country_id = 1;
    $this->country_code = 'FR';
    $this->email = 'specimen@specimen.com';
    $this->socialnetworks = array(
      'skype' => 'skypepseudo',
      'twitter' => 'twitterpseudo',
      'facebook' => 'facebookpseudo',
      'linkedin' => 'linkedinpseudo',
    );
    $this->url = 'https://www.specimen.com';
 
    $this->phone = '0909090901';
    $this->phone_mobile = '0909090901';
    $this->fax = '0909090909';
 
    $this->code_client = 'CC-'.dol_print_date($now, 'dayhourlog');
    $this->code_fournisseur = 'SC-'.dol_print_date($now, 'dayhourlog');
    $this->typent_code = 'TE_OTHER';
    $this->capital = 10000;
    $this->client = 1;
    $this->prospect = 1;
    $this->fournisseur = 1;
    $this->tva_assuj = 1;
    //$this->tva_intra = 'EU1234567';
    $this->tva_intra = 'FR1234567';
    $this->note_public = 'This is a comment (public)';
    $this->note_private = 'This is a comment (private)';
 
    $this->idprof1 = 'idprof1';
    $this->idprof2 = 'idprof2';
    $this->idprof3 = 'idprof3';
    $this->idprof4 = 'idprof4';
    $this->idprof5 = 'idprof5';
    $this->idprof6 = 'idprof6';
 
    $this->euid = 'FR-RCSXXXX-idprof1';
 
    return 1;
  }
 
  public function useLocalTax($localTaxNum = 0, $mode = 0, $thirdparty = null)
  {
    if ($mode == 1 && $thirdparty instanceof Societe) {
      if ($localTaxNum == -1) {
        return array(1 => ($thirdparty->localtax1_assuj ? true : false), 2 => ($thirdparty->localtax2_assuj ? true : false));
      } elseif ($localTaxNum == 1) {
        return $thirdparty->localtax1_assuj ? true : false;
      } elseif ($localTaxNum == 2) {
        return $thirdparty->localtax2_assuj ? true : false;
      }
      return false;
    } else {
      $sql  = "SELECT t.localtax1, t.localtax2";
      $sql .= " FROM ".MAIN_DB_PREFIX."c_tva as t, ".MAIN_DB_PREFIX."c_country as c";
      $sql .= " WHERE t.fk_pays = c.rowid AND c.code = '".$this->db->escape($this->country_code)."'";
      $sql .= " AND t.active = 1";
      $sql .= " AND t.entity IN (".getEntity('c_tva').")";
      if (empty($localTaxNum) || $localTaxNum == -1) {
        $sql .= " AND (t.localtax1_type <> '0' OR t.localtax2_type <> '0')";
      } elseif ($localTaxNum == 1) {
        $sql .= " AND t.localtax1_type <> '0'";
      } elseif ($localTaxNum == 2) {
        $sql .= " AND t.localtax2_type <> '0'";
      }
 
      $resql = $this->db->query($sql);
      if ($resql) {
        if ($localTaxNum == -1) {
          $obj = $this->db->fetch_object($resql);
          if ($obj) {
            return array(1 => ($obj->localtax1 ? true : false), 2 => ($obj->localtax2 ? true : false));
          }
          return array(1 => false, 2 => false);
        } else {
          return ($this->db->num_rows($resql) > 0);
        }
      } else {
        return false;
      }
    }
  }
 
  public function useNPR()
  {
    $sql  = "SELECT t.rowid";
    $sql .= " FROM ".MAIN_DB_PREFIX."c_tva as t, ".MAIN_DB_PREFIX."c_country as c";
    $sql .= " WHERE t.fk_pays = c.rowid AND c.code = '".$this->db->escape($this->country_code)."'";
    $sql .= " AND t.active = 1 AND t.recuperableonly = 1";
    $sql .= " AND t.entity IN (".getEntity('c_tva').")";
 
    dol_syslog("useNPR", LOG_DEBUG);
    $resql = $this->db->query($sql);
    if ($resql) {
      return ($this->db->num_rows($resql) > 0);
    } else {
      return false;
    }
  }
 
  public function useRevenueStamp()
  {
    $sql  = "SELECT COUNT(*) as nb";
    $sql .= " FROM ".MAIN_DB_PREFIX."c_revenuestamp as r, ".MAIN_DB_PREFIX."c_country as c";
    $sql .= " WHERE r.fk_pays = c.rowid AND c.code = '".$this->db->escape($this->country_code)."'";
    $sql .= " AND r.active = 1";
 
    dol_syslog("useRevenueStamp", LOG_DEBUG);
    $resql = $this->db->query($sql);
    if ($resql) {
      $obj = $this->db->fetch_object($resql);
      return ($obj->nb > 0);
    } else {
      $this->error = $this->db->lasterror();
      return false;
    }
  }
 
  public function getLibProspLevel()
  {
    return $this->LibProspLevel($this->fk_prospectlevel);
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function LibProspLevel($fk_prospectlevel)
  {
    // phpcs:enable
    global $langs;
 
    $label = '';
    if ($fk_prospectlevel != '') {
      $label = $langs->trans("ProspectLevel".$fk_prospectlevel);
      // If label is not found in language file, we get label from cache/database
      if ($label == "ProspectLevel".$fk_prospectlevel) {
        $label = $langs->getLabelFromKey($this->db, $fk_prospectlevel, 'c_prospectlevel', 'code', 'label');
      }
    }
 
    return $label;
  }
 
  public function getLibProspCommStatut($mode = 0, $label = '')
  {
    return $this->LibProspCommStatut((int) $this->stcomm_id, $mode, $label, $this->stcomm_picto);
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function LibProspCommStatut($status, $mode = 0, $label = '', $picto = '')
  {
    // phpcs:enable
    global $langs;
 
    $langs->load('customers');
 
    if ($mode == 2) {
      if ($status == '-1' || $status == 'ST_NO') {
        return img_action($langs->trans("StatusProspect-1"), '-1', $picto, 'class="inline-block valignmiddle"').' '.$langs->trans("StatusProspect-1");
      } elseif ($status == '0' || $status == 'ST_NEVER') {
        return img_action($langs->trans("StatusProspect0"), '0', $picto, 'class="inline-block valignmiddle"').' '.$langs->trans("StatusProspect0");
      } elseif ($status == '1' || $status == 'ST_TODO') {
        return img_action($langs->trans("StatusProspect1"), '1', $picto, 'class="inline-block valignmiddle"').' '.$langs->trans("StatusProspect1");
      } elseif ($status == '2' || $status == 'ST_PEND') {
        return img_action($langs->trans("StatusProspect2"), '2', $picto, 'class="inline-block valignmiddle"').' '.$langs->trans("StatusProspect2");
      } elseif ($status == '3' || $status == 'ST_DONE') {
        return img_action($langs->trans("StatusProspect3"), '3', $picto, 'class="inline-block valignmiddle"').' '.$langs->trans("StatusProspect3");
      } else {
        return img_action(($langs->trans("StatusProspect".$status) != "StatusProspect".$status) ? $langs->trans("StatusProspect".$status) : $label, '0', $picto, 'class="inline-block valignmiddle"').' '.(($langs->trans("StatusProspect".$status) != "StatusProspect".$status) ? $langs->trans("StatusProspect".$status) : $label);
      }
    } elseif ($mode == 3) {
      if ($status == '-1' || $status == 'ST_NO') {
        return img_action($langs->trans("StatusProspect-1"), '-1', $picto, 'class="inline-block valignmiddle"');
      } elseif ($status == '0' || $status == 'ST_NEVER') {
        return img_action($langs->trans("StatusProspect0"), '0', $picto, 'class="inline-block valignmiddle"');
      } elseif ($status == '1' || $status == 'ST_TODO') {
        return img_action($langs->trans("StatusProspect1"), '1', $picto, 'class="inline-block valignmiddle"');
      } elseif ($status == '2' || $status == 'ST_PEND') {
        return img_action($langs->trans("StatusProspect2"), '2', $picto, 'class="inline-block valignmiddle"');
      } elseif ($status == '3' || $status == 'ST_DONE') {
        return img_action($langs->trans("StatusProspect3"), '3', $picto, 'class="inline-block valignmiddle"');
      } else {
        return img_action(($langs->trans("StatusProspect".$status) != "StatusProspect".$status) ? $langs->trans("StatusProspect".$status) : $label, '0', $picto, 'class="inline-block valignmiddle"');
      }
    } elseif ($mode == 4) {
      if ($status == '-1' || $status == 'ST_NO') {
        return img_action($langs->trans("StatusProspect-1"), '-1', $picto, 'class="inline-block valignmiddle"').' '.$langs->trans("StatusProspect-1");
      } elseif ($status == '0' || $status == 'ST_NEVER') {
        return img_action($langs->trans("StatusProspect0"), '0', $picto, 'class="inline-block valignmiddle"').' '.$langs->trans("StatusProspect0");
      } elseif ($status == '1' || $status == 'ST_TODO') {
        return img_action($langs->trans("StatusProspect1"), '1', $picto, 'class="inline-block valignmiddle"').' '.$langs->trans("StatusProspect1");
      } elseif ($status == '2' || $status == 'ST_PEND') {
        return img_action($langs->trans("StatusProspect2"), '2', $picto, 'class="inline-block valignmiddle"').' '.$langs->trans("StatusProspect2");
      } elseif ($status == '3' || $status == 'ST_DONE') {
        return img_action($langs->trans("StatusProspect3"), '3', $picto, 'class="inline-block valignmiddle"').' '.$langs->trans("StatusProspect3");
      } else {
        return img_action(($langs->trans("StatusProspect".$status) != "StatusProspect".$status) ? $langs->trans("StatusProspect".$status) : $label, '0', $picto, 'class="inline-block valignmiddle"').' '.(($langs->trans("StatusProspect".$status) != "StatusProspect".$status) ? $langs->trans("StatusProspect".$status) : $label);
      }
    }
 
    return "Error, mode/status not found";
  }
 
  public function getOutstandingProposals($mode = 'customer')
  {
    global $hookmanager;
    $table = 'propal';
    if ($mode == 'supplier') {
      $table = 'supplier_proposal';
    }
 
    $sql  = "SELECT rowid, ref, total_ht, total_ttc, fk_statut as status FROM ".MAIN_DB_PREFIX.$table." as f";
    $sql .= " WHERE fk_soc = ".((int) $this->id);
    if ($mode == 'supplier') {
      $sql .= " AND entity IN (".getEntity('supplier_proposal').")";
    } else {
      $sql .= " AND entity IN (".getEntity('propal').")";
    }
 
    dol_syslog("getOutstandingProposals for fk_soc = ".((int) $this->id), LOG_DEBUG);
 
    // Add where from hooks
    $parameters = array('mode' => $mode, 'table' => $table);
    $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) {
      $outstandingOpened = 0;
      $outstandingTotal = 0;
      $outstandingTotalIncTax = 0;
      $arrayofref = array();
      while ($obj = $this->db->fetch_object($resql)) {
        $arrayofref[$obj->rowid] = $obj->ref;
        $outstandingTotal += $obj->total_ht;
        $outstandingTotalIncTax += $obj->total_ttc;
        if ($obj->status != 0) {
          // Not a draft
          $outstandingOpened += $obj->total_ttc;
        }
      }
      return array('opened' => $outstandingOpened, 'total_ht' => $outstandingTotal, 'total_ttc' => $outstandingTotalIncTax, 'refs' => $arrayofref); // 'opened' is 'incl taxes'
    } else {
      return array();
    }
  }
 
  public function getOutstandingOrders($mode = 'customer')
  {
    global $hookmanager;
    $table = 'commande';
    if ($mode == 'supplier') {
      $table = 'commande_fournisseur';
    }
 
    $sql  = "SELECT rowid, ref, total_ht, total_ttc, fk_statut as status FROM ".MAIN_DB_PREFIX.$table." as f";
    $sql .= " WHERE fk_soc = ".((int) $this->id);
    if ($mode == 'supplier') {
      $sql .= " AND entity IN (".getEntity('supplier_order').")";
    } else {
      $sql .= " AND entity IN (".getEntity('commande').")";
    }
 
    dol_syslog("getOutstandingOrders", LOG_DEBUG);
    // Add where from hooks
    $parameters = array('mode' => $mode, 'table' => $table);
    $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) {
      $outstandingOpened = 0;
      $outstandingTotal = 0;
      $outstandingTotalIncTax = 0;
      $arrayofref = array();
      while ($obj = $this->db->fetch_object($resql)) {
        $arrayofref[$obj->rowid] = $obj->ref;
        $outstandingTotal += $obj->total_ht;
        $outstandingTotalIncTax += $obj->total_ttc;
        if ($obj->status != 0) {
          // Not a draft
          $outstandingOpened += $obj->total_ttc;
        }
      }
      return array('opened' => $outstandingOpened, 'total_ht' => $outstandingTotal, 'total_ttc' => $outstandingTotalIncTax, 'refs' => $arrayofref); // 'opened' is 'incl taxes'
    } else {
      return array();
    }
  }
 
  public function getOutstandingBills($mode = 'customer', $late = 0)
  {
    include_once DOL_DOCUMENT_ROOT.'/core/lib/date.lib.php';
 
    $table = 'facture';
    if ($mode == 'supplier') {
      $table = 'facture_fourn';
    }
 
    /* Accurate value of remain to pay is to sum remaintopay for each invoice
     $paiement = $invoice->getSommePaiement();
     $creditnotes=$invoice->getSumCreditNotesUsed();
     $deposits=$invoice->getSumDepositsUsed();
     $alreadypayed=price2num($paiement + $creditnotes + $deposits,'MT');
     $remaintopay=price2num($invoice->total_ttc - $paiement - $creditnotes - $deposits,'MT');
     */
    $today = dol_get_first_hour(dol_now('tzuser')); // Returns today at 00:00 in the user's time zone
 
    $sql = "SELECT rowid, ref, total_ht, total_ttc, paye, type, fk_statut as status, close_code FROM ".MAIN_DB_PREFIX.$table." as f";
    $sql .= " WHERE fk_soc = ".((int) $this->id);
    if (!empty($late)) {
      $sql .= " AND date_lim_reglement < '".$this->db->idate($today)."'";
    }
    if ($mode == 'supplier') {
      $sql .= " AND entity IN (".getEntity('facture_fourn').")";
    } else {
      $sql .= " AND entity IN (".getEntity('invoice').")";
    }
 
    dol_syslog("getOutstandingBills", LOG_DEBUG);
    $resql = $this->db->query($sql);
    if ($resql) {
      $outstandingOpened = 0;
      $outstandingTotal = 0;
      $outstandingTotalIncTax = 0;
      $arrayofref = array();
      $arrayofrefopened = array();
      if ($mode == 'supplier') {
        require_once DOL_DOCUMENT_ROOT.'/fourn/class/fournisseur.facture.class.php';
        $tmpobject = new FactureFournisseur($this->db);
      } else {
        require_once DOL_DOCUMENT_ROOT.'/compta/facture/class/facture.class.php';
        $tmpobject = new Facture($this->db);
      }
      while ($obj = $this->db->fetch_object($resql)) {
        $arrayofref[$obj->rowid] = $obj->ref;
        $tmpobject->id = $obj->rowid;
 
        if ($obj->status != $tmpobject::STATUS_DRAFT                                           // Not a draft
          && !($obj->status == $tmpobject::STATUS_ABANDONED && $obj->close_code == 'replaced')  // Not a replaced invoice
        ) {
          $outstandingTotal += $obj->total_ht;
          $outstandingTotalIncTax += $obj->total_ttc;
        }
 
        $remaintopay = 0;
 
        if ($obj->paye == 0
          && $obj->status != $tmpobject::STATUS_DRAFT       // Not a draft
          && $obj->status != $tmpobject::STATUS_ABANDONED     // Not abandoned
          && $obj->status != $tmpobject::STATUS_CLOSED) {   // Not classified as paid
          //$sql .= " AND (status <> 3 OR close_code <> 'abandon')";    // Not abandoned for undefined reason
          $paiement = $tmpobject->getSommePaiement();
          $creditnotes = $tmpobject->getSumCreditNotesUsed();
          $deposits = $tmpobject->getSumDepositsUsed();
 
          $remaintopay = ($obj->total_ttc - $paiement - $creditnotes - $deposits);
          $outstandingOpened += $remaintopay;
        }
 
        //if credit note is converted but not used
        // TODO Do this also for customer ?
        if ($mode == 'supplier' && $obj->type == FactureFournisseur::TYPE_CREDIT_NOTE && $tmpobject->isCreditNoteUsed()) {
          $remainingcreditnote = $tmpobject->getSumFromThisCreditNotesNotUsed();
          $remaintopay -= $remainingcreditnote;
          $outstandingOpened -= $remainingcreditnote;
        }
 
        if ($remaintopay) {
          $arrayofrefopened[$obj->rowid] = $obj->ref;
        }
      }
      return array('opened' => $outstandingOpened, 'total_ht' => $outstandingTotal, 'total_ttc' => $outstandingTotalIncTax, 'refs' => $arrayofref, 'refsopened' => $arrayofrefopened); // 'opened' is 'amount incl taxes' > 0
    } else {
      dol_syslog("Sql error ".$this->db->lasterror, LOG_ERR);
      return array();
    }
  }
 
  public function getLibCustProspStatut()
  {
    return $this->LibCustProspStatut($this->client);
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function LibCustProspStatut($status)
  {
    // phpcs:enable
    global $langs;
    $langs->load('companies');
 
    if ($status == 0) {
      return $langs->trans("NorProspectNorCustomer");
    } elseif ($status == 1) {
      return $langs->trans("Customer");
    } elseif ($status == 2) {
      return $langs->trans("Prospect");
    } elseif ($status == 3) {
      return $langs->trans("ProspectCustomer");
    }
 
    return '';
  }
 
 
  public function calculateVATNumberFromProperties($thirdparty)
  {
    if ($thirdparty->country_code == 'FR' && empty($thirdparty->tva_intra) && !empty($thirdparty->tva_assuj)) {
      require_once DOL_DOCUMENT_ROOT.'/core/lib/profid.lib.php';
 
      $siren = preg_replace('/\s+/', '', (string) $thirdparty->idprof1);
      $siret = preg_replace('/\s+/', '', (string) $thirdparty->idprof2);
      if (!isValidSiren($siren)) {
        if (!isValidSiret($siret)) {
          return '';
        }
 
        $siren = substr($siret, 0, 9);
      }
      if (!empty($siren)) {
        // [FR + key code + SIREN number ]
        // Key VAT = [12 + 3 * (SIREN modulo 97)] modulo 97
        $cle = (12 + 3 * (((int) $siren) % 97)) % 97;
        $tva_intra = 'FR' . str_pad((string) $cle, 2, '0', STR_PAD_LEFT) . $siren;
      }
    }
 
    return $tva_intra ?? '';
  }
 
 
  public function generateDocument($modele, $outputlangs, $hidedetails = 0, $hidedesc = 0, $hideref = 0, $moreparams = null)
  {
    global $langs;
 
    if (!empty($moreparams) && !empty($moreparams['use_companybankid'])) {
      $modelpath = "core/modules/bank/doc/";
 
      include_once DOL_DOCUMENT_ROOT.'/societe/class/companybankaccount.class.php';
      $companybankaccount = new CompanyBankAccount($this->db);
      $result = $companybankaccount->fetch($moreparams['use_companybankid']);
      if (!$result) {
        dol_print_error($this->db, $companybankaccount->error, $companybankaccount->errors);
      }
      $result = $companybankaccount->commonGenerateDocument($modelpath, $modele, $outputlangs, $hidedetails, $hidedesc, $hideref, $moreparams);
      $this->last_main_doc = $companybankaccount->last_main_doc;
    } else {
      // Set the model to the name of the model to be used
      if (!dol_strlen($modele)) {
        if (getDolGlobalString('COMPANY_ADDON_PDF')) {
          $modele = getDolGlobalString('COMPANY_ADDON_PDF');
        } else {
          print $langs->trans("Error")." ".$langs->trans("Error_COMPANY_ADDON_PDF_NotDefined");
          return 0;
        }
      }
 
      if (!isset($this->bank_account)) {
        require_once DOL_DOCUMENT_ROOT.'/societe/class/companybankaccount.class.php';
        $bac = new CompanyBankAccount($this->db);
        // @phan-suppress-next-line PhanPluginSuspiciousParamPosition
        $result = $bac->fetch(0, '', $this->id);
        if ($result > 0) {
          $this->bank_account = $bac;
        } else {
          $this->bank_account = '';
        }
      }
 
      $modelpath = "core/modules/societe/doc/";
 
      $result = $this->commonGenerateDocument($modelpath, $modele, $outputlangs, $hidedetails, $hidedesc, $hideref, $moreparams);
    }
 
    return $result;
  }
 
 
  public function setCategories($categories, $type_categ, $remove_existing = true)
  {
    require_once DOL_DOCUMENT_ROOT.'/categories/class/categorie.class.php';
 
    // Decode type
    if (!in_array($type_categ, array(Categorie::TYPE_CUSTOMER, Categorie::TYPE_SUPPLIER))) {
      dol_syslog(__METHOD__.': Type '.$type_categ.'is an unknown company category type. Nothing done.', LOG_ERR);
      return -1;
    }
 
    return parent::setCategoriesCommon($categories, $type_categ, $remove_existing);
  }
 
  public function setSalesRep($salesrep, $onlyAdd = false)
  {
    global $user;
 
    // Handle single user
    if (!is_array($salesrep)) {
      $salesrep = array($salesrep);
    }
 
    $to_del = array(); // Nothing to delete
    $to_add = $salesrep;
    if ($onlyAdd === false) {
      // Get current users
      $existing = $this->getSalesRepresentatives($user, 1);
 
      // Diff
      if (is_array($existing)) {
        $to_del = array_diff($existing, $salesrep);
        $to_add = array_diff($salesrep, $existing);
      }
    }
 
    $error = 0;
 
    // Process
    foreach ($to_del as $del) {
      $this->del_commercial($user, $del);
    }
    foreach ($to_add as $add) {
      $result = $this->add_commercial($user, $add);
      if ($result < 0) {
        $error++;
        break;
      }
    }
 
    return $error ? -1 : 1;
  }
 
  public function setThirdpartyType($typent_id)
  {
    global $user;
 
    dol_syslog(__METHOD__, LOG_DEBUG);
 
    if ($this->id) {
      $result = $this->setValueFrom('fk_typent', $typent_id, '', null, '', '', $user, 'COMPANY_MODIFY');
 
      if ($result > 0) {
        $this->typent_id = $typent_id;
        $this->typent_code = dol_getIdFromCode($this->db, $this->typent_id, 'c_typent', 'id', 'code');
        return 1;
      } else {
        return -1;
      }
    } else {
      return -1;
    }
  }
 
  public static function replaceThirdparty(DoliDB $dbs, $origin_id, $dest_id)
  {
    if ($origin_id == $dest_id) {
      dol_syslog('Error: Try to merge a thirdparty into itself');
      return false;
    }
 
    // Sales representationves cannot be twice in the same thirdparties so we look for them and remove the one that are common some to avoid duplicate.
    // Because this function is meant to be executed within a transaction, we won't take care of begin/commit.
    $sql = 'SELECT rowid FROM '.MAIN_DB_PREFIX.'societe_commerciaux ';
    $sql .= ' WHERE fk_soc = '.(int) $dest_id.' AND fk_user IN ( ';
    $sql .= ' SELECT fk_user ';
    $sql .= ' FROM '.MAIN_DB_PREFIX.'societe_commerciaux ';
    $sql .= ' WHERE fk_soc = '.(int) $origin_id.') ';
 
    $resql = $dbs->query($sql);
    while ($obj = $dbs->fetch_object($resql)) {
      $dbs->query('DELETE FROM '.MAIN_DB_PREFIX.'societe_commerciaux WHERE rowid = '.((int) $obj->rowid));
    }
 
    // The table llx_societe_extrafields must NOT be in this list because we don't care about the old thirdparty extrafields that are managed directly into mergeCompany.
    // Do not include llx_societe because it will be replaced later.
    $tables = array(
      'societe_account',
      'societe_commerciaux',
      'societe_prices',
      'societe_remise',
      'societe_remise_except',
      'societe_rib'
    );
 
    // TODO When we merge societe_account, we may get 2 lines for the stripe account. Must fix this.
 
    return CommonObject::commonReplaceThirdparty($dbs, $origin_id, $dest_id, $tables);
  }
 
  public function setAccountancyCode($type, $value)
  {
    global $user, $langs, $conf;
 
    $this->db->begin();
 
    if ($type == 'buy') {
      $field = 'accountancy_code_buy';
    } elseif ($type == 'sell') {
      $field = 'accountancy_code_sell';
    } else {
      return -1;
    }
 
    $sql = "UPDATE ".MAIN_DB_PREFIX.$this->table_element." SET ";
    $sql .= $field." = '".$this->db->escape($value)."'";
    $sql .= " WHERE rowid = ".((int) $this->id);
 
    dol_syslog(get_class($this)."::".__FUNCTION__, LOG_DEBUG);
    $resql = $this->db->query($sql);
 
    if ($resql) {
      // Call triggers
      include_once DOL_DOCUMENT_ROOT.'/core/class/interfaces.class.php';
      $interface = new Interfaces($this->db);
      $result = $interface->run_triggers('COMPANY_MODIFY', $this, $user, $langs, $conf);
      if ($result < 0) {
        $this->errors = $interface->errors;
        $this->db->rollback();
        return -1;
      }
      // End call triggers
 
      $this->$field = $value;
 
      $this->db->commit();
      return 1;
    } else {
      $this->error = $this->db->lasterror();
      $this->db->rollback();
      return -1;
    }
  }
 
  public function fetchPartnerships($mode)
  {
    require_once DOL_DOCUMENT_ROOT.'/partnership/class/partnership.class.php';
 
    $this->partnerships[] = array();
 
    return 1;
  }
 
  public function getKanbanView($option = '', $arraydata = array())
  {
    $selected = (empty($arraydata['selected']) ? 0 : $arraydata['selected']);
 
    $out = '<div class="box-flex-item box-flex-grow-zero">';
    $out .= '<div class="info-box info-box-sm">';
    $out .= '<span class="info-box-icon bg-infobox-action">';
    if (!empty($this->logo) && class_exists('Form')) {
      $out .= Form::showphoto('societe', $this, 0, 40, 0, 'photokanban', '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.
    } else {
      $out .= img_picto('', $this->picto);
    }
    $out .= '</span>';
    $out .= '<div class="info-box-content">';
    $out .= '<div class="info-box-ref inline-block tdoverflowmax125 valignmiddle">' . $this->getNomUrl(1);
    $out .= '</div>';
    if (!empty($this->phone)) {
      $out .= '<div class="inline-block valignmiddle">';
      // @phan-suppress-next-line PhanPluginSuspiciousParamPosition
      $out .= dol_print_phone($this->phone, $this->country_code, 0, $this->id, 'tel', 'hidenum', 'phone', $this->phone, 0, 'paddingleft paddingright');
      $out .= '</div>';
    }
    if (!empty($this->email)) {
      $out .= '<div class="inline-block valignmiddle">';
      $out .= dol_print_email($this->email, 0, $this->id, 'thirdparty', -1, 1, 2, 'paddingleft paddingright');
      $out .= '</div>';
    }
    if ($selected >= 0) {
      $out .= '<input id="cb'.$this->id.'" class="flat checkforselect fright" type="checkbox" name="toselect[]" value="'.$this->id.'"'.($selected ? ' checked="checked"' : '').'>';
    }
    if (!empty($this->code_client)) {
      $out .= '<br><span class="info-box-label opacitymedium">'.$this->code_client.'</span>';
    }
    $out .= '<br><div class="info-box-status">' . $this->getLibStatut(3) . '</div>';
    $out .= '</div>'; // end info-box-content
    $out .= '</div>';
    $out .= '</div>';
 
    return $out;
  }
 
  public function getContacts($list = 0, $code = '', $element = '', $status = -1)
  {
    // phpcs:enable
    global $langs;
 
    $tab = array();
 
    $sql = "SELECT sc.rowid, sc.fk_socpeople as id, sc.fk_c_type_contact"; // This field contains id of llx_socpeople or id of llx_user
    $sql .= ", t.fk_soc as socid, t.statut as statuscontact";
    $sql .= ", t.civility as civility, t.lastname as lastname, t.firstname, t.email";
    $sql .= ", tc.source, tc.element, tc.code, tc.libelle as type_label";
    $sql .= " FROM ".$this->db->prefix()."c_type_contact tc";
    $sql .= ", ".$this->db->prefix()."societe_contacts sc";
    $sql .= " LEFT JOIN ".$this->db->prefix()."socpeople t on sc.fk_socpeople = t.rowid";
    $sql .= " WHERE sc.fk_soc = ".((int) $this->id);
    $sql .= " AND sc.fk_c_type_contact = tc.rowid";
 
    // Add status filter if requested
    if ($status >= 0) {
      $sql .= " AND t.statut = " . ((int) $status);
    }
    if (!empty($element)) {
      $sql .= " AND tc.element = '".$this->db->escape($element)."'";
    }
    if ($code) {
      $sql .= " AND tc.code = '".$this->db->escape($code)."'";
    }
    $sql .= " AND sc.entity IN (".getEntity($this->element).")";
    $sql .= " AND tc.source = 'external'";
    $sql .= " AND tc.active = 1";
 
    $sql .= " ORDER BY t.lastname ASC";
 
    dol_syslog(get_class($this)."::getContacts", LOG_DEBUG);
    $resql = $this->db->query($sql);
    if ($resql) {
      $num = $this->db->num_rows($resql);
      $i = 0;
      while ($i < $num) {
        $obj = $this->db->fetch_object($resql);
 
        if (!$list) {
          $transkey = "TypeContact_".$obj->element."_".$obj->source."_".$obj->code;
          $label_type = ($langs->trans($transkey) != $transkey ? $langs->trans($transkey) : $obj->type_label);
          $tab[$obj->id] = array(
            'source' => $obj->source,
            'socid' => (int) $obj->socid,
            'id' => (int) $obj->id,
            'nom' => $obj->lastname, // For backward compatibility
            'civility' => $obj->civility,
            'lastname' => $obj->lastname,
            'firstname' => $obj->firstname,
            'email' => $obj->email,
            'login' => (empty($obj->login) ? '' : $obj->login),
            'photo' => (empty($obj->photo) ? '' : $obj->photo),
            'statuscontact' => $obj->statuscontact,
            'rowid' => (int) $obj->rowid,
            'code' => $obj->code,
            'element' => $obj->element,
            'libelle' => $label_type,
            'status' => $obj->statuslink,
            'fk_c_type_contact' => (int) $obj->fk_c_type_contact
          );
        } else {
          $tab[$obj->id] = (int) $obj->id;
        }
        $i++;
      }
 
      return $tab;
    } else {
      $this->error = $this->db->lasterror();
      dol_print_error($this->db);
      return -1;
    }
  }
 
  public function mergeCompany($soc_origin_id)
  {
    global $conf, $langs, $hookmanager, $user, $action;
 
    $error = 0;
    $soc_origin = new Societe($this->db);   // The thirdparty that we will delete
 
    dol_syslog("mergeCompany merge thirdparty id=".$soc_origin_id." (will be deleted) into the thirdparty id=".$this->id);
 
    if ($soc_origin->fetch($soc_origin_id) < 1) {
      $this->error = $langs->trans('ErrorRecordNotFound');
      $error++;
    }
 
    if (!$error) {
      $this->db->begin();
 
      // Recopy some data
      $this->client |= $soc_origin->client;
      $this->fournisseur |= $soc_origin->fournisseur;
      $listofproperties = array(
        'address', 'zip', 'town', 'state_id', 'country_id', 'phone', 'phone_mobile', 'fax', 'email', 'socialnetworks', 'url', 'barcode',
        'idprof1', 'idprof2', 'idprof3', 'idprof4', 'idprof5', 'idprof6',
        'tva_intra', 'euid', 'effectif_id', 'forme_juridique', 'remise_percent', 'remise_supplier_percent', 'mode_reglement_supplier_id', 'cond_reglement_supplier_id', 'name_bis',
        'stcomm_id', 'outstanding_limit', 'order_min_amount', 'supplier_order_min_amount', 'price_level', 'parent', 'default_lang', 'ref', 'ref_ext', 'import_key', 'fk_incoterms', 'fk_multicurrency',
        'code_client', 'code_fournisseur', 'code_compta', 'code_compta_fournisseur',
        'model_pdf', 'webservices_url', 'webservices_key', 'accountancy_code_sell', 'accountancy_code_buy', 'typent_id'
      );
      foreach ($listofproperties as $property) {
        if (empty($this->$property)) {
          $this->$property = $soc_origin->$property;
        }
      }
 
      if ($this->typent_id == -1) {
        $this->typent_id = $soc_origin->typent_id;
      }
 
      // Concat some data
      $listofproperties = array(
        'note_public', 'note_private'
      );
      foreach ($listofproperties as $property) {
        $this->$property = dol_concatdesc($this->$property, $soc_origin->$property);
      }
 
      // Merge extrafields
      if (is_array($soc_origin->array_options)) {
        foreach ($soc_origin->array_options as $key => $val) {
          if (empty($this->array_options[$key])) {
            $this->array_options[$key] = $val;
          }
        }
      }
 
      // If alias name is not defined on target thirdparty, we can store in it the old name of company.
      if (empty($this->name_bis) && $this->name != $soc_origin->name) {
        $this->name_bis = $this->name;
      }
 
      // Merge categories
      include_once DOL_DOCUMENT_ROOT.'/categories/class/categorie.class.php';
      $static_cat = new Categorie($this->db);
 
      $custcats_ori = $static_cat->containing($soc_origin->id, 'customer', 'id');
      $custcats = $static_cat->containing($this->id, 'customer', 'id');
      $custcats = array_merge($custcats, $custcats_ori);
      $this->setCategories($custcats, 'customer');
 
      $suppcats_ori = $static_cat->containing($soc_origin->id, 'supplier', 'id');
      $suppcats = $static_cat->containing($this->id, 'supplier', 'id');
      $suppcats = array_merge($suppcats, $suppcats_ori);
      $this->setCategories($suppcats, 'supplier');
 
      // If thirdparty has a new code that is same than origin, we clean origin code to avoid duplicate key from database unique keys.
      if ($soc_origin->code_client == $this->code_client
        || $soc_origin->code_fournisseur == $this->code_fournisseur
        || $soc_origin->barcode == $this->barcode) {
        dol_syslog("We clean customer and supplier code so we will be able to make the update of target");
        $soc_origin->code_client = '';
        $soc_origin->code_fournisseur = '';
        $soc_origin->barcode = '';
        $soc_origin->update($soc_origin->id, $user, 0, 1, 1, 'merge');
      }
 
      // Children companies
      if (!getDolGlobalString('SOCIETE_DISABLE_PARENTCOMPANY')) {
        // Children
        $children_ori = $this->getChildrenForCompany($soc_origin->id);
        if (count($children_ori)) {
          foreach ($children_ori as $child_id) {
            $child = new Societe($this->db);
            $child->id = $child_id;
            $child->setParent($this->id);
          }
        }
      }
 
      // Update
      $result = $this->update($this->id, $user, 0, 1, 1, 'merge');
 
      if ($result < 0) {
        $error++;
      }
 
      // Move links
      if (!$error) {
        $objects = array(
          'Adherent' => '/adherents/class/adherent.class.php',
          //'Categorie' => '/categories/class/categorie.class.php', // Already processed previously
          'ActionComm' => '/comm/action/class/actioncomm.class.php',
          'Propal' => '/comm/propal/class/propal.class.php',
          'Commande' => '/commande/class/commande.class.php',
          'Facture' => '/compta/facture/class/facture.class.php',
          'FactureRec' => '/compta/facture/class/facture-rec.class.php',
          'LignePrelevement' => '/compta/prelevement/class/ligneprelevement.class.php',
          'Contact' => '/contact/class/contact.class.php',
          'Contrat' => '/contrat/class/contrat.class.php',
          'Expedition' => '/expedition/class/expedition.class.php',
          'CommandeFournisseur' => '/fourn/class/fournisseur.commande.class.php',
          'FactureFournisseur' => '/fourn/class/fournisseur.facture.class.php',
          'FactureFournisseurRec' => '/fourn/class/fournisseur.facture-rec.class.php',
          'Reception' => '/reception/class/reception.class.php',
          'SupplierProposal' => '/supplier_proposal/class/supplier_proposal.class.php',
          'ProductFournisseur' => '/fourn/class/fournisseur.product.class.php',
          'Product' => '/product/class/product.class.php',
          //'ProductThirparty' => '...',  // for llx_product_thirdparty
          'Project' => '/projet/class/project.class.php',
          'User' => '/user/class/user.class.php',
          'Account' => '/compta/bank/class/account.class.php',
          'ConferenceOrBoothAttendee' => '/eventorganization/class/conferenceorboothattendee.class.php',
          'Societe' => '/societe/class/societe.class.php',
          //'SocieteAccount', 'SocietePrice', 'SocieteRib',... are processed into the replaceThirdparty of Societe.
        );
        if ($this->db->DDLListTables((string) $conf->db->name, $this->db->prefix().'delivery')) {
          $objects['Delivery'] = '/delivery/class/delivery.class.php';
        }
        if ($this->db->DDLListTables((string) $conf->db->name, $this->db->prefix().'mrp_mo')) {
          $objects['Mo'] = '/mrp/class/mo.class.php';
        }
        if ($this->db->DDLListTables((string) $conf->db->name, $this->db->prefix().'don')) {
          $objects['Don'] = '/don/class/don.class.php';
        }
        if ($this->db->DDLListTables((string) $conf->db->name, $this->db->prefix().'partnership')) {
          $objects['PartnerShip'] = '/partnership/class/partnership.class.php';
        }
        if ($this->db->DDLListTables((string) $conf->db->name, $this->db->prefix().'fichinter')) {
          $objects['Fichinter'] = '/fichinter/class/fichinter.class.php';
        }
        if ($this->db->DDLListTables((string) $conf->db->name, $this->db->prefix().'ticket')) {
          $objects['Ticket'] = '/ticket/class/ticket.class.php';
        }
 
        //First, all core objects must update their tables
        foreach ($objects as $object_name => $object_file) {
          /* $object_file is never an array -> code commented
          if (is_array($object_file)) {
            if (empty($object_file['enabled'])) {
              continue;
            }
            $object_file = $object_file['file'];
          }
          */
 
          require_once DOL_DOCUMENT_ROOT.$object_file;
 
          if (!$object_name::replaceThirdparty($this->db, $soc_origin->id, $this->id)) {
            $error++;
            $this->error = $this->db->lasterror();
            break;
          }
        }
      }
 
      // External modules should update their ones too
      if (!$error) {
        $parameters = array('soc_origin' => $soc_origin->id, 'soc_dest' => $this->id);
        $reshook = $hookmanager->executeHooks('replaceThirdparty', $parameters, $this, $action);
 
        if ($reshook < 0) {
          $this->error = $hookmanager->error;
          $this->errors = $hookmanager->errors;
          $error++;
        }
      }
 
 
      if (!$error) {
        $this->context = array('merge' => 1, 'mergefromid' => $soc_origin->id, 'mergefromname' => $soc_origin->name);
 
        // Call trigger
        $result = $this->call_trigger('COMPANY_MODIFY', $user);
        if ($result < 0) {
          $error++;
        }
        // End call triggers
      }
 
      if (!$error) {
        // We finally remove the old thirdparty
        if ($soc_origin->delete($soc_origin->id, $user) < 1) {
          $this->error = $soc_origin->error;
          $this->errors = $soc_origin->errors;
          $error++;
        }
      }
 
 
      if (!$error) {
        // Move files from the dir of the third party to delete into the dir of the third party to keep
        if (!empty($conf->societe->multidir_output[$this->entity])) {
          $srcdir = $conf->societe->multidir_output[$this->entity]."/".$soc_origin->id;
          $destdir = $conf->societe->multidir_output[$this->entity]."/".$this->id;
 
          if (dol_is_dir($srcdir)) {
            $dirlist = dol_dir_list($srcdir, 'files', 1);
            foreach ($dirlist as $filetomove) {
              $destfile = $destdir.'/'.$filetomove['relativename'];
              //var_dump('Move file '.$filetomove['relativename'].' into '.$destfile);
              dol_move($filetomove['fullname'], $destfile, '0', 0, 0, 1);
            }
            //exit;
          }
        }
      }
 
      if (!$error) {
        $this->db->commit();
        return 0;
      } else {
        $langs->load("errors");
        $this->error = $langs->trans('ErrorsThirdpartyMerge');
        $this->db->rollback();
        return -1;
      }
    }
 
    return -1;
  }
}