product.class.php

Go to the documentation of this file.

<?php
/* Copyright (C) 2001-2007  Rodolphe Quiedeville    <rodolphe@quiedeville.org>
 * Copyright (C) 2004-2014  Laurent Destailleur   <eldy@users.sourceforge.net>
 * Copyright (C) 2005-2015  Regis Houssin     <regis.houssin@inodbox.com>
 * Copyright (C) 2006   Andre Cianfarani    <acianfa@free.fr>
 * Copyright (C) 2007-2011  Jean Heimburger     <jean@tiaris.info>
 * Copyright (C) 2010-2018  Juanjo Menent     <jmenent@2byte.es>
 * Copyright (C) 2012       Cedric Salvador         <csalvador@gpcsolutions.fr>
 * Copyright (C) 2013-2014  Cedric GROSS      <c.gross@kreiz-it.fr>
 * Copyright (C) 2013-2016  Marcos García     <marcosgdf@gmail.com>
 * Copyright (C) 2011-2021  Open-DSI        <support@open-dsi.fr>
 * Copyright (C) 2014   Henry Florian     <florian.henry@open-concept.pro>
 * Copyright (C) 2014-2016  Philippe Grand      <philippe.grand@atoo-net.com>
 * Copyright (C) 2014   Ion agorria         <ion@agorria.com>
 * Copyright (C) 2016-2024  Ferran Marcet     <fmarcet@2byte.es>
 * Copyright (C) 2017   Gustavo Novaro
 * Copyright (C) 2019-2026  Frédéric France         <frederic.france@free.fr>
 * Copyright (C) 2023   Benjamin Falière    <benjamin.faliere@altairis.fr>
 * Copyright (C) 2024-2026  MDW           <mdeweerd@users.noreply.github.com>
 * Copyright (C) 2025   Lenin Rivas       <lenin.rivas777@gmail.com>
 * Copyright (C) 2026   Anthony Berton      <anthony.berton@bb2a.fr>
 * Copyright (C) 2026   Jose Martinez     <jose.martinez@pichinov.com>
 * Copyright (C) 2026   Mélina Joum           <melina.joum@altairis.fr>
 *
 * 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/lib/product.lib.php';
require_once DOL_DOCUMENT_ROOT.'/core/class/commonobject.class.php';
require_once DOL_DOCUMENT_ROOT.'/product/class/productbatch.class.php';
require_once DOL_DOCUMENT_ROOT.'/product/class/productlang.class.php';
require_once DOL_DOCUMENT_ROOT.'/product/stock/class/productlot.class.php';
require_once DOL_DOCUMENT_ROOT.'/product/stock/class/entrepot.class.php';
 
class Product extends CommonObject
{
  const SELL_OR_EAT_BY_MANDATORY_ID_NONE = 0;
  const SELL_OR_EAT_BY_MANDATORY_ID_SELL_BY = 1;
  const SELL_OR_EAT_BY_MANDATORY_ID_EAT_BY = 2;
  const SELL_OR_EAT_BY_MANDATORY_ID_SELL_AND_EAT = 3;
 
  public $TRIGGER_PREFIX = 'PRODUCT';
 
  public $element = 'product';
 
  public $table_element = 'product';
 
  public $fk_element = 'fk_product';
 
  protected $childtables = array(
    'supplier_proposaldet' => array('name' => 'SupplierProposal', 'parent' => 'supplier_proposal', 'parentkey' => 'fk_supplier_proposal'),
    'propaldet' => array('name' => 'Proposal', 'parent' => 'propal', 'parentkey' => 'fk_propal'),
    'commandedet' => array('name' => 'Order', 'parent' => 'commande', 'parentkey' => 'fk_commande'),
    'facturedet' => array('name' => 'Invoice', 'parent' => 'facture', 'parentkey' => 'fk_facture'),
    'contratdet' => array('name' => 'Contract', 'parent' => 'contrat', 'parentkey' => 'fk_contrat'),
    'facture_fourn_det' => array('name' => 'SupplierInvoice', 'parent' => 'facture_fourn', 'parentkey' => 'fk_facture_fourn'),
    'commande_fournisseurdet' => array('name' => 'SupplierOrder', 'parent' => 'commande_fournisseur', 'parentkey' => 'fk_commande'),
    'mrp_production' => array('name' => 'Mo', 'parent' => 'mrp_mo', 'parentkey' => 'fk_mo', 'enabled' => 'isModEnabled("mrp")'),
    'bom_bom' => array('name' => 'BOM', 'enabled' => 'isModEnabled("bom")'),
    'bom_bomline' => array('name' => 'BOMLine', 'parent' => 'bom_bom', 'parentkey' => 'fk_bom', 'enabled' => 'isModEnabled("bom")'),
  );
 
  public $picto = 'product';
 
  protected $table_ref_field = 'ref';
 
  public $regeximgext = '\.gif|\.jpg|\.jpeg|\.png|\.bmp|\.webp|\.xpm|\.xbm|\.avif';
 
  public $ref;
 
  public $libelle;
 
  public $label;
 
  public $description;
 
  public $other;
 
  public $type = self::TYPE_PRODUCT;
 
  public $price;
 
  public $price_formated;     // used by takepos/ajax/ajax.php
 
  public $price_ttc;
 
  public $price_ttc_formated;   // used by takepos/ajax/ajax.php
 
  public $price_min;
 
  public $price_min_ttc;
 
  public $price_base_type;
  public $price_label;
 
 
  public $multiprices = array();
  public $multiprices_ttc = array();
  public $multiprices_base_type = array();
  public $multiprices_default_vat_code = array();
  public $multiprices_min = array();
  public $multiprices_min_ttc = array();
  public $multiprices_tva_tx = array();
  public $multiprices_recuperableonly = array();
 
 
  public $price_by_qty;
  public $prices_by_qty = array();
  public $prices_by_qty_id = array();
  public $prices_by_qty_list = array();
 
  public $level;
 
  public $multilangs = array();
 
  public $default_vat_code;
 
  public $tva_tx;
 
  public $tva_npr = 0;
 
  public $remise_percent;
 
  public $localtax1_tx;
  public $localtax2_tx;
  public $localtax1_type;
  public $localtax2_type;
 
  // Properties set by get_buyprice() for return
 
  public $desc_supplier;
  public $vatrate_supplier;
  public $default_vat_code_supplier;
 
  public $fourn_multicurrency_price;
 
  public $fourn_multicurrency_unitprice;
  public $fourn_multicurrency_tx;
  public $fourn_multicurrency_id;
  public $fourn_multicurrency_code;
 
  public $packaging;
 
 
  public $lifetime;
 
  public $qc_frequency;
 
  public $stock_reel = 0;
 
  public $stock_theorique;
 
  public $cost_price;
 
  public $pmp;
 
  public $seuil_stock_alerte = 0;
 
  public $desiredstock = 0;
 
  public $duration_value;
  public $duration_unit;
  public $duration;
 
  public $fk_default_workstation;
 
  public $status = 0;
 
  public $tosell;
 
  public $status_buy = 0;
 
  public $tobuy;
 
  public $finished;
 
  public $fk_default_bom;
 
  public $product_fourn_price_id;
 
  public $buyprice;
 
  public $tobatch;
 
 
  public $status_batch = 0;
 
  public $sell_or_eat_by_mandatory = 0;
 
  public $batch_mask = '';
 
  public $customcode;
 
  public $url;
 
 
  public $weight;
 
  public $weight_units; // scale -3, 0, 3, 6
  public $length;
  public $length_units; // scale -3, 0, 3, 6
  public $width;
  public $width_units;  // scale -3, 0, 3, 6
  public $height;
  public $height_units; // scale -3, 0, 3, 6
  public $surface;
  public $surface_units;  // scale -3, 0, 3, 6
  public $volume;
  public $volume_units; // scale -3, 0, 3, 6
 
  public $net_measure;
  public $net_measure_units;  // scale -3, 0, 3, 6
 
  public $accountancy_code_sell;
  public $accountancy_code_sell_intra;
  public $accountancy_code_sell_export;
  public $accountancy_code_buy;
  public $accountancy_code_buy_intra;
  public $accountancy_code_buy_export;
 
  public $barcode;
 
  public $barcode_type;
 
  public $barcode_type_code;
 
  public $stats_propale = array();
 
  public $stats_commande = array();
 
  public $stats_contrat = array();
 
  public $stats_facture = array();
 
  public $stats_proposal_supplier = array();
 
  public $stats_commande_fournisseur = array();
 
  public $stats_expedition = array();
 
  public $stats_reception = array();
 
  public $stats_mo = array();
 
  public $stats_bom = array();
 
  public $stats_mrptoconsume = array();
 
  public $stats_mrptoproduce = array();
 
  public $stats_facturerec = array();
 
  public $stats_facture_fournisseur = array();
 
  public $stats_facturefournrec = array();
 
  public $imgWidth;
  public $imgHeight;
 
  public $product_fourn_id;
 
  public $product_id_already_linked;
 
  public $nbphoto = 0;
 
  public $stock_warehouse = array();
 
  public $fk_default_warehouse;
 
  public $fk_price_expression;
 
  public $fourn_qty;
 
  public $fourn_pu;
 
  public $fourn_price_base_type;
 
  public $fourn_socid;
 
  public $ref_fourn;
 
  public $ref_supplier;
 
  public $fk_unit;
 
  public $price_autogen = 0;
 
  public $sousprods = array();
 
  public $res;
 
 
  public $is_object_used;
 
  public $is_sousproduit_qty;
 
  public $is_sousproduit_incdec;
 
  public $mandatory_period;
 
  public $stockable_product = 1;
 
  public $fields = array(
    'rowid' => array('type' => 'integer', 'label' => 'TechnicalID', 'enabled' => 1, 'visible' => -2, 'notnull' => 1, 'index' => 1, 'position' => 1, 'comment' => 'Id'),
    'entity'        => array('type' => 'integer', 'label' => 'Entity', 'enabled' => 1, 'visible' => 0, 'default' => '1', 'notnull' => 1, 'index' => 1, 'position' => 5),
    'ref'           => array('type' => 'varchar(128)', 'label' => 'Ref', 'enabled' => 1, 'visible' => 1, 'notnull' => 1, 'showoncombobox' => 1, 'index' => 1, 'position' => 10, 'searchall' => 1, 'comment' => 'Reference of object'),
    'label'         => array('type' => 'varchar(255)', 'label' => 'Label', 'enabled' => 1, 'visible' => 1, 'notnull' => 1, 'showoncombobox' => 2, 'position' => 11, 'csslist' => 'tdoverflowmax250'),
    'barcode'       => array('type' => 'varchar(255)', 'label' => 'Barcode', 'enabled' => 'isModEnabled("barcode")', 'position' => 20, 'visible' => -1, 'showoncombobox' => 3, 'cssview' => 'tdwordbreak', 'csslist' => 'tdoverflowmax125'),
    'fk_barcode_type' => array('type' => 'integer', 'label' => 'BarcodeType', 'enabled' => 1, 'position' => 21, 'notnull' => 0, 'visible' => -1,),
    'note_public'   => array('type' => 'html', 'label' => 'NotePublic', 'enabled' => 1, 'visible' => 0, 'position' => 61),
    'note'          => array('type' => 'html', 'label' => 'NotePrivate', 'enabled' => 1, 'visible' => 0, 'position' => 62),
    'datec'         => array('type' => 'datetime', 'label' => 'DateCreation', 'enabled' => 1, 'visible' => -2, 'notnull' => 1, 'position' => 500),
    'tms'           => array('type' => 'timestamp', 'label' => 'DateModification', 'enabled' => 1, 'visible' => -2, 'notnull' => 1, 'position' => 501),
    //'date_valid'    =>array('type'=>'datetime',     'label'=>'DateCreation',     'enabled'=>1, 'visible'=>-2, 'position'=>502),
    'fk_user_author' => array('type' => 'integer:User:user/class/user.class.php', 'label' => 'UserAuthor', 'enabled' => 1, 'visible' => -2, 'notnull' => 1, 'position' => 510, 'foreignkey' => 'llx_user.rowid'),
    'fk_user_modif' => array('type' => 'integer:User:user/class/user.class.php', 'label' => 'UserModif', 'enabled' => 1, 'visible' => -2, 'notnull' => -1, 'position' => 511),
    //'fk_user_valid' =>array('type'=>'integer',      'label'=>'UserValidation',        'enabled'=>1, 'visible'=>-1, 'position'=>512),
    'localtax1_tx' => array('type' => 'double(6,3)', 'label' => 'Localtax1tx', 'enabled' => 1, 'position' => 150, 'notnull' => 0, 'visible' => -1,),
    'localtax1_type' => array('type' => 'varchar(10)', 'label' => 'Localtax1type', 'enabled' => 1, 'position' => 155, 'notnull' => 1, 'visible' => -1,),
    'localtax2_tx' => array('type' => 'double(6,3)', 'label' => 'Localtax2tx', 'enabled' => 1, 'position' => 160, 'notnull' => 0, 'visible' => -1,),
    'localtax2_type' => array('type' => 'varchar(10)', 'label' => 'Localtax2type', 'enabled' => 1, 'position' => 165, 'notnull' => 1, 'visible' => -1,),
    'last_main_doc' => array('type' => 'varchar(255)', 'label' => 'LastMainDoc', 'enabled' => 1, 'visible' => -1, 'position' => 170),
    'import_key'    => array('type' => 'varchar(14)', 'label' => 'ImportId', 'enabled' => 1, 'visible' => -2, 'notnull' => -1, 'index' => 0, 'position' => 1000),
    //'tosell'       =>array('type'=>'integer',      'label'=>'Status',           'enabled'=>1, 'visible'=>1,  'notnull'=>1, 'default'=>'0', 'index'=>1,  'position'=>1000, 'arrayofkeyval'=>array(0=>'Draft', 1=>'Active', -1=>'Cancel')),
    //'tobuy'        =>array('type'=>'integer',      'label'=>'Status',           'enabled'=>1, 'visible'=>1,  'notnull'=>1, 'default'=>'0', 'index'=>1,  'position'=>1000, 'arrayofkeyval'=>array(0=>'Draft', 1=>'Active', -1=>'Cancel')),
    'mandatory_period' => array('type' => 'integer', 'label' => 'mandatoryperiod', 'enabled' => 1, 'visible' => -1,  'notnull' => 1, 'default' => '0', 'index' => 1,  'position' => 1000),
    'stockable_product' => array('type' => 'integer', 'label' => 'stockable_product', 'enabled' => 1, 'visible' => 1, 'default' => '1', 'notnull' => 1, 'index' => 1, 'position' => 502),
  );
 
  const TYPE_PRODUCT = 0;
  const TYPE_SERVICE = 1;
 
  const DISABLED_STOCK = 0;
  const ENABLED_STOCK = 1;
 
  public function __construct($db)
  {
    $this->db = $db;
 
    $this->ismultientitymanaged = 1;
    $this->isextrafieldmanaged = 1;
 
    $this->canvas = '';
  }
 
  public function check()
  {
    if (getDolGlobalInt('MAIN_SECURITY_ALLOW_UNSECURED_REF_LABELS')) {
      $this->ref = trim((string) $this->ref);
    } else {
      $this->ref = dol_sanitizeFileName(stripslashes($this->ref));
    }
 
    $err = 0;
    if (dol_strlen(trim((string) $this->ref)) == 0) {
      $err++;
    }
 
    if (dol_strlen(trim((string) $this->label)) == 0) {
      $err++;
    }
 
    if ($err > 0) {
      return 0;
    } else {
      return 1;
    }
  }
 
  public function create($user, $notrigger = 0)
  {
    global $conf, $langs;
 
    $error = 0;
 
    // Clean parameters
    if (getDolGlobalInt('MAIN_SECURITY_ALLOW_UNSECURED_REF_LABELS')) {
      $this->ref = trim((string) $this->ref);
    } else {
      $this->ref = dol_sanitizeFileName(dol_string_nospecial(trim((string) $this->ref)));
    }
    $this->label = trim((string) $this->label);
    $this->price_ttc = (float) price2num($this->price_ttc);
    $this->price = (float) price2num($this->price);
    $this->price_min_ttc = (float) price2num($this->price_min_ttc);
    $this->price_min = (float) price2num($this->price_min);
    $this->price_label = trim((string) $this->price_label);
    if (empty($this->tva_tx)) {
      $this->tva_tx = 0;
    }
    if (empty($this->tva_npr)) {
      $this->tva_npr = 0;
    }
    // Local taxes
    if (empty($this->localtax1_tx)) {
      $this->localtax1_tx = 0;
    }
    if (empty($this->localtax2_tx)) {
      $this->localtax2_tx = 0;
    }
    if (empty($this->localtax1_type)) {
      $this->localtax1_type = '0';
    }
    if (empty($this->localtax2_type)) {
      $this->localtax2_type = '0';
    }
    // Price
    if (empty($this->price_base_type) && getDolGlobalString('PRODUCT_PRICE_BASE_TYPE')) {
      $this->price_base_type = getDolGlobalString('PRODUCT_PRICE_BASE_TYPE');
    }
    if (empty($this->price)) {
      $this->price = 0;
    }
    if (empty($this->price_min)) {
      $this->price_min = 0;
    }
    // Price by quantity
    if (empty($this->price_by_qty)) {
      $this->price_by_qty = 0;
    }
 
    if (empty($this->status)) {
      $this->status = 0;
    }
    if (empty($this->status_buy)) {
      $this->status_buy = 0;
    }
    if (empty($this->stockable_product)) {
      $this->stockable_product = 0;
    }
 
    $price_ht = 0;
    $price_ttc = 0;
    $price_min_ht = 0;
    $price_min_ttc = 0;
 
    //
    if ($this->price_base_type == 'TTC' && $this->price_ttc > 0) {
      $price_ttc = price2num($this->price_ttc, 'MU');
      $price_ht = price2num($this->price_ttc / (1 + ($this->tva_tx / 100)), 'MU');
    }
 
    //
    if ($this->price_base_type != 'TTC' && $this->price > 0) {
      $price_ht = price2num($this->price, 'MU');
      $price_ttc = price2num($this->price * (1 + ($this->tva_tx / 100)), 'MU');
    }
 
    //
    if (($this->price_min_ttc > 0) && ($this->price_base_type == 'TTC')) {
      $price_min_ttc = price2num($this->price_min_ttc, 'MU');
      $price_min_ht = price2num($this->price_min_ttc / (1 + ($this->tva_tx / 100)), 'MU');
    }
 
    //
    if (($this->price_min > 0) && ($this->price_base_type != 'TTC')) {
      $price_min_ht = price2num($this->price_min, 'MU');
      $price_min_ttc = price2num($this->price_min * (1 + ($this->tva_tx / 100)), 'MU');
    }
 
    $this->accountancy_code_buy = trim((string) $this->accountancy_code_buy);
    $this->accountancy_code_buy_intra = trim((string) $this->accountancy_code_buy_intra);
    $this->accountancy_code_buy_export = trim((string) $this->accountancy_code_buy_export);
    $this->accountancy_code_sell = trim((string) $this->accountancy_code_sell);
    $this->accountancy_code_sell_intra = trim((string) $this->accountancy_code_sell_intra);
    $this->accountancy_code_sell_export = trim((string) $this->accountancy_code_sell_export);
 
    // Normalize the accountancy codes the way the admin dropdown does it, so an API client that
    // sends '606111000' ends up with the same '606111' value the GUI stores (see issue #32343).
    // When ACCOUNTING_MANAGE_ZERO is on, trailing zeros are part of the code and must be kept.
    if (!getDolGlobalString('ACCOUNTING_MANAGE_ZERO')) {
      require_once DOL_DOCUMENT_ROOT.'/core/lib/accounting.lib.php';
      $this->accountancy_code_buy = clean_account($this->accountancy_code_buy);
      $this->accountancy_code_buy_intra = clean_account($this->accountancy_code_buy_intra);
      $this->accountancy_code_buy_export = clean_account($this->accountancy_code_buy_export);
      $this->accountancy_code_sell = clean_account($this->accountancy_code_sell);
      $this->accountancy_code_sell_intra = clean_account($this->accountancy_code_sell_intra);
      $this->accountancy_code_sell_export = clean_account($this->accountancy_code_sell_export);
    }
 
    // Barcode value
    $this->barcode = trim((string) $this->barcode);
    $this->mandatory_period = empty($this->mandatory_period) ? 0 : $this->mandatory_period;
    // Check parameters
    if (empty($this->label)) {
      $langs->load('errors');
      $this->errors[] = $langs->trans('ErrorMandatoryParametersNotProvided');
      return -1;
    }
 
    if (empty($this->ref) || $this->ref == 'auto') {
      // Load object modCodeProduct
      $module = getDolGlobalString('PRODUCT_CODEPRODUCT_ADDON', 'mod_codeproduct_leopard');
      if ($module != 'mod_codeproduct_leopard') {    // Do not load module file for leopard
        if (substr($module, 0, 16) == 'mod_codeproduct_' && substr($module, -3) == 'php') {
          $module = substr($module, 0, dol_strlen($module) - 4);
        }
        dol_include_once('/core/modules/product/'.$module.'.php');
        $modCodeProduct = new $module();
        '@phan-var-force ModeleProductCode $modCodeProduct';
        if (!empty($modCodeProduct->code_auto)) {
          $this->ref = $modCodeProduct->getNextValue($this, $this->type);
        }
        unset($modCodeProduct);
      }
 
      if (empty($this->ref)) {
        $this->error = 'ProductModuleNotSetupForAutoRef';
        return -2;
      }
    }
 
    dol_syslog(get_class($this)."::create ref=".$this->ref." price=".$this->price." price_ttc=".$this->price_ttc." tva_tx=".$this->tva_tx." price_base_type=".$this->price_base_type, LOG_DEBUG);
 
    $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->barcode == '-1' || $this->barcode == 'auto') {
      $this->barcode = $this->get_barcode($this, $this->barcode_type_code);
    }
 
    // Check more parameters
    // If error, this->errors[] is filled
    $result = $this->verify();
 
    if ($result >= 0) {
      $sql = "SELECT count(*) as nb";
      $sql .= " FROM ".$this->db->prefix()."product";
      $sql .= " WHERE entity IN (".getEntity('product').")";
      $sql .= " AND ref = '".$this->db->escape($this->ref)."'";
 
      $result = $this->db->query($sql);
      if ($result) {
        $obj = $this->db->fetch_object($result);
        if ($obj->nb == 0) {
          // Insert new product, no previous one found
          $sql = "INSERT INTO ".$this->db->prefix()."product (";
          $sql .= "datec";
          $sql .= ", entity";
          $sql .= ", ref";
          $sql .= ", ref_ext";
          $sql .= ", price_min";
          $sql .= ", price_min_ttc";
          $sql .= ", label";
          $sql .= ", fk_user_author";
          $sql .= ", fk_product_type";
          $sql .= ", price";
          $sql .= ", price_ttc";
          $sql .= ", price_base_type";
          $sql .= ", price_label";
          $sql .= ", tobuy";
          $sql .= ", tosell";
          if (!getDolGlobalString('MAIN_PRODUCT_PERENTITY_SHARED')) {
            $sql .= ", accountancy_code_buy";
            $sql .= ", accountancy_code_buy_intra";
            $sql .= ", accountancy_code_buy_export";
            $sql .= ", accountancy_code_sell";
            $sql .= ", accountancy_code_sell_intra";
            $sql .= ", accountancy_code_sell_export";
          }
          $sql .= ", canvas";
          $sql .= ", finished";
          $sql .= ", tobatch";
          $sql .= ", sell_or_eat_by_mandatory";
          $sql .= ", batch_mask";
          $sql .= ", fk_unit";
          $sql .= ", mandatory_period";
          $sql .= ", stockable_product";
          if (!empty($this->default_vat_code)) {
            $sql .= ", default_vat_code";
          }
          $sql .= ") VALUES (";
          $sql .= "'".$this->db->idate($this->date_creation)."'";
          $sql .= ", ".(!empty($this->entity) ? (int) $this->entity : (int) $conf->entity);
          $sql .= ", '".$this->db->escape($this->ref)."'";
          $sql .= ", ".(!empty($this->ref_ext) ? "'".$this->db->escape($this->ref_ext)."'" : "null");
          $sql .= ", ".price2num($price_min_ht);
          $sql .= ", ".price2num($price_min_ttc);
          $sql .= ", ".(!empty($this->label) ? "'".$this->db->escape($this->label)."'" : "null");
          $sql .= ", ".((int) $user->id);
          $sql .= ", ".((int) $this->type);
          $sql .= ", ".price2num($price_ht, 'MT');
          $sql .= ", ".price2num($price_ttc, 'MT');
          $sql .= ", '".$this->db->escape($this->price_base_type)."'";
          $sql .= ", ".(!empty($this->price_label) ? "'".$this->db->escape($this->price_label)."'" : "null");
          $sql .= ", ".((int) $this->status);
          $sql .= ", ".((int) $this->status_buy);
          if (!getDolGlobalString('MAIN_PRODUCT_PERENTITY_SHARED')) {
            $sql .= ", '".$this->db->escape($this->accountancy_code_buy)."'";
            $sql .= ", '".$this->db->escape($this->accountancy_code_buy_intra)."'";
            $sql .= ", '".$this->db->escape($this->accountancy_code_buy_export)."'";
            $sql .= ", '".$this->db->escape($this->accountancy_code_sell)."'";
            $sql .= ", '".$this->db->escape($this->accountancy_code_sell_intra)."'";
            $sql .= ", '".$this->db->escape($this->accountancy_code_sell_export)."'";
          }
          $sql .= ", '".$this->db->escape($this->canvas)."'";
          $sql .= ", ".((!isset($this->finished) || $this->finished < 0 || $this->finished == '') ? 'NULL' : (int) $this->finished);
          $sql .= ", ".((empty($this->status_batch) || $this->status_batch < 0) ? '0' : ((int) $this->status_batch));
          $sql .= ", ".((empty($this->sell_or_eat_by_mandatory) || $this->sell_or_eat_by_mandatory < 0) ? 0 : ((int) $this->sell_or_eat_by_mandatory));
          $sql .= ", '".$this->db->escape($this->batch_mask)."'";
          $sql .= ", ".($this->fk_unit > 0 ? ((int) $this->fk_unit) : 'NULL');
          $sql .= ", '".$this->db->escape((string) $this->mandatory_period)."'";
          $sql .= ", ".((int) $this->stockable_product);
          if (!empty($this->default_vat_code)) {
            $sql .= ", '".$this->db->escape($this->default_vat_code)."'";
          }
          $sql .= ")";
          dol_syslog(get_class($this)."::Create", LOG_DEBUG);
 
          $result = $this->db->query($sql);
          if ($result) {
            $id = $this->db->last_insert_id($this->db->prefix()."product");
 
            if ($id > 0) {
              $this->id = $id;
              $this->price = $price_ht;
              $this->price_ttc = $price_ttc;
              $this->price_min = $price_min_ht;
              $this->price_min_ttc = $price_min_ttc;
 
              $result = $this->_log_price($user);
              if ($result > 0) {
                if ($this->update($id, $user, 1, 'add') <= 0) {
                  $error++;
                }
              } else {
                $error++;
                $this->error = $this->db->lasterror();
              }
 
              // update accountancy for this entity
              if (!$error && getDolGlobalString('MAIN_PRODUCT_PERENTITY_SHARED')) {
                $this->db->query("DELETE FROM " . $this->db->prefix() . "product_perentity WHERE fk_product = " .((int) $this->id) . " AND entity = " . ((int) $conf->entity));
 
                $sql = "INSERT INTO " . $this->db->prefix() . "product_perentity (";
                $sql .= " fk_product";
                $sql .= ", entity";
                $sql .= ", accountancy_code_buy";
                $sql .= ", accountancy_code_buy_intra";
                $sql .= ", accountancy_code_buy_export";
                $sql .= ", accountancy_code_sell";
                $sql .= ", accountancy_code_sell_intra";
                $sql .= ", accountancy_code_sell_export";
                $sql .= ") VALUES (";
                $sql .= ((int) $this->id);
                $sql .= ", " . ((int) $conf->entity);
                $sql .= ", '" . $this->db->escape($this->accountancy_code_buy) . "'";
                $sql .= ", '" . $this->db->escape($this->accountancy_code_buy_intra) . "'";
                $sql .= ", '" . $this->db->escape($this->accountancy_code_buy_export) . "'";
                $sql .= ", '" . $this->db->escape($this->accountancy_code_sell) . "'";
                $sql .= ", '" . $this->db->escape($this->accountancy_code_sell_intra) . "'";
                $sql .= ", '" . $this->db->escape($this->accountancy_code_sell_export) . "'";
                $sql .= ")";
                $result = $this->db->query($sql);
                if (!$result) {
                  $error++;
                  $this->error = 'ErrorFailedToInsertAccountancyForEntity';
                }
              }
            } else {
              $error++;
              $this->error = 'ErrorFailedToGetInsertedId';
            }
          } else {
            $error++;
            $this->error = $this->db->lasterror();
          }
        } else {
          // Product already exists with this ref
          $langs->load("products");
          $error++;
          $this->error = "ErrorProductAlreadyExists";
          dol_syslog(get_class($this)."::Create fails, ref ".$this->ref." already exists");
        }
      } else {
        $error++;
        $this->error = $this->db->lasterror();
      }
 
      if (!$error && !$notrigger) {
        // Call trigger
        $result = $this->call_trigger('PRODUCT_CREATE', $user);
        if ($result < 0) {
          $error++;
        }
        // End call triggers
      }
 
      if (!$error) {
        $this->db->commit();
        return $this->id;
      } else {
        $this->db->rollback();
        return -$error;
      }
    } else {
      $this->db->rollback();
      dol_syslog(get_class($this)."::Create fails verify ".implode(',', $this->errors), LOG_WARNING);
      return -3;
    }
  }
 
 
  public function verify()
  {
    global $langs;
 
    $this->errors = array();
 
    $result = 0;
    $this->ref = trim((string) $this->ref);
 
    if (!$this->ref) {
      $this->errors[] = 'ErrorBadRef';
      $result = -2;
    }
 
    $arrayofnonnegativevalue = array('weight' => 'Weight', 'width' => 'Width', 'height' => 'Height', 'length' => 'Length', 'surface' => 'Surface', 'volume' => 'Volume');
    foreach ($arrayofnonnegativevalue as $key => $value) {
      if (property_exists($this, $key) && !empty($this->$key) && ($this->$key < 0)) {
        $langs->loadLangs(array("main", "other"));
        $this->error = $langs->trans("FieldCannotBeNegative", $langs->transnoentitiesnoconv($value));
        $this->errors[] = $this->error;
        $result = -4;
      }
    }
 
    $rescode = $this->check_barcode($this->barcode, $this->barcode_type_code);
    if ($rescode) {
      if ($rescode == -1) {
        $this->errors[] = 'ErrorBadBarCodeSyntax';
      } elseif ($rescode == -2) {
        $this->errors[] = 'ErrorBarCodeRequired';
      } elseif ($rescode == -3) {
        // Note: Common usage is to have barcode unique. For variants, we should have a different barcode.
        $this->errors[] = 'ErrorBarCodeAlreadyUsed';
      }
 
      $result = -3;
    }
 
    return $result;
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function check_barcode($valuetotest, $typefortest)
  {
    // phpcs:enable
    global $conf;
 
    if (isModEnabled('barcode') && getDolGlobalString('BARCODE_PRODUCT_ADDON_NUM')) {
      $module = strtolower(getDolGlobalString('BARCODE_PRODUCT_ADDON_NUM'));
 
      $dirsociete = array_merge(array('/core/modules/barcode/'), $conf->modules_parts['barcode']);
      foreach ($dirsociete as $dirroot) {
        $res = dol_include_once($dirroot.$module.'.php');
        if ($res) {
          break;
        }
      }
 
      $mod = new $module();
      '@phan-var-force ModeleNumRefBarCode $mod';
      dol_syslog(get_class($this)."::check_barcode value=".$valuetotest." type=".$typefortest." module=".$module);
      $result = $mod->verif($this->db, $valuetotest, $this, 0, $typefortest);
      return $result;
    } else {
      return 0;
    }
  }
 
  public function update($id, $user, $notrigger = 0, $action = 'update', $updatetype = false)
  {
    global $langs, $conf, $hookmanager;
 
    $error = 0;
 
    // Check parameters
    if (!$this->label) {
      $this->label = 'MISSING LABEL';
    }
 
    // Clean parameters
    if (getDolGlobalInt('MAIN_SECURITY_ALLOW_UNSECURED_REF_LABELS')) {
      $this->ref = trim((string) $this->ref);
    } else {
      $this->ref = dol_string_nospecial(trim((string) $this->ref));
    }
    $this->label = trim((string) $this->label);
    $this->description = trim((string) $this->description);
    $this->note_private = (isset($this->note_private) ? trim($this->note_private) : null);
    $this->note_public = (isset($this->note_public) ? trim($this->note_public) : null);
    $this->net_measure = price2num($this->net_measure);
    $this->net_measure_units = (!is_numeric($this->net_measure_units) ? null : (int) $this->net_measure_units);
    $this->weight = price2num($this->weight);
    $this->weight_units = (!is_numeric($this->weight_units) ? null : (int) $this->weight_units);
    $this->length = price2num($this->length);
    $this->length_units = (!is_numeric($this->length_units) ? null : (int) $this->length_units);
    $this->width = price2num($this->width);
    $this->width_units = (!is_numeric($this->width_units) ? null : (int) $this->width_units);
    $this->height = price2num($this->height);
    $this->height_units = (!is_numeric($this->height_units) ? null : (int) $this->height_units);
    $this->surface = price2num($this->surface);
    $this->surface_units = (!is_numeric($this->surface_units) ? null : (int) $this->surface_units);
    $this->volume = price2num($this->volume);
    $this->volume_units = (!is_numeric($this->volume_units) ? null : (int) $this->volume_units);
 
    // set unit not defined
    if (is_numeric($this->length_units)) {
      $this->width_units = $this->length_units; // Not used yet
    }
    if (is_numeric($this->length_units)) {
      $this->height_units = $this->length_units; // Not used yet
    }
 
    // Automated compute surface and volume if not filled
    if (empty($this->surface) && !empty($this->length) && !empty($this->width) && $this->length_units == $this->width_units) {
      $this->surface = (float) $this->length * (float) $this->width;
      $this->surface_units = measuring_units_squared((int) $this->length_units);
    }
    if (empty($this->volume) && !empty($this->surface) && !empty($this->height) && $this->length_units == $this->height_units) {
      $this->volume = $this->surface * (float) $this->height;
      $this->volume_units = measuring_units_cubed((int) $this->height_units);
    }
 
    if (empty($this->tva_tx)) {
      $this->tva_tx = 0;
    }
    if (empty($this->tva_npr)) {
      $this->tva_npr = 0;
    }
    if (empty($this->localtax1_tx)) {
      $this->localtax1_tx = 0;
    }
    if (empty($this->localtax2_tx)) {
      $this->localtax2_tx = 0;
    }
    if (empty($this->localtax1_type)) {
      $this->localtax1_type = '0';
    }
    if (empty($this->localtax2_type)) {
      $this->localtax2_type = '0';
    }
    if (empty($this->status)) {
      $this->status = 0;
    }
    if (empty($this->status_buy)) {
      $this->status_buy = 0;
    }
 
    if (empty($this->country_id)) {
      $this->country_id = 0;
    }
    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;
    }
 
    if (empty($this->state_id)) {
      $this->state_id = 0;
    }
 
    if (empty($this->stockable_product)) {
      $this->stockable_product = 0;
    }
 
    // For automatic creation during update action (not used by Dolibarr GUI, can be used by scripts)
    if ($this->barcode == '-1' || $this->barcode == 'auto') {
      $this->barcode = $this->get_barcode($this, $this->barcode_type_code);
    }
 
    // Barcode value
    $this->barcode = (empty($this->barcode) ? '' : trim($this->barcode));
 
    $this->accountancy_code_buy = trim((string) $this->accountancy_code_buy);
    $this->accountancy_code_buy_intra = (!empty($this->accountancy_code_buy_intra) ? trim($this->accountancy_code_buy_intra) : '');
    $this->accountancy_code_buy_export = trim((string) $this->accountancy_code_buy_export);
    $this->accountancy_code_sell = trim((string) $this->accountancy_code_sell);
    $this->accountancy_code_sell_intra = trim((string) $this->accountancy_code_sell_intra);
    $this->accountancy_code_sell_export = trim((string) $this->accountancy_code_sell_export);
 
    // Normalize the accountancy codes the way the admin dropdown does it, so an API client that
    // sends '606111000' ends up with the same '606111' value the GUI stores (see issue #32343).
    // When ACCOUNTING_MANAGE_ZERO is on, trailing zeros are part of the code and must be kept.
    if (!getDolGlobalString('ACCOUNTING_MANAGE_ZERO')) {
      require_once DOL_DOCUMENT_ROOT.'/core/lib/accounting.lib.php';
      $this->accountancy_code_buy = clean_account($this->accountancy_code_buy);
      $this->accountancy_code_buy_intra = clean_account($this->accountancy_code_buy_intra);
      $this->accountancy_code_buy_export = clean_account($this->accountancy_code_buy_export);
      $this->accountancy_code_sell = clean_account($this->accountancy_code_sell);
      $this->accountancy_code_sell_intra = clean_account($this->accountancy_code_sell_intra);
      $this->accountancy_code_sell_export = clean_account($this->accountancy_code_sell_export);
    }
 
    $this->db->begin();
 
    $result = 0;
    // Check name is required and codes are ok or unique. If error, this->errors[] is filled
    if ($action != 'add') {
      $result = $this->verify(); // We don't check when update called during a create because verify was already done
    } else {
      // we can continue
      $result = 0;
    }
 
    if ($result >= 0) {
      // $this->oldcopy should have been set by the caller of update (here properties were already modified)
      // Note that this->oldcopy must be a Product instance (not stdClass), otherwise the method
      // hasbatch() called below will fatal. Callers may set oldcopy via dol_clone($obj, 2) (which
      // returns a stdClass with scalar properties only) and then we cannot call methods on it,
      // so re-clone with native=1 in that case (see issues #38663, #38638).
      if (is_null($this->oldcopy) || (is_object($this->oldcopy) && empty($this->oldcopy->id)) || !($this->oldcopy instanceof Product)) {
        $this->oldcopy = dol_clone($this, 1); // 1 to clone with methods to avoid fatal error with $this->oldcopy->hasbatch()
      }
      // Test if batch management is activated on existing product
      // If yes, we create missing entries into product_batch
      if ($this->hasbatch() && !$this->oldcopy->hasbatch()) {
        //$valueforundefinedlot = 'Undefined';  // In previous version, 39 and lower
        $valueforundefinedlot = '000000';
        if (getDolGlobalString('STOCK_DEFAULT_BATCH')) {
          $valueforundefinedlot = getDolGlobalString('STOCK_DEFAULT_BATCH');
        }
 
        dol_syslog("Flag batch of product id=".$this->id." is set to ON, so we will create missing records into product_batch");
 
        $this->load_stock();
        foreach ($this->stock_warehouse as $idW => $ObjW) {   // For each warehouse where we have stocks defined for this product (for each lines in product_stock)
          $qty_batch = 0;
          foreach ($ObjW->detail_batch as $detail) {    // Each lines of detail in product_batch of the current $ObjW = product_stock
            if ($detail->batch == $valueforundefinedlot || $detail->batch == 'Undefined') {
              // We discard this line, we will create it later
              $sqlclean = "DELETE FROM ".$this->db->prefix()."product_batch WHERE batch in('Undefined', '".$this->db->escape($valueforundefinedlot)."') AND fk_product_stock = ".((int) $ObjW->id);
              $result = $this->db->query($sqlclean);
              if (!$result) {
                dol_print_error($this->db);
                exit;
              }
              continue;
            }
 
            $qty_batch += $detail->qty;
          }
          // Quantities in batch details are not same as stock quantity,
          // so we add a default batch record to complete and get same qty in parent and child table
          if ($ObjW->real != $qty_batch) {
            $ObjBatch = new Productbatch($this->db);
            $ObjBatch->batch = $valueforundefinedlot;
            $ObjBatch->qty = ($ObjW->real - $qty_batch);
            $ObjBatch->fk_product_stock = (int) $ObjW->id;
 
            if ($ObjBatch->create($user, 1) < 0) {
              $error++;
              $this->errors = $ObjBatch->errors;
            } else {
              // we also add lot record if not exist
              $ObjLot = new Productlot($this->db);
              // @phan-suppress-next-line PhanPluginSuspiciousParamPosition
              if ($ObjLot->fetch(0, $this->id, $valueforundefinedlot) == 0) {
                $ObjLot->fk_product = $this->id;
                $ObjLot->entity = (int) $this->entity;
                $ObjLot->fk_user_creat = $user->id;
                $ObjLot->batch = $valueforundefinedlot;
                if ($ObjLot->create($user, 1) < 0) {
                  $error++;
                  $this->errors = $ObjLot->errors;
                }
              }
            }
          }
        }
      }
 
      $sql = "UPDATE ".$this->db->prefix()."product";
      $sql .= " SET label = '".$this->db->escape($this->label)."'";
 
      if ($updatetype && ($this->isProduct() || $this->isService())) {
        $sql .= ", fk_product_type = ".((int) $this->type);
      }
 
      $sql .= ", ref = '".$this->db->escape($this->ref)."'";
      $sql .= ", ref_ext = ".(!empty($this->ref_ext) ? "'".$this->db->escape($this->ref_ext)."'" : "null");
      $sql .= ", default_vat_code = ".($this->default_vat_code ? "'".$this->db->escape($this->default_vat_code)."'" : "null");
      $sql .= ", tva_tx = ".((float) $this->tva_tx);
      $sql .= ", recuperableonly = ".((int) $this->tva_npr);
      $sql .= ", localtax1_tx = ".((float) $this->localtax1_tx);
      $sql .= ", localtax2_tx = ".((float) $this->localtax2_tx);
      $sql .= ", localtax1_type = ".($this->localtax1_type != '' ? "'".$this->db->escape($this->localtax1_type)."'" : "'0'");
      $sql .= ", localtax2_type = ".($this->localtax2_type != '' ? "'".$this->db->escape($this->localtax2_type)."'" : "'0'");
 
      $sql .= ", barcode = ".(empty($this->barcode) ? "null" : "'".$this->db->escape($this->barcode)."'");
      $sql .= ", fk_barcode_type = ".(empty($this->barcode_type) ? "null" : $this->db->escape((string) $this->barcode_type));
 
      $sql .= ", tosell = ".(int) $this->status;
      $sql .= ", tobuy = ".(int) $this->status_buy;
      $sql .= ", tobatch = ".((empty($this->status_batch) || $this->status_batch < 0) ? '0' : (int) $this->status_batch);
      $sql .= ", sell_or_eat_by_mandatory = ".((empty($this->sell_or_eat_by_mandatory) || $this->sell_or_eat_by_mandatory < 0) ? 0 : (int) $this->sell_or_eat_by_mandatory);
      $sql .= ", batch_mask = '".$this->db->escape($this->batch_mask)."'";
 
      $sql .= ", finished = ".((!isset($this->finished) || $this->finished < 0 || $this->finished === '') ? "null" : (int) $this->finished);
      $sql .= ", fk_default_bom = ".((!isset($this->fk_default_bom) || $this->fk_default_bom < 0 || $this->fk_default_bom == '') ? "null" : (int) $this->fk_default_bom);
      $sql .= ", net_measure = ".($this->net_measure != '' ? "'".$this->db->escape($this->net_measure)."'" : 'null');
      $sql .= ", net_measure_units = ".((string) $this->net_measure_units != '' ? ((int) $this->net_measure_units) : 'null');
      $sql .= ", weight = ".($this->weight != '' ? "'".$this->db->escape($this->weight)."'" : 'null');
      $sql .= ", weight_units = ".((string) $this->weight_units != '' ? ((int) $this->weight_units) : 'null');
      $sql .= ", length = ".($this->length != '' ? "'".$this->db->escape($this->length)."'" : 'null');
      $sql .= ", length_units = ".((string) $this->length_units != '' ? ((int) $this->length_units) : 'null');
      $sql .= ", width= ".($this->width != '' ? "'".$this->db->escape($this->width)."'" : 'null');
      $sql .= ", width_units = ".((string) $this->width_units != '' ? ((int) $this->width_units) : 'null');
      $sql .= ", height = ".($this->height != '' ? "'".$this->db->escape($this->height)."'" : 'null');
      $sql .= ", height_units = ".((string) $this->height_units != '' ? ((int) $this->height_units) : 'null');
      $sql .= ", surface = ".($this->surface != '' ? "'".$this->db->escape($this->surface)."'" : 'null');
      $sql .= ", surface_units = ".((string) $this->surface_units != '' ? ((int) $this->surface_units) : 'null');
      $sql .= ", volume = ".($this->volume != '' ? "'".$this->db->escape($this->volume)."'" : 'null');
      $sql .= ", volume_units = ".((string) $this->volume_units != '' ? ((int) $this->volume_units) : 'null');
      $sql .= ", fk_default_warehouse = ".($this->fk_default_warehouse > 0 ? ((int) $this->fk_default_warehouse) : 'null');
      $sql .= ", fk_default_workstation = ".($this->fk_default_workstation > 0 ? ((int) $this->fk_default_workstation) : 'null');
      $sql .= ", seuil_stock_alerte = ".((isset($this->seuil_stock_alerte) && is_numeric($this->seuil_stock_alerte)) ? (float) $this->seuil_stock_alerte : 'null');
      $sql .= ", description = '".$this->db->escape($this->description)."'";
      $sql .= ", url = ".($this->url ? "'".$this->db->escape($this->url)."'" : 'null');
      $sql .= ", customcode = '".$this->db->escape($this->customcode)."'";
      $sql .= ", fk_country = ".($this->country_id > 0 ? (int) $this->country_id : 'null');
      $sql .= ", fk_state = ".($this->state_id > 0 ? (int) $this->state_id : 'null');
      $sql .= ", lifetime = ".($this->lifetime > 0 ? (int) $this->lifetime : 'null');
      $sql .= ", qc_frequency = ".($this->qc_frequency > 0 ? (int) $this->qc_frequency : 'null');
      $sql .= ", note = ".(isset($this->note_private) ? "'".$this->db->escape($this->note_private)."'" : 'null');
      $sql .= ", note_public = ".(isset($this->note_public) ? "'".$this->db->escape($this->note_public)."'" : 'null');
      $sql .= ", duration = '".$this->db->escape($this->duration_value.$this->duration_unit)."'";
      if (!getDolGlobalString('MAIN_PRODUCT_PERENTITY_SHARED')) {
        $sql .= ", accountancy_code_buy = '" . $this->db->escape($this->accountancy_code_buy) . "'";
        $sql .= ", accountancy_code_buy_intra = '" . $this->db->escape($this->accountancy_code_buy_intra) . "'";
        $sql .= ", accountancy_code_buy_export = '" . $this->db->escape($this->accountancy_code_buy_export) . "'";
        $sql .= ", accountancy_code_sell= '" . $this->db->escape($this->accountancy_code_sell) . "'";
        $sql .= ", accountancy_code_sell_intra= '" . $this->db->escape($this->accountancy_code_sell_intra) . "'";
        $sql .= ", accountancy_code_sell_export= '" . $this->db->escape($this->accountancy_code_sell_export) . "'";
      }
      $sql .= ", desiredstock = ".((isset($this->desiredstock) && is_numeric($this->desiredstock)) ? (float) $this->desiredstock : "null");
      $sql .= ", cost_price = ".($this->cost_price != '' ? ((float) $this->cost_price) : 'null');
      $sql .= ", fk_unit= ".(!$this->fk_unit ? 'NULL' : (int) $this->fk_unit);
      $sql .= ", price_autogen = ".(!$this->price_autogen ? 0 : 1);
      $sql .= ", fk_price_expression = ".($this->fk_price_expression != 0 ? (int) $this->fk_price_expression : 'NULL');
      $sql .= ", fk_user_modif = ".($user->id > 0 ? (int) $user->id : 'NULL');
      $sql .= ", mandatory_period = ".((int) $this->mandatory_period);
      $sql .= ", stockable_product = ".(int) $this->stockable_product;
      if (getDolGlobalString('PRODUCT_USE_CUSTOMER_PACKAGING')) {
        $sql .= ", packaging = ".(float) $this->packaging;
      }
 
      // stock field is not here because it is a denormalized value from product_stock.
      $sql .= " WHERE rowid = ".((int) $id);
 
      dol_syslog(get_class($this)."::update", LOG_DEBUG);
 
      $resql = $this->db->query($sql);
      if ($resql) {
        $this->id = $id;
 
        // Multilangs
        if (getDolGlobalInt('MAIN_MULTILANGS')) {
          if ($this->setMultiLangs($user, $notrigger) < 0) {
            $this->db->rollback();
            return -2;
          }
        }
 
        $action = 'update';
 
        // update accountancy for this entity
        if (!$error && getDolGlobalString('MAIN_PRODUCT_PERENTITY_SHARED')) {
          $this->db->query("DELETE FROM " . $this->db->prefix() . "product_perentity WHERE fk_product = " . ((int) $this->id) . " AND entity = " . ((int) $conf->entity));
 
          $sql = "INSERT INTO " . $this->db->prefix() . "product_perentity (";
          $sql .= " fk_product";
          $sql .= ", entity";
          $sql .= ", accountancy_code_buy";
          $sql .= ", accountancy_code_buy_intra";
          $sql .= ", accountancy_code_buy_export";
          $sql .= ", accountancy_code_sell";
          $sql .= ", accountancy_code_sell_intra";
          $sql .= ", accountancy_code_sell_export";
          $sql .= ") VALUES (";
          $sql .= ((int) $this->id);
          $sql .= ", " . ((int) $conf->entity);
          $sql .= ", '" . $this->db->escape($this->accountancy_code_buy) . "'";
          $sql .= ", '" . $this->db->escape($this->accountancy_code_buy_intra) . "'";
          $sql .= ", '" . $this->db->escape($this->accountancy_code_buy_export) . "'";
          $sql .= ", '" . $this->db->escape($this->accountancy_code_sell) . "'";
          $sql .= ", '" . $this->db->escape($this->accountancy_code_sell_intra) . "'";
          $sql .= ", '" . $this->db->escape($this->accountancy_code_sell_export) . "'";
          $sql .= ")";
          $result = $this->db->query($sql);
          if (!$result) {
            $error++;
            $this->error = 'ErrorFailedToUpdateAccountancyForEntity';
          }
        }
 
        if (!$this->hasbatch() && $this->oldcopy->hasbatch()) {
          // Selection of all product stock movements that contains batchs
          $sql = 'SELECT pb.qty, ps.fk_entrepot, pb.batch FROM '.MAIN_DB_PREFIX.'product_batch as pb';
          $sql .= ' INNER JOIN '.MAIN_DB_PREFIX.'product_stock as ps ON (ps.rowid = pb.fk_product_stock)';
          $sql .= ' WHERE ps.fk_product = '.(int) $this->id;
 
          $resql = $this->db->query($sql);
          if ($resql) {
            $inventorycode = dol_print_date(dol_now(), '%Y%m%d%H%M%S');
 
            while ($obj = $this->db->fetch_object($resql)) {
              $value = $obj->qty;
              $fk_entrepot = $obj->fk_entrepot;
              $price = 0;
              $dlc = '';
              $dluo = '';
              $batch = $obj->batch;
 
              // To know how to revert stockMouvement (add or remove)
              $addOremove = $value > 0 ? 1 : 0; // 1 if remove, 0 if add
              $label = $langs->trans('BatchStockMouvementAddInGlobal');
              $res = $this->correct_stock_batch($user, $fk_entrepot, abs($value), $addOremove, $label, $price, $dlc, $dluo, $batch, $inventorycode, '', null, 0, null, true);
 
              if ($res > 0) {
                $label = $langs->trans('BatchStockMouvementAddInGlobal');
                $res = $this->correct_stock($user, $fk_entrepot, abs($value), (int) empty($addOremove), $label, $price, $inventorycode, '', null, 0);
                if ($res < 0) {
                  $error++;
                }
              } else {
                $error++;
              }
            }
          }
        }
 
        // Actions on extra fields
        if (!$error) {
          $result = $this->insertExtraFields();
          if ($result < 0) {
            $error++;
          }
        }
 
        if (!$error && !$notrigger) {
          // Call trigger
          $result = $this->call_trigger('PRODUCT_MODIFY', $user);
          if ($result < 0) {
            $error++;
          }
          // End call triggers
        }
 
        if (!$error && (is_object($this->oldcopy) && $this->oldcopy->ref !== $this->ref)) {
          // We remove directory
          if ($conf->product->dir_output) {
            $olddir = $conf->product->dir_output."/".dol_sanitizeFileName($this->oldcopy->ref);
            $newdir = $conf->product->dir_output."/".dol_sanitizeFileName($this->ref);
            if (file_exists($olddir)) {
              // include_once DOL_DOCUMENT_ROOT . '/core/lib/files.lib.php';
              // $res = dol_move($olddir, $newdir);
              // do not use dol_move with directory
              $res = @rename($olddir, $newdir);
              if (!$res) {
                $langs->load("errors");
                $this->error = $langs->trans('ErrorFailToRenameDir', $olddir, $newdir);
                $error++;
              } else {
                // to keep old entries with the new dir
                require_once DOL_DOCUMENT_ROOT . '/ecm/class/ecmfiles.class.php';
                $ecmfiles = new EcmFiles($this->db);
                $ecmfiles->updateAfterRename("produit/".dol_sanitizeFileName($this->oldcopy->ref), "produit/".dol_sanitizeFileName($this->ref));
              }
            }
          }
        }
 
        if (!$error) {
          if (isModEnabled('variants')) {
            include_once DOL_DOCUMENT_ROOT.'/variants/class/ProductCombination.class.php';
 
            $comb = new ProductCombination($this->db);
 
            foreach ($comb->fetchAllByFkProductParent($this->id) as $currcomb) {
              $currcomb->updateProperties($this, $user);
            }
          }
 
          $this->db->commit();
          return 1;
        } else {
          $this->db->rollback();
          return -$error;
        }
      } else {
        if ($this->db->errno() == 'DB_ERROR_RECORD_ALREADY_EXISTS') {
          $langs->load("errors");
          if (empty($conf->barcode->enabled) || empty($this->barcode)) {
            $this->error = $langs->trans("Error")." : ".$langs->trans("ErrorProductAlreadyExists", $this->ref);
          } else {
            $this->error = $langs->trans("Error")." : ".$langs->trans("ErrorProductBarCodeAlreadyExists", $this->barcode);
          }
          $this->errors[] = $this->error;
          $this->db->rollback();
          return -1;
        } else {
          $this->error = $langs->trans("Error")." : ".$this->db->error()." - ".$sql;
          $this->errors[] = $this->error;
          $this->db->rollback();
          return -2;
        }
      }
    } else {
      $this->db->rollback();
      dol_syslog(get_class($this)."::Update fails verify ".implode(',', $this->errors), LOG_WARNING);
      return -3;
    }
  }
 
  public function delete(User $user, $notrigger = 0)
  {
    global $conf;
    include_once DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php';
 
    $error = 0;
 
    // Check parameters
    if (empty($this->id)) {
      $this->error = "Object must be fetched before calling delete";
      return -1;
    }
    if (($this->isProduct() && !$user->hasRight('produit', 'supprimer')) || ($this->isService() && !$user->hasRight('service', 'supprimer'))) {
      $this->error = "ErrorForbidden";
      return 0;
    }
 
    $objectisused = $this->isObjectUsed($this->id);
    if (empty($objectisused)) {
      $this->db->begin();
 
      if (empty($notrigger)) {
        // Call trigger
        $result = $this->call_trigger('PRODUCT_DELETE', $user);
        if ($result < 0) {
          $error++;
        }
        // End call triggers
      }
 
      // Delete from product_batch on product delete
      if (!$error) {
        $sql = "DELETE FROM ".$this->db->prefix().'product_batch';
        $sql .= " WHERE fk_product_stock IN (";
        $sql .= "SELECT rowid FROM ".$this->db->prefix().'product_stock';
        $sql .= " WHERE fk_product = ".((int) $this->id).")";
 
        $result = $this->db->query($sql);
        if (!$result) {
          $error++;
          $this->errors[] = $this->db->lasterror();
        }
      }
 
      // Delete pricelogs so we don't have any orphan rows, see #38383
      if (!$error) {
        $sql = "DELETE FROM " . $this->db->prefix() . "product_fournisseur_price_log";
        $sql .= " WHERE fk_product_fournisseur IN (";
        $sql .= "   SELECT rowid FROM " . $this->db->prefix() . "product_fournisseur_price";
        $sql .= "   WHERE fk_product = " . ((int) $this->id);
        $sql .= " )";
 
        $resql = $this->db->query($sql);
        if (!$resql) {
          $error++;
          $this->errors[] = $this->db->lasterror();
        }
      }
 
      // Delete the extrafields of the translations (llx_product_lang_extrafields has no foreign key)
      if (!$error) {
        $sql = "DELETE FROM ".$this->db->prefix()."product_lang_extrafields";
        $sql .= " WHERE fk_object IN (SELECT rowid FROM ".$this->db->prefix()."product_lang WHERE fk_product = ".((int) $this->id).")";
        $result = $this->db->query($sql);
        if (!$result) {
          $error++;
          $this->errors[] = $this->db->lasterror();
        }
      }
 
      // Delete all child tables
      if (!$error) {
        $elements = array('product_fournisseur_price', 'product_price', 'product_lang', 'categorie_product', 'product_stock', 'product_customer_price', 'product_lot'); // product_batch is done before
        foreach ($elements as $table) {
          if (!$error) {
            $sql = "DELETE FROM ".$this->db->prefix().$table;
            $sql .= " WHERE fk_product = ".(int) $this->id;
 
            $result = $this->db->query($sql);
            if (!$result) {
              $error++;
              $this->errors[] = $this->db->lasterror();
            }
          }
        }
      }
 
      if (!$error && isModEnabled('variants')) {
        include_once DOL_DOCUMENT_ROOT.'/variants/class/ProductCombination.class.php';
        include_once DOL_DOCUMENT_ROOT.'/variants/class/ProductCombination2ValuePair.class.php';
 
        // If it is a parent product, then we remove the association with child products
        $prodcomb = new ProductCombination($this->db);
 
        if ($prodcomb->deleteByFkProductParent($user, $this->id) < 0) {
          $error++;
          $this->errors[] = 'Error deleting combinations';
        }
 
        // We also check if it is a child product
        if (!$error && ($prodcomb->fetchByFkProductChild($this->id) > 0) && ($prodcomb->delete($user) < 0)) {
          $error++;
          $this->errors[] = 'Error deleting child combination';
        }
      }
 
      // Rows may survive the deactivation of the module, and the foreign key on
      // fk_product_parent would then refuse to delete the product. Only the links are
      // removed here, never a product: deleting variant products silently is the job of the
      // block above, which runs when the user can actually see them. Missing tables are
      // tolerated by deleteLinksByProduct(): they only exist once the module was enabled.
      if (!$error) {
        include_once DOL_DOCUMENT_ROOT.'/variants/class/ProductCombination.class.php';
 
        $prodcomb = new ProductCombination($this->db);
        if ($prodcomb->deleteLinksByProduct($this->id) < 0) {
          $error++;
          $this->errors[] = $prodcomb->error;
        }
      }
 
      // Delete from product_association
      if (!$error) {
        $sql = "DELETE FROM ".$this->db->prefix()."product_association";
        $sql .= " WHERE fk_product_pere = ".(int) $this->id." OR fk_product_fils = ".(int) $this->id;
 
        $result = $this->db->query($sql);
        if (!$result) {
          $error++;
          $this->errors[] = $this->db->lasterror();
        }
      }
 
      // Remove extrafields
      if (!$error) {
        $result = $this->deleteExtraFields();
        if ($result < 0) {
          $error++;
          dol_syslog(get_class($this)."::delete error -4 ".$this->error, LOG_ERR);
        }
      }
 
      // Delete product
      if (!$error) {
        $sqlz = "DELETE FROM ".$this->db->prefix()."product";
        $sqlz .= " WHERE rowid = ".(int) $this->id;
 
        $resultz = $this->db->query($sqlz);
        if (!$resultz) {
          $error++;
          $this->errors[] = $this->db->lasterror();
        }
      }
 
      // Delete record into ECM index and physically
      if (!$error) {
        $res = $this->deleteEcmFiles(0); // Deleting files physically is done later with the dol_delete_dir_recursive
        $res = $this->deleteEcmFiles(1); // Deleting files physically is done later with the dol_delete_dir_recursive
        if (!$res) {
          $error++;
        }
      }
 
      if (!$error) {
        // We remove directory
        $ref = dol_sanitizeFileName($this->ref);
        if ($conf->product->dir_output) {
          $dir = $conf->product->dir_output."/".$ref;
          if (file_exists($dir)) {
            $res = @dol_delete_dir_recursive($dir);
            if (!$res) {
              $this->errors[] = 'ErrorFailToDeleteDir';
              $error++;
            }
          }
        }
      }
 
      if (!$error) {
        $this->db->commit();
        return 1;
      } else {
        foreach ($this->errors as $errmsg) {
          dol_syslog(get_class($this)."::delete ".$errmsg, LOG_ERR);
          $this->error .= ($this->error ? ', '.$errmsg : $errmsg);
        }
        $this->db->rollback();
        return -$error;
      }
    } else {
      $this->error = "ErrorRecordIsUsedCantDelete";
      return 0;
    }
  }
 
  public static function getSellOrEatByMandatoryList()
  {
    global $langs;
 
    $sellByLabel = $langs->trans('SellByDate');
    $eatByLabel = $langs->trans('EatByDate');
    return array(
      self::SELL_OR_EAT_BY_MANDATORY_ID_NONE => $langs->trans('BatchSellOrEatByMandatoryNone'),
      self::SELL_OR_EAT_BY_MANDATORY_ID_SELL_BY => $sellByLabel,
      self::SELL_OR_EAT_BY_MANDATORY_ID_EAT_BY => $eatByLabel,
      self::SELL_OR_EAT_BY_MANDATORY_ID_SELL_AND_EAT => $langs->trans('BatchSellOrEatByMandatoryAll', $sellByLabel, $eatByLabel),
    );
  }
 
  public function getSellOrEatByMandatoryLabel()
  {
    $sellOrEatByMandatoryLabel = '';
 
    $sellOrEatByMandatoryList = self::getSellOrEatByMandatoryList();
    if (isset($sellOrEatByMandatoryList[$this->sell_or_eat_by_mandatory])) {
      $sellOrEatByMandatoryLabel = $sellOrEatByMandatoryList[$this->sell_or_eat_by_mandatory];
    }
 
    return $sellOrEatByMandatoryLabel;
  }
 
  public function setMultiLangs($user, $notrigger = 0)
  {
    global $langs;
 
    $langs_available = $langs->get_available_languages(DOL_DOCUMENT_ROOT, 0, 2);
    $current_lang = $langs->getDefaultLang();
 
    foreach ($langs_available as $key => $value) {
      if ($key == $current_lang) {
        $sql = "SELECT rowid";
        $sql .= " FROM ".$this->db->prefix()."product_lang";
        $sql .= " WHERE fk_product = ".((int) $this->id);
        $sql .= " AND lang = '".$this->db->escape($key)."'";
 
        $result = $this->db->query($sql);
        $objlang = ($result ? $this->db->fetch_object($result) : null);
        $rowidlang = ($objlang ? (int) $objlang->rowid : 0);
 
        if ($objlang) { // if there is already a description line for this language
          $sql2 = "UPDATE ".$this->db->prefix()."product_lang";
          $sql2 .= " SET ";
          $sql2 .= " label='".$this->db->escape($this->label)."',";
          $sql2 .= " description='".$this->db->escape($this->description)."'";
          if (getDolGlobalString('PRODUCT_USE_OTHER_FIELD_IN_TRANSLATION')) {
            $sql2 .= ", note='".$this->db->escape($this->other)."'";
          }
          $sql2 .= " WHERE fk_product = ".((int) $this->id)." AND lang = '".$this->db->escape($key)."'";
        } else {
          $sql2 = "INSERT INTO ".$this->db->prefix()."product_lang (fk_product, lang, label, description";
          if (getDolGlobalString('PRODUCT_USE_OTHER_FIELD_IN_TRANSLATION')) {
            $sql2 .= ", note";
          }
          $sql2 .= ")";
          $sql2 .= " VALUES(".((int) $this->id).",'".$this->db->escape($key)."','".$this->db->escape($this->label)."',";
          $sql2 .= " '".$this->db->escape($this->description)."'";
          if (getDolGlobalString('PRODUCT_USE_OTHER_FIELD_IN_TRANSLATION')) {
            $sql2 .= ", '".$this->db->escape($this->other)."'";
          }
          $sql2 .= ")";
        }
        dol_syslog(get_class($this).'::setMultiLangs key = current_lang = '.$key);
        if (!$this->db->query($sql2)) {
          $this->error = $this->db->lasterror();
          return -1;
        }
        if (empty($rowidlang)) {
          $rowidlang = (int) $this->db->last_insert_id($this->db->prefix()."product_lang");
        }
        if ($this->setMultiLangsExtrafields($key, $rowidlang) < 0) {
          return -1;
        }
      } elseif (isset($this->multilangs[$key])) {
        if (empty($this->multilangs[$key]["label"])) {
          $this->errors[] = $key . ' : ' . $langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("Label"));
          return -1;
        }
 
        $sql = "SELECT rowid";
        $sql .= " FROM ".$this->db->prefix()."product_lang";
        $sql .= " WHERE fk_product = ".((int) $this->id);
        $sql .= " AND lang = '".$this->db->escape($key)."'";
 
        $result = $this->db->query($sql);
        $objlang = ($result ? $this->db->fetch_object($result) : null);
        $rowidlang = ($objlang ? (int) $objlang->rowid : 0);
 
        if ($objlang) { // if there is already a description line for this language
          $sql2 = "UPDATE ".$this->db->prefix()."product_lang";
          $sql2 .= " SET ";
          $sql2 .= " label = '".$this->db->escape($this->multilangs["$key"]["label"])."',";
          $sql2 .= " description = '".$this->db->escape($this->multilangs["$key"]["description"])."'";
          if (getDolGlobalString('PRODUCT_USE_OTHER_FIELD_IN_TRANSLATION')) {
            // @phan-suppress-next-line PhanTypeInvalidDimOffset
            $sql2 .= ", note = '".$this->db->escape($this->multilangs["$key"]["other"])."'";
          }
          $sql2 .= " WHERE fk_product = ".((int) $this->id)." AND lang = '".$this->db->escape($key)."'";
        } else {
          $sql2 = "INSERT INTO ".$this->db->prefix()."product_lang (fk_product, lang, label, description";
          if (getDolGlobalString('PRODUCT_USE_OTHER_FIELD_IN_TRANSLATION')) {
            $sql2 .= ", note";
          }
          $sql2 .= ")";
          $sql2 .= " VALUES(".((int) $this->id).",'".$this->db->escape($key)."','".$this->db->escape($this->multilangs["$key"]["label"])."',";
          $sql2 .= " '".$this->db->escape($this->multilangs["$key"]["description"])."'";
          if (getDolGlobalString('PRODUCT_USE_OTHER_FIELD_IN_TRANSLATION')) {
            // @phan-suppress-next-line PhanTypeInvalidDimOffset
            $sql2 .= ", '".$this->db->escape($this->multilangs["$key"]["other"])."'";
          }
          $sql2 .= ")";
        }
 
        // We do not save if main fields are empty
        if ($this->multilangs["$key"]["label"] || $this->multilangs["$key"]["description"]) {
          if (!$this->db->query($sql2)) {
            $this->error = $this->db->lasterror();
            return -1;
          }
          if (empty($rowidlang)) {
            $rowidlang = (int) $this->db->last_insert_id($this->db->prefix()."product_lang");
          }
          if ($this->setMultiLangsExtrafields($key, $rowidlang) < 0) {
            return -1;
          }
        }
      } else {
        // language is not current language and we didn't provide a multilang description for this language
      }
    }
 
    if (empty($notrigger)) {
      // Call trigger
      $result = $this->call_trigger('PRODUCT_SET_MULTILANGS', $user);
      if ($result < 0) {
        $this->error = $this->db->lasterror();
        return -1;
      }
      // End call triggers
    }
 
    return 1;
  }
 
  protected function setMultiLangsExtrafields($langcode, $rowidlang)
  {
    if (empty($rowidlang) || !isset($this->multilangs[$langcode]['array_options']) || !is_array($this->multilangs[$langcode]['array_options'])) {
      return 0;
    }
 
    $productlang = new ProductLang($this->db);
    $productlang->id = $rowidlang;
    $productlang->array_options = $this->multilangs[$langcode]['array_options'];
    $result = $productlang->insertExtraFields();
    if ($result < 0) {
      $this->error = $productlang->error;
      $this->errors = array_merge($this->errors, $productlang->errors);
      dol_syslog(get_class($this).'::setMultiLangsExtrafields error='.$this->error, LOG_ERR);
      return -1;
    }
 
    return 1;
  }
 
  public function delMultiLangs($langtodelete, $user, $notrigger = 0)
  {
    dol_syslog(get_class($this).'::delMultiLangs', LOG_DEBUG);
 
    // Delete the extrafields of the translation first (llx_product_lang_extrafields has no foreign key)
    $sql = "DELETE FROM ".$this->db->prefix()."product_lang_extrafields";
    $sql .= " WHERE fk_object IN (SELECT rowid FROM ".$this->db->prefix()."product_lang";
    $sql .= " WHERE fk_product = ".((int) $this->id)." AND lang = '".$this->db->escape($langtodelete)."')";
    $result = $this->db->query($sql);
    if (!$result) {
      $this->error = $this->db->lasterror();
      dol_syslog(get_class($this).'::delMultiLangs error='.$this->error, LOG_ERR);
      return -1;
    }
 
    $sql = "DELETE FROM ".$this->db->prefix()."product_lang";
    $sql .= " WHERE fk_product = ".((int) $this->id)." AND lang = '".$this->db->escape($langtodelete)."'";
 
    $result = $this->db->query($sql);
    if ($result) {
      if (empty($notrigger)) {
        // Call trigger
        $result = $this->call_trigger('PRODUCT_DEL_MULTILANGS', $user);
        if ($result < 0) {
          $this->error = $this->db->lasterror();
          dol_syslog(get_class($this).'::delMultiLangs error='.$this->error, LOG_ERR);
          return -1;
        }
        // End call triggers
      }
      unset($this->multilangs[$langtodelete]);
      return 1;
    } else {
      $this->error = $this->db->lasterror();
      dol_syslog(get_class($this).'::delMultiLangs error='.$this->error, LOG_ERR);
      return -1;
    }
  }
 
  public function setAccountancyCode($type, $value)
  {
    global $user;
 
    $error = 0;
 
    $this->db->begin();
 
    if ($type == 'buy') {
      $field = 'accountancy_code_buy';
    } elseif ($type == 'buy_intra') {
      $field = 'accountancy_code_buy_intra';
    } elseif ($type == 'buy_export') {
      $field = 'accountancy_code_buy_export';
    } elseif ($type == 'sell') {
      $field = 'accountancy_code_sell';
    } elseif ($type == 'sell_intra') {
      $field = 'accountancy_code_sell_intra';
    } elseif ($type == 'sell_export') {
      $field = 'accountancy_code_sell_export';
    } else {
      return -1;
    }
 
    $sql = "UPDATE ".$this->db->prefix().$this->table_element." SET ";
    $sql .= "$field = '".$this->db->escape($value)."'";
    $sql .= " WHERE rowid = ".((int) $this->id);
 
    dol_syslog(__METHOD__, LOG_DEBUG);
    $resql = $this->db->query($sql);
 
    if ($resql) {
      // Call trigger
      $result = $this->call_trigger('PRODUCT_MODIFY', $user);
      if ($result < 0) {
        $error++;
      }
      // End call triggers
 
      if ($error) {
        $this->db->rollback();
        return -1;
      }
 
      $this->$field = $value;
 
      $this->db->commit();
      return 1;
    } else {
      $this->error = $this->db->lasterror();
      $this->db->rollback();
      return -1;
    }
  }
 
  public function getMultiLangs($loadextrafields = 0)
  {
    global $langs;
 
    $current_lang = '';
    if ($langs instanceOf Translate) {
      $current_lang = $langs->getDefaultLang();
    }
 
    $sql = "SELECT rowid, lang, label, description, note as other";
    $sql .= " FROM ".$this->db->prefix()."product_lang";
    $sql .= " WHERE fk_product = ".((int) $this->id);
 
    $result = $this->db->query($sql);
    if ($result) {
      while ($obj = $this->db->fetch_object($result)) {
        //print 'lang='.$obj->lang.' current='.$current_lang.'<br>';
        if ($obj->lang == $current_lang) {  // si on a les traduct. dans la langue courante on les charge en infos principales.
          $this->label       = $obj->label;
          $this->description = $obj->description;
          $this->other       = $obj->other;
        }
        $this->multilangs[(string) $obj->lang]["rowid"]       = (int) $obj->rowid;
        $this->multilangs[(string) $obj->lang]["label"]       = $obj->label;
        $this->multilangs[(string) $obj->lang]["description"] = $obj->description;
        $this->multilangs[(string) $obj->lang]["other"]       = $obj->other;
      }
 
      // Load the extrafields of each translation, only when asked, because this method is called by fetch()
      if ($loadextrafields && !empty($this->multilangs)) {
        $extrafields = new ExtraFields($this->db);
        $extrafields->fetch_name_optionals_label('product_lang');
        if (!empty($extrafields->attributes['product_lang']['count'])) {
          $productlang = new ProductLang($this->db);
          foreach ($this->multilangs as $langcode => $value) {
            $productlang->id = $value['rowid'];
            $productlang->array_options = array();
            $productlang->fetch_optionals();
            $this->multilangs[$langcode]['array_options'] = $productlang->array_options;
          }
        }
      }
 
      return 1;
    } else {
      $this->error = "Error: ".$this->db->lasterror()." - ".$sql;
      return -1;
    }
  }
 
  private function getArrayForPriceCompare($level = 0)
  {
    $testExit = array('multiprices','multiprices_ttc','multiprices_base_type','multiprices_min','multiprices_min_ttc','multiprices_tva_tx','multiprices_recuperableonly');
 
    foreach ($testExit as $field) {
      if (!isset($this->$field)) {
        return array();
      }
      $tmparray = $this->$field;
      if (!isset($tmparray[$level])) {
        return array();
      }
    }
 
    $lastPrice = array(
      'level' => $level ? $level : 1,
      'multiprices' => (float) $this->multiprices[$level],
      'multiprices_ttc' => (float) $this->multiprices_ttc[$level],
      'multiprices_base_type' => $this->multiprices_base_type[$level],
      'multiprices_min' => (float) $this->multiprices_min[$level],
      'multiprices_min_ttc' => (float) $this->multiprices_min_ttc[$level],
      'multiprices_tva_tx' => (float) $this->multiprices_tva_tx[$level],
      'multiprices_recuperableonly' => (float) $this->multiprices_recuperableonly[$level],
    );
 
    return $lastPrice;
  }
 
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  private function _log_price($user, $level = 0)
  {
    // phpcs:enable
    global $conf;
 
    $now = dol_now();
 
    // Clean parameters
    if (empty($this->price_by_qty)) {
      $this->price_by_qty = 0;
    }
 
    // Add new price
    $sql = "INSERT INTO ".$this->db->prefix()."product_price(price_level,date_price, fk_product, fk_user_author, price_label, price, price_ttc, price_base_type,tosell, tva_tx, default_vat_code, recuperableonly,";
    $sql .= " localtax1_tx, localtax2_tx, localtax1_type, localtax2_type, price_min,price_min_ttc,price_by_qty,entity,fk_price_expression) ";
    $sql .= " VALUES(".($level ? ((int) $level) : 1).", '".$this->db->idate($now)."', ".((int) $this->id).", ".((int) $user->id).", ".(empty($this->price_label) ? "null" : "'".$this->db->escape($this->price_label)."'").",";
    $sql .= " ".((float) price2num($this->price)).", ".((float) price2num($this->price_ttc)).",'".$this->db->escape($this->price_base_type)."',".((int) $this->status).", ".((float) price2num($this->tva_tx)).",";
    $sql .= " ".($this->default_vat_code ? ("'".$this->db->escape($this->default_vat_code)."'") : "null").", ".((int) $this->tva_npr).",";
    $sql .= " ".price2num($this->localtax1_tx).", ".price2num($this->localtax2_tx).", '".$this->db->escape($this->localtax1_type)."', '".$this->db->escape($this->localtax2_type)."', ".price2num($this->price_min).", ".price2num($this->price_min_ttc).", ".price2num($this->price_by_qty).", ".((int) $conf->entity).",".($this->fk_price_expression > 0 ? ((int) $this->fk_price_expression) : 'null');
    $sql .= ")";
 
    dol_syslog(get_class($this)."::_log_price", LOG_DEBUG);
    $resql = $this->db->query($sql);
    if (!$resql) {
      $this->error = $this->db->lasterror();
      dol_print_error($this->db);
      return -1;
    } else {
      return 1;
    }
  }
 
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function log_price_delete($user, $rowid)
  {
    // phpcs:enable
    $sql = "DELETE FROM ".$this->db->prefix()."product_price_by_qty";
    $sql .= " WHERE fk_product_price = ".((int) $rowid);
    $sql .= " AND fk_product_price IN (SELECT pp.rowid FROM ".$this->db->prefix()."product_price as pp WHERE pp.fk_product = ".((int) $this->id).")";
    $resql = $this->db->query($sql);
 
    $sql = "DELETE FROM ".$this->db->prefix()."product_price_extrafields";
    $sql .= " WHERE fk_object = ".((int) $rowid);
    $resql = $this->db->query($sql);
 
    $sql = "DELETE FROM ".$this->db->prefix()."product_price";
    $sql .= " WHERE rowid = ".((int) $rowid);
    $sql .= " AND fk_product = ".((int) $this->id);
    $resql = $this->db->query($sql);
    if ($resql) {
      return 1;
    } else {
      $this->error = $this->db->lasterror();
      return -1;
    }
  }
 
  public function fetchAllPriceLogs($id)
  {
    dol_syslog(__METHOD__, LOG_DEBUG);
 
    $logs = array();
 
    $sql = "SELECT";
    $sql .= " pl.rowid as log_rowid,";
    $sql .= " pl.datec,";
    $sql .= " pl.price,";
    $sql .= " pl.quantity,";
    $sql .= " pl.fk_user,";
    $sql .= " pl.multicurrency_code,";
    $sql .= " pl.multicurrency_price,";
    // Supplier info
    $sql .= " pp.fk_soc as supplier_id,";
    $sql .= " pp.ref_fourn as supplier_ref,";
    $sql .= " pp.entity as entity";
 
    $sql .= " FROM " . $this->db->prefix() . "product_fournisseur_price_log as pl";
    $sql .= " INNER JOIN " . $this->db->prefix() . "product_fournisseur_price as pp ON pl.fk_product_fournisseur = pp.rowid";
 
    $sql .= " WHERE pp.fk_product = " . ((int) $id);
    $sql .= " AND pp.entity IN (" . getEntity('product') . ")";
    $sql .= " ORDER BY pl.datec DESC";
 
    $resql = $this->db->query($sql);
    if ($resql) {
      while ($obj = $this->db->fetch_object($resql)) {
        if (is_string($obj->datec)) {
          $obj->datec = strtotime($obj->datec);
        }
        $logs[] = $obj;
      }
      $this->db->free($resql);
    } else {
      $this->error = $this->db->lasterror();
    }
 
    return $logs;
  }
 
  public function getSellPrice($thirdparty_seller, $thirdparty_buyer, $pqp = 0)
  {
    global $hookmanager, $action;
 
    // Call hook if any
    if (is_object($hookmanager)) {
      $parameters = array('thirdparty_seller' => $thirdparty_seller, 'thirdparty_buyer' => $thirdparty_buyer, 'pqp' => $pqp);
      // Note that $action and $object may have been modified by some hooks
      $reshook = $hookmanager->executeHooks('getSellPrice', $parameters, $this, $action);
      if ($reshook > 0) {
        return $hookmanager->resArray;
      }
    }
 
    // Update if prices fields are defined
    $tva_tx = get_default_tva($thirdparty_seller, $thirdparty_buyer, $this->id);
    $tva_npr = get_default_npr($thirdparty_seller, $thirdparty_buyer, $this->id);
    if (empty($tva_tx)) {
      $tva_npr = 0;
    }
 
    $pu_ht = $this->price;
    $pu_ttc = $this->price_ttc;
    $price_min = $this->price_min;
    $price_min_ttc = $this->price_min_ttc;
    $price_base_type = (empty($this->price_base_type) ? 'HT' : $this->price_base_type);
 
    // if price by customer / level
    if (getDolGlobalString('PRODUIT_CUSTOMER_PRICES_AND_MULTIPRICES')) {
      require_once DOL_DOCUMENT_ROOT.'/product/class/productcustomerprice.class.php';
 
      $prodcustprice = new ProductCustomerPrice($this->db);
 
      $filter = array('t.fk_product' => (string) $this->id, 't.fk_soc' => (string) $thirdparty_buyer->id);
 
      // If a price per customer exist
      $pricebycustomerexist = false;
      $result = $prodcustprice->fetchAll('', '', 0, 0, $filter);
      if ($result) {
        if (count($prodcustprice->lines) > 0) {
          $date_now = (int) floor(dol_now() / 86400) * 86400; // date without hours
          foreach ($prodcustprice->lines as $k => $custprice_line) {
            if ($custprice_line->date_begin <= $date_now && (empty($custprice_line->date_end) || $date_now <= $custprice_line->date_end)) {
              $pricebycustomerexist = true;
              $pu_ht = price($custprice_line->price);
              $price_min = price($custprice_line->price_min);
              $price_min_ttc = price($custprice_line->price_min_ttc);
              $pu_ttc = price($custprice_line->price_ttc);
              $price_base_type = $custprice_line->price_base_type;
              $tva_tx = $custprice_line->tva_tx;
              if ($custprice_line->default_vat_code && !preg_match('/\‍(.*\‍)/', $tva_tx)) {
                $tva_tx .= ' (' . $custprice_line->default_vat_code . ')';
              }
              $tva_npr = $custprice_line->recuperableonly;
              if (empty($tva_tx)) {
                $tva_npr = 0;
              }
              break;
            }
          }
        }
      }
 
      if (!$pricebycustomerexist && !empty($thirdparty_buyer->price_level)) {
        $pu_ht = isset($this->multiprices[$thirdparty_buyer->price_level]) ? $this->multiprices[$thirdparty_buyer->price_level] : 0;
        $pu_ttc = isset($this->multiprices_ttc[$thirdparty_buyer->price_level]) ? $this->multiprices_ttc[$thirdparty_buyer->price_level] : 0;
        $price_min = isset($this->multiprices_min[$thirdparty_buyer->price_level]) ? $this->multiprices_min[$thirdparty_buyer->price_level] : 0;
        $price_min_ttc = isset($this->multiprices_min_ttc[$thirdparty_buyer->price_level]) ? $this->multiprices_min_ttc[$thirdparty_buyer->price_level] : 0;
        $price_base_type = isset($this->multiprices_base_type[$thirdparty_buyer->price_level]) ? $this->multiprices_base_type[$thirdparty_buyer->price_level] : 'HT';
        if (getDolGlobalString('PRODUIT_MULTIPRICES_USE_VAT_PER_LEVEL')) {
          // using this option is a bug. kept for backward compatibility
          if (isset($this->multiprices_tva_tx[$thirdparty_buyer->price_level])) {
            $tva_tx = $this->multiprices_tva_tx[$thirdparty_buyer->price_level];
          }
          if (isset($this->multiprices_recuperableonly[$thirdparty_buyer->price_level])) {
            $tva_npr = $this->multiprices_recuperableonly[$thirdparty_buyer->price_level];
          }
          if (empty($tva_tx)) {
            $tva_npr = 0;
          }
        }
      }
    } elseif (getDolGlobalString('PRODUIT_MULTIPRICES') && !empty($thirdparty_buyer->price_level)) { // // If price per segment
      $pu_ht = isset($this->multiprices[$thirdparty_buyer->price_level]) ? $this->multiprices[$thirdparty_buyer->price_level] : 0;
      $pu_ttc = isset($this->multiprices_ttc[$thirdparty_buyer->price_level]) ? $this->multiprices_ttc[$thirdparty_buyer->price_level] : 0;
      $price_min = isset($this->multiprices_min[$thirdparty_buyer->price_level]) ? $this->multiprices_min[$thirdparty_buyer->price_level] : 0;
      $price_min_ttc = isset($this->multiprices_min_ttc[$thirdparty_buyer->price_level]) ? $this->multiprices_min_ttc[$thirdparty_buyer->price_level] : 0;
      $price_base_type = isset($this->multiprices_base_type[$thirdparty_buyer->price_level]) ? $this->multiprices_base_type[$thirdparty_buyer->price_level] : 'HT';
      if (getDolGlobalString('PRODUIT_MULTIPRICES_USE_VAT_PER_LEVEL')) {
        // using this option is a bug. kept for backward compatibility
        if (isset($this->multiprices_tva_tx[$thirdparty_buyer->price_level])) {
          $tva_tx = $this->multiprices_tva_tx[$thirdparty_buyer->price_level];
        }
        if (isset($this->multiprices_recuperableonly[$thirdparty_buyer->price_level])) {
          $tva_npr = $this->multiprices_recuperableonly[$thirdparty_buyer->price_level];
        }
        if (empty($tva_tx)) {
          $tva_npr = 0;
        }
      }
    } elseif (getDolGlobalString('PRODUIT_CUSTOMER_PRICES')) {
      // If price per customer
      require_once DOL_DOCUMENT_ROOT.'/product/class/productcustomerprice.class.php';
 
      $prodcustprice = new ProductCustomerPrice($this->db);
 
      $filter = array('t.fk_product' => (string) $this->id, 't.fk_soc' => (string) $thirdparty_buyer->id);
 
      $result = $prodcustprice->fetchAll('', '', 0, 0, $filter);
      if ($result) {
        if (count($prodcustprice->lines) > 0) {
          $date_now = (int) floor(dol_now() / 86400) * 86400; // date without hours
          foreach ($prodcustprice->lines as $k => $custprice_line) {
            if ($custprice_line->date_begin <= $date_now && (empty($custprice_line->date_end) || $date_now <= $custprice_line->date_end)) {
              $pu_ht = price($custprice_line->price);
              $price_min = price($custprice_line->price_min);
              $price_min_ttc = price($custprice_line->price_min_ttc);
              $pu_ttc = price($custprice_line->price_ttc);
              $price_base_type = $custprice_line->price_base_type;
              $tva_tx = $custprice_line->tva_tx;
              if ($custprice_line->default_vat_code && !preg_match('/\‍(.*\‍)/', $tva_tx)) {
                $tva_tx .= ' (' . $custprice_line->default_vat_code . ')';
              }
              $tva_npr = $custprice_line->recuperableonly;
              if (empty($tva_tx)) {
                $tva_npr = 0;
              }
              break;
            }
          }
        }
      }
    } elseif (getDolGlobalString('PRODUIT_CUSTOMER_PRICES_BY_QTY')) {
      // If price per quantity
      if (!empty($this->prices_by_qty[0])) {
        // yes, this product has some prices per quantity
        // Search price into product_price_by_qty from $this->id
        foreach ($this->prices_by_qty_list[0] as $priceforthequantityarray) {
          if ($priceforthequantityarray['rowid'] != $pqp) {
            continue;
          }
          // We found the price
          if ($priceforthequantityarray['price_base_type'] == 'HT') {
            $pu_ht = $priceforthequantityarray['unitprice'];
          } else {
            $pu_ttc = $priceforthequantityarray['unitprice'];
          }
          break;
        }
      }
    } elseif (getDolGlobalString('PRODUIT_CUSTOMER_PRICES_BY_QTY_MULTIPRICES')) {
      // If price per quantity and customer
      if (!empty($this->prices_by_qty[$thirdparty_buyer->price_level])) {
        // yes, this product has some prices per quantity
        // Search price into product_price_by_qty from $this->id
        foreach ($this->prices_by_qty_list[$thirdparty_buyer->price_level] as $priceforthequantityarray) {
          if ($priceforthequantityarray['rowid'] != $pqp) {
            continue;
          }
          // We found the price
          if ($priceforthequantityarray['price_base_type'] == 'HT') {
            $pu_ht = $priceforthequantityarray['unitprice'];
          } else {
            $pu_ttc = $priceforthequantityarray['unitprice'];
          }
          break;
        }
      }
    }
 
    return array('pu_ht' => $pu_ht, 'pu_ttc' => $pu_ttc, 'price_min' => $price_min, 'price_min_ttc' => $price_min_ttc, 'price_base_type' => $price_base_type, 'tva_tx' => $tva_tx, 'tva_npr' => $tva_npr);
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function get_buyprice($prodfournprice, $qty, $product_id = 0, $fourn_ref = '', $fk_soc = 0)
  {
    // phpcs:enable
    global $action, $hookmanager;
 
    // Call hook if any
    if (is_object($hookmanager)) {
      $parameters = array(
        'prodfournprice' => $prodfournprice,
        'qty' => $qty,
        'product_id' => $product_id,
        'fourn_ref' => $fourn_ref,
        'fk_soc' => $fk_soc,
      );
      // Note that $action and $object may have been modified by some hooks
      $reshook = $hookmanager->executeHooks('getBuyPrice', $parameters, $this, $action);
      if ($reshook > 0) {
        return $hookmanager->resArray;
      }
    }
 
    $result = 0;
 
    // We do a first search with a select by searching with couple prodfournprice and qty only (later we will search on triplet qty/product_id/fourn_ref)
    $sql = "SELECT pfp.rowid, pfp.price as price, pfp.quantity as quantity, pfp.remise_percent, pfp.fk_soc,";
    $sql .= " pfp.fk_product, pfp.ref_fourn as ref_supplier, pfp.desc_fourn as desc_supplier, pfp.tva_tx, pfp.default_vat_code, pfp.fk_supplier_price_expression,";
    $sql .= " pfp.multicurrency_price, pfp.multicurrency_unitprice, pfp.multicurrency_tx, pfp.fk_multicurrency, pfp.multicurrency_code,";
    $sql .= " pfp.packaging";
    $sql .= " FROM ".$this->db->prefix()."product_fournisseur_price as pfp";
    $sql .= " WHERE pfp.rowid = ".((int) $prodfournprice);
    if ($qty > 0) {
      $sql .= " AND pfp.quantity <= ".((float) $qty);
    }
    $sql .= " ORDER BY pfp.quantity DESC";
 
    dol_syslog(get_class($this)."::get_buyprice first search by prodfournprice/qty", LOG_DEBUG);
    $resql = $this->db->query($sql);
    if ($resql) {
      $obj = $this->db->fetch_object($resql);
      if ($obj && $obj->quantity > 0) {        // If we found a supplier prices from the id of supplier price
        if (isModEnabled('dynamicprices') && !empty($obj->fk_supplier_price_expression)) {
          $prod_supplier = new ProductFournisseur($this->db);
          $prod_supplier->product_fourn_price_id = $obj->rowid;
          $prod_supplier->id = $obj->fk_product;
          $prod_supplier->fourn_qty = $obj->quantity;
          $prod_supplier->fourn_tva_tx = $obj->tva_tx;
          $prod_supplier->fk_supplier_price_expression = $obj->fk_supplier_price_expression;
 
          include_once DOL_DOCUMENT_ROOT.'/product/dynamic_price/class/price_parser.class.php';
          $priceparser = new PriceParser($this->db);
          $price_result = $priceparser->parseProductSupplier($prod_supplier);
          if ($price_result >= 0) {
            $obj->price = $price_result;
          }
        }
        $this->product_fourn_price_id = $obj->rowid;
        $this->buyprice = $obj->price; // deprecated
        $this->fourn_pu = $obj->price / $obj->quantity; // Unit price of product of supplier
        $this->fourn_price_base_type = 'HT'; // Price base type
        $this->fourn_socid = $obj->fk_soc; // Company that offer this price
        $this->ref_fourn = $obj->ref_supplier; // deprecated
        $this->ref_supplier = $obj->ref_supplier; // Ref supplier
        $this->desc_supplier = $obj->desc_supplier; // desc supplier
        $this->remise_percent = $obj->remise_percent; // remise percent if present and not typed
        $this->vatrate_supplier = $obj->tva_tx; // Vat ref supplier
        $this->default_vat_code_supplier = $obj->default_vat_code; // Vat code supplier
        $this->fourn_multicurrency_price = $obj->multicurrency_price;
        $this->fourn_multicurrency_unitprice = $obj->multicurrency_unitprice;
        $this->fourn_multicurrency_tx = $obj->multicurrency_tx;
        $this->fourn_multicurrency_id = $obj->fk_multicurrency;
        $this->fourn_multicurrency_code = $obj->multicurrency_code;
        if (getDolGlobalString('PRODUCT_USE_SUPPLIER_PACKAGING')) {
          $this->packaging = (float) $obj->packaging;
        }
        // Expose the supplier minimum purchase quantity so callers can enforce qty_min
        // on top of packaging-multiple rounding (#38783). pfp.quantity is the lowest
        // qty for which this price line is valid; for "below-min" callers this is the
        // floor they must round up to.
        $this->fourn_qty = $obj->quantity;
        $result = $obj->fk_product;
        return $result;
      } else { // If not found
        // We do a second search by doing a select again but searching with less reliable criteria: couple qty/id product, and if set fourn_ref or fk_soc.
        $sql = "SELECT pfp.rowid, pfp.price as price, pfp.quantity as quantity, pfp.remise_percent, pfp.fk_soc,";
        $sql .= " pfp.fk_product, pfp.ref_fourn as ref_supplier, pfp.desc_fourn as desc_supplier, pfp.tva_tx, pfp.default_vat_code, pfp.fk_supplier_price_expression,";
        $sql .= " pfp.multicurrency_price, pfp.multicurrency_unitprice, pfp.multicurrency_tx, pfp.fk_multicurrency, pfp.multicurrency_code,";
        $sql .= " pfp.packaging";
        $sql .= " FROM ".$this->db->prefix()."product_fournisseur_price as pfp";
        $sql .= " WHERE 1 = 1";
        if ($product_id > 0) {
          $sql .= " AND pfp.fk_product = ".((int) $product_id);
        }
        if ($fourn_ref != 'none') {
          $sql .= " AND pfp.ref_fourn = '".$this->db->escape($fourn_ref)."'";
        }
        if ($fk_soc > 0) {
          $sql .= " AND pfp.fk_soc = ".((int) $fk_soc);
        }
        if ($qty > 0) {
          $sql .= " AND pfp.quantity <= ".((float) $qty);
        }
        $sql .= " ORDER BY pfp.quantity DESC";
        $sql .= " LIMIT 1";
 
        dol_syslog(get_class($this)."::get_buyprice second search from qty/ref/product_id", LOG_DEBUG);
        $resql = $this->db->query($sql);
        if ($resql) {
          $obj = $this->db->fetch_object($resql);
          if ($obj && $obj->quantity > 0) {        // If found
            if (isModEnabled('dynamicprices') && !empty($obj->fk_supplier_price_expression)) {
              $prod_supplier = new ProductFournisseur($this->db);
              $prod_supplier->product_fourn_price_id = $obj->rowid;
              $prod_supplier->id = $obj->fk_product;
              $prod_supplier->fourn_qty = $obj->quantity;
              $prod_supplier->fourn_tva_tx = $obj->tva_tx;
              $prod_supplier->fk_supplier_price_expression = $obj->fk_supplier_price_expression;
 
              include_once DOL_DOCUMENT_ROOT.'/product/dynamic_price/class/price_parser.class.php';
              $priceparser = new PriceParser($this->db);
              $price_result = $priceparser->parseProductSupplier($prod_supplier);
              if ($price_result >= 0) {
                $obj->price = $price_result;
              }
            }
            $this->product_fourn_price_id = $obj->rowid;
            $this->buyprice = $obj->price; // deprecated
            $this->fourn_qty = $obj->quantity; // min quantity for price for a virtual supplier
            $this->fourn_pu = $obj->price / $obj->quantity; // Unit price of product for a virtual supplier
            $this->fourn_price_base_type = 'HT'; // Price base type for a virtual supplier
            $this->fourn_socid = $obj->fk_soc; // Company that offer this price
            $this->ref_fourn = $obj->ref_supplier; // deprecated
            $this->ref_supplier = $obj->ref_supplier; // Ref supplier
            $this->desc_supplier = $obj->desc_supplier; // desc supplier
            $this->remise_percent = $obj->remise_percent; // remise percent if present and not typed
            $this->vatrate_supplier = $obj->tva_tx; // Vat ref supplier
            $this->default_vat_code_supplier = $obj->default_vat_code; // Vat code supplier
            $this->fourn_multicurrency_price = $obj->multicurrency_price;
            $this->fourn_multicurrency_unitprice = $obj->multicurrency_unitprice;
            $this->fourn_multicurrency_tx = $obj->multicurrency_tx;
            $this->fourn_multicurrency_id = $obj->fk_multicurrency;
            $this->fourn_multicurrency_code = $obj->multicurrency_code;
            if (getDolGlobalString('PRODUCT_USE_SUPPLIER_PACKAGING')) {
              $this->packaging = (float) $obj->packaging;
            }
            // Expose pfp.quantity so callers can enforce qty_min on top of packaging
            // rounding (#38783).
            $this->fourn_qty = $obj->quantity;
            $result = $obj->fk_product;
            return $result;
          } else {
            return -1; // This product does not exist with this supplier price ID, or it exists but with insufficient quantity; nor does it exist for the product/supplier ref pair in the required quantity.
          }
        } else {
          $this->error = $this->db->lasterror();
          return -3;
        }
      }
    } else {
      $this->error = $this->db->lasterror();
      return -2;
    }
  }
 
 
  public function updatePrice($newprice, $newpricebase, $user, $newvat = null, $newminprice = 0, $level = 0, $newnpr = 0, $newpbq = 0, $ignore_autogen = 0, $localtaxes_array = array(), $newdefaultvatcode = '', $price_label = '', $notrigger = 0)
  {
    $lastPriceData = $this->getArrayForPriceCompare($level); // temporary store current price before update
 
    $id = $this->id;
 
    dol_syslog(get_class($this)."::update_price id=".$id." newprice=".$newprice." newpricebase=".$newpricebase." newminprice=".$newminprice." level=".$level." npr=".$newnpr." newdefaultvatcode=".$newdefaultvatcode);
 
    // Clean parameters
    if (empty($this->tva_tx)) {
      $this->tva_tx = 0.0;
    }
    if (empty($newnpr)) {
      $newnpr = 0.0;
    }
    if (empty($newminprice)) {
      $newminprice = 0.0;
    }
 
    // Check parameters
    if ($newvat === null || $newvat == '') {  // Maintain '' for backwards compatibility
      $newvat = (float) $this->tva_tx;
    }
 
    $localtaxtype1 = '';
    $localtaxtype2 = '';
 
    // If multiprices are enabled, then we check if the current product is subject to price autogeneration
    // Price will be modified ONLY when the first one is the one that is being modified
    if ((getDolGlobalString('PRODUIT_MULTIPRICES') || getDolGlobalString('PRODUIT_CUSTOMER_PRICES_BY_QTY_MULTIPRICES') || getDolGlobalString('PRODUIT_CUSTOMER_PRICES_AND_MULTIPRICES')) && !$ignore_autogen && $this->price_autogen && ($level == 1)) {
      return $this->generateMultiprices($user, $newprice, $newpricebase, $newvat, $newnpr, $newpbq);
    }
 
    if (!empty($newminprice) && ($newminprice > $newprice)) {
      $this->error = 'ErrorPriceCantBeLowerThanMinPrice';
      return -1;
    }
 
    if ($newprice === 0 || $newprice !== '') {
      if ($newpricebase == 'TTC') {
        $price_ttc = (float) price2num($newprice, 'MU');
        $price = (float) price2num($newprice) / (1 + ((float) $newvat / 100));
        $price = (float) price2num($price, 'MU');
 
        if ((string) $newminprice != '0') {
          $price_min_ttc = (float) price2num($newminprice, 'MU');
          $price_min = (float) price2num($newminprice) / (1 + ($newvat / 100));
          $price_min = (float) price2num($price_min, 'MU');
        } else {
          $price_min = 0.0;
          $price_min_ttc = 0.0;
        }
      } else {
        $price = (float) price2num($newprice, 'MU');
        $price_ttc = ($newnpr != 1) ? (float) price2num($newprice) * (1 + ($newvat / 100)) : $price;
        $price_ttc = (float) price2num($price_ttc, 'MU');
 
        if ((string) $newminprice != '0') {
          $price_min = (float) price2num($newminprice, 'MU');
          $price_min_ttc = (float) price2num($newminprice) * (1 + ($newvat / 100));
          $price_min_ttc = (float) price2num($price_min_ttc, 'MU');
          //print 'X'.$newminprice.'-'.$price_min;
        } else {
          $price_min = 0.0;
          $price_min_ttc = 0.0;
        }
      }
      //print 'x'.$id.'-'.$newprice.'-'.$newpricebase.'-'.$price.'-'.$price_ttc.'-'.$price_min.'-'.$price_min_ttc;
      if (count($localtaxes_array) > 0) {
        $localtaxtype1 = $localtaxes_array['0'];
        $localtax1 = $localtaxes_array['1'];
        $localtaxtype2 = $localtaxes_array['2'];
        $localtax2 = $localtaxes_array['3'];
      } else {
        // if array empty, we try to use the vat code
        if (!empty($newdefaultvatcode)) {
          global $mysoc;
          // Get record from code
          $sql = "SELECT t.rowid, t.code, t.recuperableonly as tva_npr, t.localtax1, t.localtax2, t.localtax1_type, t.localtax2_type";
          $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($mysoc->country_code)."'";
          $sql .= " AND t.taux = ".((float) $newdefaultvatcode)." AND t.active = 1";
          $sql .= " AND t.code = '".$this->db->escape($newdefaultvatcode)."'";
          $resql = $this->db->query($sql);
          if ($resql) {
            $obj = $this->db->fetch_object($resql);
            if ($obj) {
              $npr = $obj->tva_npr;
              $localtax1 = $obj->localtax1;
              $localtax2 = $obj->localtax2;
              $localtaxtype1 = $obj->localtax1_type;
              $localtaxtype2 = $obj->localtax2_type;
            }
          }
        } else {
          // old method. deprecated because we can't retrieve type
          $localtaxtype1 = '0';
          $localtax1 = get_localtax($newvat, 1);
          $localtaxtype2 = '0';
          $localtax2 = get_localtax($newvat, 2);
        }
      }
      if (empty($localtax1)) {
        $localtax1 = 0; // If = '' then = 0
      }
      if (empty($localtax2)) {
        $localtax2 = 0; // If = '' then = 0
      }
 
      $this->db->begin();
 
      // The price columns of the table product hold the default price of the product, that is the price of the level 1
      // when multiprices are enabled (level is 0 when they are not). So they must not be overwritten by another level.
      // The vat columns are however shared by all levels, so they are always updated.
      $updatedefaultprice = (empty($level) || $level == 1);
 
      // Don't put quotes here on decimal numbers.
      // This causes storage with base rounding instead of exact values.
      $sql = "UPDATE ".$this->db->prefix()."product SET";
      if ($updatedefaultprice) {
        $sql .= " price_base_type = '".$this->db->escape($newpricebase)."',";
        $sql .= " price = ".(float) $price.",";
        $sql .= " price_ttc = ".(float) $price_ttc.",";
        $sql .= " price_min = ".(float) $price_min.",";
        $sql .= " price_min_ttc = ".(float) $price_min_ttc.",";
        $sql .= " price_label = ".(!empty($price_label) ? "'".$this->db->escape($price_label)."'" : "null").",";
      }
      $sql .= " localtax1_tx = ".($localtax1 >= 0 ? (float) $localtax1 : 'NULL').",";
      $sql .= " localtax2_tx = ".($localtax2 >= 0 ? (float) $localtax2 : 'NULL').",";
      $sql .= " localtax1_type = ".($localtaxtype1 != '' ? "'".$this->db->escape($localtaxtype1)."'" : "'0'").",";
      $sql .= " localtax2_type = ".($localtaxtype2 != '' ? "'".$this->db->escape($localtaxtype2)."'" : "'0'").",";
      $sql .= " default_vat_code = ".($newdefaultvatcode ? "'".$this->db->escape($newdefaultvatcode)."'" : "null").",";
      $sql .= " tva_tx = ".(float) price2num($newvat).",";
      $sql .= " recuperableonly = '".$this->db->escape((string) $newnpr)."'";
      $sql .= " WHERE rowid = ".((int) $id);
 
      dol_syslog(get_class($this)."::update_price", LOG_DEBUG);
      $resql = $this->db->query($sql);
      if ($resql) {
        $this->multiprices[$level] = $price;
        $this->multiprices_ttc[$level] = $price_ttc;
        $this->multiprices_min[$level] = $price_min;
        $this->multiprices_min_ttc[$level] = $price_min_ttc;
        $this->multiprices_base_type[$level] = $newpricebase;
        $this->multiprices_default_vat_code[$level] = $newdefaultvatcode;
        $this->multiprices_tva_tx[$level] = $newvat;
        $this->multiprices_recuperableonly[$level] = $newnpr;
 
        // Save the default price of the product to restore it after the log if we are updating another level
        // (_log_price() reads the price into the properties of the object to save the price of the level).
        $savdefaultprice = array($this->price, $this->price_label, $this->price_ttc, $this->price_min, $this->price_min_ttc, $this->price_base_type);
 
        $this->price = $price;
        $this->price_label = $price_label;
        $this->price_ttc = $price_ttc;
        $this->price_min = $price_min;
        $this->price_min_ttc = $price_min_ttc;
        $this->price_base_type = $newpricebase;
        $this->default_vat_code = $newdefaultvatcode;
        $this->tva_tx = $newvat;
        $this->tva_npr = $newnpr;
 
        //Local taxes
        $this->localtax1_tx = $localtax1;
        $this->localtax2_tx = $localtax2;
        $this->localtax1_type = $localtaxtype1;
        $this->localtax2_type = $localtaxtype2;
 
        // Price by quantity
        $this->price_by_qty = $newpbq;
 
        // check if price have really change before log
        $newPriceData = $this->getArrayForPriceCompare($level);
        if (!empty(array_diff_assoc($newPriceData, $lastPriceData)) || (!getDolGlobalString('PRODUIT_MULTIPRICES') && !getDolGlobalString('PRODUIT_CUSTOMER_PRICES_AND_MULTIPRICES'))) {
          $this->_log_price($user, $level); // Save price for level into table product_price
        }
 
        if (!$updatedefaultprice) {
          // The price of the level is now saved, so we can restore the default price of the product
          list($this->price, $this->price_label, $this->price_ttc, $this->price_min, $this->price_min_ttc, $this->price_base_type) = $savdefaultprice;
        }
 
        $this->level = $level; // Store level of price edited for trigger
 
        // Call trigger
        if (!$notrigger) {
          $result = $this->call_trigger('PRODUCT_PRICE_MODIFY', $user);
          if ($result < 0) {
            $this->db->rollback();
            return -1;
          }
        }
        // End call triggers
 
        $this->db->commit();
      } else {
        $this->db->rollback();
        $this->error = $this->db->lasterror();
        return -1;
      }
    }
 
    return 1;
  }
 
  public function setPriceExpression($expression_id)
  {
    global $user;
 
    $this->fk_price_expression = $expression_id;
 
    return $this->update($this->id, $user);
  }
 
  public function fetch($id = 0, $ref = '', $ref_ext = '', $barcode = '', $ignore_expression = 0, $ignore_price_load = 0, $ignore_lang_load = 0)
  {
    include_once DOL_DOCUMENT_ROOT.'/core/lib/company.lib.php';
 
    global $conf;
 
    dol_syslog(get_class($this)."::fetch id=".$id." ref=".$ref." ref_ext=".$ref_ext);
 
    // Check parameters
    if (!$id && !$ref && !$ref_ext && !$barcode) {
      $this->error = 'ErrorWrongParameters';
      dol_syslog(get_class($this)."::fetch ".$this->error, LOG_ERR);
      return -1;
    }
 
    $sql = "SELECT p.rowid, p.ref, p.ref_ext, p.label, p.description, p.url, p.note_public, p.note as note_private, p.customcode, p.fk_country, p.fk_state, p.lifetime, p.qc_frequency, p.price, p.price_ttc,";
    $sql .= " p.price_min, p.price_min_ttc, p.price_base_type, p.cost_price, p.default_vat_code, p.tva_tx, p.recuperableonly as tva_npr, p.localtax1_tx, p.localtax2_tx, p.localtax1_type, p.localtax2_type, p.tosell,";
    $sql .= " p.tobuy, p.fk_product_type, p.duration, p.fk_default_warehouse, p.fk_default_workstation, p.seuil_stock_alerte, p.canvas, p.net_measure, p.net_measure_units, p.weight, p.weight_units,";
    $sql .= " p.length, p.length_units, p.width, p.width_units, p.height, p.height_units, p.last_main_doc,";
    $sql .= " p.surface, p.surface_units, p.volume, p.volume_units, p.barcode, p.fk_barcode_type, p.finished, p.fk_default_bom, p.mandatory_period, p.packaging,";
    if (!getDolGlobalString('MAIN_PRODUCT_PERENTITY_SHARED')) {
      $sql .= " p.accountancy_code_buy, p.accountancy_code_buy_intra, p.accountancy_code_buy_export, p.accountancy_code_sell, p.accountancy_code_sell_intra, p.accountancy_code_sell_export,";
    } else {
      $sql .= " ppe.accountancy_code_buy, ppe.accountancy_code_buy_intra, ppe.accountancy_code_buy_export, ppe.accountancy_code_sell, ppe.accountancy_code_sell_intra, ppe.accountancy_code_sell_export,";
    }
 
    // For MultiCompany
    // PMP per entity & Stocks Sharings stock_reel includes only stocks shared with this entity
    $separatedEntityPMP = false;  // Set to true to get the AWP from table llx_product_perentity instead of field 'pmp' into llx_product.
    $separatedStock = false;    // Set to true will count stock from subtable llx_product_stock. It is slower than using denormalized field 'stock', but it is required when using multientity and shared warehouses.
    $visibleWarehousesEntities = $conf->entity;
    if (getDolGlobalString('MULTICOMPANY_PRODUCT_SHARING_ENABLED')) {
      if (getDolGlobalString('MULTICOMPANY_PMP_PER_ENTITY_ENABLED')) {
        $checkPMPPerEntity = $this->db->query("SELECT pmp FROM " . $this->db->prefix() . "product_perentity WHERE fk_product = ".((int) $id)." AND entity = ".(int) $conf->entity);
        if ($this->db->num_rows($checkPMPPerEntity) > 0) {
          $separatedEntityPMP = true;
        }
      }
      global $mc;
      $separatedStock = true;
      if (isset($mc->sharings['stock']) && !empty($mc->sharings['stock'])) {
        $visibleWarehousesEntities .= "," . implode(",", $mc->sharings['stock']);
      }
    }
    if ($separatedEntityPMP) {
      $sql .= " ppe.pmp,";
    } else {
      $sql .= " p.pmp,";
    }
    $sql .= " p.datec, GREATEST(p.tms, pef.tms) AS tms, p.import_key, p.entity, p.desiredstock, p.tobatch, p.sell_or_eat_by_mandatory, p.batch_mask, p.fk_unit,";
    $sql .= " p.fk_price_expression, p.price_autogen, p.stockable_product, p.model_pdf,";
    $sql .= " p.price_label,";
    if ($separatedStock) {
      $sql .= " SUM(sp.reel) as stock";
    } else {
      $sql .= " p.stock";
    }
    $sql .= " FROM ".$this->db->prefix()."product as p";
    $sql .= " LEFT JOIN ".$this->db->prefix()."product_extrafields as pef ON pef.fk_object=p.rowid";
    if (getDolGlobalString('MAIN_PRODUCT_PERENTITY_SHARED') || $separatedEntityPMP) {
      $sql .= " LEFT JOIN " . $this->db->prefix() . "product_perentity as ppe ON ppe.fk_product = p.rowid AND ppe.entity = " . ((int) $conf->entity);
    }
    if ($separatedStock) {
      $sql .= " LEFT JOIN " . $this->db->prefix() . "product_stock as sp ON sp.fk_product = p.rowid AND sp.fk_entrepot IN (SELECT rowid FROM ".$this->db->prefix()."entrepot WHERE entity IN (".$this->db->sanitize($visibleWarehousesEntities)."))";
    }
 
    if ($id) {
      $sql .= " WHERE p.rowid = ".((int) $id);
    } else {
      $sql .= " WHERE p.entity IN (".getEntity($this->element).")";
      if ($ref) {
        $sql .= " AND p.ref = '".$this->db->escape($ref)."'";
      } elseif ($ref_ext) {
        $sql .= " AND p.ref_ext = '".$this->db->escape($ref_ext)."'";
      } elseif ($barcode) {
        $sql .= " AND p.barcode = '".$this->db->escape($barcode)."'";
      }
    }
    if ($separatedStock) {
      $sql .= " GROUP BY p.rowid, p.ref, p.ref_ext, p.label, p.description, p.url, p.note_public, p.note, p.customcode, p.fk_country, p.fk_state, p.lifetime, p.qc_frequency, p.price, p.price_ttc,";
      $sql .= " p.price_min, p.price_min_ttc, p.price_base_type, p.cost_price, p.default_vat_code, p.tva_tx, p.recuperableonly, p.localtax1_tx, p.localtax2_tx, p.localtax1_type, p.localtax2_type, p.tosell,";
      $sql .= " p.tobuy, p.fk_product_type, p.duration, p.fk_default_warehouse, p.fk_default_workstation, p.seuil_stock_alerte, p.canvas, p.net_measure, p.net_measure_units, p.weight, p.weight_units,";
      $sql .= " p.length, p.length_units, p.width, p.width_units, p.height, p.height_units,";
      $sql .= " p.surface, p.surface_units, p.volume, p.volume_units, p.barcode, p.fk_barcode_type, p.finished, p.fk_default_bom, p.mandatory_period, p.packaging,";
      if (!getDolGlobalString('MAIN_PRODUCT_PERENTITY_SHARED')) {
        $sql .= " p.accountancy_code_buy, p.accountancy_code_buy_intra, p.accountancy_code_buy_export, p.accountancy_code_sell, p.accountancy_code_sell_intra, p.accountancy_code_sell_export,";
      } else {
        $sql .= " ppe.accountancy_code_buy, ppe.accountancy_code_buy_intra, ppe.accountancy_code_buy_export, ppe.accountancy_code_sell, ppe.accountancy_code_sell_intra, ppe.accountancy_code_sell_export,";
      }
      if ($separatedEntityPMP) {
        $sql .= " ppe.pmp,";
      } else {
        $sql .= " p.pmp,";
      }
      $sql .= " p.datec, p.tms, p.import_key, p.entity, p.desiredstock, p.tobatch, p.sell_or_eat_by_mandatory, p.batch_mask, p.fk_unit,";
      $sql .= " p.fk_price_expression, p.price_autogen, p.stockable_product, p.model_pdf,";
      $sql .= " p.price_label";
      // can't be false TODO fix
      // if (!$separatedStock) {
      //  $sql .= ", p.stock";
      // }
    }
 
    $resql = $this->db->query($sql);
    if ($resql) {
      unset($this->oldcopy);
 
      if ($this->db->num_rows($resql) > 0) {
        $obj = $this->db->fetch_object($resql);
 
        $this->id = $obj->rowid;
        $this->ref = $obj->ref;
        $this->ref_ext = $obj->ref_ext;
        $this->label = $obj->label;
        $this->description = $obj->description;
        $this->url = $obj->url;
        $this->note_public = $obj->note_public;
        $this->note_private = $obj->note_private;
        $this->note = $obj->note_private; // deprecated
 
        $this->type = $obj->fk_product_type;
        $this->price_label = $obj->price_label;
        $this->status = $obj->tosell;
        $this->status_buy = $obj->tobuy;
        $this->status_batch = $obj->tobatch;
        $this->sell_or_eat_by_mandatory = $obj->sell_or_eat_by_mandatory;
        $this->batch_mask = $obj->batch_mask;
 
        $this->customcode = $obj->customcode;
        $this->country_id = $obj->fk_country;
        $this->country_code = getCountry($this->country_id, '2', $this->db);
        $this->state_id = $obj->fk_state;
        $this->lifetime = $obj->lifetime;
        $this->qc_frequency = $obj->qc_frequency;
        $this->price = $obj->price;
        $this->price_ttc = $obj->price_ttc;
        $this->price_min = $obj->price_min;
        $this->price_min_ttc = $obj->price_min_ttc;
        $this->price_base_type = (empty($obj->price_base_type) ? 'HT' : $obj->price_base_type);
        $this->cost_price = isset($obj->cost_price) ? (float) $obj->cost_price : null;
        $this->default_vat_code = $obj->default_vat_code;
        $this->tva_tx = $obj->tva_tx;
        $this->tva_npr = $obj->tva_npr;
        $this->localtax1_tx = $obj->localtax1_tx;
        $this->localtax2_tx = $obj->localtax2_tx;
        $this->localtax1_type = $obj->localtax1_type;
        $this->localtax2_type = $obj->localtax2_type;
 
        $this->finished = $obj->finished;
        $this->fk_default_bom = $obj->fk_default_bom;
 
        $this->duration = $obj->duration;
        $matches = [];
        preg_match('/([\d.]+)(\w+)/', $obj->duration, $matches);
        $this->duration_value = !empty($matches[1]) ? (float) $matches[1] : 0;
        $this->duration_unit = !empty($matches[2]) ? (string) $matches[2] : null;
        $this->canvas = $obj->canvas;
        $this->net_measure = $obj->net_measure;
        $this->net_measure_units = $obj->net_measure_units;
        $this->weight = $obj->weight;
        $this->weight_units = (is_null($obj->weight_units) ? 0 : $obj->weight_units);
        $this->length = $obj->length;
        $this->length_units = (is_null($obj->length_units) ? 0 : $obj->length_units);
        $this->width = $obj->width;
        $this->width_units = (is_null($obj->width_units) ? 0 : $obj->width_units);
        $this->height = $obj->height;
        $this->height_units = (is_null($obj->height_units) ? 0 : $obj->height_units);
 
        $this->surface = $obj->surface;
        $this->surface_units = (is_null($obj->surface_units) ? 0 : $obj->surface_units);
        $this->volume = $obj->volume;
        $this->volume_units = (is_null($obj->volume_units) ? 0 : $obj->volume_units);
        $this->barcode = $obj->barcode;
        $this->barcode_type = $obj->fk_barcode_type;
 
        $this->accountancy_code_buy = $obj->accountancy_code_buy;
        $this->accountancy_code_buy_intra = $obj->accountancy_code_buy_intra;
        $this->accountancy_code_buy_export = $obj->accountancy_code_buy_export;
        $this->accountancy_code_sell = $obj->accountancy_code_sell;
        $this->accountancy_code_sell_intra = $obj->accountancy_code_sell_intra;
        $this->accountancy_code_sell_export = $obj->accountancy_code_sell_export;
 
        $this->fk_default_warehouse = $obj->fk_default_warehouse;
        $this->fk_default_workstation = $obj->fk_default_workstation;
        $this->seuil_stock_alerte = $obj->seuil_stock_alerte;
        $this->desiredstock = $obj->desiredstock;
        $this->stock_reel = $obj->stock;
        $this->stockable_product = $obj->stockable_product;
        $this->pmp = $obj->pmp;
 
        $this->date_creation = $this->db->jdate($obj->datec);
        $this->date_modification = $this->db->jdate($obj->tms);
 
        $this->import_key = $obj->import_key;
        $this->entity = $obj->entity;
 
        $this->ref_ext = $obj->ref_ext;
        $this->fk_price_expression = $obj->fk_price_expression;
        $this->fk_unit = $obj->fk_unit;
        $this->price_autogen = $obj->price_autogen;
        $this->model_pdf = $obj->model_pdf;
        $this->last_main_doc = $obj->last_main_doc;
 
        $this->mandatory_period = $obj->mandatory_period;
 
        if (getDolGlobalString('PRODUCT_USE_CUSTOMER_PACKAGING')) {
          $this->packaging = (float) $obj->packaging;
        }
 
        $this->db->free($resql);
 
        // fetch optionals attributes and labels
        $this->fetch_optionals();
 
        // Multilangs
        if (getDolGlobalInt('MAIN_MULTILANGS') && empty($ignore_lang_load)) {
          $this->getMultiLangs();
        }
 
        // Load multiprices array
        if ((getDolGlobalString('PRODUIT_MULTIPRICES') || getDolGlobalString('PRODUIT_CUSTOMER_PRICES_AND_MULTIPRICES')) && empty($ignore_price_load)) {                // prices per segment
          $produit_multiprices_limit = getDolGlobalInt('PRODUIT_MULTIPRICES_LIMIT');
          for ($i = 1; $i <= $produit_multiprices_limit; $i++) {
            $sql = "SELECT price, price_ttc, price_min, price_min_ttc,";
            $sql .= " price_base_type, tva_tx, default_vat_code, tosell, price_by_qty, rowid, recuperableonly";
            $sql .= " ,price_label";
            $sql .= " FROM ".$this->db->prefix()."product_price";
            $sql .= " WHERE entity IN (".getEntity('productprice').")";
            $sql .= " AND price_level=".((int) $i);
            $sql .= " AND fk_product = ".((int) $this->id);
            $sql .= " ORDER BY date_price DESC, rowid DESC";  // Get the most recent line
            $sql .= " LIMIT 1";                 // Only the first one
            $resql = $this->db->query($sql);
            if ($resql) {
              $result = $this->db->fetch_array($resql);
 
              $this->multiprices[$i] = $result ? $result["price"] : null;
              $this->multiprices_ttc[$i] = $result ? $result["price_ttc"] : null;
              $this->multiprices_min[$i] =  $result ? $result["price_min"] : null;
              $this->multiprices_min_ttc[$i] = $result ? $result["price_min_ttc"] : null;
              $this->multiprices_base_type[$i] = $result ? $result["price_base_type"] : null;
              // Next two fields are used only if PRODUIT_MULTIPRICES_USE_VAT_PER_LEVEL is on
              $this->multiprices_tva_tx[$i] = $result ? $result["tva_tx"].(!empty($result['default_vat_code']) ? ' ('.$result['default_vat_code'].')' : '') : null;
              $this->multiprices_recuperableonly[$i] = $result ? $result["recuperableonly"] : null;
 
              // Price by quantity
              /*
               $this->prices_by_qty[$i]=$result["price_by_qty"];
               $this->prices_by_qty_id[$i]=$result["rowid"];
               // Get the pricelist according to the qty if flag is set
               if ($this->prices_by_qty[$i] == 1)
               {
               $sql = "SELECT rowid, price, unitprice, quantity, remise_percent, remise, price_base_type";
               $sql.= " FROM ".$this->db->prefix()."product_price_by_qty";
               $sql.= " WHERE fk_product_price = ".((int) $this->prices_by_qty_id[$i]);
               $sql.= " ORDER BY quantity ASC";
 
               $resql = $this->db->query($sql);
               if ($resql)
               {
               $resultat=array();
               $ii=0;
               while ($result= $this->db->fetch_array($resql)) {
               $resultat[$ii]=array();
               $resultat[$ii]["rowid"]=$result["rowid"];
               $resultat[$ii]["price"]= $result["price"];
               $resultat[$ii]["unitprice"]= $result["unitprice"];
               $resultat[$ii]["quantity"]= $result["quantity"];
               $resultat[$ii]["remise_percent"]= $result["remise_percent"];
               $resultat[$ii]["remise"]= $result["remise"];                    // deprecated
               $resultat[$ii]["price_base_type"]= $result["price_base_type"];
               $ii++;
               }
               $this->prices_by_qty_list[$i]=$resultat;
               }
               else
               {
               dol_print_error($this->db);
               return -1;
               }
               }*/
            } else {
              $this->error = $this->db->lasterror;
              return -1;
            }
          }
        } elseif ((getDolGlobalString('PRODUIT_CUSTOMER_PRICES') || getDolGlobalString('PRODUIT_CUSTOMER_PRICES_AND_MULTIPRICES')) && empty($ignore_price_load)) {            // prices per customers
          // Nothing loaded by default. List may be very long.
        } elseif (getDolGlobalString('PRODUIT_CUSTOMER_PRICES_BY_QTY') && empty($ignore_price_load)) {    // prices per quantity
          $sql = "SELECT price, price_ttc, price_min, price_min_ttc,";
          $sql .= " price_base_type, tva_tx, default_vat_code, tosell, price_by_qty, rowid";
          $sql .= " FROM ".$this->db->prefix()."product_price";
          $sql .= " WHERE fk_product = ".((int) $this->id);
          $sql .= " ORDER BY date_price DESC, rowid DESC";
          $sql .= " LIMIT 1";
 
          $resql = $this->db->query($sql);
          if ($resql) {
            $result = $this->db->fetch_array($resql);
 
            if ($result) {
              // Price by quantity
              $this->prices_by_qty[0] = $result["price_by_qty"];
              $this->prices_by_qty_id[0] = $result["rowid"];
              // Get the pricelist according to the qty if flag is set
              if ($this->prices_by_qty[0] == 1) {
                $sql = "SELECT rowid,price, unitprice, quantity, remise_percent, remise, remise, price_base_type";
                $sql .= " FROM ".$this->db->prefix()."product_price_by_qty";
                $sql .= " WHERE fk_product_price = ".((int) $this->prices_by_qty_id[0]);
                $sql .= " ORDER BY quantity ASC";
 
                $resql = $this->db->query($sql);
                if ($resql) {
                  $resultat = array();
                  $ii = 0;
                  while ($result = $this->db->fetch_array($resql)) {
                    $resultat[$ii] = array();
                    $resultat[$ii]["rowid"] = $result["rowid"];
                    $resultat[$ii]["price"] = $result["price"];
                    $resultat[$ii]["unitprice"] = $result["unitprice"];
                    $resultat[$ii]["quantity"] = $result["quantity"];
                    $resultat[$ii]["remise_percent"] = $result["remise_percent"];
                    //$resultat[$ii]["remise"]= $result["remise"];                    // deprecated
                    $resultat[$ii]["price_base_type"] = $result["price_base_type"];
                    $ii++;
                  }
                  $this->prices_by_qty_list[0] = $resultat;
                } else {
                  $this->error = $this->db->lasterror;
                  return -1;
                }
              }
            }
          } else {
            $this->error = $this->db->lasterror;
            return -1;
          }
        } elseif (getDolGlobalString('PRODUIT_CUSTOMER_PRICES_BY_QTY_MULTIPRICES') && empty($ignore_price_load)) {    // prices per customer and quantity
          $produit_multiprices_limit = getDolGlobalInt('PRODUIT_MULTIPRICES_LIMIT');
          for ($i = 1; $i <= $produit_multiprices_limit; $i++) {
            $sql = "SELECT price, price_ttc, price_min, price_min_ttc,";
            $sql .= " price_base_type, tva_tx, default_vat_code, tosell, price_by_qty, rowid, recuperableonly";
            $sql .= " FROM ".$this->db->prefix()."product_price";
            $sql .= " WHERE entity IN (".getEntity('productprice').")";
            $sql .= " AND price_level=".((int) $i);
            $sql .= " AND fk_product = ".((int) $this->id);
            $sql .= " ORDER BY date_price DESC, rowid DESC";
            $sql .= " LIMIT 1";
            $resql = $this->db->query($sql);
            if (!$resql) {
              $this->error = $this->db->lasterror;
              return -1;
            } else {
              $result = $this->db->fetch_array($resql);
              $this->multiprices[$i] = (!empty($result["price"]) ? $result["price"] : 0);
              $this->multiprices_ttc[$i] = (!empty($result["price_ttc"]) ? $result["price_ttc"] : 0);
              $this->multiprices_min[$i] = (!empty($result["price_min"]) ? $result["price_min"] : 0);
              $this->multiprices_min_ttc[$i] = (!empty($result["price_min_ttc"]) ? $result["price_min_ttc"] : 0);
              $this->multiprices_base_type[$i] = (!empty($result["price_base_type"]) ? $result["price_base_type"] : '');
              // Next two fields are used only if PRODUIT_MULTIPRICES_USE_VAT_PER_LEVEL is on
              $this->multiprices_tva_tx[$i] = (!empty($result["tva_tx"]) ? $result["tva_tx"] : 0); // TODO Add ' ('.$result['default_vat_code'].')'
              $this->multiprices_recuperableonly[$i] = (!empty($result["recuperableonly"]) ? $result["recuperableonly"] : 0);
 
              // Price by quantity
              $this->prices_by_qty[$i] = (!empty($result["price_by_qty"]) ? $result["price_by_qty"] : 0);
              $this->prices_by_qty_id[$i] = (!empty($result["rowid"]) ? $result["rowid"] : 0);
              // Get the pricelist according to the qty if flag is set
              if ($this->prices_by_qty[$i] == 1) {
                $sql = "SELECT rowid, price, unitprice, quantity, remise_percent, remise, price_base_type";
                $sql .= " FROM ".$this->db->prefix()."product_price_by_qty";
                $sql .= " WHERE fk_product_price = ".((int) $this->prices_by_qty_id[$i]);
                $sql .= " ORDER BY quantity ASC";
 
                $resql = $this->db->query($sql);
                if ($resql) {
                  $resultat = array();
                  $ii = 0;
                  while ($result = $this->db->fetch_array($resql)) {
                    $resultat[$ii] = array();
                    $resultat[$ii]["rowid"] = $result["rowid"];
                    $resultat[$ii]["price"] = $result["price"];
                    $resultat[$ii]["unitprice"] = $result["unitprice"];
                    $resultat[$ii]["quantity"] = $result["quantity"];
                    $resultat[$ii]["remise_percent"] = $result["remise_percent"];
                    $resultat[$ii]["remise"] = $result["remise"]; // deprecated
                    $resultat[$ii]["price_base_type"] = $result["price_base_type"];
                    $ii++;
                  }
                  $this->prices_by_qty_list[$i] = $resultat;
                } else {
                  $this->error = $this->db->lasterror;
                  return -1;
                }
              }
            }
          }
        }
 
        if (isModEnabled('dynamicprices') && !empty($this->fk_price_expression) && empty($ignore_expression)) {
          include_once DOL_DOCUMENT_ROOT.'/product/dynamic_price/class/price_parser.class.php';
          $priceparser = new PriceParser($this->db);
          $price_result = $priceparser->parseProduct($this);
          if ($price_result >= 0) {
            $this->price = $price_result;
            // Calculate the VAT
            $this->price_ttc = (float) price2num($this->price) * (1 + ($this->tva_tx / 100));
            $this->price_ttc = (float) price2num($this->price_ttc, 'MU');
          }
        }
 
        // We should not load stock during the fetch. If someone need stock of product, he must call load_stock after fetching product.
        // Instead we just init the stock_warehouse array
        $this->stock_warehouse = array();
 
        return 1;
      } else {
        return 0;
      }
    } else {
      $this->error = $this->db->lasterror();
      return -1;
    }
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function load_stats_mo($socid = 0)
  {
    // phpcs:enable
    global $user, $hookmanager, $action;
 
    $error = 0;
 
    foreach (array('toconsume', 'consumed', 'toproduce', 'produced') as $role) {
      $this->stats_mo['customers_'.$role] = 0;
      $this->stats_mo['nb_'.$role] = 0;
      $this->stats_mo['qty_'.$role] = 0;
 
      $sql = "SELECT COUNT(DISTINCT c.fk_soc) as nb_customers, COUNT(DISTINCT c.rowid) as nb,";
      $sql .= " SUM(mp.qty) as qty";
      $sql .= " FROM ".$this->db->prefix()."mrp_mo as c";
      $sql .= " INNER JOIN ".$this->db->prefix()."mrp_production as mp ON mp.fk_mo=c.rowid";
      if (empty($user->fk_soc) && !$user->hasRight('societe', 'client', 'voir')) {  // For external user, restriction is done on filter on fk_soc directly
        $sql .= " INNER JOIN ".$this->db->prefix()."societe_commerciaux as sc ON sc.fk_soc = c.fk_soc AND sc.fk_user = ".((int) $user->id);
      }
      $sql .= " WHERE ";
      $sql .= " c.entity IN (".getEntity('mo').")";
 
      $sql .= " AND mp.fk_product = ".((int) $this->id);
      $sql .= " AND mp.role ='".$this->db->escape($role)."'";
      if ($socid > 0) {
        $sql .= " AND c.fk_soc = ".((int) $socid);
      }
 
      $result = $this->db->query($sql);
      if ($result) {
        $obj = $this->db->fetch_object($result);
        $this->stats_mo['customers_'.$role] = $obj->nb_customers ? $obj->nb_customers : 0;
        $this->stats_mo['nb_'.$role] = $obj->nb ? $obj->nb : 0;
        $this->stats_mo['qty_'.$role] = $obj->qty ? price2num($obj->qty, 'MS') : 0;   // qty may be a float due to the SUM()
      } else {
        $this->error = $this->db->error();
        $error++;
      }
    }
 
    if (!empty($error)) {
      return -1;
    }
 
    $parameters = array('socid' => $socid);
    $reshook = $hookmanager->executeHooks('loadStatsCustomerMO', $parameters, $this, $action);
    if ($reshook > 0) {
      $this->stats_mo = $hookmanager->resArray['stats_mo'];
    }
 
    return 1;
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function load_stats_bom($socid = 0)
  {
    // phpcs:enable
    global $hookmanager, $action;
 
    $error = 0;
 
    $this->stats_bom['nb_toproduce'] = 0;
    $this->stats_bom['nb_toconsume'] = 0;
    $this->stats_bom['qty_toproduce'] = 0;
    $this->stats_bom['qty_toconsume'] = 0;
 
    $sql = "SELECT COUNT(DISTINCT b.rowid) as nb_toproduce,";
    $sql .= " SUM(b.qty) as qty_toproduce";
    $sql .= " FROM ".$this->db->prefix()."bom_bom as b";
    $sql .= " INNER JOIN ".$this->db->prefix()."bom_bomline as bl ON bl.fk_bom = b.rowid";
    $sql .= " WHERE ";
    $sql .= " b.entity IN (".getEntity('bom').")";
    $sql .= " AND b.fk_product =".((int) $this->id);
    $sql .= " GROUP BY b.rowid";
 
    $result = $this->db->query($sql);
    if ($result) {
      $obj = $this->db->fetch_object($result);
      $this->stats_bom['nb_toproduce'] = !empty($obj->nb_toproduce) ? $obj->nb_toproduce : 0;
      $this->stats_bom['qty_toproduce'] = !empty($obj->qty_toproduce) ? price2num($obj->qty_toproduce) : 0;
    } else {
      $this->error = $this->db->error();
      $error++;
    }
 
    $sql = "SELECT COUNT(DISTINCT bl.rowid) as nb_toconsume,";
    $sql .= " SUM(bl.qty) as qty_toconsume";
    $sql .= " FROM ".$this->db->prefix()."bom_bom as b";
    $sql .= " INNER JOIN ".$this->db->prefix()."bom_bomline as bl ON bl.fk_bom=b.rowid";
    $sql .= " WHERE ";
    $sql .= " b.entity IN (".getEntity('bom').")";
    $sql .= " AND bl.fk_product =".((int) $this->id);
 
    $result = $this->db->query($sql);
    if ($result) {
      $obj = $this->db->fetch_object($result);
      $this->stats_bom['nb_toconsume'] = !empty($obj->nb_toconsume) ? $obj->nb_toconsume : 0;
      $this->stats_bom['qty_toconsume'] = !empty($obj->qty_toconsume) ? price2num($obj->qty_toconsume) : 0;
    } else {
      $this->error = $this->db->error();
      $error++;
    }
 
    if (!empty($error)) {
      return -1;
    }
 
    $parameters = array('socid' => $socid);
    $reshook = $hookmanager->executeHooks('loadStatsCustomerMO', $parameters, $this, $action);
    if ($reshook > 0) {
      $this->stats_bom = $hookmanager->resArray['stats_bom'];
    }
 
    return 1;
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function load_stats_propale($socid = 0)
  {
    // phpcs:enable
    global $user, $hookmanager, $action;
 
    $sql = "SELECT COUNT(DISTINCT p.fk_soc) as nb_customers, COUNT(DISTINCT p.rowid) as nb,";
    $sql .= " COUNT(pd.rowid) as nb_rows, SUM(pd.qty) as qty";
    $sql .= " FROM ".$this->db->prefix()."propaldet as pd";
    $sql .= ", ".$this->db->prefix()."propal as p";
    $sql .= ", ".$this->db->prefix()."societe as s";
    $sql .= " WHERE p.rowid = pd.fk_propal";
    $sql .= " AND p.fk_soc = s.rowid";
    $sql .= " AND p.entity IN (".getEntity('propal').")";
    $sql .= " AND pd.fk_product = ".((int) $this->id);
    if (empty($user->fk_soc) && !$user->hasRight('societe', 'client', 'voir')) {  // For external user, restriction is done on filter on fk_soc directly
      $sql .= " INNER JOIN ".$this->db->prefix()."societe_commerciaux as sc ON sc.fk_soc = p.fk_soc AND sc.fk_user = ".((int) $user->id);
    }
    //$sql.= " AND pr.fk_statut != 0";
    if ($socid > 0) {
      $sql .= " AND p.fk_soc = ".((int) $socid);
    }
    // Add where from hooks
    $parameters = array('socid' => $socid, 'type_element' => 'propal');
    $reshook = $hookmanager->executeHooks('printFieldListWhere', $parameters, $this); // Note that $action and $object may have been modified by hook
    $sql .= $hookmanager->resPrint;
    $result = $this->db->query($sql);
    if ($result) {
      $obj = $this->db->fetch_object($result);
      $this->stats_propale['customers'] = (int) $obj->nb_customers;
      $this->stats_propale['nb'] = (int) $obj->nb;
      $this->stats_propale['rows'] = (int) $obj->nb_rows;
      $this->stats_propale['qty'] = $obj->qty ? (float) $obj->qty : 0;
 
      // if it's a virtual product, maybe it is in proposal by extension
      if (getDolGlobalString('PRODUCT_STATS_WITH_PARENT_PROD_IF_INCDEC')) {
        $TFather = $this->getFather();
        if (is_array($TFather) && !empty($TFather)) {
          foreach ($TFather as &$fatherData) {
            $pFather = new Product($this->db);
            $pFather->id = (int) $fatherData['id'];
            $qtyCoef = $fatherData['qty'];
 
            if ($fatherData['incdec']) {
              $pFather->load_stats_propale($socid);
 
              if (!empty($pFather->stats_propale)) {
                $this->stats_propale['customers'] += $pFather->stats_propale['customers'];
                $this->stats_propale['nb'] += $pFather->stats_propale['nb'];
                $this->stats_propale['rows'] += $pFather->stats_propale['rows'];
                $this->stats_propale['qty'] += $pFather->stats_propale['qty'] * $qtyCoef;
              }
            }
          }
        }
      }
 
      $parameters = array('socid' => $socid);
      $reshook = $hookmanager->executeHooks('loadStatsCustomerProposal', $parameters, $this, $action);
      if ($reshook > 0) {
        $this->stats_propale = $hookmanager->resArray['stats_propale'];
      }
 
      return 1;
    } else {
      $this->error = $this->db->error();
      return -1;
    }
  }
 
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function load_stats_proposal_supplier($socid = 0)
  {
    // phpcs:enable
    global $user, $hookmanager, $action;
 
    $sql = "SELECT COUNT(DISTINCT p.fk_soc) as nb_suppliers, COUNT(DISTINCT p.rowid) as nb,";
    $sql .= " COUNT(pd.rowid) as nb_rows, SUM(pd.qty) as qty";
    $sql .= " FROM ".$this->db->prefix()."supplier_proposaldet as pd";
    $sql .= ", ".$this->db->prefix()."supplier_proposal as p";
    $sql .= ", ".$this->db->prefix()."societe as s";
    $sql .= " WHERE p.rowid = pd.fk_supplier_proposal";
    $sql .= " AND p.fk_soc = s.rowid";
    $sql .= " AND p.entity IN (".getEntity('supplier_proposal').")";
    $sql .= " AND pd.fk_product = ".((int) $this->id);
    if (empty($user->fk_soc) && !$user->hasRight('societe', 'client', 'voir')) {  // For external user, restriction is done on filter on fk_soc directly
      $sql .= " INNER JOIN ".$this->db->prefix()."societe_commerciaux as sc ON sc.fk_soc = p.fk_soc AND sc.fk_user = ".((int) $user->id);
    }
    //$sql.= " AND pr.fk_statut != 0";
    if ($socid > 0) {
      $sql .= " AND p.fk_soc = ".((int) $socid);
    }
 
    $result = $this->db->query($sql);
    if ($result) {
      $obj = $this->db->fetch_object($result);
      $this->stats_proposal_supplier['suppliers'] = $obj->nb_suppliers;
      $this->stats_proposal_supplier['nb'] = $obj->nb;
      $this->stats_proposal_supplier['rows'] = $obj->nb_rows;
      $this->stats_proposal_supplier['qty'] = $obj->qty ? $obj->qty : 0;
 
      $parameters = array('socid' => $socid);
      $reshook = $hookmanager->executeHooks('loadStatsSupplierProposal', $parameters, $this, $action);
      if ($reshook > 0) {
        $this->stats_proposal_supplier = $hookmanager->resArray['stats_proposal_supplier'];
      }
 
      return 1;
    } else {
      $this->error = $this->db->error();
      return -1;
    }
  }
 
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function load_stats_commande($socid = 0, $filtrestatut = '', $forVirtualStock = 0)
  {
    // phpcs:enable
    global $user, $hookmanager, $action;
 
 
    $sql = "SELECT COUNT(DISTINCT c.fk_soc) as nb_customers, COUNT(DISTINCT c.rowid) as nb,";
    $sql .= " COUNT(cd.rowid) as nb_rows, SUM(cd.qty) as qty";
    $sql .= " FROM ".$this->db->prefix()."commandedet as cd";
    $sql .= ", ".$this->db->prefix()."commande as c";
    $sql .= ", ".$this->db->prefix()."societe as s";
    $sql .= " WHERE c.rowid = cd.fk_commande";
    $sql .= " AND c.fk_soc = s.rowid";
    $sql .= " AND c.entity IN (".getEntity($forVirtualStock && getDolGlobalString('STOCK_CALCULATE_VIRTUAL_STOCK_TRANSVERSE_MODE') ? 'stock' : 'commande').")";
    $sql .= " AND cd.fk_product = ".((int) $this->id);
    if (empty($user->fk_soc) && !$user->hasRight('societe', 'client', 'voir') && !$forVirtualStock) { // For external user, restriction is done on filter on fk_soc directly
      $sql .= " INNER JOIN ".$this->db->prefix()."societe_commerciaux as sc ON sc.fk_soc = c.fk_soc AND sc.fk_user = ".((int) $user->id);
    }
    if ($socid > 0) {
      $sql .= " AND c.fk_soc = ".((int) $socid);
    }
    if ($filtrestatut != '') {
      $sql .= " AND c.fk_statut IN (".$this->db->sanitize($filtrestatut).")";
    }
    // Add where from hooks
    $parameters = array('socid' => $socid, 'type_element' => 'order');
    $reshook = $hookmanager->executeHooks('printFieldListWhere', $parameters, $this); // Note that $action and $object may have been modified by hook
    $sql .= $hookmanager->resPrint;
    $result = $this->db->query($sql);
    if ($result) {
      $obj = $this->db->fetch_object($result);
      $this->stats_commande['customers'] = (int) $obj->nb_customers;
      $this->stats_commande['nb'] = (int) $obj->nb;
      $this->stats_commande['rows'] = (int) $obj->nb_rows;
      $this->stats_commande['qty'] = $obj->qty ? (float) $obj->qty : 0;
 
      // if it's a virtual product, maybe it is in order by extension
      if (getDolGlobalString('PRODUCT_STATS_WITH_PARENT_PROD_IF_INCDEC')) {
        $TFather = $this->getFather();
        if (is_array($TFather) && !empty($TFather)) {
          foreach ($TFather as &$fatherData) {
            $pFather = new Product($this->db);
            $pFather->id = $fatherData['id'];
            $qtyCoef = $fatherData['qty'];
 
            if ($fatherData['incdec']) {
              $pFather->load_stats_commande($socid, $filtrestatut);
 
              $this->stats_commande['customers'] += $pFather->stats_commande['customers'];
              $this->stats_commande['nb'] += $pFather->stats_commande['nb'];
              $this->stats_commande['rows'] += $pFather->stats_commande['rows'];
              $this->stats_commande['qty'] += $pFather->stats_commande['qty'] * $qtyCoef;
            }
          }
        }
      }
 
      // If stock decrease is on invoice validation, the theoretical stock continue to
      // count the orders lines containing product in theoretical stock when some are already removed by invoice validation.
      if ($forVirtualStock && getDolGlobalString('STOCK_CALCULATE_ON_BILL')) {
        // Do the request using an UNION instead of a OR in the JOIN that is very slow
        if (getDolGlobalString('DECREASE_ONLY_UNINVOICEDPRODUCTS')) {
          // If option DECREASE_ONLY_UNINVOICEDPRODUCTS is on, we make a compensation but only if order not yet invoice.
          $adeduire = 0;
          $sql = "SELECT SUM(".$this->db->ifsql('f.type=2', '-1', '1')." * fd.qty) as count FROM ".$this->db->prefix()."facturedet as fd ";
          $sql .= " JOIN ".$this->db->prefix()."facture as f ON fd.fk_facture = f.rowid";
          //$sql .= " JOIN ".$this->db->prefix()."element_element as el ON ((el.fk_target = f.rowid AND el.targettype = 'facture' AND sourcetype = 'commande') OR (el.fk_source = f.rowid AND el.targettype = 'commande' AND sourcetype = 'facture'))";
          $sql .= " JOIN ".$this->db->prefix()."element_element as el ON el.fk_target = f.rowid AND el.targettype = 'facture' AND sourcetype = 'commande' ";
          $sql .= " JOIN ".$this->db->prefix()."commande as c ON el.fk_source = c.rowid";
          $sql .= " WHERE c.fk_statut IN (".$this->db->sanitize($filtrestatut).") AND c.facture = 0 AND fd.fk_product = ".((int) $this->id);
          $sql .= " AND EXISTS (SELECT cd.fk_product FROM ".$this->db->prefix()."commandedet as cd WHERE cd.fk_product = fd.fk_product AND cd.fk_commande = c.rowid)"; // We check that the product is in order lines
 
          $sql .= " UNION ";
 
          $sql .= "SELECT SUM(".$this->db->ifsql('f.type=2', '-1', '1')." * fd.qty) as count FROM ".$this->db->prefix()."facturedet as fd ";
          $sql .= " JOIN ".$this->db->prefix()."facture as f ON fd.fk_facture = f.rowid";
          $sql .= " JOIN ".$this->db->prefix()."element_element as el ON el.fk_source = f.rowid AND el.targettype = 'commande' AND sourcetype = 'facture' ";
          $sql .= " JOIN ".$this->db->prefix()."commande as c ON el.fk_target = c.rowid";
          $sql .= " WHERE c.fk_statut IN (".$this->db->sanitize($filtrestatut).") AND c.facture = 0 AND fd.fk_product = ".((int) $this->id);
          $sql .= " AND EXISTS (SELECT cd.fk_product FROM ".$this->db->prefix()."commandedet as cd WHERE cd.fk_product = fd.fk_product AND cd.fk_commande = c.rowid)"; // We check that the product is in order lines
          // Add where from hooks
          $parameters = array('socid' => $socid, 'type_element' => 'order');
          $reshook = $hookmanager->executeHooks('printFieldListWhere', $parameters, $this); // Note that $action and $object may have been modified by hook
          $sql .= $hookmanager->resPrint;
          $resql = $this->db->query($sql);
          if ($resql) {
            while ($obj = $this->db->fetch_object($resql)) {
              $adeduire += (float) $obj->count;
            }
          }
 
          $this->stats_commande['qty'] -= $adeduire;
        } else {
          // If option DECREASE_ONLY_UNINVOICEDPRODUCTS is off, we make a compensation with lines of invoices linked to the order
          include_once DOL_DOCUMENT_ROOT.'/compta/facture/class/facture.class.php';
 
          // For every order having invoice already validated we need to decrease stock cause it's in physical stock
          $adeduire = 0;
          $sql = "SELECT sum(".$this->db->ifsql('f.type=2', '-1', '1')." * fd.qty) as count FROM ".$this->db->prefix()."facturedet as fd ";
          $sql .= " JOIN ".$this->db->prefix()."facture as f ON fd.fk_facture = f.rowid";
          //$sql .= " JOIN ".$this->db->prefix()."element_element as el ON ((el.fk_target = f.rowid AND el.targettype = 'facture' AND sourcetype = 'commande') OR (el.fk_source = f.rowid AND el.targettype = 'commande' AND sourcetype = 'facture'))";
          $sql .= " JOIN ".$this->db->prefix()."element_element as el ON el.fk_target = f.rowid AND el.targettype = 'facture' AND sourcetype = 'commande' ";
          $sql .= " JOIN ".$this->db->prefix()."commande as c ON el.fk_source = c.rowid";
          $sql .= " WHERE c.fk_statut IN (".$this->db->sanitize($filtrestatut).") AND f.fk_statut > ".Facture::STATUS_DRAFT." AND fd.fk_product = ".((int) $this->id);
          $sql .= " AND EXISTS (SELECT cd.fk_product FROM ".$this->db->prefix()."commandedet as cd WHERE cd.fk_product = fd.fk_product AND cd.fk_commande = c.rowid)"; // We check that the product is in order lines
 
          $sql .= " UNION ALL ";
 
          $sql .= "SELECT sum(".$this->db->ifsql('f.type=2', '-1', '1')." * fd.qty) as count FROM ".$this->db->prefix()."facturedet as fd ";
          $sql .= " JOIN ".$this->db->prefix()."facture as f ON fd.fk_facture = f.rowid";
          $sql .= " JOIN ".$this->db->prefix()."element_element as el ON el.fk_source = f.rowid AND el.targettype = 'commande' AND sourcetype = 'facture' ";
          $sql .= " JOIN ".$this->db->prefix()."commande as c ON el.fk_target = c.rowid";
          $sql .= " WHERE c.fk_statut IN (".$this->db->sanitize($filtrestatut).") AND f.fk_statut > ".Facture::STATUS_DRAFT." AND fd.fk_product = ".((int) $this->id);
          $sql .= " AND EXISTS (SELECT cd.fk_product FROM ".$this->db->prefix()."commandedet as cd WHERE cd.fk_product = fd.fk_product AND cd.fk_commande = c.rowid)"; // We check that the product is in order lines
 
          dol_syslog(__METHOD__.":: sql $sql", LOG_NOTICE);
          // Add where from hooks
          $parameters = array('socid' => $socid, 'type_element' => 'order');
          $reshook = $hookmanager->executeHooks('printFieldListWhere', $parameters, $this); // Note that $action and $object may have been modified by hook
          $sql .= $hookmanager->resPrint;
          $resql = $this->db->query($sql);
          if ($resql) {
            while ($obj = $this->db->fetch_object($resql)) {
              $adeduire += (float) $obj->count;
            }
          } else {
            $this->error = $this->db->error();
            return -1;
          }
 
          $this->stats_commande['qty'] -= $adeduire;
        }
      }
 
      $parameters = array('socid' => $socid, 'filtrestatut' => $filtrestatut, 'forVirtualStock' => $forVirtualStock);
      $reshook = $hookmanager->executeHooks('loadStatsCustomerOrder', $parameters, $this, $action);
      if ($reshook > 0) {
        $this->stats_commande = $hookmanager->resArray['stats_commande'];
      }
      return 1;
    } else {
      $this->error = $this->db->error();
      return -1;
    }
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function load_stats_commande_fournisseur($socid = 0, $filtrestatut = '', $forVirtualStock = 0, $dateofvirtualstock = null, $dateofvirtualstockmin = null)
  {
    // phpcs:enable
    global $user, $hookmanager, $action;
 
    $sql = "SELECT COUNT(DISTINCT c.fk_soc) as nb_suppliers, COUNT(DISTINCT c.rowid) as nb,";
    $sql .= " COUNT(cd.rowid) as nb_rows, SUM(cd.qty) as qty";
    $sql .= " FROM ".$this->db->prefix()."commande_fournisseurdet as cd";
    $sql .= ", ".$this->db->prefix()."commande_fournisseur as c";
    $sql .= ", ".$this->db->prefix()."societe as s";
    $sql .= " WHERE c.rowid = cd.fk_commande";
    $sql .= " AND c.fk_soc = s.rowid";
    $sql .= " AND c.entity IN (".getEntity($forVirtualStock && getDolGlobalString('STOCK_CALCULATE_VIRTUAL_STOCK_TRANSVERSE_MODE') ? 'stock' : 'supplier_order').")";
    $sql .= " AND cd.fk_product = ".((int) $this->id);
    if (empty($user->fk_soc) && !$user->hasRight('societe', 'client', 'voir') && !$forVirtualStock) { // For external user, restriction is done on filter on fk_soc directly
      $sql .= " INNER JOIN ".$this->db->prefix()."societe_commerciaux as sc ON sc.fk_soc = c.fk_soc AND sc.fk_user = ".((int) $user->id);
    }
    if ($socid > 0) {
      $sql .= " AND c.fk_soc = ".((int) $socid);
    }
    if ($filtrestatut != '') {
      $sql .= " AND c.fk_statut in (".$this->db->sanitize($filtrestatut).")"; // Peut valoir 0
    }
    if (!empty($dateofvirtualstock)) {
      // Window of the horizon. The lower bound, when set, drops the orders that did not arrive as planned: their date has
      // passed, so they are no longer a credible supply. Orders with no planned delivery date fall outside the window as
      // well, since their arrival is unknown, unless the option says to keep them.
      $sqlwindow = "c.date_livraison <= '".$this->db->idate($dateofvirtualstock)."'";
      if (!empty($dateofvirtualstockmin)) {
        $sqlwindow = "c.date_livraison >= '".$this->db->idate($dateofvirtualstockmin)."' AND ".$sqlwindow;
      }
      if (getDolGlobalInt('STOCK_VIRTUAL_HORIZON_INCLUDE_UNDATED_ORDERS')) {
        $sqlwindow .= " OR c.date_livraison IS NULL";
      }
      $sql .= " AND (".$sqlwindow.")";
    }
 
    $result = $this->db->query($sql);
    if ($result) {
      $obj = $this->db->fetch_object($result);
      $this->stats_commande_fournisseur['suppliers'] = $obj->nb_suppliers;
      $this->stats_commande_fournisseur['nb'] = $obj->nb;
      $this->stats_commande_fournisseur['rows'] = $obj->nb_rows;
      $this->stats_commande_fournisseur['qty'] = $obj->qty ? $obj->qty : 0;
 
      $parameters = array('socid' => $socid, 'filtrestatut' => $filtrestatut, 'forVirtualStock' => $forVirtualStock);
      $reshook = $hookmanager->executeHooks('loadStatsSupplierOrder', $parameters, $this, $action);
      if ($reshook > 0) {
        $this->stats_commande_fournisseur = $hookmanager->resArray['stats_commande_fournisseur'];
      }
 
      return 1;
    } else {
      $this->error = $this->db->error().' sql='.$sql;
      return -1;
    }
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function load_stats_sending($socid = 0, $filtrestatut = '', $forVirtualStock = 0, $filterShipmentStatus = '')
  {
    // phpcs:enable
    global $user, $hookmanager, $action;
 
    $sql = "SELECT COUNT(DISTINCT e.fk_soc) as nb_customers, COUNT(DISTINCT e.rowid) as nb,";
    $sql .= " COUNT(ed.rowid) as nb_rows, SUM(ed.qty) as qty";
    $sql .= " FROM ".$this->db->prefix()."expeditiondet as ed";
    $sql .= ", ".$this->db->prefix()."commandedet as cd";
    $sql .= ", ".$this->db->prefix()."commande as c";
    $sql .= ", ".$this->db->prefix()."expedition as e";
    $sql .= ", ".$this->db->prefix()."societe as s";
    $sql .= " WHERE e.rowid = ed.fk_expedition";
    $sql .= " AND c.rowid = cd.fk_commande";
    $sql .= " AND e.fk_soc = s.rowid";
    $sql .= " AND e.entity IN (".getEntity($forVirtualStock && getDolGlobalString('STOCK_CALCULATE_VIRTUAL_STOCK_TRANSVERSE_MODE') ? 'stock' : 'expedition').")";
    $sql .= " AND ed.fk_elementdet = cd.rowid";
    $sql .= " AND cd.fk_product = ".((int) $this->id);
    if (empty($user->fk_soc) && !$user->hasRight('societe', 'client', 'voir') && !$forVirtualStock) { // For external user, restriction is done on filter on fk_soc directly
      $sql .= " INNER JOIN ".$this->db->prefix()."societe_commerciaux as sc ON sc.fk_soc = e.fk_soc AND sc.fk_user = ".((int) $user->id);
    }
    if ($socid > 0) {
      $sql .= " AND e.fk_soc = ".((int) $socid);
    }
    if ($filtrestatut != '') {
      $sql .= " AND c.fk_statut IN (".$this->db->sanitize($filtrestatut).")";
    }
    if (!empty($filterShipmentStatus)) {
      $sql .= " AND e.fk_statut IN (".$this->db->sanitize($filterShipmentStatus).")";
    }
 
    $result = $this->db->query($sql);
    if ($result) {
      $obj = $this->db->fetch_object($result);
      $this->stats_expedition['customers'] = (int) $obj->nb_customers;
      $this->stats_expedition['nb'] = (int) $obj->nb;
      $this->stats_expedition['rows'] = (int) $obj->nb_rows;
      $this->stats_expedition['qty'] = $obj->qty ? (float) $obj->qty : 0;
 
      // if it's a virtual product, maybe it is in sending by extension
      if (getDolGlobalString('PRODUCT_STATS_WITH_PARENT_PROD_IF_INCDEC')) {
        $TFather = $this->getFather();
        if (is_array($TFather) && !empty($TFather)) {
          foreach ($TFather as &$fatherData) {
            $pFather = new Product($this->db);
            $pFather->id = $fatherData['id'];
            $qtyCoef = $fatherData['qty'];
 
            if ($fatherData['incdec']) {
              $pFather->load_stats_sending($socid, $filtrestatut, $forVirtualStock);
 
              if (!empty($pFather->stats_expedition)) {
                $this->stats_expedition['customers'] += $pFather->stats_expedition['customers'];
                $this->stats_expedition['nb'] += $pFather->stats_expedition['nb'];
                $this->stats_expedition['rows'] += $pFather->stats_expedition['rows'];
                $this->stats_expedition['qty'] += $pFather->stats_expedition['qty'] * $qtyCoef;
              }
            }
          }
        }
      }
 
      $parameters = array('socid' => $socid, 'filtrestatut' => $filtrestatut, 'forVirtualStock' => $forVirtualStock, 'filterShipmentStatus' => $filterShipmentStatus);
      $reshook = $hookmanager->executeHooks('loadStatsSending', $parameters, $this, $action);
      if ($reshook > 0) {
        $this->stats_expedition = $hookmanager->resArray['stats_expedition'];
      }
 
      return 1;
    } else {
      $this->error = $this->db->error();
      return -1;
    }
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function load_stats_reception($socid = 0, $filtrestatut = '', $forVirtualStock = 0, $dateofvirtualstock = null, $dateofvirtualstockmin = null)
  {
    // phpcs:enable
    global $user, $hookmanager, $action;
 
    $sql = "SELECT COUNT(DISTINCT cf.fk_soc) as nb_suppliers, COUNT(DISTINCT cf.rowid) as nb,";
    $sql .= " COUNT(fd.rowid) as nb_rows, SUM(fd.qty) as qty";
    $sql .= " FROM ".$this->db->prefix()."receptiondet_batch as fd";
    $sql .= ", ".$this->db->prefix()."commande_fournisseur as cf";
    $sql .= ", ".$this->db->prefix()."societe as s";
    $sql .= " WHERE cf.rowid = fd.fk_element";
    $sql .= " AND cf.fk_soc = s.rowid";
    $sql .= " AND cf.entity IN (".getEntity($forVirtualStock && getDolGlobalString('STOCK_CALCULATE_VIRTUAL_STOCK_TRANSVERSE_MODE') ? 'stock' : 'supplier_order').")";
    $sql .= " AND fd.fk_product = ".((int) $this->id);
    if (empty($user->fk_soc) && !$user->hasRight('societe', 'client', 'voir') && !$forVirtualStock) { // For external user, restriction is done on filter on fk_soc directly
      $sql .= " INNER JOIN ".$this->db->prefix()."societe_commerciaux as sc ON sc.fk_soc = cf.fk_soc AND sc.fk_user = ".((int) $user->id);
    }
    if ($socid > 0) {
      $sql .= " AND cf.fk_soc = ".((int) $socid);
    }
    if ($filtrestatut != '') {
      $sql .= " AND cf.fk_statut IN (".$this->db->sanitize($filtrestatut).")";
    }
    if (!empty($dateofvirtualstock)) {
      $sql .= " AND fd.datec <= '".$this->db->idate($dateofvirtualstock)."'";
    }
    if (!empty($dateofvirtualstockmin)) {
      // Same window as the supplier order side: both halves of the subtraction must always run on the same population of
      // orders, otherwise an order dropped from one half while its receptions are still subtracted in the other one would
      // push the theoretical stock below the real stock.
      $sqlwindow = "cf.date_livraison >= '".$this->db->idate($dateofvirtualstockmin)."' AND cf.date_livraison <= '".$this->db->idate($dateofvirtualstock)."'";
      if (getDolGlobalInt('STOCK_VIRTUAL_HORIZON_INCLUDE_UNDATED_ORDERS')) {
        $sqlwindow .= " OR cf.date_livraison IS NULL";
      }
      $sql .= " AND (".$sqlwindow.")";
    }
 
    $result = $this->db->query($sql);
    if ($result) {
      $obj = $this->db->fetch_object($result);
      $this->stats_reception['suppliers'] = $obj->nb_suppliers;
      $this->stats_reception['nb'] = $obj->nb;
      $this->stats_reception['rows'] = $obj->nb_rows;
      $this->stats_reception['qty'] = $obj->qty ? $obj->qty : 0;
 
      $parameters = array('socid' => $socid, 'filtrestatut' => $filtrestatut, 'forVirtualStock' => $forVirtualStock);
      $reshook = $hookmanager->executeHooks('loadStatsReception', $parameters, $this, $action);
      if ($reshook > 0) {
        $this->stats_reception = $hookmanager->resArray['stats_reception'];
      }
 
      return 1;
    } else {
      $this->error = $this->db->error();
      return -1;
    }
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function load_stats_inproduction($socid = 0, $filtrestatut = '', $forVirtualStock = 0, $dateofvirtualstock = null, $warehouseid = 0, $dateofvirtualstockmin = null)
  {
    // phpcs:enable
    global $user, $hookmanager, $action;
 
    $serviceStockIsEnabled = isModEnabled("service") && getDolGlobalString('STOCK_SUPPORTS_SERVICES');
 
    $sql = "SELECT COUNT(DISTINCT m.fk_soc) as nb_customers, COUNT(DISTINCT m.rowid) as nb,";
    $sql .= " COUNT(mp.rowid) as nb_rows, SUM(mp.qty) as qty, role";
    $sql .= " FROM ".$this->db->prefix()."mrp_production as mp";
    $sql .= ", ".$this->db->prefix()."mrp_mo as m";
    $sql .= " LEFT JOIN ".$this->db->prefix()."societe as s ON s.rowid = m.fk_soc";
    $sql .= " WHERE m.rowid = mp.fk_mo";
    $sql .= " AND m.entity IN (".getEntity(($forVirtualStock && getDolGlobalString('STOCK_CALCULATE_VIRTUAL_STOCK_TRANSVERSE_MODE')) ? 'stock' : 'mrp').")";
    $sql .= " AND mp.fk_product = ".((int) $this->id);
    $sql .= " AND (mp.disable_stock_change IN (0) OR mp.disable_stock_change IS NULL)";
    if (empty($user->fk_soc) && !$user->hasRight('societe', 'client', 'voir') && !$forVirtualStock) { // For external user, restriction is done on filter on fk_soc directly
      $sql .= " INNER JOIN ".$this->db->prefix()."societe_commerciaux as sc ON sc.fk_soc = m.fk_soc AND sc.fk_user = ".((int) $user->id);
    }
    if ($socid > 0) {
      $sql .= " AND m.fk_soc = ".((int) $socid);
    }
    if ($filtrestatut != '') {
      $sql .= " AND m.status IN (".$this->db->sanitize($filtrestatut).")";
    }
    if (!empty($dateofvirtualstockmin)) {
      // Window of the horizon. Here the relevant date is the planned end of production, not the validation date: a
      // manufacturing order validated months ago but never completed is no longer a credible source of goods, and its
      // components are no longer a credible consumption either. The validation date is kept as a fallback for the
      // orders that carry no planned end date.
      $sql .= " AND COALESCE(m.date_end_planned, m.date_valid) >= '".$this->db->idate($dateofvirtualstockmin)."'";
      $sql .= " AND COALESCE(m.date_end_planned, m.date_valid) <= '".$this->db->idate($dateofvirtualstock)."'";
    } elseif (!empty($dateofvirtualstock)) {
      $sql .= " AND m.date_valid <= '".$this->db->idate($dateofvirtualstock)."'"; // better date to code ? end of production ?
    }
    if (!$serviceStockIsEnabled) {
      $sql .= "AND EXISTS (SELECT p.rowid FROM ".$this->db->prefix()."product AS p WHERE p.rowid = ".((int) $this->id)." AND p.fk_product_type IN (0))";
    }
    if (!empty($warehouseid)) {
      $sql .= " AND m.fk_warehouse = ".((int) $warehouseid);
    }
    $sql .= " GROUP BY role";
 
    if ($warehouseid) {
      $this->stock_warehouse[$warehouseid]->stats_mrptoproduce['qty'] = 0;
    } else {
      $this->stats_mrptoconsume['customers'] = 0;
      $this->stats_mrptoconsume['nb'] = 0;
      $this->stats_mrptoconsume['rows'] = 0;
      $this->stats_mrptoconsume['qty'] = 0.0;
      $this->stats_mrptoproduce['customers'] = 0;
      $this->stats_mrptoproduce['nb'] = 0;
      $this->stats_mrptoproduce['rows'] = 0;
      $this->stats_mrptoproduce['qty'] = 0.0;
    }
 
    $result = $this->db->query($sql);
    if ($result) {
      while ($obj = $this->db->fetch_object($result)) {
        if ($obj->role == 'toconsume' && empty($warehouseid)) {
          $this->stats_mrptoconsume['customers'] += (int) $obj->nb_customers;
          $this->stats_mrptoconsume['nb'] += (int) $obj->nb;
          $this->stats_mrptoconsume['rows'] += (int) $obj->nb_rows;
          $this->stats_mrptoconsume['qty'] += ($obj->qty ? (float) $obj->qty : 0.0);
        }
        if ($obj->role == 'consumed' && empty($warehouseid)) {
          //$this->stats_mrptoconsume['customers'] += $obj->nb_customers;
          //$this->stats_mrptoconsume['nb'] += $obj->nb;
          //$this->stats_mrptoconsume['rows'] += $obj->nb_rows;
          $this->stats_mrptoconsume['qty'] -= ($obj->qty ? (float) $obj->qty : 0.0);
        }
        if ($obj->role == 'toproduce') {
          if ($warehouseid) {
            $this->stock_warehouse[$warehouseid]->stats_mrptoproduce['qty'] += ($obj->qty ? (float) $obj->qty : 0.0);
          } else {
            $this->stats_mrptoproduce['customers'] += (int) $obj->nb_customers;
            $this->stats_mrptoproduce['nb'] += (int) $obj->nb;
            $this->stats_mrptoproduce['rows'] += (int) $obj->nb_rows;
            $this->stats_mrptoproduce['qty'] += ($obj->qty ? (float) $obj->qty : 0.0);
          }
        }
        if ($obj->role == 'produced') {
          //$this->stats_mrptoproduce['customers'] += $obj->nb_customers;
          //$this->stats_mrptoproduce['nb'] += $obj->nb;
          //$this->stats_mrptoproduce['rows'] += $obj->nb_rows;
          if ($warehouseid) {
            $this->stock_warehouse[$warehouseid]->stats_mrptoproduce['qty'] -= ($obj->qty ? $obj->qty : 0);
          } else {
            $this->stats_mrptoproduce['qty'] -= ($obj->qty ? $obj->qty : 0);
          }
        }
      }
 
      // Clean data
      if ($warehouseid) {
        if ($this->stock_warehouse[$warehouseid]->stats_mrptoproduce['qty'] < 0) {
          $this->stock_warehouse[$warehouseid]->stats_mrptoproduce['qty'] = 0;
        }
      } else {
        if ($this->stats_mrptoconsume['qty'] < 0) {
          $this->stats_mrptoconsume['qty'] = 0;
        }
        if ($this->stats_mrptoproduce['qty'] < 0) {
          $this->stats_mrptoproduce['qty'] = 0;
        }
      }
 
      $parameters = array('socid' => $socid, 'filtrestatut' => $filtrestatut, 'forVirtualStock' => $forVirtualStock);
      $reshook = $hookmanager->executeHooks('loadStatsInProduction', $parameters, $this, $action);
      if ($reshook > 0) {
        $this->stats_mrptoproduce = $hookmanager->resArray['stats_mrptoproduce'];
      }
 
      return 1;
    } else {
      $this->error = $this->db->error();
      return -1;
    }
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function load_stats_contrat($socid = 0)
  {
    // phpcs:enable
    global $user, $hookmanager, $action;
 
    $sql = "SELECT COUNT(DISTINCT c.fk_soc) as nb_customers, COUNT(DISTINCT c.rowid) as nb,";
    $sql .= " COUNT(cd.rowid) as nb_rows, SUM(cd.qty) as qty";
    $sql .= " FROM ".$this->db->prefix()."contratdet as cd";
    $sql .= ", ".$this->db->prefix()."contrat as c";
    $sql .= ", ".$this->db->prefix()."societe as s";
    $sql .= " WHERE c.rowid = cd.fk_contrat";
    $sql .= " AND c.fk_soc = s.rowid";
    $sql .= " AND c.entity IN (".getEntity('contract').")";
    $sql .= " AND cd.fk_product = ".((int) $this->id);
    if (empty($user->fk_soc) && !$user->hasRight('societe', 'client', 'voir')) {  // For external user, restriction is done on filter on fk_soc directly
      $sql .= " INNER JOIN ".$this->db->prefix()."societe_commerciaux as sc ON sc.fk_soc = c.fk_soc AND sc.fk_user = ".((int) $user->id);
    }
    //$sql.= " AND c.statut != 0";
    if ($socid > 0) {
      $sql .= " AND c.fk_soc = ".((int) $socid);
    }
 
    $result = $this->db->query($sql);
    if ($result) {
      $obj = $this->db->fetch_object($result);
      $this->stats_contrat['customers'] = (int) $obj->nb_customers;
      $this->stats_contrat['nb'] = (int) $obj->nb;
      $this->stats_contrat['rows'] = (int) $obj->nb_rows;
      $this->stats_contrat['qty'] = $obj->qty ? (float) $obj->qty : 0;
 
      // if it's a virtual product, maybe it is in contract by extension
      if (getDolGlobalString('PRODUCT_STATS_WITH_PARENT_PROD_IF_INCDEC')) {
        $TFather = $this->getFather();
        if (is_array($TFather) && !empty($TFather)) {
          foreach ($TFather as &$fatherData) {
            $pFather = new Product($this->db);
            $pFather->id = $fatherData['id'];
            $qtyCoef = $fatherData['qty'];
 
            if ($fatherData['incdec']) {
              $pFather->load_stats_contrat($socid);
 
              if (!empty($pFather->stats_contrat)) {
                $this->stats_contrat['customers'] += $pFather->stats_contrat['customers'];
                $this->stats_contrat['nb'] += $pFather->stats_contrat['nb'];
                $this->stats_contrat['rows'] += $pFather->stats_contrat['rows'];
                $this->stats_contrat['qty'] += $pFather->stats_contrat['qty'] * $qtyCoef;
              }
            }
          }
        }
      }
 
      $parameters = array('socid' => $socid);
      $reshook = $hookmanager->executeHooks('loadStatsContract', $parameters, $this, $action);
      if ($reshook > 0) {
        $this->stats_contrat = $hookmanager->resArray['stats_contrat'];
      }
 
      return 1;
    } else {
      $this->error = $this->db->error().' sql='.$sql;
      return -1;
    }
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function load_stats_facture($socid = 0)
  {
    // phpcs:enable
    global $user, $hookmanager, $action;
 
    $sql = "SELECT COUNT(DISTINCT f.fk_soc) as nb_customers, COUNT(DISTINCT f.rowid) as nb,";
    $sql .= " COUNT(fd.rowid) as nb_rows, SUM(".$this->db->ifsql('f.type != 2', 'fd.qty', 'fd.qty * -1').") as qty";
    $sql .= " FROM ".$this->db->prefix()."facturedet as fd";
    $sql .= ", ".$this->db->prefix()."facture as f";
    $sql .= ", ".$this->db->prefix()."societe as s";
    $sql .= " WHERE f.rowid = fd.fk_facture";
    $sql .= " AND f.fk_soc = s.rowid";
    $sql .= " AND f.entity IN (".getEntity('invoice').")";
    $sql .= " AND fd.fk_product = ".((int) $this->id);
    if (empty($user->fk_soc) && !$user->hasRight('societe', 'client', 'voir')) {  // For external user, restriction is done on filter on fk_soc directly
      $sql .= " INNER JOIN ".$this->db->prefix()."societe_commerciaux as sc ON sc.fk_soc = f.fk_soc AND sc.fk_user = ".((int) $user->id);
    }
    //$sql.= " AND f.fk_statut != 0";
    if ($socid > 0) {
      $sql .= " AND f.fk_soc = ".((int) $socid);
    }
 
    $result = $this->db->query($sql);
    if ($result) {
      $obj = $this->db->fetch_object($result);
      $this->stats_facture['customers'] = (int) $obj->nb_customers;
      $this->stats_facture['nb'] = (int) $obj->nb;
      $this->stats_facture['rows'] = (int) $obj->nb_rows;
      $this->stats_facture['qty'] = $obj->qty ? (float) $obj->qty : 0;
 
      // if it's a virtual product, maybe it is in invoice by extension
      if (getDolGlobalString('PRODUCT_STATS_WITH_PARENT_PROD_IF_INCDEC')) {
        $TFather = $this->getFather();
        if (is_array($TFather) && !empty($TFather)) {
          foreach ($TFather as &$fatherData) {
            $pFather = new Product($this->db);
            $pFather->id = $fatherData['id'];
            $qtyCoef = $fatherData['qty'];
 
            if ($fatherData['incdec']) {
              $pFather->load_stats_facture($socid);
 
              if (!empty($pFather->stats_facture)) {
                $this->stats_facture['customers'] += $pFather->stats_facture['customers'];
                $this->stats_facture['nb'] += $pFather->stats_facture['nb'];
                $this->stats_facture['rows'] += $pFather->stats_facture['rows'];
                $this->stats_facture['qty'] += $pFather->stats_facture['qty'] * $qtyCoef;
              }
            }
          }
        }
      }
 
      $parameters = array('socid' => $socid);
      $reshook = $hookmanager->executeHooks('loadStatsCustomerInvoice', $parameters, $this, $action);
      if ($reshook > 0) {
        $this->stats_facture = $hookmanager->resArray['stats_facture'];
      }
 
      return 1;
    } else {
      $this->error = $this->db->error();
      return -1;
    }
  }
 
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function load_stats_facturerec($socid = 0)
  {
    // phpcs:enable
    global $user, $hookmanager, $action;
 
    $sql = "SELECT COUNT(DISTINCT f.fk_soc) as nb_customers, COUNT(DISTINCT f.rowid) as nb,";
    $sql .= " COUNT(fd.rowid) as nb_rows, SUM(fd.qty) as qty";
    $sql .= " FROM ".MAIN_DB_PREFIX."facturedet_rec as fd";
    $sql .= ", ".MAIN_DB_PREFIX."facture_rec as f";
    $sql .= ", ".MAIN_DB_PREFIX."societe as s";
    $sql .= " WHERE f.rowid = fd.fk_facture";
    $sql .= " AND f.fk_soc = s.rowid";
    $sql .= " AND f.entity IN (".getEntity('invoice').")";
    $sql .= " AND fd.fk_product = ".((int) $this->id);
    if (empty($user->fk_soc) && !$user->hasRight('societe', 'client', 'voir')) {  // For external user, restriction is done on filter on fk_soc directly
      $sql .= " INNER JOIN ".$this->db->prefix()."societe_commerciaux as sc ON sc.fk_soc = f.fk_soc AND sc.fk_user = ".((int) $user->id);
    }
    //$sql.= " AND f.fk_statut != 0";
    if ($socid > 0) {
      $sql .= " AND f.fk_soc = ".((int) $socid);
    }
 
    $result = $this->db->query($sql);
    if ($result) {
      $obj = $this->db->fetch_object($result);
      $this->stats_facturerec['customers'] = (int) $obj->nb_customers;
      $this->stats_facturerec['nb'] = (int) $obj->nb;
      $this->stats_facturerec['rows'] = (int) $obj->nb_rows;
      $this->stats_facturerec['qty'] = $obj->qty ? (float) $obj->qty : 0.0;
 
      // if it's a virtual product, maybe it is in invoice by extension
      if (getDolGlobalString('PRODUCT_STATS_WITH_PARENT_PROD_IF_INCDEC')) {
        $TFather = $this->getFather();
        if (is_array($TFather) && !empty($TFather)) {
          foreach ($TFather as &$fatherData) {
            $pFather = new Product($this->db);
            $pFather->id = $fatherData['id'];
            $qtyCoef = $fatherData['qty'];
 
            if ($fatherData['incdec']) {
              $pFather->load_stats_facture($socid);
 
              $this->stats_facturerec['customers'] += $pFather->stats_facturerec['customers'];
              $this->stats_facturerec['nb'] += $pFather->stats_facturerec['nb'];
              $this->stats_facturerec['rows'] += $pFather->stats_facturerec['rows'];
              $this->stats_facturerec['qty'] += $pFather->stats_facturerec['qty'] * $qtyCoef;
            }
          }
        }
      }
 
      $parameters = array('socid' => $socid);
      $reshook = $hookmanager->executeHooks('loadStatsCustomerInvoiceRec', $parameters, $this, $action);
      if ($reshook > 0) {
        $this->stats_facturerec = $hookmanager->resArray['stats_facturerec'];
      }
 
      return 1;
    } else {
      $this->error = $this->db->error();
      return -1;
    }
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function load_stats_facture_fournisseur($socid = 0)
  {
    // phpcs:enable
    global $user, $hookmanager, $action;
 
    $sql = "SELECT COUNT(DISTINCT f.fk_soc) as nb_suppliers, COUNT(DISTINCT f.rowid) as nb,";
    $sql .= " COUNT(fd.rowid) as nb_rows, SUM(fd.qty) as qty";
    $sql .= " FROM ".$this->db->prefix()."facture_fourn_det as fd";
    $sql .= ", ".$this->db->prefix()."facture_fourn as f";
    $sql .= ", ".$this->db->prefix()."societe as s";
    $sql .= " WHERE f.rowid = fd.fk_facture_fourn";
    $sql .= " AND f.fk_soc = s.rowid";
    $sql .= " AND f.entity IN (".getEntity('facture_fourn').")";
    $sql .= " AND fd.fk_product = ".((int) $this->id);
    if (empty($user->fk_soc) && !$user->hasRight('societe', 'client', 'voir')) {  // For external user, restriction is done on filter on fk_soc directly
      $sql .= " INNER JOIN ".$this->db->prefix()."societe_commerciaux as sc ON sc.fk_soc = f.fk_soc AND sc.fk_user = ".((int) $user->id);
    }
    //$sql.= " AND f.fk_statut != 0";
    if ($socid > 0) {
      $sql .= " AND f.fk_soc = ".((int) $socid);
    }
 
    $result = $this->db->query($sql);
    if ($result) {
      $obj = $this->db->fetch_object($result);
      $this->stats_facture_fournisseur['suppliers'] = (int) $obj->nb_suppliers;
      $this->stats_facture_fournisseur['nb'] = (int) $obj->nb;
      $this->stats_facture_fournisseur['rows'] = (int) $obj->nb_rows;
      $this->stats_facture_fournisseur['qty'] = $obj->qty ? (float) $obj->qty : 0.0;
 
      $parameters = array('socid' => $socid);
      $reshook = $hookmanager->executeHooks('loadStatsSupplierInvoice', $parameters, $this, $action);
      if ($reshook > 0) {
        $this->stats_facture_fournisseur = $hookmanager->resArray['stats_facture_fournisseur'];
      }
 
      return 1;
    } else {
      $this->error = $this->db->error();
      return -1;
    }
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function load_stats_facturefournrec($socid = 0)
  {
    // phpcs:enable
    global $user, $hookmanager, $action;
 
    $sql = "SELECT COUNT(DISTINCT f.fk_soc) as nb_suppliers, COUNT(DISTINCT f.rowid) as nb,";
    $sql .= " COUNT(fd.rowid) as nb_rows, SUM(fd.qty) as qty";
    $sql .= " FROM ".MAIN_DB_PREFIX."facture_fourn_det_rec as fd";
    $sql .= ", ".MAIN_DB_PREFIX."facture_fourn_rec as f";
    $sql .= ", ".MAIN_DB_PREFIX."societe as s";
    if (!$user->hasRight('societe', 'client', 'voir')) {
      $sql .= ", ".MAIN_DB_PREFIX."societe_commerciaux as sc";
    }
    $sql .= " WHERE f.rowid = fd.fk_facture";
    $sql .= " AND f.fk_soc = s.rowid";
    $sql .= " AND f.entity IN (".getEntity('invoice').")";
    $sql .= " AND fd.fk_product = ".((int) $this->id);
    if (!$user->hasRight('societe', 'client', 'voir')) {
      $sql .= " AND f.fk_soc = sc.fk_soc AND sc.fk_user = ".((int) $user->id);
    }
    //$sql.= " AND f.fk_statut != 0";
    if ($socid > 0) {
      $sql .= " AND f.fk_soc = ".((int) $socid);
    }
 
    $result = $this->db->query($sql);
    if ($result) {
      $obj = $this->db->fetch_object($result);
      $this->stats_facturefournrec['suppliers'] = (int) $obj->nb_suppliers;
      $this->stats_facturefournrec['nb'] = (int) $obj->nb;
      $this->stats_facturefournrec['rows'] = (int) $obj->nb_rows;
      $this->stats_facturefournrec['qty'] = $obj->qty ? (float) $obj->qty : 0.0;
 
      $parameters = array('socid' => $socid);
      $reshook = $hookmanager->executeHooks('loadStatsSupplierInvoiceRec', $parameters, $this, $action);
      if ($reshook > 0) {
        $this->stats_facturefournrec = $hookmanager->resArray['stats_facturefournrec'];
      }
 
      return 1;
    } else {
      $this->error = $this->db->error();
      return -1;
    }
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  private function _get_stats($sql, $mode, $year = 0)
  {
    // phpcs:enable
    $tab = array();
 
    $resql = $this->db->query($sql);
    if ($resql) {
      $num = $this->db->num_rows($resql);
      $i = 0;
      while ($i < $num) {
        $arr = $this->db->fetch_array($resql);
        if (is_array($arr)) {
          $keyfortab = (string) $arr[1];
          if ($year == -1) {
            $keyfortab = substr($keyfortab, -2);
          }
 
          if ($mode == 'byunit') {
            $tab[$keyfortab] = (empty($tab[$keyfortab]) ? 0 : $tab[$keyfortab]) + $arr[0]; // 1st field
          } elseif ($mode == 'bynumber') {
            $tab[$keyfortab] = (empty($tab[$keyfortab]) ? 0 : $tab[$keyfortab]) + $arr[2]; // 3rd field
          } elseif ($mode == 'byamount') {
            $tab[$keyfortab] = (empty($tab[$keyfortab]) ? 0 : $tab[$keyfortab]) + $arr[2]; // 3rd field
          } else {
            // Bad value for $mode
            return -1;
          }
        }
        $i++;
      }
    } else {
      $this->error = $this->db->error().' sql='.$sql;
      return -1;
    }
 
    if (empty($year)) {
      $year = dol_print_date(dol_now(), '%Y');
      $month = dol_print_date(dol_now(), '%m');
    } elseif ($year == -1) {
      $year = '';
      $month = 12; // We imagine we are at end of year, so we get last 12 month before, so all correct year.
    } else {
      $month = 12; // We imagine we are at end of year, so we get last 12 month before, so all correct year.
    }
 
    $result = array();
 
    for ($j = 0; $j < 12; $j++) {
      // $idx is 'D', 'N', 'O', 'S', ... (First letter of month in user language)
      $idx = ucfirst(dol_trunc(dol_print_date(dol_mktime(12, 0, 0, $month, 1, 1970), "%b"), 1, 'right', 'UTF-8', 1));
 
      // print $idx.'-'.$year.'-'.$month.'<br>';
      $result[$j] = array($idx, isset($tab[$year.$month]) ? $tab[$year.$month] : 0);
      // $result[$j] = array($monthnum,isset($tab[$year.$month])?$tab[$year.$month]:0);
 
      $month = "0".($month - 1);
      if (dol_strlen($month) == 3) {
        $month = substr($month, 1);
      }
      if ($month == 0) {
        $month = 12;
        if ($year !== '') { // $year is '' when we want stats for all years
          $year -= 1;
        }
      }
    }
 
    return array_reverse($result);
  }
 
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function get_nb_vente($socid, $mode, $filteronproducttype = -1, $year = 0, $morefilter = '')
  {
    // phpcs:enable
    global $user;
 
    $sql = "SELECT sum(d.qty) as qty, date_format(f.datef, '%Y%m')";
    if ($mode == 'bynumber') {
      $sql .= ", count(DISTINCT f.rowid)";
    }
    $sql .= ", sum(d.total_ht) as total_ht";
    $sql .= " FROM ".$this->db->prefix()."facturedet as d, ".$this->db->prefix()."facture as f, ".$this->db->prefix()."societe as s";
    if ($filteronproducttype >= 0) {
      $sql .= ", ".$this->db->prefix()."product as p";
    }
    if (!$user->hasRight('societe', 'client', 'voir')) {
      $sql .= ", ".$this->db->prefix()."societe_commerciaux as sc";
    }
    $sql .= " WHERE f.rowid = d.fk_facture";
    if ($this->id > 0) {
      $sql .= " AND d.fk_product = ".((int) $this->id);
    } else {
      $sql .= " AND d.fk_product > 0";
    }
    if ($filteronproducttype >= 0) {
      $sql .= " AND p.rowid = d.fk_product AND p.fk_product_type = ".((int) $filteronproducttype);
    }
    $sql .= " AND f.fk_soc = s.rowid";
    $sql .= " AND f.entity IN (".getEntity('invoice').")";
    if (!$user->hasRight('societe', 'client', 'voir')) {
      $sql .= " AND f.fk_soc = sc.fk_soc AND sc.fk_user = ".((int) $user->id);
    }
    if ($socid > 0) {
      $sql .= " AND f.fk_soc = ".((int) $socid);
    }
    $sql .= $morefilter;
    $sql .= " GROUP BY date_format(f.datef,'%Y%m')";
    $sql .= " ORDER BY date_format(f.datef,'%Y%m') DESC";
 
    return $this->_get_stats($sql, $mode, $year);
  }
 
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function get_nb_achat($socid, $mode, $filteronproducttype = -1, $year = 0, $morefilter = '')
  {
    // phpcs:enable
    global $user;
 
    $sql = "SELECT sum(d.qty) as qty, date_format(f.datef, '%Y%m')";
    if ($mode == 'bynumber') {
      $sql .= ", count(DISTINCT f.rowid)";
    }
    $sql .= ", sum(d.total_ht) as total_ht";
    $sql .= " FROM ".$this->db->prefix()."facture_fourn_det as d, ".$this->db->prefix()."facture_fourn as f, ".$this->db->prefix()."societe as s";
    if ($filteronproducttype >= 0) {
      $sql .= ", ".$this->db->prefix()."product as p";
    }
    if (!$user->hasRight('societe', 'client', 'voir')) {
      $sql .= ", ".$this->db->prefix()."societe_commerciaux as sc";
    }
    $sql .= " WHERE f.rowid = d.fk_facture_fourn";
    if ($this->id > 0) {
      $sql .= " AND d.fk_product = ".((int) $this->id);
    } else {
      $sql .= " AND d.fk_product > 0";
    }
    if ($filteronproducttype >= 0) {
      $sql .= " AND p.rowid = d.fk_product AND p.fk_product_type = ".((int) $filteronproducttype);
    }
    $sql .= " AND f.fk_soc = s.rowid";
    $sql .= " AND f.entity IN (".getEntity('facture_fourn').")";
    if (!$user->hasRight('societe', 'client', 'voir')) {
      $sql .= " AND f.fk_soc = sc.fk_soc AND sc.fk_user = ".((int) $user->id);
    }
    if ($socid > 0) {
      $sql .= " AND f.fk_soc = ".((int) $socid);
    }
    $sql .= $morefilter;
    $sql .= " GROUP BY date_format(f.datef,'%Y%m')";
    $sql .= " ORDER BY date_format(f.datef,'%Y%m') DESC";
 
    return $this->_get_stats($sql, $mode, $year);
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function get_nb_propal($socid, $mode, $filteronproducttype = -1, $year = 0, $morefilter = '')
  {
    // phpcs:enable
    global $user, $hookmanager;
 
    $sql = "SELECT sum(d.qty) as qty, date_format(p.datep, '%Y%m')";
    if ($mode == 'bynumber') {
      $sql .= ", count(DISTINCT p.rowid)";
    }
    $sql .= ", sum(d.total_ht) as total_ht";
    $sql .= " FROM ".$this->db->prefix()."propaldet as d, ".$this->db->prefix()."propal as p, ".$this->db->prefix()."societe as s";
    if ($filteronproducttype >= 0) {
      $sql .= ", ".$this->db->prefix()."product as prod";
    }
    if (!$user->hasRight('societe', 'client', 'voir')) {
      $sql .= ", ".$this->db->prefix()."societe_commerciaux as sc";
    }
    $sql .= " WHERE p.rowid = d.fk_propal";
    if ($this->id > 0) {
      $sql .= " AND d.fk_product = ".((int) $this->id);
    } else {
      $sql .= " AND d.fk_product > 0";
    }
    if ($filteronproducttype >= 0) {
      $sql .= " AND prod.rowid = d.fk_product AND prod.fk_product_type = ".((int) $filteronproducttype);
    }
    $sql .= " AND p.fk_soc = s.rowid";
    $sql .= " AND p.entity IN (".getEntity('propal').")";
    if (!$user->hasRight('societe', 'client', 'voir')) {
      $sql .= " AND p.fk_soc = sc.fk_soc AND sc.fk_user = ".((int) $user->id);
    }
    if ($socid > 0) {
      $sql .= " AND p.fk_soc = ".((int) $socid);
    }
    $sql .= $morefilter;
    $parameters = array('socid' => $user->socid);
    $hookmanager->executeHooks('productGetNbPropal', $parameters, $this); // Note that $action and $object may have been modified by hook
    $sql .= $hookmanager->resPrint;
    $sql .= " GROUP BY date_format(p.datep,'%Y%m')";
    $sql .= " ORDER BY date_format(p.datep,'%Y%m') DESC";
    return $this->_get_stats($sql, $mode, $year);
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function get_nb_propalsupplier($socid, $mode, $filteronproducttype = -1, $year = 0, $morefilter = '')
  {
    // phpcs:enable
    global $user;
 
    $sql = "SELECT sum(d.qty) as qty, date_format(p.date_valid, '%Y%m')";
    if ($mode == 'bynumber') {
      $sql .= ", count(DISTINCT p.rowid)";
    }
    $sql .= ", sum(d.total_ht) as total_ht";
    $sql .= " FROM ".$this->db->prefix()."supplier_proposaldet as d, ".$this->db->prefix()."supplier_proposal as p, ".$this->db->prefix()."societe as s";
    if ($filteronproducttype >= 0) {
      $sql .= ", ".$this->db->prefix()."product as prod";
    }
    if (!$user->hasRight('societe', 'client', 'voir')) {
      $sql .= ", ".$this->db->prefix()."societe_commerciaux as sc";
    }
    $sql .= " WHERE p.rowid = d.fk_supplier_proposal";
    if ($this->id > 0) {
      $sql .= " AND d.fk_product = ".((int) $this->id);
    } else {
      $sql .= " AND d.fk_product > 0";
    }
    if ($filteronproducttype >= 0) {
      $sql .= " AND prod.rowid = d.fk_product AND prod.fk_product_type = ".((int) $filteronproducttype);
    }
    $sql .= " AND p.fk_soc = s.rowid";
    $sql .= " AND p.entity IN (".getEntity('supplier_proposal').")";
    if (!$user->hasRight('societe', 'client', 'voir')) {
      $sql .= " AND p.fk_soc = sc.fk_soc AND sc.fk_user = ".((int) $user->id);
    }
    if ($socid > 0) {
      $sql .= " AND p.fk_soc = ".((int) $socid);
    }
    $sql .= $morefilter;
    $sql .= " GROUP BY date_format(p.date_valid,'%Y%m')";
    $sql .= " ORDER BY date_format(p.date_valid,'%Y%m') DESC";
 
    return $this->_get_stats($sql, $mode, $year);
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function get_nb_order($socid, $mode, $filteronproducttype = -1, $year = 0, $morefilter = '')
  {
    // phpcs:enable
    global $user, $hookmanager;
 
    $sql = "SELECT sum(d.qty) as qty, date_format(c.date_commande, '%Y%m')";
    if ($mode == 'bynumber') {
      $sql .= ", count(DISTINCT c.rowid)";
    }
    $sql .= ", sum(d.total_ht) as total_ht";
    $sql .= " FROM ".$this->db->prefix()."commandedet as d, ".$this->db->prefix()."commande as c, ".$this->db->prefix()."societe as s";
    if ($filteronproducttype >= 0) {
      $sql .= ", ".$this->db->prefix()."product as p";
    }
    if (!$user->hasRight('societe', 'client', 'voir')) {
      $sql .= ", ".$this->db->prefix()."societe_commerciaux as sc";
    }
    $sql .= " WHERE c.rowid = d.fk_commande";
    if ($this->id > 0) {
      $sql .= " AND d.fk_product = ".((int) $this->id);
    } else {
      $sql .= " AND d.fk_product > 0";
    }
    if ($filteronproducttype >= 0) {
      $sql .= " AND p.rowid = d.fk_product AND p.fk_product_type = ".((int) $filteronproducttype);
    }
    $sql .= " AND c.fk_soc = s.rowid";
    $sql .= " AND c.entity IN (".getEntity('commande').")";
    if (!$user->hasRight('societe', 'client', 'voir')) {
      $sql .= " AND c.fk_soc = sc.fk_soc AND sc.fk_user = ".((int) $user->id);
    }
    if ($socid > 0) {
      $sql .= " AND c.fk_soc = ".((int) $socid);
    }
    $sql .= $morefilter;
    $parameters = array('socid' => $user->socid);
    $hookmanager->executeHooks('productGetNbOrder', $parameters, $this); // Note that $action and $object may have been modified by hook
    $sql .= $hookmanager->resPrint;
    $sql .= " GROUP BY date_format(c.date_commande,'%Y%m')";
    $sql .= " ORDER BY date_format(c.date_commande,'%Y%m') DESC";
 
    return $this->_get_stats($sql, $mode, $year);
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function get_nb_ordersupplier($socid, $mode, $filteronproducttype = -1, $year = 0, $morefilter = '')
  {
    // phpcs:enable
    global $user;
 
    $sql = "SELECT sum(d.qty) as qty, date_format(c.date_commande, '%Y%m')";
    if ($mode == 'bynumber') {
      $sql .= ", count(DISTINCT c.rowid)";
    }
    $sql .= ", sum(d.total_ht) as total_ht";
    $sql .= " FROM ".$this->db->prefix()."commande_fournisseurdet as d, ".$this->db->prefix()."commande_fournisseur as c, ".$this->db->prefix()."societe as s";
    if ($filteronproducttype >= 0) {
      $sql .= ", ".$this->db->prefix()."product as p";
    }
    if (!$user->hasRight('societe', 'client', 'voir')) {
      $sql .= ", ".$this->db->prefix()."societe_commerciaux as sc";
    }
    $sql .= " WHERE c.rowid = d.fk_commande";
    if ($this->id > 0) {
      $sql .= " AND d.fk_product = ".((int) $this->id);
    } else {
      $sql .= " AND d.fk_product > 0";
    }
    if ($filteronproducttype >= 0) {
      $sql .= " AND p.rowid = d.fk_product AND p.fk_product_type = ".((int) $filteronproducttype);
    }
    $sql .= " AND c.fk_soc = s.rowid";
    $sql .= " AND c.entity IN (".getEntity('supplier_order').")";
    if (!$user->hasRight('societe', 'client', 'voir')) {
      $sql .= " AND c.fk_soc = sc.fk_soc AND sc.fk_user = ".((int) $user->id);
    }
    if ($socid > 0) {
      $sql .= " AND c.fk_soc = ".((int) $socid);
    }
    $sql .= $morefilter;
    $sql .= " GROUP BY date_format(c.date_commande,'%Y%m')";
    $sql .= " ORDER BY date_format(c.date_commande,'%Y%m') DESC";
 
    return $this->_get_stats($sql, $mode, $year);
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function get_nb_contract($socid, $mode, $filteronproducttype = -1, $year = 0, $morefilter = '')
  {
    // phpcs:enable
    global $user;
 
    $sql = "SELECT sum(d.qty) as qty, date_format(c.date_contrat, '%Y%m')";
    if ($mode == 'bynumber') {
      $sql .= ", count(DISTINCT c.rowid)";
    }
    $sql .= ", sum(d.total_ht) as total_ht";
    $sql .= " FROM ".$this->db->prefix()."contratdet as d, ".$this->db->prefix()."contrat as c, ".$this->db->prefix()."societe as s";
    if ($filteronproducttype >= 0) {
      $sql .= ", ".$this->db->prefix()."product as p";
    }
    if (!$user->hasRight('societe', 'client', 'voir')) {
      $sql .= ", ".$this->db->prefix()."societe_commerciaux as sc";
    }
    $sql .= " WHERE c.entity IN (".getEntity('contract').")";
    $sql .= " AND c.rowid = d.fk_contrat";
 
    if ($this->id > 0) {
      $sql .= " AND d.fk_product = ".((int) $this->id);
    } else {
      $sql .= " AND d.fk_product > 0";
    }
    if ($filteronproducttype >= 0) {
      $sql .= " AND p.rowid = d.fk_product AND p.fk_product_type = ".((int) $filteronproducttype);
    }
    $sql .= " AND c.fk_soc = s.rowid";
 
    if (!$user->hasRight('societe', 'client', 'voir')) {
      $sql .= " AND c.fk_soc = sc.fk_soc AND sc.fk_user = ".((int) $user->id);
    }
    if ($socid > 0) {
      $sql .= " AND c.fk_soc = ".((int) $socid);
    }
    $sql .= $morefilter;
    $sql .= " GROUP BY date_format(c.date_contrat,'%Y%m')";
    $sql .= " ORDER BY date_format(c.date_contrat,'%Y%m') DESC";
 
    return $this->_get_stats($sql, $mode, $year);
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function get_nb_mos($socid, $mode, $filteronproducttype = -1, $year = 0, $morefilter = '')
  {
    // phpcs:enable
    global $user;
 
    $sql = "SELECT sum(d.qty), date_format(d.date_valid, '%Y%m')";
    if ($mode == 'bynumber') {
      $sql .= ", count(DISTINCT d.rowid)";
    }
    $sql .= " FROM ".$this->db->prefix()."mrp_mo as d LEFT JOIN  ".$this->db->prefix()."societe as s ON d.fk_soc = s.rowid";
    if ($filteronproducttype >= 0) {
      $sql .= ", ".$this->db->prefix()."product as p";
    }
    if (!$user->hasRight('societe', 'client', 'voir')) {
      $sql .= ", ".$this->db->prefix()."societe_commerciaux as sc";
    }
 
    $sql .= " WHERE d.entity IN (".getEntity('mo').")";
    $sql .= " AND d.status > 0";
 
    if ($this->id > 0) {
      $sql .= " AND d.fk_product = ".((int) $this->id);
    } else {
      $sql .= " AND d.fk_product > 0";
    }
    if ($filteronproducttype >= 0) {
      $sql .= " AND p.rowid = d.fk_product AND p.fk_product_type = ".((int) $filteronproducttype);
    }
 
    if (!$user->hasRight('societe', 'client', 'voir')) {
      $sql .= " AND d.fk_soc = sc.fk_soc AND sc.fk_user = ".((int) $user->id);
    }
    if ($socid > 0) {
      $sql .= " AND d.fk_soc = ".((int) $socid);
    }
    $sql .= $morefilter;
    $sql .= " GROUP BY date_format(d.date_valid,'%Y%m')";
    $sql .= " ORDER BY date_format(d.date_valid,'%Y%m') DESC";
 
    return $this->_get_stats($sql, $mode, $year);
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function add_sousproduit($id_pere, $id_fils, $qty, $incdec = 1, $notrigger = 0)
  {
    // phpcs:enable
    global $user;
 
    // Clean parameters
    if (!is_numeric($id_pere)) {
      $id_pere = 0;
    }
    if (!is_numeric($id_fils)) {
      $id_fils = 0;
    }
    if (!is_numeric($incdec)) {
      $incdec = 0;
    }
 
    $result = $this->del_sousproduit($id_pere, $id_fils);
    if ($result < 0) {
      return $result;
    }
 
    // Check not already father of id_pere (to avoid father -> child -> father links)
    $sql = "SELECT fk_product_pere from ".$this->db->prefix()."product_association";
    $sql .= " WHERE fk_product_pere = ".((int) $id_fils)." AND fk_product_fils = ".((int) $id_pere);
    if (!$this->db->query($sql)) {
      dol_print_error($this->db);
      return -1;
    } else {
      //Selection of the highest row
      $sql = "SELECT MAX(rang) as max_rank FROM ".$this->db->prefix()."product_association";
      $sql .= " WHERE fk_product_pere  = ".((int) $id_pere);
      $resql = $this->db->query($sql);
      if ($resql) {
        $obj = $this->db->fetch_object($resql);
        $rank = $obj->max_rank + 1;
        //Addition of a product with the highest rank +1
        $sql = "INSERT INTO ".$this->db->prefix()."product_association(fk_product_pere,fk_product_fils,qty,incdec,rang)";
        $sql .= " VALUES (".((int) $id_pere).", ".((int) $id_fils).", ".price2num($qty, 'MS').", ".((int) $incdec).", ".((int) $rank).")";
        if (! $this->db->query($sql)) {
          dol_print_error($this->db);
          return -1;
        } else {
          if (!$notrigger) {
            // Call trigger
            $result = $this->call_trigger('PRODUCT_SUBPRODUCT_ADD', $user);
            if ($result < 0) {
              $this->error = $this->db->lasterror();
              dol_syslog(get_class($this).'::addSubproduct error='.$this->error, LOG_ERR);
              return -1;
            }
          }
          // End call triggers
 
          return 1;
        }
      } else {
        dol_print_error($this->db);
        return -1;
      }
    }
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function update_sousproduit($id_pere, $id_fils, $qty, $incdec = 1, $notrigger = 0)
  {
    // phpcs:enable
    global $user;
 
    // Clean parameters
    if (!is_numeric($id_pere)) {
      $id_pere = 0;
    }
    if (!is_numeric($id_fils)) {
      $id_fils = 0;
    }
    if (!is_numeric($incdec)) {
      $incdec = 1;
    }
    if (!is_numeric($qty)) {
      $qty = 1;
    }
 
    $sql = 'UPDATE '.$this->db->prefix().'product_association SET ';
    $sql .= 'qty = '.price2num($qty, 'MS');
    $sql .= ',incdec = '.((int) $incdec);
    $sql .= ' WHERE fk_product_pere = '.((int) $id_pere).' AND fk_product_fils = '.((int) $id_fils);
 
    if (!$this->db->query($sql)) {
      dol_print_error($this->db);
      return -1;
    } else {
      if (!$notrigger) {
        // Call trigger
        $result = $this->call_trigger('PRODUCT_SUBPRODUCT_UPDATE', $user);
        if ($result < 0) {
          $this->error = $this->db->lasterror();
          dol_syslog(get_class($this).'::updateSubproduct error='.$this->error, LOG_ERR);
          return -1;
        }
        // End call triggers
      }
 
      return 1;
    }
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function del_sousproduit($fk_parent, $fk_child, $notrigger = 0)
  {
    // phpcs:enable
    global $user;
 
    if (!is_numeric($fk_parent)) {
      $fk_parent = 0;
    }
    if (!is_numeric($fk_child)) {
      $fk_child = 0;
    }
 
    $sql = "DELETE FROM ".$this->db->prefix()."product_association";
    $sql .= " WHERE fk_product_pere  = ".((int) $fk_parent);
    $sql .= " AND fk_product_fils = ".((int) $fk_child);
 
    dol_syslog(get_class($this).'::del_sousproduit', LOG_DEBUG);
    if (!$this->db->query($sql)) {
      dol_print_error($this->db);
      return -1;
    }
 
    // Updated ranks so that none are missing
    $sqlrank = "SELECT rowid, rang FROM ".$this->db->prefix()."product_association";
    $sqlrank .= " WHERE fk_product_pere = ".((int) $fk_parent);
    $sqlrank .= " ORDER BY rang";
    $resqlrank = $this->db->query($sqlrank);
    if ($resqlrank) {
      $cpt = 0;
      while ($objrank = $this->db->fetch_object($resqlrank)) {
        $cpt++;
        $sql = "UPDATE ".$this->db->prefix()."product_association";
        $sql .= " SET rang = ".((int) $cpt);
        $sql .= " WHERE rowid = ".((int) $objrank->rowid);
        if (! $this->db->query($sql)) {
          dol_print_error($this->db);
          return -1;
        }
      }
    }
 
    if (!$notrigger) {
      // Call trigger
      $result = $this->call_trigger('PRODUCT_SUBPRODUCT_DELETE', $user);
      if ($result < 0) {
        $this->error = $this->db->lasterror();
        dol_syslog(get_class($this).'::delSubproduct error='.$this->error, LOG_ERR);
        return -1;
      }
      // End call triggers
    }
 
    return 1;
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function is_sousproduit($fk_parent, $fk_child)
  {
    // phpcs:enable
    $sql = "SELECT fk_product_pere, qty, incdec";
    $sql .= " FROM ".$this->db->prefix()."product_association";
    $sql .= " WHERE fk_product_pere  = ".((int) $fk_parent);
    $sql .= " AND fk_product_fils = ".((int) $fk_child);
 
    $result = $this->db->query($sql);
    if ($result) {
      $num = $this->db->num_rows($result);
 
      if ($num > 0) {
        $obj = $this->db->fetch_object($result);
 
        $this->is_sousproduit_qty = $obj->qty;
        $this->is_sousproduit_incdec = $obj->incdec;
 
        return 1;
      } else {
        return 0;
      }
    } else {
      dol_print_error($this->db);
      return -1;
    }
  }
 
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function add_fournisseur($user, $id_fourn, $ref_fourn, $quantity)
  {
    // phpcs:enable
    global $conf;
 
    $now = dol_now();
 
    dol_syslog(get_class($this)."::add_fournisseur id_fourn = ".$id_fourn." ref_fourn=".$ref_fourn." quantity=".$quantity, LOG_DEBUG);
 
    // Clean parameters
    $quantity = price2num($quantity, 'MS');
 
    if ($ref_fourn) {
      // Check if ref is not already used
      $sql = "SELECT rowid, fk_product";
      $sql .= " FROM ".$this->db->prefix()."product_fournisseur_price";
      $sql .= " WHERE fk_soc = ".((int) $id_fourn);
      $sql .= " AND ref_fourn = '".$this->db->escape($ref_fourn)."'";
      $sql .= " AND fk_product <> ".((int) $this->id);
      $sql .= " AND entity IN (".getEntity('productsupplierprice').")";
 
      $resql = $this->db->query($sql);
      if ($resql) {
        $obj = $this->db->fetch_object($resql);
        if ($obj) {
          // If the supplier ref already exists but for another product (duplicate ref is accepted for different quantity only or different companies)
          $this->product_id_already_linked = $obj->fk_product;
          return -3;
        }
        $this->db->free($resql);
      }
    }
 
    $sql = "SELECT rowid";
    $sql .= " FROM ".$this->db->prefix()."product_fournisseur_price";
    $sql .= " WHERE fk_soc = ".((int) $id_fourn);
    if ($ref_fourn) {
      $sql .= " AND ref_fourn = '".$this->db->escape($ref_fourn)."'";
    } else {
      $sql .= " AND (ref_fourn = '' OR ref_fourn IS NULL)";
    }
    $sql .= " AND quantity = ".((float) $quantity);
    $sql .= " AND fk_product = ".((int) $this->id);
    $sql .= " AND entity IN (".getEntity('productsupplierprice').")";
 
    $resql = $this->db->query($sql);
    if ($resql) {
      $obj = $this->db->fetch_object($resql);
 
      // The reference supplier does not exist, we create it for this product.
      if (empty($obj)) {
        $sql = "INSERT INTO ".$this->db->prefix()."product_fournisseur_price(";
        $sql .= "datec";
        $sql .= ", entity";
        $sql .= ", fk_product";
        $sql .= ", fk_soc";
        $sql .= ", ref_fourn";
        $sql .= ", quantity";
        $sql .= ", fk_user";
        $sql .= ", tva_tx";
        $sql .= ") VALUES (";
        $sql .= "'".$this->db->idate($now)."'";
        $sql .= ", ".((int) $conf->entity);
        $sql .= ", ".((int) $this->id);
        $sql .= ", ".((int) $id_fourn);
        $sql .= ", '".$this->db->escape($ref_fourn)."'";
        $sql .= ", ".((float) $quantity);
        $sql .= ", ".((int) $user->id);
        $sql .= ", 0";
        $sql .= ")";
 
        if ($this->db->query($sql)) {
          $this->product_fourn_price_id = $this->db->last_insert_id($this->db->prefix()."product_fournisseur_price");
          return 1;
        } else {
          $this->error = $this->db->lasterror();
          return -1;
        }
      } else {
        // If the supplier price already exists for this product and quantity
        $this->product_fourn_price_id = $obj->rowid;
        return 0;
      }
    } else {
      $this->error = $this->db->lasterror();
      return -2;
    }
  }
 
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function list_suppliers()
  {
    // phpcs:enable
    global $conf;
 
    $list = array();
 
    $sql = "SELECT DISTINCT p.fk_soc";
    $sql .= " FROM ".$this->db->prefix()."product_fournisseur_price as p";
    $sql .= " WHERE p.fk_product = ".((int) $this->id);
    $sql .= " AND p.entity = ".((int) $conf->entity);
 
    $result = $this->db->query($sql);
    if ($result) {
      $num = $this->db->num_rows($result);
      $i = 0;
      while ($i < $num) {
        $obj = $this->db->fetch_object($result);
        $list[$i] = $obj->fk_soc;
        $i++;
      }
    }
 
    return $list;
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function clone_price($fromId, $toId)
  {
    // phpcs:enable
    global $user;
 
    $now = dol_now();
 
    $this->db->begin();
 
    // Default selling price and price levels
    $sql  = "INSERT INTO ".$this->db->prefix()."product_price (";
    $sql .= " entity";
    $sql .= ", fk_product";
    $sql .= ", date_price";
    $sql .= ", price_level";
    $sql .= ", price";
    $sql .= ", price_ttc";
    $sql .= ", price_min";
    $sql .= ", price_min_ttc";
    $sql .= ", price_base_type";
    $sql .= ", price_label";
    $sql .= ", default_vat_code";
    $sql .= ", tva_tx";
    $sql .= ", recuperableonly";
    $sql .= ", localtax1_tx";
    $sql .= ", localtax1_type";
    $sql .= ", localtax2_tx";
    $sql .= ", localtax2_type";
    $sql .= ", fk_user_author";
    $sql .= ", tosell";
    $sql .= ", price_by_qty";
    $sql .= ", fk_price_expression";
    $sql .= ", fk_multicurrency";
    $sql .= ", multicurrency_code";
    $sql .= ", multicurrency_tx";
    $sql .= ", multicurrency_price";
    $sql .= ", multicurrency_price_ttc";
    $sql .= ")";
    $sql .= " SELECT";
    $sql .= " entity";
    $sql .= ", ".((int) $toId);
    $sql .= ", '".$this->db->idate($now)."'";
    $sql .= ", price_level";
    $sql .= ", price";
    $sql .= ", price_ttc";
    $sql .= ", price_min";
    $sql .= ", price_min_ttc";
    $sql .= ", price_base_type";
    $sql .= ", price_label";
    $sql .= ", default_vat_code";
    $sql .= ", tva_tx";
    $sql .= ", recuperableonly";
    $sql .= ", localtax1_tx";
    $sql .= ", localtax1_type";
    $sql .= ", localtax2_tx";
    $sql .= ", localtax2_type";
    $sql .= ", ".((int) $user->id);
    $sql .= ", tosell";
    $sql .= ", price_by_qty";
    $sql .= ", fk_price_expression";
    $sql .= ", fk_multicurrency";
    $sql .= ", multicurrency_code";
    $sql .= ", multicurrency_tx";
    $sql .= ", multicurrency_price";
    $sql .= ", multicurrency_price_ttc";
    $sql .= " FROM ".$this->db->prefix()."product_price as ps";
    $sql .= " WHERE ps.fk_product = ".((int) $fromId);
    $sql .= " AND ps.date_price IN (SELECT MAX(pd.date_price) FROM ".$this->db->prefix()."product_price as pd WHERE pd.fk_product = ".((int) $fromId)." AND pd.price_level = ps.price_level)";
    $sql .= " ORDER BY ps.date_price DESC";
 
    dol_syslog(__METHOD__, LOG_DEBUG);
    $resql = $this->db->query($sql);
    if (!$resql) {
      $this->db->rollback();
      return -1;
    }
    $this->db->free($resql);
 
    if (getDolGlobalString('PRODUIT_MULTIPRICES')) {
      $this->cloneMultipriceExtra($fromId, $toId); // Add of level price extrafields
    }
    if (getDolGlobalString('PRODUIT_CUSTOMER_PRICES')) {
      $this->cloneCustomerPriceAndExtra($fromId, $toId); // Price per customer
    }
    if (getDolGlobalString('PRODUIT_CUSTOMER_PRICES_AND_MULTIPRICES')) {
      // Add of level price extrafields and price per customer
      $this->cloneMultipriceExtra($fromId, $toId); // Add of level price extrafields
      $this->cloneCustomerPriceAndExtra($fromId, $toId); // Price per customer
    }
 
    $this->db->commit();
    return 1;
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function clone_associations($fromId, $toId)
  {
    // phpcs:enable
    $this->db->begin();
 
    $sql = 'INSERT INTO '.$this->db->prefix().'product_association (fk_product_pere, fk_product_fils, qty, incdec)';
    $sql .= " SELECT ".((int) $toId).", fk_product_fils, qty, incdec FROM ".$this->db->prefix()."product_association";
    $sql .= " WHERE fk_product_pere = ".((int) $fromId);
 
    dol_syslog(get_class($this).'::clone_association', LOG_DEBUG);
    if (!$this->db->query($sql)) {
      $this->db->rollback();
      return -1;
    }
 
    $this->db->commit();
    return 1;
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function clone_fournisseurs($fromId, $toId)
  {
    // phpcs:enable
    $this->db->begin();
 
    $now = dol_now();
 
    // les fournisseurs
    /*$sql = "INSERT ".$this->db->prefix()."product_fournisseur ("
     . " datec, fk_product, fk_soc, ref_fourn, fk_user_author )"
     . " SELECT '".$this->db->idate($now)."', ".((int) $toId).", fk_soc, ref_fourn, fk_user_author"
     . " FROM ".$this->db->prefix()."product_fournisseur"
     . " WHERE fk_product = ".((int) $fromId);
 
     if ( ! $this->db->query($sql ) )
     {
     $this->db->rollback();
     return -1;
     }*/
 
    // les prix de fournisseurs.
    $sql = "INSERT ".$this->db->prefix()."product_fournisseur_price (";
    $sql .= " datec, fk_product, fk_soc, price, quantity, fk_user, tva_tx)";
    $sql .= " SELECT '".$this->db->idate($now)."', ".((int) $toId).", fk_soc, price, quantity, fk_user, tva_tx";
    $sql .= " FROM ".$this->db->prefix()."product_fournisseur_price";
    $sql .= " WHERE fk_product = ".((int) $fromId);
 
    dol_syslog(get_class($this).'::clone_fournisseurs', LOG_DEBUG);
    $resql = $this->db->query($sql);
    if (!$resql) {
      $this->db->rollback();
      return -1;
    } else {
      $this->db->commit();
      return 1;
    }
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function fetch_prod_arbo($prod, $compl_path = '', $multiply = 1, $level = 1, $id_parent = 0, $ignore_stock_load = 0)
  {
    // phpcs:enable
    $tmpproduct = null;
 
    if ($multiply < 1) {
      dol_syslog(get_class($this).'::'.__FUNCTION__.' Product quantity rounded up to 1 from '.$multiply.'. May result in unexpected end quantity for product children of '.$id_parent, LOG_WARNING);
      $multiply = 1;
    }
 
    foreach ($prod as $id_product => $desc_pere) {    // $id_product is 0 (first call starting with root top) or an id of a sub_product
      if (is_array($desc_pere)) {    // If desc_pere is an array, this means it's a child
        $id = (!empty($desc_pere[0]) ? $desc_pere[0] : '');
        $nb = (!empty($desc_pere[1]) ? $desc_pere[1] : '');
        $type = (!empty($desc_pere[2]) ? $desc_pere[2] : '');
        $label = (!empty($desc_pere[3]) ? $desc_pere[3] : '');
        $incdec = (!empty($desc_pere[4]) ? $desc_pere[4] : 0);
 
        //print "XXX We add id=".$id." - label=".$label." - nb=".$nb." - multiply=".$multiply." fullpath=".$compl_path.$label."\n";
        if (is_null($tmpproduct)) {
          $tmpproduct = new Product($this->db); // So we initialize tmpproduct only once for all loop.
        }
        $tmpproduct->fetch($id); // Load product to get ->ref
 
        if (empty($ignore_stock_load) && ($tmpproduct->isProduct() || getDolGlobalString('STOCK_SUPPORTS_SERVICES'))) {
          $tmpproduct->load_stock('nobatch,novirtual'); // Load stock to get true ->stock_reel
        }
 
        $this->res[] = array(
          'id' => $id, // Id product
          'id_parent' => $id_parent,
          'ref' => $tmpproduct->ref, // Ref product
          'nb' => $nb, // Nb of units that compose parent product
          'nb_total' => $nb * $multiply, // Nb of units for all nb of product
          'stock' => $tmpproduct->stock_reel, // Stock
          'stock_alert' => $tmpproduct->seuil_stock_alerte, // Stock alert
          'label' => $label,
          'fullpath' => $compl_path.$label, // Label
          'type' => $type, // Nb of units that compose parent product
          'desiredstock' => $tmpproduct->desiredstock,
          'level' => $level,
          'incdec' => $incdec,
          'entity' => $tmpproduct->entity
        );
 
        // Recursive call if there child has children of its own
        if (isset($desc_pere['childs']) && is_array($desc_pere['childs'])) {
          if (!is_int($desc_pere[1] * $multiply)) {
            dol_syslog(get_class($this).'::'.__FUNCTION__.' Source product quantity and multiplier may result in unexpected end quantity for '.$label.'/'.$multiply.' Child product:'.json_encode($desc_pere), LOG_WARNING);
          }
 
          //print 'YYY We go down for '.$desc_pere[3]." -> \n";
          $this->fetch_prod_arbo($desc_pere['childs'], $compl_path.$desc_pere[3]." -> ", (int) ceil($desc_pere[1] * $multiply), $level + 1, $id, $ignore_stock_load);
        }
      }
    }
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function get_arbo_each_prod($multiply = 1, $ignore_stock_load = 0)
  {
    // phpcs:enable
    $this->res = array();
    if (isset($this->sousprods) && is_array($this->sousprods)) {
      foreach ($this->sousprods as $prod_name => $desc_product) {
        if (is_array($desc_product)) {
          $this->fetch_prod_arbo($desc_product, "", $multiply, 1, $this->id, $ignore_stock_load); // This set $this->res
        }
      }
    }
    return $this->res;
  }
 
  public function hasFatherOrChild($mode = 0)
  {
    $nb = 0;
 
    $sql = "SELECT COUNT(pa.rowid) as nb";
    $sql .= " FROM ".$this->db->prefix()."product_association as pa";
    if ($mode == 0) {
      $sql .= " WHERE pa.fk_product_fils = ".((int) $this->id)." OR pa.fk_product_pere = ".((int) $this->id);
    } elseif ($mode == -1) {
      $sql .= " WHERE pa.fk_product_fils = ".((int) $this->id); // We are a child, so we found lines that link to parents (can have several parents)
    } elseif ($mode == 1) {
      $sql .= " WHERE pa.fk_product_pere = ".((int) $this->id); // We are a parent, so we found lines that link to children (can have several children)
    }
 
    $resql = $this->db->query($sql);
    if ($resql) {
      $obj = $this->db->fetch_object($resql);
      if ($obj) {
        $nb = (int) $obj->nb;
      }
    } else {
      return -1;
    }
 
    return $nb;
  }
 
  public function hasVariants()
  {
    $nb = 0;
    if (!isModEnabled('variants')) {
      return $nb;
    }
    $sql = "SELECT count(rowid) as nb FROM ".$this->db->prefix()."product_attribute_combination WHERE fk_product_parent = ".((int) $this->id);
    $sql .= " AND entity IN (".getEntity('product').")";
 
    $resql = $this->db->query($sql);
    if ($resql) {
      $obj = $this->db->fetch_object($resql);
      if ($obj) {
        $nb = (int) $obj->nb;
      }
    }
 
    return $nb;
  }
 
 
  public function isVariant()
  {
    if (isModEnabled('variants')) {
      $sql = "SELECT rowid FROM ".$this->db->prefix()."product_attribute_combination WHERE fk_product_child = ".((int) $this->id)." AND entity IN (".getEntity('product').")";
 
      $query = $this->db->query($sql);
 
      if ($query) {
        if (!$this->db->num_rows($query)) {
          return false;
        }
        return true;
      } else {
        dol_print_error($this->db);
        return -1;
      }
    } else {
      return false;
    }
  }
 
  public function getFather()
  {
    $sql = "SELECT p.rowid, p.label as label, p.ref as ref, pa.fk_product_pere as id, p.fk_product_type, pa.qty, pa.incdec, p.entity";
    $sql .= ", p.tosell as status, p.tobuy as status_buy";
    $sql .= " FROM ".$this->db->prefix()."product_association as pa,";
    $sql .= " ".$this->db->prefix()."product as p";
    $sql .= " WHERE p.rowid = pa.fk_product_pere";
    $sql .= " AND pa.fk_product_fils = ".((int) $this->id);
 
    $res = $this->db->query($sql);
    if ($res) {
      $prods = array();
      while ($record = $this->db->fetch_array($res)) {
        // $record['id'] = $record['rowid'] = id of father
        $prods[$record['id']] = array();
        $prods[$record['id']]['id'] = $record['rowid'];
        $prods[$record['id']]['ref'] = $record['ref'];
        $prods[$record['id']]['label'] = $record['label'];
        $prods[$record['id']]['qty'] = $record['qty'];
        $prods[$record['id']]['incdec'] = $record['incdec'];
        $prods[$record['id']]['fk_product_type'] = $record['fk_product_type'];
        $prods[$record['id']]['entity'] = $record['entity'];
        $prods[$record['id']]['status'] = $record['status'];
        $prods[$record['id']]['status_buy'] = $record['status_buy'];
      }
      return $prods;
    } else {
      dol_print_error($this->db);
      return -1;
    }
  }
 
 
  public function getChildsArbo($id, $firstlevelonly = 0, $level = 1, $parents = array())
  {
    if (empty($id)) {
      return array();
    }
 
    $sql = "SELECT p.rowid, p.ref, p.label as label, p.fk_product_type,";
    $sql .= " pa.qty as qty, pa.fk_product_fils as id, pa.incdec,";
    $sql .= " pa.rowid as fk_association, pa.rang";
    $sql .= " FROM ".$this->db->prefix()."product as p,";
    $sql .= " ".$this->db->prefix()."product_association as pa";
    $sql .= " WHERE p.rowid = pa.fk_product_fils";
    $sql .= " AND pa.fk_product_pere = ".((int) $id);
    $sql .= " AND pa.fk_product_fils <> ".((int) $id); // This should not happens, it is to avoid infinite loop if it happens
    $sql .= " ORDER BY pa.rang";
 
    dol_syslog(get_class($this).'::getChildsArbo id='.$id.' level='.$level. ' parents='.(is_array($parents) ? implode(',', $parents) : $parents), LOG_DEBUG);
 
    // Protection against infinite loop
    if ($level > 30) {
      return array();
    }
 
    $res = $this->db->query($sql);
    if ($res) {
      $prods = array();
      if ($this->db->num_rows($res) > 0) {
        $parents[] = $id;
      }
 
      while ($rec = $this->db->fetch_array($res)) {
        if (in_array($rec['id'], $parents)) {
          dol_syslog(get_class($this).'::getChildsArbo the product id='.$rec['rowid'].' was already found at a higher level in tree. We discard to avoid infinite loop', LOG_WARNING);
          continue; // We discard this child if it is already found at a higher level in tree in the same branch.
        }
 
        $prods[$rec['rowid']] = array(
          0 => $rec['rowid'],
          1 => $rec['qty'],
          2 => $rec['fk_product_type'],
          3 => $this->db->escape($rec['label']),
          4 => $rec['incdec'],
          5 => $rec['ref'],
          6 => $rec['fk_association'],
          7 => $rec['rang']
        );
        //$prods[$this->db->escape($rec['label'])]= array(0=>$rec['id'],1=>$rec['qty'],2=>$rec['fk_product_type']);
        //$prods[$this->db->escape($rec['label'])]= array(0=>$rec['id'],1=>$rec['qty']);
        if (empty($firstlevelonly)) {
          $listofchilds = $this->getChildsArbo($rec['rowid'], 0, $level + 1, $parents);
          foreach ($listofchilds as $keyChild => $valueChild) {
            $prods[$rec['rowid']]['childs'][$keyChild] = $valueChild;
          }
        }
      }
 
      return $prods;
    } else {
      dol_print_error($this->db);
      return -1;
    }
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function get_sousproduits_arbo()
  {
    // phpcs:enable
    $parent = array();
 
    foreach ($this->getChildsArbo($this->id) as $keyChild => $valueChild) {    // Warning. getChildsArbo can call getChildsArbo recursively. Starting point is $value[0]=id of product
      $parent[$this->label][$keyChild] = $valueChild;
    }
    foreach ($parent as $key => $value) {        // key=label, value is array of children
      $this->sousprods[$key] = $value;  // @phan-suppress-current-line PhanTypeMismatchProperty
    }
  }
 
  public function getTooltipContentArray($params)
  {
    global $conf, $langs, $user;
 
    $langs->loadLangs(array('products', 'other'));
 
    $datas = array();
    $nofetch = !empty($params['nofetch']);
 
    if (getDolGlobalString('MAIN_OPTIMIZEFORTEXTBROWSER')) {
      return ['optimize' => $langs->trans("ShowProduct")];
    }
 
    // Does user has permission to read product/service
    $permissiontoreadproduct = 0;
    if ($this->type == self::TYPE_PRODUCT && $user->hasRight('product', 'read')) {
      $permissiontoreadproduct = 1;
    }
    if ($this->type == self::TYPE_SERVICE && $user->hasRight('service', 'read')) {
      $permissiontoreadproduct = 1;
    }
 
    if (!empty($this->entity) && $permissiontoreadproduct) {
      $tmpphoto = $this->show_photos('product', $conf->product->multidir_output[$this->entity], 1, 1, 0, 0, 0, 80, 0, 0, 0, 0, '1');
      if ($this->nbphoto > 0) {
        $datas['photo'] = '<div class="photointooltip floatright">'."\n" . $tmpphoto . '</div>';
      }
    }
 
    if ($this->isProduct()) {
      $datas['picto'] = img_picto('', 'product').' <u class="paddingrightonly">'.$langs->trans("Product").'</u>';
    } elseif ($this->isService()) {
      $datas['picto'] = img_picto('', 'service').' <u class="paddingrightonly">'.$langs->trans("Service").'</u>';
    }
    if (isset($this->status) && isset($this->status_buy)) {
      $datas['status'] = ' '.$this->getLibStatut(5, 0) . ' '.$this->getLibStatut(5, 1);
    }
 
    if (!empty($this->ref)) {
      $datas['ref'] = '<br><b>'.$langs->trans('ProductRef').':</b> '.$this->ref;
    }
    if (!empty($this->label)) {
      $datas['label'] = '<br><b>'.$langs->trans('ProductLabel').':</b> '.$this->label.'<br>';
    }
 
    if ($permissiontoreadproduct) {
      if (!empty($this->description) && getDolGlobalString('PRODUCT_SHOW_DESCRIPTION_IN_TOOLTIP')) {
        $datas['description'] = '<br><b>'.$langs->trans('ProductDescription').':</b> '.dolGetFirstLineOfText($this->description, 5);
      }
 
      $datas['stockmanaged'] = "<br><b>".$langs->trans("StockableProduct").'</b>: '.yn($this->isStockManaged());
 
      if ($this->isStockManaged()) {
        if (isModEnabled('productbatch')) {
          $langs->load("productbatch");
          $datas['batchstatus'] = "<br><b>".$langs->trans("ManageLotSerial").'</b>: '.$this->getLibStatut(0, 2);
          if ($this->status_batch) {
            $datas['batchdlc'] = "<br><b>".$langs->trans("BatchSellOrEatByMandatoryList", $langs->transnoentitiesnoconv("SellByDate"), $langs->transnoentitiesnoconv("EatByDate")).'</b>: '.$this->getSellOrEatByMandatoryLabel();
          }
        }
      }
      if (isModEnabled('barcode')) {
        $datas['barcode'] = '<br><b>'.$langs->trans('BarCode').':</b> '.$this->barcode;
      }
 
      if ($this->isProduct()) {
        if ($this->weight) {
          $datas['weight'] = "<br><b>".$langs->trans("Weight").'</b>: '.$this->weight.' '.measuringUnitString(0, "weight", $this->weight_units);
        }
        $labelsize = "";
        if ($this->length) {
          $labelsize .= "<b>".$langs->trans("Length").'</b>: '.$this->length.' '.measuringUnitString(0, 'size', $this->length_units);
        }
        if ($this->width) {
          $labelsize .= ($labelsize ? " - " : "")."<b>".$langs->trans("Width").'</b>: '.$this->width.' '.measuringUnitString(0, 'size', $this->width_units);
        }
        if ($this->height) {
          $labelsize .= ($labelsize ? " - " : "")."<b>".$langs->trans("Height").'</b>: '.$this->height.' '.measuringUnitString(0, 'size', $this->height_units);
        }
        if ($labelsize) {
          $datas['size'] = "<br>".$labelsize;
        }
 
        $labelsurfacevolume = "";
        if ($this->surface) {
          $labelsurfacevolume .= "<b>".$langs->trans("Surface").'</b>: '.$this->surface.' '.measuringUnitString(0, 'surface', $this->surface_units);
        }
        if ($this->volume) {
          $labelsurfacevolume .= ($labelsurfacevolume ? " - " : "")."<b>".$langs->trans("Volume").'</b>: '.$this->volume.' '.measuringUnitString(0, 'volume', $this->volume_units);
        }
        if ($labelsurfacevolume) {
          $datas['surface'] = "<br>" . $labelsurfacevolume;
        }
      }
      if ($this->isService() && !empty($this->duration_value)) {
        // Duration
        $datas['duration'] = '<br><b>'.$langs->trans("Duration").':</b> '.$this->duration_value;
        if ($this->duration_value > 1) {
          $dur = array("i" => $langs->trans("Minutes"), "h" => $langs->trans("Hours"), "d" => $langs->trans("Days"), "w" => $langs->trans("Weeks"), "m" => $langs->trans("Months"), "y" => $langs->trans("Years"));
        } elseif ($this->duration_value > 0) {
          $dur = array("i" => $langs->trans("Minute"), "h" => $langs->trans("Hour"), "d" => $langs->trans("Day"), "w" => $langs->trans("Week"), "m" => $langs->trans("Month"), "y" => $langs->trans("Year"));
        }
        $datas['duration'] .= (!empty($this->duration_unit) && isset($dur[$this->duration_unit]) ? "&nbsp;".$langs->trans($dur[$this->duration_unit]) : '');
      }
      if (empty($user->socid)) {
        if ($this->isStockManaged() && isset($this->pmp) && $this->pmp) {
          $datas['pmp'] = "<br><b>".$langs->trans("PMPValue").'</b>: '.price($this->pmp, 0, '', 1, -1, -1, $conf->currency);
        }
 
        if (isModEnabled('accounting')) {
          if ($this->status && isset($this->accountancy_code_sell)) {
            include_once DOL_DOCUMENT_ROOT.'/core/lib/accounting.lib.php';
            $selllabel = '<br>';
            $selllabel .= '<br><b>'.$langs->trans('ProductAccountancySellCode').':</b> '.length_accountg($this->accountancy_code_sell);
            $selllabel .= '<br><b>'.$langs->trans('ProductAccountancySellIntraCode').':</b> '.length_accountg($this->accountancy_code_sell_intra);
            $selllabel .= '<br><b>'.$langs->trans('ProductAccountancySellExportCode').':</b> '.length_accountg($this->accountancy_code_sell_export);
            $datas['accountancysell'] = $selllabel;
          }
          if ($this->status_buy && isset($this->accountancy_code_buy)) {
            include_once DOL_DOCUMENT_ROOT.'/core/lib/accounting.lib.php';
            $buylabel = '';
            if (empty($this->status)) {
              $buylabel .= '<br>';
            }
            $buylabel .= '<br><b>'.$langs->trans('ProductAccountancyBuyCode').':</b> '.length_accountg($this->accountancy_code_buy);
            $buylabel .= '<br><b>'.$langs->trans('ProductAccountancyBuyIntraCode').':</b> '.length_accountg($this->accountancy_code_buy_intra);
            $buylabel .= '<br><b>'.$langs->trans('ProductAccountancyBuyExportCode').':</b> '.length_accountg($this->accountancy_code_buy_export);
            $datas['accountancybuy'] = $buylabel;
          }
        }
      }
      // show categories for this record only in ajax to not overload lists
      if (isModEnabled('category') && !$nofetch) {
        require_once DOL_DOCUMENT_ROOT . '/categories/class/categorie.class.php';
        $form = new Form($this->db);
        $datas['categories'] = '<br>' . $form->showCategories($this->id, Categorie::TYPE_PRODUCT, 1);
      }
    }
 
    return $datas;
  }
 
  public function getNomUrl($withpicto = 0, $option = '', $maxlength = 0, $save_lastsearch_value = -1, $notooltip = 0, $morecss = '', $add_label = 0, $sep = ' - ', $addlinktonotes = 0)
  {
    global $langs, $hookmanager, $user;
 
    include_once DOL_DOCUMENT_ROOT.'/core/lib/product.lib.php';
 
    $result = '';
 
    $newref = (string) $this->ref;
    if ($maxlength) {
      $newref = dol_trunc($newref, $maxlength, 'middle');
    }
    $params = [
      'id' => $this->id,
      'objecttype' => ($this->type == 1 ? 'service' : 'product'),
      '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));
    }
 
    $linkclose = '';
    if (empty($notooltip)) {
      if (getDolGlobalString('MAIN_OPTIMIZEFORTEXTBROWSER')) {
        $label = $langs->trans("ShowProduct");
        $linkclose .= ' alt="'.dol_escape_htmltag($label, 1, 1).'"';
      }
      $linkclose .= ($label ? ' title="'.dol_escape_htmltag($label, 1, 1).'"' : ' title="tocomplete"');
      $linkclose .= $dataparams.' class="nowraponall '.$classfortooltip.($morecss ? ' '.$morecss : '').'"';
    } else {
      $linkclose = ' class="nowraponall'.($morecss ? ' '.$morecss : '').'"';
    }
 
    if ($option == 'supplier' || $option == 'category') {
      $baseurl = DOL_URL_ROOT.'/product/price_suppliers.php';
    } elseif ($option == 'stock') {
      $baseurl = DOL_URL_ROOT.'/product/stock/product.php';
    } elseif ($option == 'composition') {
      $baseurl = DOL_URL_ROOT.'/product/composition/card.php';
    } else {
      $baseurl = DOL_URL_ROOT.'/product/card.php';
    }
    $query = ['id' => $this->id];
 
    if ($option !== 'nolink') {
      // Add param to save lastsearch_values or not
      $add_save_lastsearch_values = ($save_lastsearch_value == 1 ? 1 : 0);
      if ($save_lastsearch_value == -1 && isset($_SERVER["PHP_SELF"]) && preg_match('/list\.php/', $_SERVER["PHP_SELF"])) {
        $add_save_lastsearch_values = 1;
      }
      if ($add_save_lastsearch_values) {
        $query = array_merge($query, ['save_lastsearch_values' => 1]);
      }
    }
    $url = dolBuildUrl($baseurl, $query);
 
    $linkstart = '<a href="'.$url.'"';
    $linkstart .= $linkclose.'>';
    $linkend = '</a>';
 
    $result .= $linkstart;
    if ($withpicto) {
      if ($this->isProduct()) {
        $result .= (img_object(($notooltip ? '' : $label), 'product', 'class="paddingright"', 0, 0, $notooltip ? 0 : 1));
      }
      if ($this->isService()) {
        $result .= (img_object(($notooltip ? '' : $label), 'service', 'class="paddingright"', 0, 0, $notooltip ? 0 : 1));
      }
    }
    $result .= '<span class="aaa">'.dol_escape_htmltag($newref).'</span>';
    $result .= $linkend;
    if ($withpicto != 2) {
      $result .= (($add_label && $this->label) ? $sep.dol_trunc($this->label, ($add_label > 1 ? $add_label : 0)) : '');
    }
 
    if ($addlinktonotes) {
      $txttoshow = ($user->socid > 0 ? $this->note_public : $this->note_private);
      if ($txttoshow) {
        $notetoshow = $langs->trans("ViewPrivateNote").':<br>'.dol_string_nohtmltag($txttoshow, 1);
        $result .= ' <span class="note inline-block">';
        $result .= '<a href="'.DOL_URL_ROOT.'/product/note.php?id='.$this->id.'" class="classfortooltip" title="'.dol_escape_htmltag($notetoshow).'">';
        $result .= img_picto('', 'note');
        $result .= '</a>';
        $result .= '</span>';
      }
    }
 
    global $action;
    $hookmanager->initHooks(array('productdao'));
    $parameters = array('id' => $this->id, 'getnomurl' => &$result, 'label' => &$label);
    $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 generateDocument($modele, $outputlangs, $hidedetails = 0, $hidedesc = 0, $hideref = 0)
  {
    global $langs;
 
    $langs->load("products");
    $outputlangs->load("products");
 
    // Set the model to the name of the model to use
    if (!dol_strlen($modele)) {
      $modele = ''; // No doc template/generation by default
 
      if (!empty($this->model_pdf)) {
        $modele = $this->model_pdf;
      } elseif (getDolGlobalString('PRODUCT_ADDON_PDF')) {
        $modele = getDolGlobalString('PRODUCT_ADDON_PDF');
      }
    }
 
    if (empty($modele)) {
      return 0;
    } else {
      $modelpath = "core/modules/product/doc/";
      return $this->commonGenerateDocument($modelpath, $modele, $outputlangs, $hidedetails, $hidedesc, $hideref);
    }
  }
 
  public function getLibStatut($mode = 0, $type = 0)
  {
    switch ($type) {
      case 0:
        return $this->LibStatut($this->status, $mode, $type);
      case 1:
        return $this->LibStatut($this->status_buy, $mode, $type);
      case 2:
        return $this->LibStatut($this->status_batch, $mode, $type);
      default:
        //Simulate previous behavior but should return an error string
        return $this->LibStatut($this->status_buy, $mode, $type);
    }
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function LibStatut($status, $mode = 0, $type = 0)
  {
    // phpcs:enable
    global $langs;
 
    $labelStatus = $labelStatusShort = '';
 
    $langs->load('products');
    if (isModEnabled('productbatch')) {
      $langs->load("productbatch");
    }
 
    if ($type == 2) {
      switch ($mode) {
        case 0:
          $label = ($status == 0 ? $langs->transnoentitiesnoconv('ProductStatusNotOnBatch') : ($status == 1 ? $langs->transnoentitiesnoconv('ProductStatusOnBatch') : $langs->transnoentitiesnoconv('ProductStatusOnSerial')));
          return dolGetStatus($label);
        case 1:
          $label = ($status == 0 ? $langs->transnoentitiesnoconv('ProductStatusNotOnBatchShort') : ($status == 1 ? $langs->transnoentitiesnoconv('ProductStatusOnBatchShort') : $langs->transnoentitiesnoconv('ProductStatusOnSerialShort')));
          return dolGetStatus($label);
        case 2:
          return $this->LibStatut($status, 3, 2).' '.$this->LibStatut($status, 1, 2);
        case 3:
          return dolGetStatus($langs->transnoentitiesnoconv('ProductStatusNotOnBatch'), '', '', empty($status) ? 'status5' : 'status4', 3, 'dot');
        case 4:
          return $this->LibStatut($status, 3, 2).' '.$this->LibStatut($status, 0, 2);
        case 5:
          return $this->LibStatut($status, 1, 2).' '.$this->LibStatut($status, 3, 2);
        default:
          return dolGetStatus($langs->transnoentitiesnoconv('Unknown'));
      }
    }
 
    $statuttrans = empty($status) ? 'status5' : 'status4';
 
    if ($status == 0) {
      // $type   0=Status "to sell", 1=Status "to buy", 2=Status "to Batch"
      if ($type == 0) {
        $labelStatus = $langs->transnoentitiesnoconv('ProductStatusNotOnSellShort');
        $labelStatusShort = $langs->transnoentitiesnoconv('ProductStatusNotOnSell');
      } elseif ($type == 1) {
        $labelStatus = $langs->transnoentitiesnoconv('ProductStatusNotOnBuyShort');
        $labelStatusShort = $langs->transnoentitiesnoconv('ProductStatusNotOnBuy');
      } elseif ($type == 2) {
        $labelStatus = $langs->transnoentitiesnoconv('ProductStatusNotOnBatch');
        $labelStatusShort = $langs->transnoentitiesnoconv('ProductStatusNotOnBatchShort');
      }
    } elseif ($status == 1) {
      // $type   0=Status "to sell", 1=Status "to buy", 2=Status "to Batch"
      if ($type == 0) {
        $labelStatus = $langs->transnoentitiesnoconv('ProductStatusOnSellShort');
        $labelStatusShort = $langs->transnoentitiesnoconv('ProductStatusOnSell');
      } elseif ($type == 1) {
        $labelStatus = $langs->transnoentitiesnoconv('ProductStatusOnBuyShort');
        $labelStatusShort = $langs->transnoentitiesnoconv('ProductStatusOnBuy');
      } elseif ($type == 2) {
        $labelStatus = $langs->transnoentitiesnoconv('ProductStatusOnBatch');
        $labelStatusShort = $langs->transnoentitiesnoconv('ProductStatusOnBatchShort');
      }
    } elseif ($type == 2 && $status == 2) {
      $labelStatus = $langs->transnoentitiesnoconv('ProductStatusOnSerial');
      $labelStatusShort = $langs->transnoentitiesnoconv('ProductStatusOnSerialShort');
    }
 
    if ($mode > 6) {
      return dolGetStatus($langs->transnoentitiesnoconv('Unknown'), '', '', 'status0', 0);
    } else {
      return dolGetStatus($labelStatus, $labelStatusShort, '', $statuttrans, $mode);
    }
  }
 
 
  public function getLibFinished()
  {
    global $langs;
 
    $langs->load('products');
    $label = '';
 
    if (isset($this->finished) && $this->finished >= 0) {
      $sql = "SELECT label, code FROM ".$this->db->prefix()."c_product_nature where code = ".((int) $this->finished)." AND active=1";
      $resql = $this->db->query($sql);
      if (!$resql) {
        $this->error = $this->db->error().' sql='.$sql;
        dol_syslog(__METHOD__.' Error '.$this->error, LOG_ERR);
        return -1;
      } elseif ($this->db->num_rows($resql) > 0 && $res = $this->db->fetch_array($resql)) {
        $label = $langs->trans($res['label']);
      }
      $this->db->free($resql);
    }
 
    return $label;
  }
 
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function correct_stock($user, $id_entrepot, $nbpiece, $movement, $label = '', $price = 0, $inventorycode = '', $origin_element = '', $origin_id = null, $disablestockchangeforsubproduct = 0, $extrafields = null)
  {
    // phpcs:enable
    if ($id_entrepot) {
      $this->db->begin();
 
      include_once DOL_DOCUMENT_ROOT.'/product/stock/class/mouvementstock.class.php';
 
      // Ensure $nbpiece is a number and positive
      $nbpiece = (float) $nbpiece;
      if ($nbpiece < 0) {
        if (!$movement) {
          $movement = 1;
        }
        $nbpiece = abs($nbpiece);
      }
      $op = array();
      $op[0] = $nbpiece;
      $op[1] = -$nbpiece;
 
      $movementstock = new MouvementStock($this->db);
      $movementstock->setOrigin($origin_element, (int) $origin_id); // Set ->origin_type and ->origin_id
      $result = $movementstock->_create($user, $this->id, $id_entrepot, $op[$movement], $movement, $price, $label, $inventorycode, '', '', '', '', false, 0, $disablestockchangeforsubproduct);
 
      if ($result >= 0) {
        if ($extrafields) {
          $array_options = $extrafields->getOptionalsFromPost('stock_mouvement');
          $movementstock->array_options = $array_options;
          $movementstock->insertExtraFields();
        }
        $this->db->commit();
        return 1;
      } else {
        $this->setErrorsFromObject($movementstock);
 
        $this->db->rollback();
        return -1;
      }
    }
 
    return -1;
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function correct_stock_batch($user, $id_entrepot, $nbpiece, $movement, $label = '', $price = 0, $dlc = '', $dluo = '', $lot = '', $inventorycode = '', $origin_element = '', $origin_id = null, $disablestockchangeforsubproduct = 0, $extrafields = null, $force_update_batch = false)
  {
    // phpcs:enable
    if ($id_entrepot) {
      $this->db->begin();
 
      include_once DOL_DOCUMENT_ROOT.'/product/stock/class/mouvementstock.class.php';
 
      // Ensure $nbpiece is a number and positive
      $nbpiece = (float) $nbpiece;
      if ($nbpiece < 0) {
        if (!$movement) {
          $movement = 1;
        }
        $nbpiece = abs($nbpiece);
      }
 
      $op = array();
      $op[0] = $nbpiece;
      $op[1] = -$nbpiece;
 
      $movementstock = new MouvementStock($this->db);
      $movementstock->setOrigin($origin_element, (int) $origin_id); // Set ->origin_type and ->fk_origin
      $result = $movementstock->_create($user, $this->id, $id_entrepot, $op[$movement], $movement, $price, $label, $inventorycode, '', $dlc, $dluo, $lot, false, 0, $disablestockchangeforsubproduct, 0, $force_update_batch);
 
      if ($result >= 0) {
        if ($extrafields) {
          $array_options = $extrafields->getOptionalsFromPost('stock_mouvement');
          $movementstock->array_options = $array_options;
          $movementstock->insertExtraFields();
        }
        $this->db->commit();
        return 1;
      } else {
        $this->error = $movementstock->error;
        $this->errors = $movementstock->errors;
 
        $this->db->rollback();
        return -1;
      }
    }
    return -1;
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function load_stock($option = '', $includedraftpoforvirtual = null, $dateofvirtualstock = null)
  {
    // phpcs:enable
    $this->stock_reel = 0;
    $this->stock_warehouse = array();
    $this->stock_theorique = 0;
 
    // Set filter on warehouse status
    $warehouseStatus = array();
    if (preg_match('/warehouseclosed/', $option)) {
      $warehouseStatus[Entrepot::STATUS_CLOSED] = Entrepot::STATUS_CLOSED;
    }
    if (preg_match('/warehouseopen/', $option)) {
      $warehouseStatus[Entrepot::STATUS_OPEN_ALL] = Entrepot::STATUS_OPEN_ALL;
    }
    if (preg_match('/warehouseinternal/', $option)) {
      if (getDolGlobalString('ENTREPOT_EXTRA_STATUS')) {
        $warehouseStatus[Entrepot::STATUS_OPEN_INTERNAL] = Entrepot::STATUS_OPEN_INTERNAL;
      } else {
        $warehouseStatus[Entrepot::STATUS_OPEN_ALL] = Entrepot::STATUS_OPEN_ALL;
      }
    }
 
    $sql = "SELECT ps.rowid, ps.reel, ps.fk_entrepot";
    $sql .= " FROM ".$this->db->prefix()."product_stock as ps";
    $sql .= ", ".$this->db->prefix()."entrepot as w";
    $sql .= " WHERE w.entity IN (".getEntity('stock').")";
    $sql .= " AND w.rowid = ps.fk_entrepot";
    $sql .= " AND ps.fk_product = ".((int) $this->id);
    if (count($warehouseStatus)) {
      $sql .= " AND w.statut IN (".$this->db->sanitize(implode(',', $warehouseStatus)).")";
    }
 
    $sql .= " ORDER BY ps.reel ".(getDolGlobalString('DO_NOT_TRY_TO_DEFRAGMENT_STOCKS_WAREHOUSE') ? 'DESC' : 'ASC'); // Note : qty ASC is important for expedition card, to avoid stock fragmentation;
 
    dol_syslog(get_class($this)."::load_stock", LOG_DEBUG);
    $result = $this->db->query($sql);
    if ($result) {
      $num = $this->db->num_rows($result);
      $i = 0;
      if ($num > 0) {
        while ($i < $num) {
          $row = $this->db->fetch_object($result);
          $this->stock_warehouse[$row->fk_entrepot] = new stdClass();
          $this->stock_warehouse[$row->fk_entrepot]->real = $row->reel;
          $this->stock_warehouse[$row->fk_entrepot]->id = $row->rowid;
          if ((!preg_match('/nobatch/', $option)) && $this->hasbatch()) {
            $this->stock_warehouse[$row->fk_entrepot]->detail_batch = Productbatch::findAll($this->db, $row->rowid, 1, $this->id);
          }
          $this->stock_reel += $row->reel;
          $i++;
        }
        $this->stock_reel = (float) price2num($this->stock_reel, 'MS');
      }
      $this->db->free($result);
 
      if (!preg_match('/novirtual/', $option)) {
        $this->load_virtual_stock($includedraftpoforvirtual, $dateofvirtualstock); // This load stock_theorique and also load all arrays stats_xxx...
      }
 
      return 1;
    } else {
      $this->error = $this->db->lasterror();
      return -1;
    }
  }
 
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function load_virtual_stock($includedraftpoforvirtual = null, $dateofvirtualstock = null)
  {
    // phpcs:enable
    global $hookmanager, $action;
 
    $stock_commande_client = 0;
    $stock_commande_fournisseur = 0;
    $stock_sending_client = 0;
    $stock_reception_fournisseur = 0;
    $stock_inproduction = 0;
 
    //dol_syslog("load_virtual_stock");
 
    // If the caller did not provide a date, apply the virtual stock horizon (option STOCK_VIRTUAL_HORIZON_IN_DAYS):
    // incoming supply expected after this horizon is ignored, so the theoretical stock does not promise goods that are still far away.
    // An empty option means no horizon at all (default). A value of 0 is a valid horizon: only supply already due is counted.
    $horizoninDays = getDolGlobalString('STOCK_VIRTUAL_HORIZON_IN_DAYS');
    $dateofvirtualstockmin = 0;
    if (empty($dateofvirtualstock) && $horizoninDays !== '') {
      include_once DOL_DOCUMENT_ROOT.'/core/lib/date.lib.php';  // dol_time_plus_duree/dol_get_first_hour are not loaded in CLI/webservice contexts
      $dateofvirtualstock = dol_time_plus_duree(dol_now(), max(0, (int) $horizoninDays), 'd');
      $dateofvirtualstockmin = dol_get_first_hour(dol_now()); // The horizon is a window: supply expected before today did not arrive as planned
    }
 
    if (isModEnabled('order')) {
      $result = $this->load_stats_commande(0, '1,2', 1);
      if ($result < 0) {
        dol_print_error($this->db, $this->error);
      }
      $stock_commande_client = $this->stats_commande['qty'];
    }
    if (isModEnabled("shipping")) {
      require_once DOL_DOCUMENT_ROOT.'/expedition/class/expedition.class.php';
      $filterShipmentStatus = '';
      if (getDolGlobalString('STOCK_CALCULATE_ON_SHIPMENT')) {
        $filterShipmentStatus = Expedition::STATUS_VALIDATED.','.Expedition::STATUS_CLOSED;
      } elseif (getDolGlobalString('STOCK_CALCULATE_ON_SHIPMENT_CLOSE')) {
        $filterShipmentStatus = Expedition::STATUS_CLOSED;
      }
      $result = $this->load_stats_sending(0, '1,2', 1, $filterShipmentStatus);
      if ($result < 0) {
        dol_print_error($this->db, $this->error);
      }
      $stock_sending_client = $this->stats_expedition['qty'];
    }
    // Include supplier order lines
    if (isModEnabled("supplier_order")) {
      $filterStatus = getDolGlobalString('SUPPLIER_ORDER_STATUS_FOR_VIRTUAL_STOCK', '3,4');
      if (isset($includedraftpoforvirtual)) {
        $filterStatus = '0,1,2,'.$filterStatus; // 1,2 may have already been inside $filterStatus but it is better to have twice than missing $filterStatus does not include them
      }
      $result = $this->load_stats_commande_fournisseur(0, $filterStatus, 1, $dateofvirtualstock, $dateofvirtualstockmin);
      if ($result < 0) {
        dol_print_error($this->db, $this->error);
      }
      $stock_commande_fournisseur = $this->stats_commande_fournisseur['qty'];
    }
    // Include reception lines
    if (isModEnabled("supplier_order") || isModEnabled("supplier_invoice")) {
      $filterStatus = getDolGlobalString('SUPPLIER_ORDER_STATUS_FOR_VIRTUAL_STOCK', '4');
      if (isset($includedraftpoforvirtual)) {
        $filterStatus = '0,'.$filterStatus;
      }
      $result = $this->load_stats_reception(0, $filterStatus, 1, $dateofvirtualstock, $dateofvirtualstockmin);
      if ($result < 0) {
        dol_print_error($this->db, $this->error);
      }
      $stock_reception_fournisseur = $this->stats_reception['qty'];
    }
    // Include manufacturing
    if (isModEnabled('mrp')) {
      $filterStatus = getDolGlobalString('MO_STATUS_FOR_VIRTUAL_STOCK', '1,2');
      $result = $this->load_stats_inproduction(0, $filterStatus, 1, $dateofvirtualstock, 0, $dateofvirtualstockmin);
      if ($result < 0) {
        dol_print_error($this->db, $this->error);
      }
      $stock_inproduction = $this->stats_mrptoproduce['qty'] - $this->stats_mrptoconsume['qty'];
    }
 
    $this->stock_theorique = $this->stock_reel + $stock_inproduction;
 
    // $weBillOrderOrShipmentReception is set to 'order' or 'shipmentreception'. it will be used to know how to make virtual stock
    // calculation when we have a stock increase or decrease on billing. Do we have to count orders to bill or shipment/reception to bill ?
    $weBillOrderOrShipmentReception = getDolGlobalString('STOCK_DO_WE_BILL_ORDER_OR_SHIPMENTECEPTION_FOR_VIRTUALSTOCK', 'order');
 
    // Stock decrease mode
    if (getDolGlobalString('STOCK_CALCULATE_ON_SHIPMENT') || getDolGlobalString('STOCK_CALCULATE_ON_SHIPMENT_CLOSE')) {
      $this->stock_theorique -= ($stock_commande_client - $stock_sending_client);
    } elseif (getDolGlobalString('STOCK_CALCULATE_ON_VALIDATE_ORDER')) {
      if (getDolGlobalString('STOCK_CALCULATE_ON_VALIDATE_ORDER_INCLUDE_DRAFT')) {  // By default, draft means "does not exist", so we do not include them by default, except if option is on
        $tmpnewprod = dol_clone($this, 1);
        $result = $tmpnewprod->load_stats_commande(0, '0', 1);  // Get qty in draft orders
        $this->stock_theorique += $tmpnewprod->stats_commande['qty'];
      }
    } elseif (getDolGlobalString('STOCK_CALCULATE_ON_BILL') && $weBillOrderOrShipmentReception == 'order') {
      $this->stock_theorique -= $stock_commande_client;
    } elseif (getDolGlobalString('STOCK_CALCULATE_ON_BILL') && $weBillOrderOrShipmentReception == 'shipmentreception') {
      $this->stock_theorique -= ($stock_commande_client - $stock_sending_client);
    }
 
    // Stock Increase mode
    if (getDolGlobalString('STOCK_CALCULATE_ON_RECEPTION') || getDolGlobalString('STOCK_CALCULATE_ON_RECEPTION_CLOSE')) {
      $this->stock_theorique += ($stock_commande_fournisseur - $stock_reception_fournisseur);
    } elseif (getDolGlobalString('STOCK_CALCULATE_ON_SUPPLIER_DISPATCH_ORDER')) { // This option is similar to STOCK_CALCULATE_ON_RECEPTION_CLOSE but when module Reception is not enabled
      $this->stock_theorique += ($stock_commande_fournisseur - $stock_reception_fournisseur);
    } elseif (getDolGlobalString('STOCK_CALCULATE_ON_SUPPLIER_VALIDATE_ORDER')) { // Warning: stock change "on approval", not on validation !
      if (getDolGlobalString('STOCK_CALCULATE_ON_SUPPLIER_VALIDATE_ORDER_INCLUDE_DRAFT')) { // By default, draft means "does not exist", so we do not include them by default, except if option is on
        $tmpnewprod = dol_clone($this, 1);
        $result = $tmpnewprod->load_stats_commande_fournisseur(0, '0', 1);  // Get qty in draft orders
        $this->stock_theorique += $this->stats_commande_fournisseur['qty'];
      }
      $this->stock_theorique -= $stock_reception_fournisseur;
    } elseif (getDolGlobalString('STOCK_CALCULATE_ON_SUPPLIER_BILL') && $weBillOrderOrShipmentReception == 'order') {
      $this->stock_theorique += $stock_commande_fournisseur;
    } elseif (getDolGlobalString('STOCK_CALCULATE_ON_SUPPLIER_BILL') && $weBillOrderOrShipmentReception == 'shipmentreception') {
      $this->stock_theorique += ($stock_commande_fournisseur - $stock_reception_fournisseur);
    }
 
    $parameters = array('id' => $this->id, 'includedraftpoforvirtual' => $includedraftpoforvirtual);
    // Note that $action and $object may have been modified by some hooks
    $reshook = $hookmanager->executeHooks('loadvirtualstock', $parameters, $this, $action);
    if ($reshook > 0) {
      $this->stock_theorique = $hookmanager->resArray['stock_theorique'];
    } elseif ($reshook == 0 && isset($hookmanager->resArray['stock_stats_hook'])) {
      $this->stock_theorique += $hookmanager->resArray['stock_stats_hook'];
    }
 
    //Virtual Stock by Warehouse
    if (!empty($this->stock_warehouse) && getDolGlobalString('STOCK_ALLOW_VIRTUAL_STOCK_PER_WAREHOUSE')) {
      foreach ($this->stock_warehouse as $warehouseid => $stockwarehouse) {
        if (isModEnabled('mrp')) {
          $result = $this->load_stats_inproduction(0, getDolGlobalString('MO_STATUS_FOR_VIRTUAL_STOCK', '1,2'), 1, $dateofvirtualstock, $warehouseid, $dateofvirtualstockmin);
          if ($result < 0) {
            dol_print_error($this->db, $this->error);
          }
        }
 
        if ($this->fk_default_warehouse == $warehouseid) {
          $this->stock_warehouse[$warehouseid]->virtual = $this->stock_warehouse[$warehouseid]->real + $this->stock_warehouse[$warehouseid]->stats_mrptoproduce['qty'] + $this->stats_commande_fournisseur['qty'] - ($this->stats_commande['qty'] + $this->stats_mrptoconsume['qty']);
        } else {
          $this->stock_warehouse[$warehouseid]->virtual = $this->stock_warehouse[$warehouseid]->real + $this->stock_warehouse[$warehouseid]->stats_mrptoproduce['qty'];
        }
      }
    }
 
    return 1;
  }
 
  public function loadStockForVirtualProduct($option = '', $qtyWish = 1)
  {
    $this->stock_warehouse = array();
    $error = 0;
 
    $this->get_sousproduits_arbo();
    $prods_arbo = $this->get_arbo_each_prod($qtyWish, 1);
    if (count($prods_arbo) > 0) {
      $productCachedList = array();
      $stockByComponentList = array();
 
      foreach ($prods_arbo as $componentArr) {
        $componentId = $componentArr['id'];
        // only component whose manage stock
        if ($componentArr['incdec'] == 1) {
          if (!isset($productCachedList[$componentId])) {
            $componentStatic = new self($this->db);
            $componentStatic->fetch($componentId);
            // check if it's a sub-kit
            $childrenNb = $componentStatic->hasFatherOrChild(1);
            if ($childrenNb == 0) {
              $componentStatic->load_stock('nobatch,novirtual'); // Load stock to get true ->stock_reel
              if (!isset($stockByComponentList[$componentId])) {
                $stockByComponentList[$componentId] = array(
                  'qty_need' => 0
                );
              }
              $stockByComponentList[$componentId]['qty_need'] += $componentArr['nb_total'];
            }
            $productCachedList[$componentId] = $componentStatic;
          }
        }
      }
 
      if (!empty($stockByComponentList)) {
        foreach ($stockByComponentList as $componentId => $stockByComponentArr) {
          if (!isset($productCachedList[$componentId])) {
            $componentStatic = new self($this->db);
            $componentStatic->fetch($componentId);
            $componentStatic->load_stock('nobatch,novirtual'); // Load stock to get true ->stock_reel
            $productCachedList[$componentId] = $componentStatic;
          }
          $component = $productCachedList[$componentId];
 
 
          if ($component->stock_reel < $stockByComponentArr['qty_need']) {
            // not enough stock for this component to assemble this virtual product
            $error++;
            $this->error = 'Not enough component [id='.$componentId.'] in stock, real='.$component->stock_reel.' and need='.$stockByComponentArr['qty_need'];
            $this->errors[] = $this->error;
            dol_syslog(__METHOD__.' : '.$this->error, LOG_ERR);
          } else {
            if (!empty($component->stock_warehouse)) {
              foreach ($component->stock_warehouse as $warehouseId => $warehouseObj) {
                $kitWarehouseAvailable = new stdClass();
                $kitWarehouseAvailable->id = $warehouseObj->id;
                $kitWarehouseAvailable->real = $qtyWish;
                $this->stock_warehouse[$warehouseId] = $kitWarehouseAvailable;
              }
            }
          }
 
          if ($error) {
            break;
          }
        }
      } elseif (getDolGlobalInt('PRODUIT_SOUSPRODUITS_ALSO_ENABLE_PARENT_STOCK_MOVE') && empty($productCachedList)) {
        // if all sub product are not stock managed when use parent stock
        $this->load_stock('warehouseopen');
      }
    }
 
    if ($error) {
      return -1;
    } else {
      return 1;
    }
  }
 
  public function loadBatchInfo($batch)
  {
    $result = array();
 
    $sql = "SELECT pb.batch, pb.eatby, pb.sellby, SUM(pb.qty) AS qty FROM ".$this->db->prefix()."product_batch as pb, ".$this->db->prefix()."product_stock as ps";
    $sql .= " WHERE pb.fk_product_stock = ps.rowid AND ps.fk_product = ".((int) $this->id)." AND pb.batch = '".$this->db->escape($batch)."'";
    $sql .= " GROUP BY pb.batch, pb.eatby, pb.sellby";
    dol_syslog(get_class($this)."::loadBatchInfo load first entry found for lot/serial = ".$batch, 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);
        $result[] = array('batch' => $batch, 'eatby' => $this->db->jdate($obj->eatby), 'sellby' => $this->db->jdate($obj->sellby), 'qty' => $obj->qty);
        $i++;
      }
      return $result;
    } else {
      dol_print_error($this->db);
      $this->db->rollback();
      return array();
    }
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function add_photo($sdir, $file)
  {
    // phpcs:enable
    include_once DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php';
 
    $result = 0;
 
    $dir = $sdir;
    if (getDolGlobalInt('PRODUCT_USE_OLD_PATH_FOR_PHOTO')) {
      $dir .= '/'.get_exdir($this->id, 2, 0, 0, $this, 'product').$this->id."/photos";
    } else {
      $dir .= '/'.get_exdir(0, 0, 0, 0, $this, 'product').dol_sanitizeFileName($this->ref);
    }
 
    dol_mkdir($dir);
 
    $dir_osencoded = $dir;
 
    if (is_dir($dir_osencoded)) {
      $originImage = $dir.'/'.$file['name'];
 
      // Cree fichier en taille origine
      $result = dol_move_uploaded_file($file['tmp_name'], $originImage, 1);
 
      if (file_exists(dol_osencode($originImage))) {
        // Create thumbs
        $this->addThumbs($originImage);
      }
    }
 
    if (is_numeric($result) && $result > 0) {
      return 1;
    } else {
      return -1;
    }
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function is_photo_available($sdir)
  {
    // phpcs:enable
    include_once DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php';
    include_once DOL_DOCUMENT_ROOT.'/core/lib/images.lib.php';
 
    $dir = $sdir;
    if (getDolGlobalInt('PRODUCT_USE_OLD_PATH_FOR_PHOTO')) {
      $dir .= '/'.get_exdir($this->id, 2, 0, 0, $this, 'product').$this->id."/photos/";
    } else {
      $dir .= '/'.get_exdir(0, 0, 0, 0, $this, 'product');
    }
 
    $dir_osencoded = dol_osencode($dir);
    if (file_exists($dir_osencoded)) {
      $handle = opendir($dir_osencoded);
      if (is_resource($handle)) {
        while (($file = readdir($handle)) !== false) {
          if (!utf8_check($file)) {
            $file = mb_convert_encoding($file, 'UTF-8', 'ISO-8859-1'); // To be sure data is stored in UTF8 in memory
          }
          if (dol_is_file($dir.$file) && image_format_supported($file) >= 0) {
            return true;
          }
        }
      }
    }
 
    return false;
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function liste_photos($dir, $nbmax = 0)
  {
    // phpcs:enable
    include_once DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php';
    include_once DOL_DOCUMENT_ROOT.'/core/lib/images.lib.php';
 
    $nbphoto = 0;
    $tabobj = array();
 
    $dir_osencoded = dol_osencode($dir);
    $handle = @opendir($dir_osencoded);
    if (is_resource($handle)) {
      while (($file = readdir($handle)) !== false) {
        if (!utf8_check($file)) {
          $file = mb_convert_encoding($file, 'UTF-8', 'ISO-8859-1'); // readdir returns ISO
        }
        if (dol_is_file($dir.$file) && image_format_supported($file) >= 0) {
          $nbphoto++;
 
          // We forge name of thumb.
          $photo = $file;
          $photo_vignette = '';
          $regs = array();
          if (preg_match('/('.$this->regeximgext.')$/i', $photo, $regs)) {
            $photo_vignette = preg_replace('/'.$regs[0].'/i', '', $photo).'_small'.$regs[0];
          }
 
          $dirthumb = $dir.'thumbs/';
 
          // Object
          $obj = array();
          $obj['photo'] = $photo;
          if ($photo_vignette && dol_is_file($dirthumb.$photo_vignette)) {
            $obj['photo_vignette'] = 'thumbs/'.$photo_vignette;
          } else {
            $obj['photo_vignette'] = "";
          }
 
          $tabobj[$nbphoto - 1] = $obj;
 
          // Do we have to continue with next photo ?
          if ($nbmax && $nbphoto >= $nbmax) {
            break;
          }
        }
      }
 
      closedir($handle);
    }
 
    return $tabobj;
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function delete_photo($file)
  {
    // phpcs:enable
    include_once DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php';
    include_once DOL_DOCUMENT_ROOT.'/core/lib/images.lib.php';
 
    $dir = dirname($file).'/'; // Chemin du dossier contenant l'image d'origine
    $dirthumb = $dir.'/thumbs/'; // Chemin du dossier contenant la vignette
    $filename = preg_replace('/'.preg_quote($dir, '/').'/i', '', $file); // Nom du fichier
 
    // On efface l'image d'origine
    dol_delete_file($file, 0, 0, 0, $this); // For triggers
 
    // Si elle existe, on efface la vignette
    if (preg_match('/('.$this->regeximgext.')$/i', $filename, $regs)) {
      $photo_vignette = preg_replace('/'.$regs[0].'/i', '', $filename).'_small'.$regs[0];
      if (file_exists(dol_osencode($dirthumb.$photo_vignette))) {
        dol_delete_file($dirthumb.$photo_vignette);
      }
 
      $photo_vignette = preg_replace('/'.$regs[0].'/i', '', $filename).'_mini'.$regs[0];
      if (file_exists(dol_osencode($dirthumb.$photo_vignette))) {
        dol_delete_file($dirthumb.$photo_vignette);
      }
    }
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function get_image_size($file)
  {
    // phpcs:enable
    $file_osencoded = dol_osencode($file);
    $infoImg = getimagesize($file_osencoded); // Get information on image
    $this->imgWidth = $infoImg[0]; // Largeur de l'image
    $this->imgHeight = $infoImg[1]; // Hauteur de l'image
  }
 
  public function loadStateBoard()
  {
    global $hookmanager;
 
    $this->nb = array();
 
    $sql = "SELECT count(p.rowid) as nb, fk_product_type";
    $sql .= " FROM ".$this->db->prefix()."product as p";
    $sql .= ' WHERE p.entity IN ('.getEntity($this->element, 1).')';
    // Add where from hooks
    if (is_object($hookmanager)) {
      $parameters = array();
      $reshook = $hookmanager->executeHooks('printFieldListWhere', $parameters, $this); // Note that $action and $object may have been modified by hook
      $sql .= $hookmanager->resPrint;
    }
    $sql .= ' GROUP BY fk_product_type';
 
    $resql = $this->db->query($sql);
    if ($resql) {
      while ($obj = $this->db->fetch_object($resql)) {
        if ($obj->fk_product_type == 1) {
          $this->nb["services"] = $obj->nb;
        } else {
          $this->nb["products"] = $obj->nb;
        }
      }
      $this->db->free($resql);
      return 1;
    } else {
      dol_print_error($this->db);
      $this->error = $this->db->error();
      return -1;
    }
  }
 
  public function isProduct()
  {
    return $this->type == Product::TYPE_PRODUCT;
  }
 
  public function isService()
  {
    return $this->type == Product::TYPE_SERVICE;
  }
 
  public function isStockManaged()
  {
    return (($this->isProduct() || ($this->isService() && getDolGlobalString('STOCK_SUPPORTS_SERVICES'))) && ($this->stockable_product > 0));
  }
 
  public function isMandatoryPeriod()
  {
    return $this->mandatory_period == 1;
  }
 
  public function hasbatch()
  {
    return $this->status_batch > 0;
  }
 
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function get_barcode($object, $type = '')
  {
    // phpcs:enable
    global $conf;
 
    $result = '';
    if (getDolGlobalString('BARCODE_PRODUCT_ADDON_NUM')) {
      $dirsociete = array_merge(array('/core/modules/barcode/'), $conf->modules_parts['barcode']);
      foreach ($dirsociete as $dirroot) {
        $res = dol_include_once($dirroot . getDolGlobalString('BARCODE_PRODUCT_ADDON_NUM').'.php');
        if ($res) {
          break;
        }
      }
      $var = getDolGlobalString('BARCODE_PRODUCT_ADDON_NUM');
      $mod = new $var();
      '@phan-var-force ModeleNumRefBarCode $mod';
 
      $result = $mod->getNextValue($object, $type);
 
      dol_syslog(get_class($this)."::get_barcode barcode=".$result." module=".$var);
    }
    return $result;
  }
 
  public function initAsSpecimen()
  {
    $now = dol_now();
 
    // Initialize parameters
    $this->specimen = 1;
    $this->id = 0;
    $this->ref = 'PRODUCT_SPEC';
    $this->label = 'PRODUCT SPECIMEN';
    $this->description = 'This is description of this product specimen that was created the '.dol_print_date($now, 'dayhourlog').'.';
    $this->specimen = 1;
    $this->country_id = 1;
    $this->status = 1;
    $this->status_buy = 1;
    $this->tobatch = 0;
    $this->sell_or_eat_by_mandatory = 0;
    $this->note_private = 'This is a comment (private)';
    $this->note_public = 'This is a comment (public)';
    $this->date_creation = $now;
    $this->date_modification = $now;
 
    $this->weight = 4;
    $this->weight_units = 3;
 
    $this->length = 5;
    $this->length_units = 1;
    $this->width = 6;
    $this->width_units = 0;
    $this->height = null;
    $this->height_units = null;
 
    $this->surface = 30;
    $this->surface_units = 0;
    $this->volume = 300;
    $this->volume_units = 0;
 
    $this->barcode = -1; // Create barcode automatically
 
    return 1;
  }
 
  public function getLabelOfUnit($type = 'long', $outputlangs = null, $noentities = 0)
  {
    global $langs;
 
    if (empty($this->fk_unit)) {
      return '';
    }
    if (empty($outputlangs)) {
      $outputlangs = $langs;
    }
 
    $outputlangs->load('products');
    $label = '';
 
    $sql = "SELECT code, label, short_label FROM ".$this->db->prefix()."c_units where rowid = ".((int) $this->fk_unit);
 
    $resql = $this->db->query($sql);
    if (!$resql) {
      $this->error = $this->db->error();
      dol_syslog(get_class($this)."::getLabelOfUnit Error ".$this->error, LOG_ERR);
      return -1;
    } elseif ($this->db->num_rows($resql) > 0 && $res = $this->db->fetch_array($resql)) {
      if ($type == 'short') {
        if ($noentities) {
          $label = $outputlangs->transnoentitiesnoconv($res['short_label']);
        } else {
          $label = $outputlangs->trans($res['short_label']);
        }
      } elseif ($type == 'code') {
        $label = $res['code'];
      } else {
        if ($outputlangs->trans('unit'.$res['code']) == 'unit'.$res['code']) {
          // No translation available
          $label = $res['label'];
        } else {
          // Return the translated value
          if ($noentities) {
            $label = $outputlangs->transnoentitiesnoconv('unit'.$res['code']);
          } else {
            $label = $outputlangs->trans('unit'.$res['code']);
          }
        }
      }
    }
    $this->db->free($resql);
 
    return $label;
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function min_recommended_price()
  {
    // phpcs:enable
    $maxpricesupplier = 0;
 
    if (getDolGlobalString('PRODUCT_MINIMUM_RECOMMENDED_PRICE')) {
      include_once DOL_DOCUMENT_ROOT.'/fourn/class/fournisseur.product.class.php';
      $product_fourn = new ProductFournisseur($this->db);
      $product_fourn_list = $product_fourn->list_product_fournisseur_price($this->id, '', '');
 
      if (is_array($product_fourn_list) && count($product_fourn_list) > 0) {
        foreach ($product_fourn_list as $productfourn) {
          if ($productfourn->fourn_unitprice > $maxpricesupplier) {
            $maxpricesupplier = $productfourn->fourn_unitprice;
          }
        }
 
        $maxpricesupplier *= getDolGlobalString('PRODUCT_MINIMUM_RECOMMENDED_PRICE');
      }
    }
 
    return $maxpricesupplier;
  }
 
 
  public function setCategories($categories)
  {
    require_once DOL_DOCUMENT_ROOT.'/categories/class/categorie.class.php';
    return parent::setCategoriesCommon($categories, Categorie::TYPE_PRODUCT);
  }
 
  public static function replaceThirdparty(DoliDB $dbs, $origin_id, $dest_id)
  {
    /* we firstly delete origin product prices existing in destination before update */
    $sql = " DELETE FROM ".$dbs->prefix()."product_customer_price";
    $sql .= " WHERE fk_soc = ".(int) $origin_id;
    $sql .= " AND fk_product IN (SELECT fk_product FROM (SELECT fk_product FROM ".$dbs->prefix()."product_customer_price WHERE fk_soc = ".(int) $dest_id.") AS tmp)";
    //$sql .= ' AND EXISTS (SELECT 1 FROM '.$dbs->prefix().'product_customer_price p_new WHERE p_new.fk_product = p_old.fk_product AND p_new.fk_soc = '.(int) $dest_id.')';
 
    if (!$dbs->query($sql)) {
      return false;
    }
 
    $tables = array(
      'product_customer_price',
      'product_customer_price_log'
    );
 
    return CommonObject::commonReplaceThirdparty($dbs, $origin_id, $dest_id, $tables);
  }
 
  public function generateMultiprices(User $user, $baseprice, $price_type, $price_vat, $npr, $psq)
  {
    $sql = "SELECT rowid, level, fk_level, var_percent, var_min_percent FROM ".$this->db->prefix()."product_pricerules";
    $query = $this->db->query($sql);
 
    $rules = array();
 
    while ($result = $this->db->fetch_object($query)) {
      $rules[$result->level] = $result;
    }
 
    //Because prices can be based on other level's prices, we temporarily store them
    $prices = array(
      1 => $baseprice
    );
 
    $nbofproducts = getDolGlobalInt('PRODUIT_MULTIPRICES_LIMIT');
    for ($i = 1; $i <= $nbofproducts; $i++) {
      $price = $baseprice;
      $price_min = $baseprice;
 
      //We have to make sure it does exist and it is > 0
      //First price level only allows changing min_price
      if ($i > 1 && isset($rules[$i]->var_percent) && $rules[$i]->var_percent) {
        $price = $prices[$rules[$i]->fk_level] * (1 + ($rules[$i]->var_percent / 100));
      }
 
      $prices[$i] = $price;
 
      //We have to make sure it does exist and it is > 0
      if (isset($rules[$i]->var_min_percent) && $rules[$i]->var_min_percent) {
        $price_min = $price * (1 - ($rules[$i]->var_min_percent / 100));
      }
 
      //Little check to make sure the price is modified before triggering generation
      $check_amount = (($price == $this->multiprices[$i]) && ($price_min == $this->multiprices_min[$i]));
      $check_type = ($baseprice == $this->multiprices_base_type[$i]);
 
      if ($check_amount && $check_type) {
        continue;
      }
 
      if ($this->updatePrice($price, $price_type, $user, $price_vat, $price_min, $i, $npr, $psq, 1) < 0) {
        return -1;
      }
    }
 
    return 1;
  }
 
  public function getRights()
  {
    global $user;
 
    if ($this->isProduct()) {
      return $user->rights->produit;
    } else {
      return $user->rights->service;
    }
  }
 
  public function info($id)
  {
    $sql = "SELECT p.rowid, p.ref, p.datec as date_creation, GREATEST(p.tms, pef.tms) as date_modification,";
    $sql .= " p.fk_user_author, p.fk_user_modif";
    $sql .= " FROM ".$this->db->prefix().$this->table_element." as p";
    $sql .= " LEFT JOIN ".$this->db->prefix().$this->table_element."_extrafields as pef ON pef.fk_object=p.rowid";
    $sql .= " WHERE p.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->ref = $obj->ref;
 
        $this->user_creation_id = $obj->fk_user_author;
        $this->user_modification_id = $obj->fk_user_modif;
 
        $this->date_creation = $this->db->jdate($obj->date_creation);
        $this->date_modification = $this->db->jdate($obj->date_modification);
      }
 
      $this->db->free($result);
    } else {
      dol_print_error($this->db);
    }
  }
 
 
  public function getProductDurationHours()
  {
    if (empty($this->duration_value)) {
      $this->errors[] = 'ErrorDurationForServiceNotDefinedCantCalculateHourlyPrice';
      return -1;
    }
    if ($this->duration_unit == 's') {
      $prodDurationHours = 1. / 3600;
    } elseif ($this->duration_unit == 'i' || $this->duration_unit == 'mn' || $this->duration_unit == 'min') {
      $prodDurationHours = 1. / 60;
    } elseif ($this->duration_unit == 'h') {
      $prodDurationHours = 1.;
    } elseif ($this->duration_unit == 'd') {
      $prodDurationHours = 24.;
    } elseif ($this->duration_unit == 'w') {
      $prodDurationHours = 24. * 7;
    } elseif ($this->duration_unit == 'm') {
      $prodDurationHours = 24. * 30;
    } elseif ($this->duration_unit == 'y') {
      $prodDurationHours = 24. * 365;
    } else {
      // Unknown unit: the duration cannot be converted. Returning 0 silently made callers
      // compute a zero duration, and time.php divides by this value (#40805).
      $this->errors[] = 'ErrorDurationForServiceNotDefinedCantCalculateHourlyPrice';
      return -1;
    }
    $prodDurationHours *= $this->duration_value;
 
    return $prodDurationHours;
  }
 
 
  public function getKanbanView($option = '', $arraydata = null)
  {
    global $langs, $conf;
 
    $selected = (empty($arraydata['selected']) ? 0 : $arraydata['selected']);
 
    $return = '<div class="box-flex-item box-flex-grow-zero">';
    $return .= '<div class="info-box info-box-sm">';
    $return .= '<div class="info-box-img">';
    $label = '';
    if ($this->entity !== null && $this->is_photo_available($conf->product->multidir_output[$this->entity])) {
      $label .= $this->show_photos('product', $conf->product->multidir_output[$this->entity], 1, 1, 0, 0, 0, 120, 160, 0, 0, 0, '', 'photoref photokanban');
      $return .= $label;
    } else {
      if ($this->isProduct()) {
        $label .= img_picto('', 'product');
      } elseif ($this->isService()) {
        $label .= img_picto('', 'service');
      }
      $return .= $label;
    }
    $return .= '</div>';
    $return .= '<div class="info-box-content">';
    $return .= '<span class="info-box-ref inline-block tdoverflowmax150 valignmiddle">' . $this->getNomUrl() . '</span>';
    if ($selected >= 0) {
      $return .= '<input id="cb'.$this->id.'" class="flat checkforselect fright" type="checkbox" name="toselect[]" value="'.$this->id.'"'.($selected ? ' checked="checked"' : '').'>';
    }
    $return .= '<br><span class="info-box-label opacitymedium inline-block tdoverflowmax150 valignmiddle" title="'.dol_escape_htmltag($this->label).'">'.dol_escape_htmltag($this->label).'</span>';
    if ($this->price_base_type == 'TTC') {
      $return .= '<br><span class="info-box-status amount">'.price($this->price_ttc).' '.$langs->trans("TTC").'</span>';
    } else {
      if ($this->status) {
        $return .= '<br><span class="info-box-status amount">'.price($this->price).' '.$langs->trans("HT").'</span>';
      }
    }
    $br = 1;
    if ($this->isProduct()) {
      $return .= '<br><div class="info-box-status opacitymedium inline-block valignmiddle">'.img_picto($langs->trans('PhysicalStock'), 'stock').'</div><div class="inline-block valignmiddle paddingleft" title="'.$langs->trans('PhysicalStock').'">'.$this->stock_reel.'</div>';
      $br = 0;
    }
    if ($br) {
      $return .= '<br>';
      $return .= '<div class="info-box-status inline-block valignmiddle">'.$this->getLibStatut(3, 1).' '.$this->getLibStatut(3, 0).'</div>';
    } else {
      $return .= '<div class="info-box-status inline-block valignmiddle marginleftonly paddingleft">'.$this->getLibStatut(3, 1).' '.$this->getLibStatut(3, 0).'</div>';
    }
    $return .= '</div>';
    $return .= '</div>';
    $return .= '</div>';
    return $return;
  }
 
  private function cloneCustomerPriceAndExtra($fromId, $toId)
  {
    global $user;
 
    $now = dol_now();
 
    // Price per customer
    $sql  = "INSERT INTO ".$this->db->prefix()."product_customer_price (";
    $sql .= " entity";
    $sql .= ", fk_product";
    $sql .= ", fk_soc";
    $sql .= ", datec";
    $sql .= ", price";
    $sql .= ", price_ttc";
    $sql .= ", price_min";
    $sql .= ", price_min_ttc";
    $sql .= ", price_base_type";
    $sql .= ", default_vat_code";
    $sql .= ", tva_tx";
    $sql .= ", recuperableonly";
    $sql .= ", localtax1_tx";
    $sql .= ", localtax1_type";
    $sql .= ", localtax2_tx";
    $sql .= ", localtax2_type";
    $sql .= ", fk_user";
    $sql .= ")";
    $sql .= " SELECT";
    $sql .= " entity";
    $sql .= ", ".((int) $toId);
    $sql .= ", fk_soc";
    $sql .= ", '".$this->db->idate($now)."'";
    $sql .= ", price";
    $sql .= ", price_ttc";
    $sql .= ", price_min";
    $sql .= ", price_min_ttc";
    $sql .= ", price_base_type";
    $sql .= ", default_vat_code";
    $sql .= ", tva_tx";
    $sql .= ", recuperableonly";
    $sql .= ", localtax1_tx";
    $sql .= ", localtax1_type";
    $sql .= ", localtax2_tx";
    $sql .= ", localtax2_type";
    $sql .= ", ".((int) $user->id);
    $sql .= " FROM ".$this->db->prefix()."product_customer_price pc";
    $sql .= " WHERE pc.fk_product = ".((int) $fromId);
    $sql .= " AND pc.datec IN (";
    $sql .= " SELECT MAX(pd.datec)";
    $sql .= " FROM ".$this->db->prefix()."product_customer_price pd";
    $sql .= " WHERE pd.fk_product = ".((int) $fromId);
    $sql .= " AND pd.fk_soc = pc.fk_soc";
    $sql .= " )";
 
    dol_syslog(__METHOD__, LOG_DEBUG);
 
    $resql = $this->db->query($sql);
    if (!$resql) {
      $this->db->rollback();
      return -1;
    }
    $this->db->free($resql);
 
    // Add of customer price extrafields
    // Retrieving the list of extrafields
    $sql_fields = "SHOW COLUMNS FROM ".MAIN_DB_PREFIX."product_customer_price_extrafields";
    $res_fields = $this->db->query($sql_fields);
    if (!$res_fields) {
      $this->db->rollback();
      return -1;
    }
    $fields = array();
    while ($field = $this->db->fetch_object($res_fields)) {
      if (!in_array($field->Field, array('rowid', 'tms', 'fk_object'))) {
        $fields[] = $field->Field;
      }
    }
    if (!empty($fields)) {
      // Matching old price, new price
      $sql  = "SELECT";
      $sql .= " oldp.rowid AS old_price_id,";
      $sql .= " newp.rowid AS new_price_id";
      $sql .= " FROM ".MAIN_DB_PREFIX."product_customer_price AS oldp";
      $sql .= " INNER JOIN ".MAIN_DB_PREFIX."product_customer_price AS newp";
      $sql .= " ON newp.fk_soc = oldp.fk_soc";
      $sql .= " WHERE oldp.fk_product = ".((int) $fromId);
      $sql .= " AND newp.fk_product = ".((int) $toId);
      $sql .= " AND newp.datec = '".$this->db->idate($now)."'";
      $resql = $this->db->query($sql);
      if (!$resql) {
        $this->db->rollback();
        return -1;
      }
      while ($obj = $this->db->fetch_object($resql)) {
        $sql_copy  = "INSERT INTO ".MAIN_DB_PREFIX."product_customer_price_extrafields";
        $sql_copy .= " (fk_object";
        foreach ($fields as $field) {
          $sql_copy .= ",".$field;
        }
        $sql_copy .= ")";
        $sql_copy .= " SELECT ";
        $sql_copy .= ((int) $obj->new_price_id);
        foreach ($fields as $field) {
          $sql_copy .= ",".$field;
        }
        $sql_copy .= " FROM ".MAIN_DB_PREFIX."product_customer_price_extrafields";
        $sql_copy .= " WHERE fk_object = ".((int) $obj->old_price_id);
        $resql_copy = $this->db->query($sql_copy);
        if (!$resql_copy) {
          $this->db->rollback();
          return -1;
        }
      }
      $this->db->free($resql);
    }
 
    $this->db->free($res_fields);
 
    return 1;
  }
 
  private function cloneMultipriceExtra($fromId, $toId)
  {
    global $user;
 
    $now = dol_now();
 
    // Retrieving the list of extrafields
    $sql_fields = "SHOW COLUMNS FROM ".MAIN_DB_PREFIX."product_price_extrafields";
    $res_fields = $this->db->query($sql_fields);
    if (!$res_fields) {
      $this->db->rollback();
      return -1;
    }
    $fields = array();
    while ($field = $this->db->fetch_object($res_fields)) {
      if (!in_array($field->Field, array('rowid', 'tms', 'fk_object'))) {
        $fields[] = $field->Field;
      }
    }
    if (!empty($fields)) {
      // Matching old price, new price
      $sql  = "SELECT";
      $sql .= " oldp.rowid AS old_price_id,";
      $sql .= " newp.rowid AS new_price_id";
      $sql .= " FROM ".MAIN_DB_PREFIX."product_price AS oldp";
      $sql .= " INNER JOIN ".MAIN_DB_PREFIX."product_price AS newp";
      $sql .= " ON newp.price_level = oldp.price_level";
      $sql .= " WHERE oldp.fk_product = ".((int) $fromId);
      $sql .= " AND newp.fk_product = ".((int) $toId);
      $sql .= " AND newp.date_price = '".$this->db->idate($now)."'";
      $resql = $this->db->query($sql);
      if (!$resql) {
        $this->db->rollback();
        return -1;
      }
      while ($obj = $this->db->fetch_object($resql)) {
        $sql_copy  = "INSERT INTO ".MAIN_DB_PREFIX."product_price_extrafields";
        $sql_copy .= " (fk_object";
        foreach ($fields as $field) {
          $sql_copy .= ",".$field;
        }
        $sql_copy .= ")";
        $sql_copy .= " SELECT ";
        $sql_copy .= ((int) $obj->new_price_id);
        foreach ($fields as $field) {
          $sql_copy .= ",".$field;
        }
        $sql_copy .= " FROM ".MAIN_DB_PREFIX."product_price_extrafields";
        $sql_copy .= " WHERE fk_object = ".((int) $obj->old_price_id);
        $resql_copy = $this->db->query($sql_copy);
        if (!$resql_copy) {
          $this->db->rollback();
          return -1;
        }
      }
 
      $this->db->free($resql);
    }
 
    $this->db->free($res_fields);
 
    return 1;
  }
}
 
class ProductService extends Product
{
  public $picto = 'service';
}