forked from Wavyzz/dolibarr
5666 lines
230 KiB
PHP
5666 lines
230 KiB
PHP
<?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-2020 Alexandre Spangaro <aspangaro@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-2018 Ferran Marcet <fmarcet@2byte.es>
|
|
* Copyright (C) 2017 Gustavo Novaro
|
|
* Copyright (C) 2019 Frédéric France <frederic.france@netlogic.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/>.
|
|
*/
|
|
|
|
/**
|
|
* \file htdocs/product/class/product.class.php
|
|
* \ingroup produit
|
|
* \brief File of class to manage predefined products or services
|
|
*/
|
|
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/stock/class/entrepot.class.php';
|
|
|
|
/**
|
|
* Class to manage products or services
|
|
*/
|
|
class Product extends CommonObject
|
|
{
|
|
/**
|
|
* @var string ID to identify managed object
|
|
*/
|
|
public $element = 'product';
|
|
|
|
/**
|
|
* @var string Name of table without prefix where object is stored
|
|
*/
|
|
public $table_element = 'product';
|
|
|
|
/**
|
|
* @var int Field with ID of parent key if this field has a parent
|
|
*/
|
|
public $fk_element = 'fk_product';
|
|
|
|
/**
|
|
* @var array List of child tables. To test if we can delete object.
|
|
*/
|
|
protected $childtables = array('supplier_proposaldet', 'propaldet', 'commandedet', 'facturedet', 'contratdet', 'facture_fourn_det', 'commande_fournisseurdet');
|
|
|
|
/**
|
|
* 0=No test on entity, 1=Test with field entity, 2=Test with link by societe
|
|
*
|
|
* @var int
|
|
*/
|
|
public $ismultientitymanaged = 1;
|
|
|
|
|
|
public $picto = 'product';
|
|
|
|
/**
|
|
* {@inheritdoc}
|
|
*/
|
|
protected $table_ref_field = 'ref';
|
|
|
|
public $regeximgext = '\.gif|\.jpg|\.jpeg|\.png|\.bmp|\.webp|\.xpm|\.xbm'; // See also into images.lib.php
|
|
|
|
/*
|
|
* @deprecated
|
|
* @see label
|
|
*/
|
|
public $libelle;
|
|
/**
|
|
* Product label
|
|
*
|
|
* @var string
|
|
*/
|
|
public $label;
|
|
|
|
/**
|
|
* Product description
|
|
*
|
|
* @var string
|
|
*/
|
|
public $description;
|
|
|
|
/**
|
|
* Product other fields PRODUCT_USE_OTHER_FIELD_IN_TRANSLATION
|
|
*
|
|
* @var string
|
|
*/
|
|
public $other;
|
|
|
|
/**
|
|
* Check TYPE constants
|
|
*
|
|
* @var int
|
|
*/
|
|
public $type = self::TYPE_PRODUCT;
|
|
|
|
/**
|
|
* Selling price
|
|
*
|
|
* @var float
|
|
*/
|
|
public $price; // Price net
|
|
|
|
/**
|
|
* Price with tax
|
|
*
|
|
* @var float
|
|
*/
|
|
public $price_ttc;
|
|
|
|
/**
|
|
* Minimum price net
|
|
*
|
|
* @var float
|
|
*/
|
|
public $price_min;
|
|
|
|
/**
|
|
* Minimum price with tax
|
|
*
|
|
* @var float
|
|
*/
|
|
public $price_min_ttc;
|
|
|
|
/**
|
|
* Base price ('TTC' for price including tax or 'HT' for net price)
|
|
* @var string
|
|
*/
|
|
public $price_base_type;
|
|
|
|
//! Arrays for multiprices
|
|
public $multiprices = array();
|
|
public $multiprices_ttc = array();
|
|
public $multiprices_base_type = array();
|
|
public $multiprices_min = array();
|
|
public $multiprices_min_ttc = array();
|
|
public $multiprices_tva_tx = array();
|
|
public $multiprices_recuperableonly = array();
|
|
|
|
//! Price by quantity arrays
|
|
public $price_by_qty;
|
|
public $prices_by_qty = array();
|
|
public $prices_by_qty_id = array();
|
|
public $prices_by_qty_list = array();
|
|
|
|
//! Default VAT code for product (link to code into llx_c_tva but without foreign keys)
|
|
public $default_vat_code;
|
|
|
|
//! Default VAT rate of product
|
|
public $tva_tx;
|
|
|
|
//! French VAT NPR (0 or 1)
|
|
public $tva_npr = 0;
|
|
|
|
//! Other local taxes
|
|
public $localtax1_tx;
|
|
public $localtax2_tx;
|
|
public $localtax1_type;
|
|
public $localtax2_type;
|
|
|
|
/**
|
|
* Stock real
|
|
*
|
|
* @var int
|
|
*/
|
|
public $stock_reel = 0;
|
|
|
|
/**
|
|
* Stock virtual
|
|
*
|
|
* @var int
|
|
*/
|
|
public $stock_theorique;
|
|
|
|
/**
|
|
* Cost price
|
|
*
|
|
* @var float
|
|
*/
|
|
public $cost_price;
|
|
|
|
//! Average price value for product entry into stock (PMP)
|
|
public $pmp;
|
|
|
|
/**
|
|
* Stock alert
|
|
*
|
|
* @var int
|
|
*/
|
|
public $seuil_stock_alerte = 0;
|
|
|
|
/**
|
|
* Ask for replenishment when $desiredstock < $stock_reel
|
|
*/
|
|
public $desiredstock = 0;
|
|
|
|
/*
|
|
* Service expiration
|
|
*/
|
|
public $duration_value;
|
|
|
|
/**
|
|
* Exoiration unit
|
|
*/
|
|
public $duration_unit;
|
|
|
|
/**
|
|
* Status indicates whether the product is on sale '1' or not '0'
|
|
*
|
|
* @var int
|
|
*/
|
|
public $status = 0;
|
|
|
|
/**
|
|
* Status indicate whether the product is available for purchase '1' or not '0'
|
|
*
|
|
* @var int
|
|
*/
|
|
public $status_buy = 0;
|
|
|
|
/**
|
|
* Status indicates whether the product is a finished product '1' or a raw material '0'
|
|
*
|
|
* @var int
|
|
*/
|
|
public $finished;
|
|
|
|
/**
|
|
* We must manage lot/batch number, sell-by date and so on : '1':yes '0':no
|
|
*
|
|
* @var int
|
|
*/
|
|
public $status_batch = 0;
|
|
|
|
/**
|
|
* Customs code
|
|
*
|
|
* @var string
|
|
*/
|
|
public $customcode;
|
|
|
|
/**
|
|
* Product URL
|
|
*
|
|
* @var string
|
|
*/
|
|
public $url;
|
|
|
|
//! Metric of products
|
|
public $weight;
|
|
public $weight_units;
|
|
public $length;
|
|
public $length_units;
|
|
public $width;
|
|
public $width_units;
|
|
public $height;
|
|
public $height_units;
|
|
public $surface;
|
|
public $surface_units;
|
|
public $volume;
|
|
public $volume_units;
|
|
|
|
public $net_measure;
|
|
public $net_measure_units;
|
|
|
|
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;
|
|
|
|
/**
|
|
* Main Barcode value
|
|
*
|
|
* @var string
|
|
*/
|
|
public $barcode;
|
|
|
|
/**
|
|
* Main Barcode type ID
|
|
*
|
|
* @var int
|
|
*/
|
|
public $barcode_type;
|
|
|
|
/**
|
|
* Main Barcode type code
|
|
*
|
|
* @var string
|
|
*/
|
|
public $barcode_type_code;
|
|
|
|
/**
|
|
* Additional barcodes (Some products have different barcodes according to the country of origin of manufacture)
|
|
*
|
|
* @var array
|
|
*/
|
|
public $barcodes_extra = array();
|
|
|
|
public $stats_propale = array();
|
|
public $stats_commande = array();
|
|
public $stats_contrat = array();
|
|
public $stats_facture = array();
|
|
public $stats_commande_fournisseur = array();
|
|
public $stats_reception = array();
|
|
public $stats_mrptoconsume = array();
|
|
public $stats_mrptoproduce = array();
|
|
|
|
public $multilangs = array();
|
|
|
|
//! Size of image
|
|
public $imgWidth;
|
|
public $imgHeight;
|
|
|
|
/**
|
|
* @var integer|string date_creation
|
|
*/
|
|
public $date_creation;
|
|
|
|
/**
|
|
* @var integer|string date_modification
|
|
*/
|
|
public $date_modification;
|
|
|
|
//! Id du fournisseur
|
|
public $product_fourn_id;
|
|
|
|
//! Product ID already linked to a reference supplier
|
|
public $product_id_already_linked;
|
|
|
|
public $nbphoto = 0;
|
|
|
|
//! Contains detail of stock of product into each warehouse
|
|
public $stock_warehouse = array();
|
|
|
|
public $oldcopy;
|
|
|
|
public $fk_default_warehouse;
|
|
/**
|
|
* @var int ID
|
|
*/
|
|
public $fk_price_expression;
|
|
|
|
/* To store supplier price found */
|
|
public $fourn_pu;
|
|
public $fourn_price_base_type;
|
|
public $fourn_socid;
|
|
|
|
/**
|
|
* @deprecated
|
|
* @see $ref_supplier
|
|
*/
|
|
public $ref_fourn;
|
|
public $ref_supplier;
|
|
|
|
/**
|
|
* Unit code ('km', 'm', 'l', 'p', ...)
|
|
*
|
|
* @var string
|
|
*/
|
|
public $fk_unit;
|
|
|
|
/**
|
|
* Price is generated using multiprice rules
|
|
*
|
|
* @var int
|
|
*/
|
|
public $price_autogen = 0;
|
|
|
|
|
|
public $fields = array(
|
|
'rowid' => array('type'=>'integer', 'label'=>'TechnicalID', 'enabled'=>1, 'visible'=>-2, 'notnull'=>1, 'index'=>1, 'position'=>1, 'comment'=>'Id'),
|
|
'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'),
|
|
'entity' =>array('type'=>'integer', 'label'=>'Entity', 'enabled'=>1, 'visible'=>0, 'default'=>1, 'notnull'=>1, 'index'=>1, 'position'=>20),
|
|
'label' =>array('type'=>'varchar(255)', 'label'=>'Label', 'enabled'=>1, 'visible'=>1, 'notnull'=>1, 'showoncombobox'=>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', 'label'=>'UserAuthor', 'enabled'=>1, 'visible'=>-2, 'notnull'=>1, 'position'=>510, 'foreignkey'=>'llx_user.rowid'),
|
|
'fk_user_modif' =>array('type'=>'integer', 'label'=>'UserModif', 'enabled'=>1, 'visible'=>-2, 'notnull'=>-1, 'position'=>511),
|
|
//'fk_user_valid' =>array('type'=>'integer', 'label'=>'UserValidation', 'enabled'=>1, 'visible'=>-1, 'position'=>512),
|
|
'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')),
|
|
);
|
|
|
|
/**
|
|
* Regular product
|
|
*/
|
|
const TYPE_PRODUCT = 0;
|
|
/**
|
|
* Service
|
|
*/
|
|
const TYPE_SERVICE = 1;
|
|
/**
|
|
* Advanced feature: assembly kit
|
|
*/
|
|
const TYPE_ASSEMBLYKIT = 2;
|
|
/**
|
|
* Advanced feature: stock kit
|
|
*/
|
|
const TYPE_STOCKKIT = 3;
|
|
|
|
|
|
/**
|
|
* Constructor
|
|
*
|
|
* @param DoliDB $db Database handler
|
|
*/
|
|
public function __construct($db)
|
|
{
|
|
$this->db = $db;
|
|
$this->canvas = '';
|
|
}
|
|
|
|
/**
|
|
* Check that ref and label are ok
|
|
*
|
|
* @return int >1 if OK, <=0 if KO
|
|
*/
|
|
public function check()
|
|
{
|
|
$this->ref = dol_sanitizeFileName(stripslashes($this->ref));
|
|
|
|
$err = 0;
|
|
if (dol_strlen(trim($this->ref)) == 0) {
|
|
$err++;
|
|
}
|
|
|
|
if (dol_strlen(trim($this->label)) == 0) {
|
|
$err++;
|
|
}
|
|
|
|
if ($err > 0) {
|
|
return 0;
|
|
}
|
|
else
|
|
{
|
|
return 1;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Insert product into database
|
|
*
|
|
* @param User $user User making insert
|
|
* @param int $notrigger Disable triggers
|
|
* @return int Id of product/service if OK, < 0 if KO
|
|
*/
|
|
public function create($user, $notrigger = 0)
|
|
{
|
|
global $conf, $langs;
|
|
|
|
$error = 0;
|
|
|
|
// Clean parameters
|
|
$this->ref = dol_sanitizeFileName(dol_string_nospecial(trim($this->ref)));
|
|
$this->label = trim($this->label);
|
|
$this->price_ttc = price2num($this->price_ttc);
|
|
$this->price = price2num($this->price);
|
|
$this->price_min_ttc = price2num($this->price_min_ttc);
|
|
$this->price_min = price2num($this->price_min);
|
|
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';
|
|
}
|
|
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;
|
|
}
|
|
|
|
$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($this->accountancy_code_buy);
|
|
$this->accountancy_code_buy_intra = trim($this->accountancy_code_buy_intra);
|
|
$this->accountancy_code_buy_export = trim($this->accountancy_code_buy_export);
|
|
$this->accountancy_code_sell = trim($this->accountancy_code_sell);
|
|
$this->accountancy_code_sell_intra = trim($this->accountancy_code_sell_intra);
|
|
$this->accountancy_code_sell_export = trim($this->accountancy_code_sell_export);
|
|
|
|
// Barcode value
|
|
$this->barcode = trim($this->barcode);
|
|
|
|
// Check parameters
|
|
if (empty($this->label)) {
|
|
$this->error = 'ErrorMandatoryParametersNotProvided';
|
|
return -1;
|
|
}
|
|
|
|
if (empty($this->ref) || $this->ref == 'auto') {
|
|
// Load object modCodeProduct
|
|
$module = (!empty($conf->global->PRODUCT_CODEPRODUCT_ADDON) ? $conf->global->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;
|
|
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();
|
|
|
|
$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 = $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 ".MAIN_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) {
|
|
// Produit non deja existant
|
|
$sql = "INSERT INTO ".MAIN_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 .= ", tobuy";
|
|
$sql .= ", tosell";
|
|
$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 .= ", fk_unit";
|
|
$sql .= ") VALUES (";
|
|
$sql .= "'".$this->db->idate($now)."'";
|
|
$sql .= ", ".$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 .= ", ".$user->id;
|
|
$sql .= ", ".$this->type;
|
|
$sql .= ", ".price2num($price_ht);
|
|
$sql .= ", ".price2num($price_ttc);
|
|
$sql .= ", '".$this->db->escape($this->price_base_type)."'";
|
|
$sql .= ", ".$this->status;
|
|
$sql .= ", ".$this->status_buy;
|
|
$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' : $this->status_batch);
|
|
$sql .= ", ".(!$this->fk_unit ? 'NULL' : $this->fk_unit);
|
|
$sql .= ")";
|
|
|
|
dol_syslog(get_class($this)."::Create", LOG_DEBUG);
|
|
$result = $this->db->query($sql);
|
|
if ($result) {
|
|
$id = $this->db->last_insert_id(MAIN_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, true, 'add') <= 0) {
|
|
$error++;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
$error++;
|
|
$this->error = $this->db->lasterror();
|
|
}
|
|
}
|
|
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";
|
|
}
|
|
}
|
|
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 ".join(',', $this->errors), LOG_WARNING);
|
|
return -3;
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
* Check properties of product are ok (like name, barcode, ...).
|
|
* All properties must be already loaded on object (this->barcode, this->barcode_type_code, ...).
|
|
*
|
|
* @return int 0 if OK, <0 if KO
|
|
*/
|
|
public function verify()
|
|
{
|
|
$this->errors = array();
|
|
|
|
$result = 0;
|
|
$this->ref = trim($this->ref);
|
|
|
|
if (!$this->ref) {
|
|
$this->errors[] = 'ErrorBadRef';
|
|
$result = -2;
|
|
}
|
|
|
|
$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
|
|
/**
|
|
* Check barcode
|
|
*
|
|
* @param string $valuetotest Value to test
|
|
* @param string $typefortest Type of barcode (ISBN, EAN, ...)
|
|
* @return int 0 if OK
|
|
* -1 ErrorBadBarCodeSyntax
|
|
* -2 ErrorBarCodeRequired
|
|
* -3 ErrorBarCodeAlreadyUsed
|
|
*/
|
|
public function check_barcode($valuetotest, $typefortest)
|
|
{
|
|
// phpcs:enable
|
|
global $conf;
|
|
if (!empty($conf->barcode->enabled) && !empty($conf->global->BARCODE_PRODUCT_ADDON_NUM)) {
|
|
$module = strtolower($conf->global->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();
|
|
|
|
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;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Update a record into database.
|
|
* If batch flag is set to on, we create records into llx_product_batch
|
|
*
|
|
* @param int $id Id of product
|
|
* @param User $user Object user making update
|
|
* @param int $notrigger Disable triggers
|
|
* @param string $action Current action for hookmanager ('add' or 'update')
|
|
* @param boolean $updatetype Update product type
|
|
* @return int 1 if OK, -1 if ref already exists, -2 if other error
|
|
*/
|
|
public function update($id, $user, $notrigger = false, $action = 'update', $updatetype = false)
|
|
{
|
|
global $langs, $conf, $hookmanager;
|
|
|
|
$error = 0;
|
|
|
|
// Check parameters
|
|
if (!$this->label) { $this->label = 'MISSING LABEL';
|
|
}
|
|
|
|
// Clean parameters
|
|
$this->ref = dol_string_nospecial(trim($this->ref));
|
|
$this->label = trim($this->label);
|
|
$this->description = trim($this->description);
|
|
$this->note = (isset($this->note) ? trim($this->note) : null);
|
|
$this->net_measure = price2num($this->net_measure);
|
|
$this->net_measure_units = trim($this->net_measure_units);
|
|
$this->weight = price2num($this->weight);
|
|
$this->weight_units = trim($this->weight_units);
|
|
$this->length = price2num($this->length);
|
|
$this->length_units = trim($this->length_units);
|
|
$this->width = price2num($this->width);
|
|
$this->width_units = trim($this->width_units);
|
|
$this->height = price2num($this->height);
|
|
$this->height_units = trim($this->height_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 = $this->length * $this->width;
|
|
$this->surface_units = measuring_units_squared($this->length_units);
|
|
}
|
|
if (empty($this->volume) && !empty($this->surface) && !empty($this->height) && $this->length_units == $this->height_units) {
|
|
$this->volume = $this->surface * $this->height;
|
|
$this->volume_units = measuring_units_cubed($this->height_units);
|
|
}
|
|
|
|
$this->surface = price2num($this->surface);
|
|
$this->surface_units = trim($this->surface_units);
|
|
$this->volume = price2num($this->volume);
|
|
$this->volume_units = trim($this->volume_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;
|
|
}
|
|
|
|
// Barcode value
|
|
$this->barcode = trim($this->barcode);
|
|
|
|
$this->accountancy_code_buy = trim($this->accountancy_code_buy);
|
|
$this->accountancy_code_buy_intra = trim($this->accountancy_code_buy_intra);
|
|
$this->accountancy_code_buy_export = trim($this->accountancy_code_buy_export);
|
|
$this->accountancy_code_sell = trim($this->accountancy_code_sell);
|
|
$this->accountancy_code_sell_intra = trim($this->accountancy_code_sell_intra);
|
|
$this->accountancy_code_sell_export = trim($this->accountancy_code_sell_export);
|
|
|
|
|
|
$this->db->begin();
|
|
|
|
// 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
|
|
}
|
|
|
|
if ($result >= 0) {
|
|
if (empty($this->oldcopy)) {
|
|
$org = new self($this->db);
|
|
$org->fetch($this->id);
|
|
$this->oldcopy = $org;
|
|
}
|
|
|
|
// 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 (!empty($conf->global->STOCK_DEFAULT_BATCH)) $valueforundefinedlot = $conf->global->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 ".MAIN_DB_PREFIX."product_batch WHERE batch in('Undefined', '".$valueforundefinedlot."') AND fk_product_stock = ".$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 = $ObjW->id;
|
|
|
|
if ($ObjBatch->create($user, 1) < 0) {
|
|
$error++;
|
|
$this->errors = $ObjBatch->errors;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
// For automatic creation
|
|
if ($this->barcode == -1) { $this->barcode = $this->get_barcode($this, $this->barcode_type_code);
|
|
}
|
|
|
|
$sql = "UPDATE ".MAIN_DB_PREFIX."product";
|
|
$sql .= " SET label = '".$this->db->escape($this->label)."'";
|
|
|
|
if ($updatetype && ($this->isProduct() || $this->isService())) {
|
|
$sql .= ", fk_product_type = ".$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 = ".$this->tva_tx;
|
|
$sql .= ", recuperableonly = ".$this->tva_npr;
|
|
$sql .= ", localtax1_tx = ".$this->localtax1_tx;
|
|
$sql .= ", localtax2_tx = ".$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($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 .= ", finished = ".((!isset($this->finished) || $this->finished < 0) ? "null" : (int) $this->finished);
|
|
$sql .= ", net_measure = ".($this->net_measure != '' ? "'".$this->db->escape($this->net_measure)."'" : 'null');
|
|
$sql .= ", net_measure_units = ".($this->net_measure_units != '' ? "'".$this->db->escape($this->net_measure_units)."'" : 'null');
|
|
$sql .= ", weight = ".($this->weight != '' ? "'".$this->db->escape($this->weight)."'" : 'null');
|
|
$sql .= ", weight_units = ".($this->weight_units != '' ? "'".$this->db->escape($this->weight_units)."'" : 'null');
|
|
$sql .= ", length = ".($this->length != '' ? "'".$this->db->escape($this->length)."'" : 'null');
|
|
$sql .= ", length_units = ".($this->length_units != '' ? "'".$this->db->escape($this->length_units)."'" : 'null');
|
|
$sql .= ", width= ".($this->width != '' ? "'".$this->db->escape($this->width)."'" : 'null');
|
|
$sql .= ", width_units = ".($this->width_units != '' ? "'".$this->db->escape($this->width_units)."'" : 'null');
|
|
$sql .= ", height = ".($this->height != '' ? "'".$this->db->escape($this->height)."'" : 'null');
|
|
$sql .= ", height_units = ".($this->height_units != '' ? "'".$this->db->escape($this->height_units)."'" : 'null');
|
|
$sql .= ", surface = ".($this->surface != '' ? "'".$this->db->escape($this->surface)."'" : 'null');
|
|
$sql .= ", surface_units = ".($this->surface_units != '' ? "'".$this->db->escape($this->surface_units)."'" : 'null');
|
|
$sql .= ", volume = ".($this->volume != '' ? "'".$this->db->escape($this->volume)."'" : 'null');
|
|
$sql .= ", volume_units = ".($this->volume_units != '' ? "'".$this->db->escape($this->volume_units)."'" : 'null');
|
|
$sql .= ", fk_default_warehouse = ".($this->fk_default_warehouse > 0 ? $this->db->escape($this->fk_default_warehouse) : 'null');
|
|
$sql .= ", seuil_stock_alerte = ".((isset($this->seuil_stock_alerte) && is_numeric($this->seuil_stock_alerte)) ? (int) $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 .= ", note = ".(isset($this->note) ? "'".$this->db->escape($this->note)."'" : 'null');
|
|
$sql .= ", duration = '".$this->db->escape($this->duration_value.$this->duration_unit)."'";
|
|
$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)) ? (int) $this->desiredstock : "null");
|
|
$sql .= ", cost_price = ".($this->cost_price != '' ? $this->db->escape($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 ? $user->id : 'NULL');
|
|
|
|
// stock field is not here because it is a denormalized value from product_stock.
|
|
$sql .= " WHERE rowid = ".$id;
|
|
|
|
dol_syslog(get_class($this)."::update", LOG_DEBUG);
|
|
|
|
$resql = $this->db->query($sql);
|
|
if ($resql) {
|
|
$this->id = $id;
|
|
|
|
// Multilangs
|
|
if (!empty($conf->global->MAIN_MULTILANGS)) {
|
|
if ($this->setMultiLangs($user) < 0) {
|
|
$this->error = $langs->trans("Error")." : ".$this->db->error()." - ".$sql;
|
|
return -2;
|
|
}
|
|
}
|
|
|
|
$action = 'update';
|
|
|
|
// 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++;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
if (!$error) {
|
|
if ($conf->variants->enabled) {
|
|
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 ".join(',', $this->errors), LOG_WARNING);
|
|
return -3;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Delete a product from database (if not used)
|
|
*
|
|
* @param User $user User (object) deleting product
|
|
* @param int $notrigger Do not execute trigger
|
|
* @return int < 0 if KO, 0 = Not possible, > 0 if OK
|
|
*/
|
|
public function delete(User $user, $notrigger = 0)
|
|
{
|
|
global $conf, $langs;
|
|
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->type == Product::TYPE_PRODUCT && empty($user->rights->produit->supprimer)) || ($this->type == Product::TYPE_SERVICE && empty($user->rights->service->supprimer))) {
|
|
$this->error = "ErrorForbidden";
|
|
return 0;
|
|
}
|
|
|
|
$objectisused = $this->isObjectUsed($this->id);
|
|
if (empty($objectisused)) {
|
|
$this->db->begin();
|
|
|
|
if (!$error && 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 ".MAIN_DB_PREFIX.'product_batch';
|
|
$sql .= " WHERE fk_product_stock IN (";
|
|
$sql .= "SELECT rowid FROM ".MAIN_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 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 ".MAIN_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) {
|
|
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';
|
|
}
|
|
}
|
|
|
|
// Delete from product_association
|
|
if (!$error) {
|
|
$sql = "DELETE FROM ".MAIN_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 ".MAIN_DB_PREFIX."product";
|
|
$sqlz .= " WHERE rowid = ".(int) $this->id;
|
|
|
|
$resultz = $this->db->query($sqlz);
|
|
if (!$resultz) {
|
|
$error++;
|
|
$this->errors[] = $this->db->lasterror();
|
|
}
|
|
}
|
|
|
|
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;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Update or add a translation for a product
|
|
*
|
|
* @param User $user Object user making update
|
|
* @return int <0 if KO, >0 if OK
|
|
*/
|
|
public function setMultiLangs($user)
|
|
{
|
|
global $conf, $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 ".MAIN_DB_PREFIX."product_lang";
|
|
$sql .= " WHERE fk_product=".$this->id;
|
|
$sql .= " AND lang='".$this->db->escape($key)."'";
|
|
|
|
$result = $this->db->query($sql);
|
|
|
|
if ($this->db->num_rows($result)) // if there is already a description line for this language
|
|
{
|
|
$sql2 = "UPDATE ".MAIN_DB_PREFIX."product_lang";
|
|
$sql2 .= " SET ";
|
|
$sql2 .= " label='".$this->db->escape($this->label)."',";
|
|
$sql2 .= " description='".$this->db->escape($this->description)."'";
|
|
if (!empty($conf->global->PRODUCT_USE_OTHER_FIELD_IN_TRANSLATION)) { $sql2 .= ", note='".$this->db->escape($this->other)."'";
|
|
}
|
|
$sql2 .= " WHERE fk_product=".$this->id." AND lang='".$this->db->escape($key)."'";
|
|
}
|
|
else
|
|
{
|
|
$sql2 = "INSERT INTO ".MAIN_DB_PREFIX."product_lang (fk_product, lang, label, description";
|
|
if (!empty($conf->global->PRODUCT_USE_OTHER_FIELD_IN_TRANSLATION)) { $sql2 .= ", note";
|
|
}
|
|
$sql2 .= ")";
|
|
$sql2 .= " VALUES(".$this->id.",'".$this->db->escape($key)."','".$this->db->escape($this->label)."',";
|
|
$sql2 .= " '".$this->db->escape($this->description)."'";
|
|
if (!empty($conf->global->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;
|
|
}
|
|
}
|
|
elseif (isset($this->multilangs[$key])) {
|
|
$sql = "SELECT rowid";
|
|
$sql .= " FROM ".MAIN_DB_PREFIX."product_lang";
|
|
$sql .= " WHERE fk_product=".$this->id;
|
|
$sql .= " AND lang='".$this->db->escape($key)."'";
|
|
|
|
$result = $this->db->query($sql);
|
|
|
|
if ($this->db->num_rows($result)) // if there is already a description line for this language
|
|
{
|
|
$sql2 = "UPDATE ".MAIN_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 (!empty($conf->global->PRODUCT_USE_OTHER_FIELD_IN_TRANSLATION)) {
|
|
$sql2 .= ", note='".$this->db->escape($this->multilangs["$key"]["other"])."'";
|
|
}
|
|
$sql2 .= " WHERE fk_product=".$this->id." AND lang='".$this->db->escape($key)."'";
|
|
}
|
|
else
|
|
{
|
|
$sql2 = "INSERT INTO ".MAIN_DB_PREFIX."product_lang (fk_product, lang, label, description";
|
|
if (!empty($conf->global->PRODUCT_USE_OTHER_FIELD_IN_TRANSLATION)) { $sql2 .= ", note";
|
|
}
|
|
$sql2 .= ")";
|
|
$sql2 .= " VALUES(".$this->id.",'".$this->db->escape($key)."','".$this->db->escape($this->multilangs["$key"]["label"])."',";
|
|
$sql2 .= " '".$this->db->escape($this->multilangs["$key"]["description"])."'";
|
|
if (!empty($conf->global->PRODUCT_USE_OTHER_FIELD_IN_TRANSLATION)) {
|
|
$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;
|
|
}
|
|
}
|
|
}
|
|
else
|
|
{
|
|
// language is not current language and we didn't provide a multilang description for this language
|
|
}
|
|
}
|
|
|
|
// 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;
|
|
}
|
|
|
|
/**
|
|
* Delete a language for this product
|
|
*
|
|
* @param string $langtodelete Language code to delete
|
|
* @param User $user Object user making delete
|
|
*
|
|
* @return int <0 if KO, >0 if OK
|
|
*/
|
|
public function delMultiLangs($langtodelete, $user)
|
|
{
|
|
$sql = "DELETE FROM ".MAIN_DB_PREFIX."product_lang";
|
|
$sql .= " WHERE fk_product=".$this->id." AND lang='".$this->db->escape($langtodelete)."'";
|
|
|
|
dol_syslog(get_class($this).'::delMultiLangs', LOG_DEBUG);
|
|
$result = $this->db->query($sql);
|
|
if ($result) {
|
|
// 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
|
|
return 1;
|
|
}
|
|
else
|
|
{
|
|
$this->error = $this->db->lasterror();
|
|
dol_syslog(get_class($this).'::delMultiLangs error='.$this->error, LOG_ERR);
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Sets an accountancy code for a product.
|
|
* Also calls PRODUCT_MODIFY trigger when modified
|
|
*
|
|
* @param string $type It can be 'buy', 'buy_intra', 'buy_export', 'sell', 'sell_intra' or 'sell_export'
|
|
* @param string $value Accountancy code
|
|
* @return int <0 KO >0 OK
|
|
*/
|
|
public function setAccountancyCode($type, $value)
|
|
{
|
|
global $user, $langs, $conf;
|
|
|
|
$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 ".MAIN_DB_PREFIX.$this->table_element." SET ";
|
|
$sql .= "$field = '".$this->db->escape($value)."'";
|
|
$sql .= " WHERE rowid = ".$this->id;
|
|
|
|
dol_syslog(__METHOD__." sql=".$sql, 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;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Load array this->multilangs
|
|
*
|
|
* @return int <0 if KO, >0 if OK
|
|
*/
|
|
public function getMultiLangs()
|
|
{
|
|
global $langs;
|
|
|
|
$current_lang = $langs->getDefaultLang();
|
|
|
|
$sql = "SELECT lang, label, description, note as other";
|
|
$sql .= " FROM ".MAIN_DB_PREFIX."product_lang";
|
|
$sql .= " WHERE fk_product=".$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["$obj->lang"]["label"] = $obj->label;
|
|
$this->multilangs["$obj->lang"]["description"] = $obj->description;
|
|
$this->multilangs["$obj->lang"]["other"] = $obj->other;
|
|
}
|
|
return 1;
|
|
}
|
|
else
|
|
{
|
|
$this->error = "Error: ".$this->db->lasterror()." - ".$sql;
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
|
|
|
|
// phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
|
|
/**
|
|
* Insert a track that we changed a customer price
|
|
*
|
|
* @param User $user User making change
|
|
* @param int $level price level to change
|
|
* @return int <0 if KO, >0 if OK
|
|
*/
|
|
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 ".MAIN_DB_PREFIX."product_price(price_level,date_price, fk_product, fk_user_author, 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 ? $level : 1).", '".$this->db->idate($now)."',".$this->id.",".$user->id.",".$this->price.",".$this->price_ttc.",'".$this->db->escape($this->price_base_type)."',".$this->status.",".$this->tva_tx.", ".($this->default_vat_code ? ("'".$this->db->escape($this->default_vat_code)."'") : "null").",".$this->tva_npr.",";
|
|
$sql .= " ".$this->localtax1_tx.", ".$this->localtax2_tx.", '".$this->db->escape($this->localtax1_type)."', '".$this->db->escape($this->localtax2_type)."', ".$this->price_min.",".$this->price_min_ttc.",".$this->price_by_qty.",".$conf->entity.",".($this->fk_price_expression > 0 ? $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
|
|
/**
|
|
* Delete a price line
|
|
*
|
|
* @param User $user Object user
|
|
* @param int $rowid Line id to delete
|
|
* @return int <0 if KO, >0 if OK
|
|
*/
|
|
public function log_price_delete($user, $rowid)
|
|
{
|
|
// phpcs:enable
|
|
$sql = "DELETE FROM ".MAIN_DB_PREFIX."product_price_by_qty";
|
|
$sql .= " WHERE fk_product_price=".$rowid;
|
|
$resql = $this->db->query($sql);
|
|
|
|
$sql = "DELETE FROM ".MAIN_DB_PREFIX."product_price";
|
|
$sql .= " WHERE rowid=".$rowid;
|
|
$resql = $this->db->query($sql);
|
|
if ($resql) {
|
|
return 1;
|
|
}
|
|
else
|
|
{
|
|
$this->error = $this->db->lasterror();
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
* Return price of sell of a product for a seller/buyer/product.
|
|
*
|
|
* @param Societe $thirdparty_seller Seller
|
|
* @param Societe $thirdparty_buyer Buyer
|
|
* @param int $pqp Id of product price per quantity if a selection was done of such a price
|
|
* @return array Array of price information array('pu_ht'=> , 'pu_ttc'=> , 'tva_tx'=>'X.Y (code)', ...), 'tva_npr'=>0, ...)
|
|
* @see get_buyprice(), find_min_price_product_fournisseur()
|
|
*/
|
|
public function getSellPrice($thirdparty_seller, $thirdparty_buyer, $pqp = 0)
|
|
{
|
|
global $conf, $db;
|
|
|
|
// 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_base_type = $this->price_base_type;
|
|
|
|
// If price per segment
|
|
if (!empty($conf->global->PRODUIT_MULTIPRICES) && !empty($thirdparty_buyer->price_level)) {
|
|
$pu_ht = $this->multiprices[$thirdparty_buyer->price_level];
|
|
$pu_ttc = $this->multiprices_ttc[$thirdparty_buyer->price_level];
|
|
$price_min = $this->multiprices_min[$thirdparty_buyer->price_level];
|
|
$price_base_type = $this->multiprices_base_type[$thirdparty_buyer->price_level];
|
|
if (!empty($conf->global->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;
|
|
}
|
|
}
|
|
// If price per customer
|
|
elseif (!empty($conf->global->PRODUIT_CUSTOMER_PRICES)) {
|
|
require_once DOL_DOCUMENT_ROOT.'/product/class/productcustomerprice.class.php';
|
|
|
|
$prodcustprice = new Productcustomerprice($db);
|
|
|
|
$filter = array('t.fk_product' => $this->id, 't.fk_soc' => $thirdparty_buyer->id);
|
|
|
|
$result = $prodcustprice->fetch_all('', '', 0, 0, $filter);
|
|
if ($result) {
|
|
if (count($prodcustprice->lines) > 0) {
|
|
$pu_ht = price($prodcustprice->lines[0]->price);
|
|
$pu_ttc = price($prodcustprice->lines[0]->price_ttc);
|
|
$price_base_type = $prodcustprice->lines[0]->price_base_type;
|
|
$tva_tx = $prodcustprice->lines[0]->tva_tx;
|
|
if ($prodcustprice->lines[0]->default_vat_code && !preg_match('/\(.*\)/', $tva_tx)) $tva_tx .= ' ('.$prodcustprice->lines[0]->default_vat_code.')';
|
|
$tva_npr = $prodcustprice->lines[0]->recuperableonly;
|
|
if (empty($tva_tx)) $tva_npr = 0;
|
|
}
|
|
}
|
|
}
|
|
// If price per quantity
|
|
elseif (!empty($conf->global->PRODUIT_CUSTOMER_PRICES_BY_QTY)) {
|
|
if ($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;
|
|
}
|
|
}
|
|
}
|
|
// If price per quantity and customer
|
|
elseif (!empty($conf->global->PRODUIT_CUSTOMER_PRICES_BY_QTY_MULTIPRICES)) {
|
|
if ($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_base_type'=>$price_base_type, 'tva_tx'=>$tva_tx, 'tva_npr'=>$tva_npr);
|
|
}
|
|
|
|
// phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
|
|
/**
|
|
* Read price used by a provider.
|
|
* We enter as input couple prodfournprice/qty or triplet qty/product_id/fourn_ref.
|
|
* This also set some properties on product like ->buyprice, ->fourn_pu, ...
|
|
*
|
|
* @param int $prodfournprice Id du tarif = rowid table product_fournisseur_price
|
|
* @param double $qty Quantity asked or -1 to get first entry found
|
|
* @param int $product_id Filter on a particular product id
|
|
* @param string $fourn_ref Filter on a supplier price ref. 'none' to exclude ref in search.
|
|
* @param int $fk_soc If of supplier
|
|
* @return int <-1 if KO, -1 if qty not enough, 0 if OK but nothing found, id_product if OK and found. May also initialize some properties like (->ref_supplier, buyprice, fourn_pu, vatrate_supplier...)
|
|
* @see getSellPrice(), find_min_price_product_fournisseur()
|
|
*/
|
|
public function get_buyprice($prodfournprice, $qty, $product_id = 0, $fourn_ref = '', $fk_soc = 0)
|
|
{
|
|
// phpcs:enable
|
|
global $conf;
|
|
$result = 0;
|
|
|
|
// We do a first seach 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,";
|
|
$sql .= " pfp.fk_product, pfp.ref_fourn, pfp.desc_fourn, pfp.fk_soc, pfp.tva_tx, pfp.fk_supplier_price_expression";
|
|
$sql .= " ,pfp.default_vat_code";
|
|
$sql .= " ,pfp.multicurrency_price, pfp.multicurrency_unitprice, pfp.multicurrency_tx, pfp.fk_multicurrency, pfp.multicurrency_code";
|
|
if (!empty($conf->global->PRODUCT_USE_SUPPLIER_PACKAGING)) $sql .= ", pfp.packaging";
|
|
$sql .= " FROM ".MAIN_DB_PREFIX."product_fournisseur_price as pfp";
|
|
$sql .= " WHERE pfp.rowid = ".$prodfournprice;
|
|
if ($qty > 0) { $sql .= " AND pfp.quantity <= ".$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 (!empty($conf->dynamicprices->enabled) && !empty($obj->fk_supplier_price_expression)) {
|
|
include_once DOL_DOCUMENT_ROOT.'/product/dynamic_price/class/price_parser.class.php';
|
|
$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;
|
|
$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_fourn; // deprecated
|
|
$this->ref_supplier = $obj->ref_fourn; // Ref supplier
|
|
$this->desc_supplier = $obj->desc_fourn; // 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 = $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 (!empty($conf->global->PRODUCT_USE_SUPPLIER_PACKAGING)) $this->packaging = $obj->packaging;
|
|
$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.fk_soc,";
|
|
$sql .= " pfp.fk_product, pfp.ref_fourn as ref_supplier, pfp.desc_fourn as desc_supplier, pfp.tva_tx, pfp.fk_supplier_price_expression";
|
|
$sql .= " ,pfp.default_vat_code";
|
|
$sql .= " ,pfp.multicurrency_price, pfp.multicurrency_unitprice, pfp.multicurrency_tx, pfp.fk_multicurrency, pfp.multicurrency_code";
|
|
if (!empty($conf->global->PRODUCT_USE_SUPPLIER_PACKAGING)) $sql .= ", pfp.packaging";
|
|
$sql .= " FROM ".MAIN_DB_PREFIX."product_fournisseur_price as pfp";
|
|
$sql .= " WHERE pfp.fk_product = ".$product_id;
|
|
if ($fourn_ref != 'none') { $sql .= " AND pfp.ref_fourn = '".$fourn_ref."'";
|
|
}
|
|
if ($fk_soc > 0) { $sql .= " AND pfp.fk_soc = ".$fk_soc;
|
|
}
|
|
if ($qty > 0) { $sql .= " AND pfp.quantity <= ".$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 (!empty($conf->dynamicprices->enabled) && !empty($obj->fk_supplier_price_expression)) {
|
|
include_once DOL_DOCUMENT_ROOT.'/product/dynamic_price/class/price_parser.class.php';
|
|
$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;
|
|
$priceparser = new PriceParser($this->db);
|
|
$price_result = $priceparser->parseProductSupplier($prod_supplier);
|
|
if ($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 = $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 (!empty($conf->global->PRODUCT_USE_SUPPLIER_PACKAGING)) $this->packaging = $obj->packaging;
|
|
$result = $obj->fk_product;
|
|
return $result;
|
|
}
|
|
else
|
|
{
|
|
return -1; // Ce produit n'existe pas avec cet id tarif fournisseur ou existe mais qte insuffisante, ni pour le couple produit/ref fournisseur dans la quantité.
|
|
}
|
|
}
|
|
else
|
|
{
|
|
$this->error = $this->db->lasterror();
|
|
return -3;
|
|
}
|
|
}
|
|
}
|
|
else
|
|
{
|
|
$this->error = $this->db->lasterror();
|
|
return -2;
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
* Modify customer price of a product/Service
|
|
*
|
|
* @param double $newprice New price
|
|
* @param string $newpricebase HT or TTC
|
|
* @param User $user Object user that make change
|
|
* @param double $newvat New VAT Rate (For example 8.5. Should not be a string)
|
|
* @param double $newminprice New price min
|
|
* @param int $level 0=standard, >0 = level if multilevel prices
|
|
* @param int $newnpr 0=Standard vat rate, 1=Special vat rate for French NPR VAT
|
|
* @param int $newpbq 1 if it has price by quantity
|
|
* @param int $ignore_autogen Used to avoid infinite loops
|
|
* @param array $localtaxes_array Array with localtaxes info array('0'=>type1,'1'=>rate1,'2'=>type2,'3'=>rate2) (loaded by getLocalTaxesFromRate(vatrate, 0, ...) function).
|
|
* @param string $newdefaultvatcode Default vat code
|
|
* @return int <0 if KO, >0 if OK
|
|
*/
|
|
public function updatePrice($newprice, $newpricebase, $user, $newvat = '', $newminprice = 0, $level = 0, $newnpr = 0, $newpbq = 0, $ignore_autogen = 0, $localtaxes_array = array(), $newdefaultvatcode = '')
|
|
{
|
|
global $conf, $langs;
|
|
|
|
$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;
|
|
}
|
|
if (empty($newnpr)) {
|
|
$newnpr = 0;
|
|
}
|
|
if (empty($newminprice)) {
|
|
$newminprice = 0;
|
|
}
|
|
if (empty($newminprice)) {
|
|
$newminprice = 0;
|
|
}
|
|
|
|
// Check parameters
|
|
if ($newvat == '') {
|
|
$newvat = $this->tva_tx;
|
|
}
|
|
|
|
// 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 ((!empty($conf->global->PRODUIT_MULTIPRICES) || !empty($conf->global->PRODUIT_CUSTOMER_PRICES_BY_QTY_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 !== '' || $newprice === 0) {
|
|
if ($newpricebase == 'TTC') {
|
|
$price_ttc = price2num($newprice, 'MU');
|
|
$price = price2num($newprice) / (1 + ($newvat / 100));
|
|
$price = price2num($price, 'MU');
|
|
|
|
if ($newminprice != '' || $newminprice == 0) {
|
|
$price_min_ttc = price2num($newminprice, 'MU');
|
|
$price_min = price2num($newminprice) / (1 + ($newvat / 100));
|
|
$price_min = price2num($price_min, 'MU');
|
|
}
|
|
else
|
|
{
|
|
$price_min = 0;
|
|
$price_min_ttc = 0;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
$price = price2num($newprice, 'MU');
|
|
$price_ttc = ($newnpr != 1) ? price2num($newprice) * (1 + ($newvat / 100)) : $price;
|
|
$price_ttc = price2num($price_ttc, 'MU');
|
|
|
|
if ($newminprice !== '' || $newminprice === 0) {
|
|
$price_min = price2num($newminprice, 'MU');
|
|
$price_min_ttc = price2num($newminprice) * (1 + ($newvat / 100));
|
|
$price_min_ttc = price2num($price_min_ttc, 'MU');
|
|
//print 'X'.$newminprice.'-'.$price_min;
|
|
}
|
|
else
|
|
{
|
|
$price_min = 0;
|
|
$price_min_ttc = 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 // old method. deprecated because ot can't retreive 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();
|
|
|
|
// Ne pas mettre de quote sur les numeriques decimaux.
|
|
// Ceci provoque des stockages avec arrondis en base au lieu des valeurs exactes.
|
|
$sql = "UPDATE ".MAIN_DB_PREFIX."product SET";
|
|
$sql .= " price_base_type='".$newpricebase."',";
|
|
$sql .= " price=".$price.",";
|
|
$sql .= " price_ttc=".$price_ttc.",";
|
|
$sql .= " price_min=".$price_min.",";
|
|
$sql .= " price_min_ttc=".$price_min_ttc.",";
|
|
$sql .= " localtax1_tx=".($localtax1 >= 0 ? $localtax1 : 'NULL').",";
|
|
$sql .= " localtax2_tx=".($localtax2 >= 0 ? $localtax2 : 'NULL').",";
|
|
$sql .= " localtax1_type=".($localtaxtype1 != '' ? "'".$localtaxtype1."'" : "'0'").",";
|
|
$sql .= " localtax2_type=".($localtaxtype2 != '' ? "'".$localtaxtype2."'" : "'0'").",";
|
|
$sql .= " default_vat_code=".($newdefaultvatcode ? "'".$this->db->escape($newdefaultvatcode)."'" : "null").",";
|
|
$sql .= " tva_tx='".price2num($newvat)."',";
|
|
$sql .= " recuperableonly='".$newnpr."'";
|
|
$sql .= " WHERE rowid = ".$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;
|
|
|
|
$this->price = $price;
|
|
$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;
|
|
|
|
$this->_log_price($user, $level); // Save price for level into table product_price
|
|
|
|
$this->level = $level; // Store level of price edited for trigger
|
|
|
|
// Call trigger
|
|
$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();
|
|
dol_print_error($this->db);
|
|
}
|
|
}
|
|
|
|
return 1;
|
|
}
|
|
|
|
/**
|
|
* Sets the supplier price expression
|
|
*
|
|
* @param int $expression_id Expression
|
|
* @return int <0 if KO, >0 if OK
|
|
* @deprecated Use Product::update instead
|
|
*/
|
|
public function setPriceExpression($expression_id)
|
|
{
|
|
global $user;
|
|
|
|
$this->fk_price_expression = $expression_id;
|
|
|
|
return $this->update($this->id, $user);
|
|
}
|
|
|
|
/**
|
|
* Load a product in memory from database
|
|
*
|
|
* @param int $id Id of product/service to load
|
|
* @param string $ref Ref of product/service to load
|
|
* @param string $ref_ext Ref ext of product/service to load
|
|
* @param string $barcode Barcode of product/service to load
|
|
* @param int $ignore_expression Ignores the math expression for calculating price and uses the db value instead
|
|
* @param int $ignore_price_load Load product without loading prices arrays (when we are sure we don't need them)
|
|
* @param int $ignore_lang_load Load product without loading language arrays (when we are sure we don't need them)
|
|
* @return int <0 if KO, 0 if not found, >0 if OK
|
|
*/
|
|
public function fetch($id = '', $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 $langs, $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);
|
|
return -1;
|
|
}
|
|
|
|
$sql = "SELECT rowid, ref, ref_ext, label, description, url, note as note_private, customcode, fk_country, price, price_ttc,";
|
|
$sql .= " price_min, price_min_ttc, price_base_type, cost_price, default_vat_code, tva_tx, recuperableonly as tva_npr, localtax1_tx, localtax2_tx, localtax1_type, localtax2_type, tosell,";
|
|
$sql .= " tobuy, fk_product_type, duration, fk_default_warehouse, seuil_stock_alerte, canvas, net_measure, net_measure_units, weight, weight_units,";
|
|
$sql .= " length, length_units, width, width_units, height, height_units,";
|
|
$sql .= " surface, surface_units, volume, volume_units, barcode, fk_barcode_type, finished,";
|
|
$sql .= " accountancy_code_buy, accountancy_code_buy_intra, accountancy_code_buy_export,";
|
|
$sql .= " accountancy_code_sell, accountancy_code_sell_intra, accountancy_code_sell_export, stock, pmp,";
|
|
$sql .= " datec, tms, import_key, entity, desiredstock, tobatch, fk_unit,";
|
|
$sql .= " fk_price_expression, price_autogen";
|
|
$sql .= " FROM ".MAIN_DB_PREFIX."product";
|
|
if ($id) {
|
|
$sql .= " WHERE rowid = ".(int) $id;
|
|
} else {
|
|
$sql .= " WHERE entity IN (".getEntity($this->element).")";
|
|
if ($ref) {
|
|
$sql .= " AND ref = '".$this->db->escape($ref)."'";
|
|
} elseif ($ref_ext) {
|
|
$sql .= " AND ref_ext = '".$this->db->escape($ref_ext)."'";
|
|
} elseif ($barcode) {
|
|
$sql .= " AND barcode = '".$this->db->escape($barcode)."'";
|
|
}
|
|
}
|
|
|
|
$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_private = $obj->note_private;
|
|
$this->note = $obj->note_private; // deprecated
|
|
|
|
$this->type = $obj->fk_product_type;
|
|
$this->status = $obj->tosell;
|
|
$this->status_buy = $obj->tobuy;
|
|
$this->status_batch = $obj->tobatch;
|
|
|
|
$this->customcode = $obj->customcode;
|
|
$this->country_id = $obj->fk_country;
|
|
$this->country_code = getCountry($this->country_id, 2, $this->db);
|
|
$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 = $obj->price_base_type;
|
|
$this->cost_price = $obj->cost_price;
|
|
$this->default_vat_code = $obj->default_vat_code;
|
|
$this->tva_tx = $obj->tva_tx;
|
|
//! French VAT NPR
|
|
$this->tva_npr = $obj->tva_npr;
|
|
$this->recuperableonly = $obj->tva_npr; // For backward compatibility
|
|
//! Local taxes
|
|
$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->duration = $obj->duration;
|
|
$this->duration_value = substr($obj->duration, 0, dol_strlen($obj->duration) - 1);
|
|
$this->duration_unit = substr($obj->duration, -1);
|
|
$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 = $obj->weight_units;
|
|
$this->length = $obj->length;
|
|
$this->length_units = $obj->length_units;
|
|
$this->width = $obj->width;
|
|
$this->width_units = $obj->width_units;
|
|
$this->height = $obj->height;
|
|
$this->height_units = $obj->height_units;
|
|
|
|
$this->surface = $obj->surface;
|
|
$this->surface_units = $obj->surface_units;
|
|
$this->volume = $obj->volume;
|
|
$this->volume_units = $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->seuil_stock_alerte = $obj->seuil_stock_alerte;
|
|
$this->desiredstock = $obj->desiredstock;
|
|
$this->stock_reel = $obj->stock;
|
|
$this->pmp = $obj->pmp;
|
|
|
|
$this->date_creation = $obj->datec;
|
|
$this->date_modification = $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->db->free($resql);
|
|
|
|
// Retreive all extrafield
|
|
// fetch optionals attributes and labels
|
|
$this->fetch_optionals();
|
|
|
|
// multilangs
|
|
if (!empty($conf->global->MAIN_MULTILANGS) && empty($ignore_lang_load)) {
|
|
$this->getMultiLangs();
|
|
}
|
|
|
|
// Load multiprices array
|
|
if (!empty($conf->global->PRODUIT_MULTIPRICES) && empty($ignore_price_load)) // prices per segment
|
|
{
|
|
for ($i = 1; $i <= $conf->global->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 ".MAIN_DB_PREFIX."product_price";
|
|
$sql .= " WHERE entity IN (".getEntity('productprice').")";
|
|
$sql .= " AND price_level=".$i;
|
|
$sql .= " AND fk_product = ".$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);
|
|
|
|
$this->multiprices[$i] = $result["price"];
|
|
$this->multiprices_ttc[$i] = $result["price_ttc"];
|
|
$this->multiprices_min[$i] = $result["price_min"];
|
|
$this->multiprices_min_ttc[$i] = $result["price_min_ttc"];
|
|
$this->multiprices_base_type[$i] = $result["price_base_type"];
|
|
// Next two fields are used only if PRODUIT_MULTIPRICES_USE_VAT_PER_LEVEL is on
|
|
$this->multiprices_tva_tx[$i] = $result["tva_tx"]; // TODO Add ' ('.$result['default_vat_code'].')'
|
|
$this->multiprices_recuperableonly[$i] = $result["recuperableonly"];
|
|
|
|
// Price by quantity
|
|
/*
|
|
$this->prices_by_qty[$i]=$result["price_by_qty"];
|
|
$this->prices_by_qty_id[$i]=$result["rowid"];
|
|
// Récuperation de la liste des prix selon qty si flag positionné
|
|
if ($this->prices_by_qty[$i] == 1)
|
|
{
|
|
$sql = "SELECT rowid, price, unitprice, quantity, remise_percent, remise, price_base_type";
|
|
$sql.= " FROM ".MAIN_DB_PREFIX."product_price_by_qty";
|
|
$sql.= " WHERE fk_product_price = ".$this->prices_by_qty_id[$i];
|
|
$sql.= " ORDER BY quantity ASC";
|
|
$resultat=array();
|
|
$resql = $this->db->query($sql);
|
|
if ($resql)
|
|
{
|
|
$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
|
|
{
|
|
dol_print_error($this->db);
|
|
return -1;
|
|
}
|
|
}
|
|
}
|
|
elseif (!empty($conf->global->PRODUIT_CUSTOMER_PRICES) && empty($ignore_price_load)) // prices per customers
|
|
{
|
|
// Nothing loaded by default. List may be very long.
|
|
}
|
|
elseif (!empty($conf->global->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 ".MAIN_DB_PREFIX."product_price";
|
|
$sql .= " WHERE fk_product = ".$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);
|
|
|
|
// Price by quantity
|
|
$this->prices_by_qty[0] = $result["price_by_qty"];
|
|
$this->prices_by_qty_id[0] = $result["rowid"];
|
|
// Récuperation de la liste des prix selon qty si flag positionné
|
|
if ($this->prices_by_qty[0] == 1) {
|
|
$sql = "SELECT rowid,price, unitprice, quantity, remise_percent, remise, remise, price_base_type";
|
|
$sql .= " FROM ".MAIN_DB_PREFIX."product_price_by_qty";
|
|
$sql .= " WHERE fk_product_price = ".$this->prices_by_qty_id[0];
|
|
$sql .= " ORDER BY quantity ASC";
|
|
$resultat = array();
|
|
$resql = $this->db->query($sql);
|
|
if ($resql) {
|
|
$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
|
|
{
|
|
dol_print_error($this->db);
|
|
return -1;
|
|
}
|
|
}
|
|
}
|
|
else
|
|
{
|
|
dol_print_error($this->db);
|
|
return -1;
|
|
}
|
|
}
|
|
elseif (!empty($conf->global->PRODUIT_CUSTOMER_PRICES_BY_QTY_MULTIPRICES) && empty($ignore_price_load)) // prices per customer and quantity
|
|
{
|
|
for ($i = 1; $i <= $conf->global->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 ".MAIN_DB_PREFIX."product_price";
|
|
$sql .= " WHERE entity IN (".getEntity('productprice').")";
|
|
$sql .= " AND price_level=".$i;
|
|
$sql .= " AND fk_product = ".$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);
|
|
|
|
$this->multiprices[$i] = $result["price"];
|
|
$this->multiprices_ttc[$i] = $result["price_ttc"];
|
|
$this->multiprices_min[$i] = $result["price_min"];
|
|
$this->multiprices_min_ttc[$i] = $result["price_min_ttc"];
|
|
$this->multiprices_base_type[$i] = $result["price_base_type"];
|
|
// Next two fields are used only if PRODUIT_MULTIPRICES_USE_VAT_PER_LEVEL is on
|
|
$this->multiprices_tva_tx[$i] = $result["tva_tx"]; // TODO Add ' ('.$result['default_vat_code'].')'
|
|
$this->multiprices_recuperableonly[$i] = $result["recuperableonly"];
|
|
|
|
// Price by quantity
|
|
$this->prices_by_qty[$i] = $result["price_by_qty"];
|
|
$this->prices_by_qty_id[$i] = $result["rowid"];
|
|
// Récuperation de la liste des prix selon qty si flag positionné
|
|
if ($this->prices_by_qty[$i] == 1) {
|
|
$sql = "SELECT rowid, price, unitprice, quantity, remise_percent, remise, price_base_type";
|
|
$sql .= " FROM ".MAIN_DB_PREFIX."product_price_by_qty";
|
|
$sql .= " WHERE fk_product_price = ".$this->prices_by_qty_id[$i];
|
|
$sql .= " ORDER BY quantity ASC";
|
|
$resultat = array();
|
|
$resql = $this->db->query($sql);
|
|
if ($resql) {
|
|
$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
|
|
{
|
|
dol_print_error($this->db);
|
|
return -1;
|
|
}
|
|
}
|
|
}
|
|
|
|
if (!empty($conf->dynamicprices->enabled) && !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 = price2num($this->price) * (1 + ($this->tva_tx / 100));
|
|
$this->price_ttc = 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
|
|
{
|
|
dol_print_error($this->db);
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
|
|
// phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
|
|
/**
|
|
* Charge tableau des stats propale pour le produit/service
|
|
*
|
|
* @param int $socid Id societe
|
|
* @return integer Tableau des stats dans $this->stats_propale, <0 if ko >0 if ok
|
|
*/
|
|
public function load_stats_propale($socid = 0)
|
|
{
|
|
// phpcs:enable
|
|
global $conf, $user, $hookmanager;
|
|
|
|
$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 ".MAIN_DB_PREFIX."propaldet as pd";
|
|
$sql .= ", ".MAIN_DB_PREFIX."propal as p";
|
|
$sql .= ", ".MAIN_DB_PREFIX."societe as s";
|
|
if (!$user->rights->societe->client->voir && !$socid) {
|
|
$sql .= ", ".MAIN_DB_PREFIX."societe_commerciaux as sc";
|
|
}
|
|
$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 = ".$this->id;
|
|
if (!$user->rights->societe->client->voir && !$socid) {
|
|
$sql .= " AND p.fk_soc = sc.fk_soc AND sc.fk_user = ".$user->id;
|
|
}
|
|
//$sql.= " AND pr.fk_statut != 0";
|
|
if ($socid > 0) {
|
|
$sql .= " AND p.fk_soc = ".$socid;
|
|
}
|
|
|
|
$result = $this->db->query($sql);
|
|
if ($result) {
|
|
$obj = $this->db->fetch_object($result);
|
|
$this->stats_propale['customers'] = $obj->nb_customers;
|
|
$this->stats_propale['nb'] = $obj->nb;
|
|
$this->stats_propale['rows'] = $obj->nb_rows;
|
|
$this->stats_propale['qty'] = $obj->qty ? $obj->qty : 0;
|
|
|
|
// if it's a virtual product, maybe it is in proposal by extension
|
|
if (!empty($conf->global->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_propale($socid);
|
|
|
|
$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
|
|
/**
|
|
* Charge tableau des stats propale pour le produit/service
|
|
*
|
|
* @param int $socid Id thirdparty
|
|
* @return array Tableau des stats
|
|
*/
|
|
public function load_stats_proposal_supplier($socid = 0)
|
|
{
|
|
// phpcs:enable
|
|
global $conf, $user, $hookmanager;
|
|
|
|
$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 ".MAIN_DB_PREFIX."supplier_proposaldet as pd";
|
|
$sql .= ", ".MAIN_DB_PREFIX."supplier_proposal as p";
|
|
$sql .= ", ".MAIN_DB_PREFIX."societe as s";
|
|
if (!$user->rights->societe->client->voir && !$socid) { $sql .= ", ".MAIN_DB_PREFIX."societe_commerciaux as sc";
|
|
}
|
|
$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 = ".$this->id;
|
|
if (!$user->rights->societe->client->voir && !$socid) { $sql .= " AND p.fk_soc = sc.fk_soc AND sc.fk_user = ".$user->id;
|
|
}
|
|
//$sql.= " AND pr.fk_statut != 0";
|
|
if ($socid > 0) { $sql .= " AND p.fk_soc = ".$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
|
|
/**
|
|
* Charge tableau des stats commande client pour le produit/service
|
|
*
|
|
* @param int $socid Id societe pour filtrer sur une societe
|
|
* @param string $filtrestatut Id statut pour filtrer sur un statut
|
|
* @param int $forVirtualStock Ignore rights filter for virtual stock calculation.
|
|
* @return integer Array of stats in $this->stats_commande (nb=nb of order, qty=qty ordered), <0 if ko or >0 if ok
|
|
*/
|
|
public function load_stats_commande($socid = 0, $filtrestatut = '', $forVirtualStock = 0)
|
|
{
|
|
// phpcs:enable
|
|
global $conf, $user, $hookmanager;
|
|
|
|
$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 ".MAIN_DB_PREFIX."commandedet as cd";
|
|
$sql .= ", ".MAIN_DB_PREFIX."commande as c";
|
|
$sql .= ", ".MAIN_DB_PREFIX."societe as s";
|
|
if (!$user->rights->societe->client->voir && !$socid && !$forVirtualStock) {
|
|
$sql .= ", ".MAIN_DB_PREFIX."societe_commerciaux as sc";
|
|
}
|
|
$sql .= " WHERE c.rowid = cd.fk_commande";
|
|
$sql .= " AND c.fk_soc = s.rowid";
|
|
$sql .= " AND c.entity IN (".getEntity('commande').")";
|
|
$sql .= " AND cd.fk_product = ".$this->id;
|
|
if (!$user->rights->societe->client->voir && !$socid && !$forVirtualStock) {
|
|
$sql .= " AND c.fk_soc = sc.fk_soc AND sc.fk_user = ".$user->id;
|
|
}
|
|
if ($socid > 0) {
|
|
$sql .= " AND c.fk_soc = ".$socid;
|
|
}
|
|
if ($filtrestatut <> '') {
|
|
$sql .= " AND c.fk_statut in (".$filtrestatut.")";
|
|
}
|
|
|
|
$result = $this->db->query($sql);
|
|
if ($result) {
|
|
$obj = $this->db->fetch_object($result);
|
|
$this->stats_commande['customers'] = $obj->nb_customers;
|
|
$this->stats_commande['nb'] = $obj->nb;
|
|
$this->stats_commande['rows'] = $obj->nb_rows;
|
|
$this->stats_commande['qty'] = $obj->qty ? $obj->qty : 0;
|
|
|
|
// if it's a virtual product, maybe it is in order by extension
|
|
if (!empty($conf->global->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 theorical stock continue to
|
|
// count the orders to ship in theorical stock when some are already removed b invoice validation.
|
|
// If option DECREASE_ONLY_UNINVOICEDPRODUCTS is on, we make a compensation.
|
|
if (!empty($conf->global->STOCK_CALCULATE_ON_BILL)) {
|
|
if (!empty($conf->global->DECREASE_ONLY_UNINVOICEDPRODUCTS)) {
|
|
$adeduire = 0;
|
|
$sql = "SELECT sum(fd.qty) as count FROM ".MAIN_DB_PREFIX."facturedet fd ";
|
|
$sql .= " JOIN ".MAIN_DB_PREFIX."facture f ON fd.fk_facture = f.rowid ";
|
|
$sql .= " JOIN ".MAIN_DB_PREFIX."element_element el ON el.fk_target = f.rowid and el.targettype = 'facture' and sourcetype = 'commande'";
|
|
$sql .= " JOIN ".MAIN_DB_PREFIX."commande c ON el.fk_source = c.rowid ";
|
|
$sql .= " WHERE c.fk_statut IN (".$filtrestatut.") AND c.facture = 0 AND fd.fk_product = ".$this->id;
|
|
dol_syslog(__METHOD__.":: sql $sql", LOG_NOTICE);
|
|
|
|
$resql = $this->db->query($sql);
|
|
if ($resql) {
|
|
if ($this->db->num_rows($resql) > 0) {
|
|
$obj = $this->db->fetch_object($resql);
|
|
$adeduire += $obj->count;
|
|
}
|
|
}
|
|
|
|
$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
|
|
/**
|
|
* Charge tableau des stats commande fournisseur pour le produit/service
|
|
*
|
|
* @param int $socid Id societe pour filtrer sur une societe
|
|
* @param string $filtrestatut Id des statuts pour filtrer sur des statuts
|
|
* @param int $forVirtualStock Ignore rights filter for virtual stock calculation.
|
|
* @return array Tableau des stats
|
|
*/
|
|
public function load_stats_commande_fournisseur($socid = 0, $filtrestatut = '', $forVirtualStock = 0)
|
|
{
|
|
// phpcs:enable
|
|
global $conf, $user, $hookmanager;
|
|
|
|
$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 ".MAIN_DB_PREFIX."commande_fournisseurdet as cd";
|
|
$sql .= ", ".MAIN_DB_PREFIX."commande_fournisseur as c";
|
|
$sql .= ", ".MAIN_DB_PREFIX."societe as s";
|
|
if (!$user->rights->societe->client->voir && !$socid && !$forVirtualStock) {
|
|
$sql .= ", ".MAIN_DB_PREFIX."societe_commerciaux as sc";
|
|
}
|
|
$sql .= " WHERE c.rowid = cd.fk_commande";
|
|
$sql .= " AND c.fk_soc = s.rowid";
|
|
$sql .= " AND c.entity IN (".getEntity('supplier_order').")";
|
|
$sql .= " AND cd.fk_product = ".$this->id;
|
|
if (!$user->rights->societe->client->voir && !$socid && !$forVirtualStock) {
|
|
$sql .= " AND c.fk_soc = sc.fk_soc AND sc.fk_user = ".$user->id;
|
|
}
|
|
if ($socid > 0) {
|
|
$sql .= " AND c.fk_soc = ".$socid;
|
|
}
|
|
if ($filtrestatut != '') {
|
|
$sql .= " AND c.fk_statut in (".$filtrestatut.")"; // Peut valoir 0
|
|
}
|
|
|
|
$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
|
|
/**
|
|
* Charge tableau des stats expedition client pour le produit/service
|
|
*
|
|
* @param int $socid Id societe pour filtrer sur une societe
|
|
* @param string $filtrestatut [=''] Ids order status separated by comma
|
|
* @param int $forVirtualStock Ignore rights filter for virtual stock calculation.
|
|
* @param string $filterShipmentStatus [=''] Ids shipment status separated by comma
|
|
* @return int <0 if KO, >0 if OK (Tableau des stats)
|
|
*/
|
|
public function load_stats_sending($socid = 0, $filtrestatut = '', $forVirtualStock = 0, $filterShipmentStatus = '')
|
|
{
|
|
// phpcs:enable
|
|
global $conf, $user, $hookmanager;
|
|
|
|
$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 ".MAIN_DB_PREFIX."expeditiondet as ed";
|
|
$sql .= ", ".MAIN_DB_PREFIX."commandedet as cd";
|
|
$sql .= ", ".MAIN_DB_PREFIX."commande as c";
|
|
$sql .= ", ".MAIN_DB_PREFIX."expedition as e";
|
|
$sql .= ", ".MAIN_DB_PREFIX."societe as s";
|
|
if (!$user->rights->societe->client->voir && !$socid && !$forVirtualStock) {
|
|
$sql .= ", ".MAIN_DB_PREFIX."societe_commerciaux as sc";
|
|
}
|
|
$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('expedition').")";
|
|
$sql .= " AND ed.fk_origin_line = cd.rowid";
|
|
$sql .= " AND cd.fk_product = ".$this->id;
|
|
if (!$user->rights->societe->client->voir && !$socid && !$forVirtualStock) {
|
|
$sql .= " AND e.fk_soc = sc.fk_soc AND sc.fk_user = ".$user->id;
|
|
}
|
|
if ($socid > 0) {
|
|
$sql .= " AND e.fk_soc = ".$socid;
|
|
}
|
|
if ($filtrestatut <> '') {
|
|
$sql .= " AND c.fk_statut in (".$filtrestatut.")";
|
|
}
|
|
if (!empty($filterShipmentStatus)) $sql .= " AND e.fk_statut IN (".$filterShipmentStatus.")";
|
|
|
|
$result = $this->db->query($sql);
|
|
if ($result) {
|
|
$obj = $this->db->fetch_object($result);
|
|
$this->stats_expedition['customers'] = $obj->nb_customers;
|
|
$this->stats_expedition['nb'] = $obj->nb;
|
|
$this->stats_expedition['rows'] = $obj->nb_rows;
|
|
$this->stats_expedition['qty'] = $obj->qty ? $obj->qty : 0;
|
|
|
|
// if it's a virtual product, maybe it is in sending by extension
|
|
if (!empty($conf->global->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);
|
|
|
|
$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
|
|
/**
|
|
* Charge tableau des stats réception fournisseur pour le produit/service
|
|
*
|
|
* @param int $socid Id societe pour filtrer sur une societe
|
|
* @param string $filtrestatut Id statut pour filtrer sur un statut
|
|
* @param int $forVirtualStock Ignore rights filter for virtual stock calculation.
|
|
* @return array Tableau des stats
|
|
*/
|
|
public function load_stats_reception($socid = 0, $filtrestatut = '', $forVirtualStock = 0)
|
|
{
|
|
// phpcs:enable
|
|
global $conf, $user, $hookmanager;
|
|
|
|
$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 ".MAIN_DB_PREFIX."commande_fournisseur_dispatch as fd";
|
|
$sql .= ", ".MAIN_DB_PREFIX."commande_fournisseur as cf";
|
|
$sql .= ", ".MAIN_DB_PREFIX."societe as s";
|
|
if (!$user->rights->societe->client->voir && !$socid && !$forVirtualStock) { $sql .= ", ".MAIN_DB_PREFIX."societe_commerciaux as sc";
|
|
}
|
|
$sql .= " WHERE cf.rowid = fd.fk_commande";
|
|
$sql .= " AND cf.fk_soc = s.rowid";
|
|
$sql .= " AND cf.entity IN (".getEntity('supplier_order').")";
|
|
$sql .= " AND fd.fk_product = ".$this->id;
|
|
if (!$user->rights->societe->client->voir && !$socid && !$forVirtualStock) { $sql .= " AND cf.fk_soc = sc.fk_soc AND sc.fk_user = ".$user->id;
|
|
}
|
|
if ($socid > 0) { $sql .= " AND cf.fk_soc = ".$socid;
|
|
}
|
|
if ($filtrestatut <> '') { $sql .= " AND cf.fk_statut in (".$filtrestatut.")";
|
|
}
|
|
|
|
$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
|
|
/**
|
|
* Charge tableau des stats commande client pour le produit/service
|
|
*
|
|
* @param int $socid Id societe pour filtrer sur une societe
|
|
* @param string $filtrestatut Id statut pour filtrer sur un statut
|
|
* @param int $forVirtualStock Ignore rights filter for virtual stock calculation.
|
|
* @return integer Array of stats in $this->stats_commande (nb=nb of order, qty=qty ordered), <0 if ko or >0 if ok
|
|
*/
|
|
public function load_stats_inproduction($socid = 0, $filtrestatut = '', $forVirtualStock = 0)
|
|
{
|
|
// phpcs:enable
|
|
global $conf, $user, $hookmanager;
|
|
|
|
$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 ".MAIN_DB_PREFIX."mrp_production as mp";
|
|
$sql .= ", ".MAIN_DB_PREFIX."mrp_mo as m";
|
|
$sql .= " LEFT JOIN ".MAIN_DB_PREFIX."societe as s ON s.rowid = m.fk_soc";
|
|
if (!$user->rights->societe->client->voir && !$socid && !$forVirtualStock) {
|
|
$sql .= ", ".MAIN_DB_PREFIX."societe_commerciaux as sc";
|
|
}
|
|
$sql .= " WHERE m.rowid = mp.fk_mo";
|
|
$sql .= " AND m.entity IN (".getEntity('mrp').")";
|
|
$sql .= " AND mp.fk_product = ".$this->id;
|
|
if (!$user->rights->societe->client->voir && !$socid && !$forVirtualStock) {
|
|
$sql .= " AND m.fk_soc = sc.fk_soc AND sc.fk_user = ".$user->id;
|
|
}
|
|
if ($socid > 0) {
|
|
$sql .= " AND m.fk_soc = ".$socid;
|
|
}
|
|
if ($filtrestatut <> '') {
|
|
$sql .= " AND m.status in (".$filtrestatut.")";
|
|
}
|
|
$sql .= " GROUP BY role";
|
|
|
|
$this->stats_mrptoconsume['customers'] = 0;
|
|
$this->stats_mrptoconsume['nb'] = 0;
|
|
$this->stats_mrptoconsume['rows'] = 0;
|
|
$this->stats_mrptoconsume['qty'] = 0;
|
|
$this->stats_mrptoproduce['customers'] = 0;
|
|
$this->stats_mrptoproduce['nb'] = 0;
|
|
$this->stats_mrptoproduce['rows'] = 0;
|
|
$this->stats_mrptoproduce['qty'] = 0;
|
|
|
|
$result = $this->db->query($sql);
|
|
if ($result) {
|
|
while ($obj = $this->db->fetch_object($result)) {
|
|
if ($obj->role == 'toconsume') {
|
|
$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 ? $obj->qty : 0);
|
|
}
|
|
if ($obj->role == 'consumed') {
|
|
//$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 ? $obj->qty : 0);
|
|
}
|
|
if ($obj->role == 'toproduce') {
|
|
$this->stats_mrptoproduce['customers'] += $obj->nb_customers;
|
|
$this->stats_mrptoproduce['nb'] += $obj->nb;
|
|
$this->stats_mrptoproduce['rows'] += $obj->nb_rows;
|
|
$this->stats_mrptoproduce['qty'] += ($obj->qty ? $obj->qty : 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;
|
|
$this->stats_mrptoproduce['qty'] -= ($obj->qty ? $obj->qty : 0);
|
|
}
|
|
}
|
|
|
|
// Clean data
|
|
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
|
|
/**
|
|
* Charge tableau des stats contrat pour le produit/service
|
|
*
|
|
* @param int $socid Id societe
|
|
* @return array Tableau des stats
|
|
*/
|
|
public function load_stats_contrat($socid = 0)
|
|
{
|
|
// phpcs:enable
|
|
global $conf, $user, $hookmanager;
|
|
|
|
$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 ".MAIN_DB_PREFIX."contratdet as cd";
|
|
$sql .= ", ".MAIN_DB_PREFIX."contrat as c";
|
|
$sql .= ", ".MAIN_DB_PREFIX."societe as s";
|
|
if (!$user->rights->societe->client->voir && !$socid) {
|
|
$sql .= ", ".MAIN_DB_PREFIX."societe_commerciaux as sc";
|
|
}
|
|
$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 = ".$this->id;
|
|
if (!$user->rights->societe->client->voir && !$socid) {
|
|
$sql .= " AND c.fk_soc = sc.fk_soc AND sc.fk_user = ".$user->id;
|
|
}
|
|
//$sql.= " AND c.statut != 0";
|
|
if ($socid > 0) {
|
|
$sql .= " AND c.fk_soc = ".$socid;
|
|
}
|
|
|
|
$result = $this->db->query($sql);
|
|
if ($result) {
|
|
$obj = $this->db->fetch_object($result);
|
|
$this->stats_contrat['customers'] = $obj->nb_customers;
|
|
$this->stats_contrat['nb'] = $obj->nb;
|
|
$this->stats_contrat['rows'] = $obj->nb_rows;
|
|
$this->stats_contrat['qty'] = $obj->qty ? $obj->qty : 0;
|
|
|
|
// if it's a virtual product, maybe it is in contract by extension
|
|
if (!empty($conf->global->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);
|
|
|
|
$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
|
|
/**
|
|
* Charge tableau des stats facture pour le produit/service
|
|
*
|
|
* @param int $socid Id societe
|
|
* @return array Tableau des stats
|
|
*/
|
|
public function load_stats_facture($socid = 0)
|
|
{
|
|
// phpcs:enable
|
|
global $db, $conf, $user, $hookmanager;
|
|
|
|
$sql = "SELECT COUNT(DISTINCT f.fk_soc) as nb_customers, COUNT(DISTINCT f.rowid) as nb,";
|
|
$sql .= " COUNT(fd.rowid) as nb_rows, SUM(".$db->ifsql('f.type != 2', 'fd.qty', 'fd.qty * -1').") as qty";
|
|
$sql .= " FROM ".MAIN_DB_PREFIX."facturedet as fd";
|
|
$sql .= ", ".MAIN_DB_PREFIX."facture as f";
|
|
$sql .= ", ".MAIN_DB_PREFIX."societe as s";
|
|
if (!$user->rights->societe->client->voir && !$socid) {
|
|
$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 = ".$this->id;
|
|
if (!$user->rights->societe->client->voir && !$socid) {
|
|
$sql .= " AND f.fk_soc = sc.fk_soc AND sc.fk_user = ".$user->id;
|
|
}
|
|
//$sql.= " AND f.fk_statut != 0";
|
|
if ($socid > 0) {
|
|
$sql .= " AND f.fk_soc = ".$socid;
|
|
}
|
|
|
|
$result = $this->db->query($sql);
|
|
if ($result) {
|
|
$obj = $this->db->fetch_object($result);
|
|
$this->stats_facture['customers'] = $obj->nb_customers;
|
|
$this->stats_facture['nb'] = $obj->nb;
|
|
$this->stats_facture['rows'] = $obj->nb_rows;
|
|
$this->stats_facture['qty'] = $obj->qty ? $obj->qty : 0;
|
|
|
|
// if it's a virtual product, maybe it is in invoice by extension
|
|
if (!empty($conf->global->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_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
|
|
/**
|
|
* Charge tableau des stats facture pour le produit/service
|
|
*
|
|
* @param int $socid Id societe
|
|
* @return array Tableau des stats
|
|
*/
|
|
public function load_stats_facture_fournisseur($socid = 0)
|
|
{
|
|
// phpcs:enable
|
|
global $conf, $user, $hookmanager;
|
|
|
|
$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 as fd";
|
|
$sql .= ", ".MAIN_DB_PREFIX."facture_fourn as f";
|
|
$sql .= ", ".MAIN_DB_PREFIX."societe as s";
|
|
if (!$user->rights->societe->client->voir && !$socid) {
|
|
$sql .= ", ".MAIN_DB_PREFIX."societe_commerciaux as sc";
|
|
}
|
|
$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 = ".$this->id;
|
|
if (!$user->rights->societe->client->voir && !$socid) {
|
|
$sql .= " AND f.fk_soc = sc.fk_soc AND sc.fk_user = ".$user->id;
|
|
}
|
|
//$sql.= " AND f.fk_statut != 0";
|
|
if ($socid > 0) {
|
|
$sql .= " AND f.fk_soc = ".$socid;
|
|
}
|
|
|
|
$result = $this->db->query($sql);
|
|
if ($result) {
|
|
$obj = $this->db->fetch_object($result);
|
|
$this->stats_facture_fournisseur['suppliers'] = $obj->nb_suppliers;
|
|
$this->stats_facture_fournisseur['nb'] = $obj->nb;
|
|
$this->stats_facture_fournisseur['rows'] = $obj->nb_rows;
|
|
$this->stats_facture_fournisseur['qty'] = $obj->qty ? $obj->qty : 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
|
|
/**
|
|
* Return an array formated for showing graphs
|
|
*
|
|
* @param string $sql Request to execute
|
|
* @param string $mode 'byunit'=number of unit, 'bynumber'=nb of entities
|
|
* @param int $year Year (0=current year, -1=all years)
|
|
* @return array <0 if KO, result[month]=array(valuex,valuey) where month is 0 to 11
|
|
*/
|
|
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);
|
|
$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
|
|
}
|
|
$i++;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
$this->error = $this->db->error().' sql='.$sql;
|
|
return -1;
|
|
}
|
|
|
|
if (empty($year)) {
|
|
$year = strftime('%Y', time());
|
|
$month = strftime('%m', time());
|
|
} 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++)
|
|
{
|
|
// $ids 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;
|
|
$year = $year - 1;
|
|
}
|
|
}
|
|
|
|
return array_reverse($result);
|
|
}
|
|
|
|
|
|
// phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
|
|
/**
|
|
* Return nb of units or customers invoices in which product is included
|
|
*
|
|
* @param int $socid Limit count on a particular third party id
|
|
* @param string $mode 'byunit'=number of unit, 'bynumber'=nb of entities
|
|
* @param int $filteronproducttype 0=To filter on product only, 1=To filter on services only
|
|
* @param int $year Year (0=last 12 month)
|
|
* @param string $morefilter More sql filters
|
|
* @return array <0 if KO, result[month]=array(valuex,valuey) where month is 0 to 11
|
|
*/
|
|
public function get_nb_vente($socid, $mode, $filteronproducttype = -1, $year = 0, $morefilter = '')
|
|
{
|
|
// phpcs:enable
|
|
global $conf;
|
|
global $user;
|
|
|
|
$sql = "SELECT sum(d.qty), date_format(f.datef, '%Y%m')";
|
|
if ($mode == 'bynumber') {
|
|
$sql .= ", count(DISTINCT f.rowid)";
|
|
}
|
|
$sql .= " FROM ".MAIN_DB_PREFIX."facturedet as d, ".MAIN_DB_PREFIX."facture as f, ".MAIN_DB_PREFIX."societe as s";
|
|
if ($filteronproducttype >= 0) {
|
|
$sql .= ", ".MAIN_DB_PREFIX."product as p";
|
|
}
|
|
if (!$user->rights->societe->client->voir && !$socid) {
|
|
$sql .= ", ".MAIN_DB_PREFIX."societe_commerciaux as sc";
|
|
}
|
|
$sql .= " WHERE f.rowid = d.fk_facture";
|
|
if ($this->id > 0) {
|
|
$sql .= " AND d.fk_product =".$this->id;
|
|
} else {
|
|
$sql .= " AND d.fk_product > 0";
|
|
}
|
|
if ($filteronproducttype >= 0) {
|
|
$sql .= " AND p.rowid = d.fk_product AND p.fk_product_type =".$filteronproducttype;
|
|
}
|
|
$sql .= " AND f.fk_soc = s.rowid";
|
|
$sql .= " AND f.entity IN (".getEntity('invoice').")";
|
|
if (!$user->rights->societe->client->voir && !$socid) {
|
|
$sql .= " AND f.fk_soc = sc.fk_soc AND sc.fk_user = ".$user->id;
|
|
}
|
|
if ($socid > 0) {
|
|
$sql .= " AND f.fk_soc = $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
|
|
/**
|
|
* Return nb of units or supplier invoices in which product is included
|
|
*
|
|
* @param int $socid Limit count on a particular third party id
|
|
* @param string $mode 'byunit'=number of unit, 'bynumber'=nb of entities
|
|
* @param int $filteronproducttype 0=To filter on product only, 1=To filter on services only
|
|
* @param int $year Year (0=last 12 month)
|
|
* @param string $morefilter More sql filters
|
|
* @return array <0 if KO, result[month]=array(valuex,valuey) where month is 0 to 11
|
|
*/
|
|
public function get_nb_achat($socid, $mode, $filteronproducttype = -1, $year = 0, $morefilter = '')
|
|
{
|
|
// phpcs:enable
|
|
global $conf;
|
|
global $user;
|
|
|
|
$sql = "SELECT sum(d.qty), date_format(f.datef, '%Y%m')";
|
|
if ($mode == 'bynumber') {
|
|
$sql .= ", count(DISTINCT f.rowid)";
|
|
}
|
|
$sql .= " FROM ".MAIN_DB_PREFIX."facture_fourn_det as d, ".MAIN_DB_PREFIX."facture_fourn as f, ".MAIN_DB_PREFIX."societe as s";
|
|
if ($filteronproducttype >= 0) {
|
|
$sql .= ", ".MAIN_DB_PREFIX."product as p";
|
|
}
|
|
if (!$user->rights->societe->client->voir && !$socid) {
|
|
$sql .= ", ".MAIN_DB_PREFIX."societe_commerciaux as sc";
|
|
}
|
|
$sql .= " WHERE f.rowid = d.fk_facture_fourn";
|
|
if ($this->id > 0) {
|
|
$sql .= " AND d.fk_product =".$this->id;
|
|
} else {
|
|
$sql .= " AND d.fk_product > 0";
|
|
}
|
|
if ($filteronproducttype >= 0) {
|
|
$sql .= " AND p.rowid = d.fk_product AND p.fk_product_type =".$filteronproducttype;
|
|
}
|
|
$sql .= " AND f.fk_soc = s.rowid";
|
|
$sql .= " AND f.entity IN (".getEntity('facture_fourn').")";
|
|
if (!$user->rights->societe->client->voir && !$socid) {
|
|
$sql .= " AND f.fk_soc = sc.fk_soc AND sc.fk_user = ".$user->id;
|
|
}
|
|
if ($socid > 0) {
|
|
$sql .= " AND f.fk_soc = $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
|
|
/**
|
|
* Return nb of units in proposals in which product is included
|
|
*
|
|
* @param int $socid Limit count on a particular third party id
|
|
* @param string $mode 'byunit'=number of unit, 'bynumber'=nb of entities
|
|
* @param int $filteronproducttype 0=To filter on product only, 1=To filter on services only
|
|
* @param int $year Year (0=last 12 month)
|
|
* @param string $morefilter More sql filters
|
|
* @return array <0 if KO, result[month]=array(valuex,valuey) where month is 0 to 11
|
|
*/
|
|
public function get_nb_propal($socid, $mode, $filteronproducttype = -1, $year = 0, $morefilter = '')
|
|
{
|
|
// phpcs:enable
|
|
global $conf, $user;
|
|
|
|
$sql = "SELECT sum(d.qty), date_format(p.datep, '%Y%m')";
|
|
if ($mode == 'bynumber') {
|
|
$sql .= ", count(DISTINCT p.rowid)";
|
|
}
|
|
$sql .= " FROM ".MAIN_DB_PREFIX."propaldet as d, ".MAIN_DB_PREFIX."propal as p, ".MAIN_DB_PREFIX."societe as s";
|
|
if ($filteronproducttype >= 0) {
|
|
$sql .= ", ".MAIN_DB_PREFIX."product as prod";
|
|
}
|
|
if (!$user->rights->societe->client->voir && !$socid) {
|
|
$sql .= ", ".MAIN_DB_PREFIX."societe_commerciaux as sc";
|
|
}
|
|
$sql .= " WHERE p.rowid = d.fk_propal";
|
|
if ($this->id > 0) {
|
|
$sql .= " AND d.fk_product =".$this->id;
|
|
} else {
|
|
$sql .= " AND d.fk_product > 0";
|
|
}
|
|
if ($filteronproducttype >= 0) {
|
|
$sql .= " AND prod.rowid = d.fk_product AND prod.fk_product_type =".$filteronproducttype;
|
|
}
|
|
$sql .= " AND p.fk_soc = s.rowid";
|
|
$sql .= " AND p.entity IN (".getEntity('propal').")";
|
|
if (!$user->rights->societe->client->voir && !$socid) {
|
|
$sql .= " AND p.fk_soc = sc.fk_soc AND sc.fk_user = ".$user->id;
|
|
}
|
|
if ($socid > 0) {
|
|
$sql .= " AND p.fk_soc = ".$socid;
|
|
}
|
|
$sql .= $morefilter;
|
|
$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
|
|
/**
|
|
* Return nb of units in proposals in which product is included
|
|
*
|
|
* @param int $socid Limit count on a particular third party id
|
|
* @param string $mode 'byunit'=number of unit, 'bynumber'=nb of entities
|
|
* @param int $filteronproducttype 0=To filter on product only, 1=To filter on services only
|
|
* @param int $year Year (0=last 12 month)
|
|
* @param string $morefilter More sql filters
|
|
* @return array <0 if KO, result[month]=array(valuex,valuey) where month is 0 to 11
|
|
*/
|
|
public function get_nb_propalsupplier($socid, $mode, $filteronproducttype = -1, $year = 0, $morefilter = '')
|
|
{
|
|
// phpcs:enable
|
|
global $conf;
|
|
global $user;
|
|
|
|
$sql = "SELECT sum(d.qty), date_format(p.date_valid, '%Y%m')";
|
|
if ($mode == 'bynumber') {
|
|
$sql .= ", count(DISTINCT p.rowid)";
|
|
}
|
|
$sql .= " FROM ".MAIN_DB_PREFIX."supplier_proposaldet as d, ".MAIN_DB_PREFIX."supplier_proposal as p, ".MAIN_DB_PREFIX."societe as s";
|
|
if ($filteronproducttype >= 0) {
|
|
$sql .= ", ".MAIN_DB_PREFIX."product as prod";
|
|
}
|
|
if (!$user->rights->societe->client->voir && !$socid) {
|
|
$sql .= ", ".MAIN_DB_PREFIX."societe_commerciaux as sc";
|
|
}
|
|
$sql .= " WHERE p.rowid = d.fk_supplier_proposal";
|
|
if ($this->id > 0) {
|
|
$sql .= " AND d.fk_product =".$this->id;
|
|
} else {
|
|
$sql .= " AND d.fk_product > 0";
|
|
}
|
|
if ($filteronproducttype >= 0) {
|
|
$sql .= " AND prod.rowid = d.fk_product AND prod.fk_product_type =".$filteronproducttype;
|
|
}
|
|
$sql .= " AND p.fk_soc = s.rowid";
|
|
$sql .= " AND p.entity IN (".getEntity('supplier_proposal').")";
|
|
if (!$user->rights->societe->client->voir && !$socid) {
|
|
$sql .= " AND p.fk_soc = sc.fk_soc AND sc.fk_user = ".$user->id;
|
|
}
|
|
if ($socid > 0) {
|
|
$sql .= " AND p.fk_soc = ".$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
|
|
/**
|
|
* Return nb of units in orders in which product is included
|
|
*
|
|
* @param int $socid Limit count on a particular third party id
|
|
* @param string $mode 'byunit'=number of unit, 'bynumber'=nb of entities
|
|
* @param int $filteronproducttype 0=To filter on product only, 1=To filter on services only
|
|
* @param int $year Year (0=last 12 month)
|
|
* @param string $morefilter More sql filters
|
|
* @return array <0 if KO, result[month]=array(valuex,valuey) where month is 0 to 11
|
|
*/
|
|
public function get_nb_order($socid, $mode, $filteronproducttype = -1, $year = 0, $morefilter = '')
|
|
{
|
|
// phpcs:enable
|
|
global $conf, $user;
|
|
|
|
$sql = "SELECT sum(d.qty), date_format(c.date_commande, '%Y%m')";
|
|
if ($mode == 'bynumber') {
|
|
$sql .= ", count(DISTINCT c.rowid)";
|
|
}
|
|
$sql .= " FROM ".MAIN_DB_PREFIX."commandedet as d, ".MAIN_DB_PREFIX."commande as c, ".MAIN_DB_PREFIX."societe as s";
|
|
if ($filteronproducttype >= 0) {
|
|
$sql .= ", ".MAIN_DB_PREFIX."product as p";
|
|
}
|
|
if (!$user->rights->societe->client->voir && !$socid) {
|
|
$sql .= ", ".MAIN_DB_PREFIX."societe_commerciaux as sc";
|
|
}
|
|
$sql .= " WHERE c.rowid = d.fk_commande";
|
|
if ($this->id > 0) {
|
|
$sql .= " AND d.fk_product =".$this->id;
|
|
} else {
|
|
$sql .= " AND d.fk_product > 0";
|
|
}
|
|
if ($filteronproducttype >= 0) {
|
|
$sql .= " AND p.rowid = d.fk_product AND p.fk_product_type =".$filteronproducttype;
|
|
}
|
|
$sql .= " AND c.fk_soc = s.rowid";
|
|
$sql .= " AND c.entity IN (".getEntity('commande').")";
|
|
if (!$user->rights->societe->client->voir && !$socid) {
|
|
$sql .= " AND c.fk_soc = sc.fk_soc AND sc.fk_user = ".$user->id;
|
|
}
|
|
if ($socid > 0) {
|
|
$sql .= " AND c.fk_soc = ".$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
|
|
/**
|
|
* Return nb of units in orders in which product is included
|
|
*
|
|
* @param int $socid Limit count on a particular third party id
|
|
* @param string $mode 'byunit'=number of unit, 'bynumber'=nb of entities
|
|
* @param int $filteronproducttype 0=To filter on product only, 1=To filter on services only
|
|
* @param int $year Year (0=last 12 month)
|
|
* @param string $morefilter More sql filters
|
|
* @return array <0 if KO, result[month]=array(valuex,valuey) where month is 0 to 11
|
|
*/
|
|
public function get_nb_ordersupplier($socid, $mode, $filteronproducttype = -1, $year = 0, $morefilter = '')
|
|
{
|
|
// phpcs:enable
|
|
global $conf, $user;
|
|
|
|
$sql = "SELECT sum(d.qty), date_format(c.date_commande, '%Y%m')";
|
|
if ($mode == 'bynumber') {
|
|
$sql .= ", count(DISTINCT c.rowid)";
|
|
}
|
|
$sql .= " FROM ".MAIN_DB_PREFIX."commande_fournisseurdet as d, ".MAIN_DB_PREFIX."commande_fournisseur as c, ".MAIN_DB_PREFIX."societe as s";
|
|
if ($filteronproducttype >= 0) {
|
|
$sql .= ", ".MAIN_DB_PREFIX."product as p";
|
|
}
|
|
if (!$user->rights->societe->client->voir && !$socid) {
|
|
$sql .= ", ".MAIN_DB_PREFIX."societe_commerciaux as sc";
|
|
}
|
|
$sql .= " WHERE c.rowid = d.fk_commande";
|
|
if ($this->id > 0) {
|
|
$sql .= " AND d.fk_product =".$this->id;
|
|
} else {
|
|
$sql .= " AND d.fk_product > 0";
|
|
}
|
|
if ($filteronproducttype >= 0) {
|
|
$sql .= " AND p.rowid = d.fk_product AND p.fk_product_type =".$filteronproducttype;
|
|
}
|
|
$sql .= " AND c.fk_soc = s.rowid";
|
|
$sql .= " AND c.entity IN (".getEntity('supplier_order').")";
|
|
if (!$user->rights->societe->client->voir && !$socid) {
|
|
$sql .= " AND c.fk_soc = sc.fk_soc AND sc.fk_user = ".$user->id;
|
|
}
|
|
if ($socid > 0) {
|
|
$sql .= " AND c.fk_soc = ".$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
|
|
/**
|
|
* Return nb of units in orders in which product is included
|
|
*
|
|
* @param int $socid Limit count on a particular third party id
|
|
* @param string $mode 'byunit'=number of unit, 'bynumber'=nb of entities
|
|
* @param int $filteronproducttype 0=To filter on product only, 1=To filter on services only
|
|
* @param int $year Year (0=last 12 month)
|
|
* @param string $morefilter More sql filters
|
|
* @return array <0 if KO, result[month]=array(valuex,valuey) where month is 0 to 11
|
|
*/
|
|
public function get_nb_contract($socid, $mode, $filteronproducttype = -1, $year = 0, $morefilter = '')
|
|
{
|
|
// phpcs:enable
|
|
global $conf, $user;
|
|
|
|
$sql = "SELECT sum(d.qty), date_format(c.date_contrat, '%Y%m')";
|
|
if ($mode == 'bynumber') {
|
|
$sql .= ", count(DISTINCT c.rowid)";
|
|
}
|
|
$sql .= " FROM ".MAIN_DB_PREFIX."contratdet as d, ".MAIN_DB_PREFIX."contrat as c, ".MAIN_DB_PREFIX."societe as s";
|
|
if ($filteronproducttype >= 0) {
|
|
$sql .= ", ".MAIN_DB_PREFIX."product as p";
|
|
}
|
|
if (!$user->rights->societe->client->voir && !$socid) {
|
|
$sql .= ", ".MAIN_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 =".$this->id;
|
|
} else {
|
|
$sql .= " AND d.fk_product > 0";
|
|
}
|
|
if ($filteronproducttype >= 0) {
|
|
$sql .= " AND p.rowid = d.fk_product AND p.fk_product_type =".$filteronproducttype;
|
|
}
|
|
$sql .= " AND c.fk_soc = s.rowid";
|
|
|
|
if (!$user->rights->societe->client->voir && !$socid) {
|
|
$sql .= " AND c.fk_soc = sc.fk_soc AND sc.fk_user = ".$user->id;
|
|
}
|
|
if ($socid > 0) {
|
|
$sql .= " AND c.fk_soc = ".$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
|
|
/**
|
|
* Return nb of units in orders in which product is included
|
|
*
|
|
* @param int $socid Limit count on a particular third party id
|
|
* @param string $mode 'byunit'=number of unit, 'bynumber'=nb of entities
|
|
* @param int $filteronproducttype 0=To filter on product only, 1=To filter on services only
|
|
* @param int $year Year (0=last 12 month)
|
|
* @param string $morefilter More sql filters
|
|
* @return array <0 if KO, result[month]=array(valuex,valuey) where month is 0 to 11
|
|
*/
|
|
public function get_nb_mos($socid, $mode, $filteronproducttype = -1, $year = 0, $morefilter = '')
|
|
{
|
|
// phpcs:enable
|
|
global $conf, $user;
|
|
|
|
$sql = "SELECT sum(d.qty), date_format(d.date_valid, '%Y%m')";
|
|
if ($mode == 'bynumber') {
|
|
$sql .= ", count(DISTINCT d.rowid)";
|
|
}
|
|
$sql .= " FROM ".MAIN_DB_PREFIX."mrp_mo as d LEFT JOIN ".MAIN_DB_PREFIX."societe as s ON d.fk_soc = s.rowid";
|
|
if ($filteronproducttype >= 0) {
|
|
$sql .= ", ".MAIN_DB_PREFIX."product as p";
|
|
}
|
|
if (!$user->rights->societe->client->voir && !$socid) {
|
|
$sql .= ", ".MAIN_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 =".$this->id;
|
|
} else {
|
|
$sql .= " AND d.fk_product > 0";
|
|
}
|
|
if ($filteronproducttype >= 0) {
|
|
$sql .= " AND p.rowid = d.fk_product AND p.fk_product_type =".$filteronproducttype;
|
|
}
|
|
|
|
if (!$user->rights->societe->client->voir && !$socid) {
|
|
$sql .= " AND d.fk_soc = sc.fk_soc AND sc.fk_user = ".$user->id;
|
|
}
|
|
if ($socid > 0) {
|
|
$sql .= " AND d.fk_soc = ".$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
|
|
/**
|
|
* Link a product/service to a parent product/service
|
|
*
|
|
* @param int $id_pere Id of parent product/service
|
|
* @param int $id_fils Id of child product/service
|
|
* @param int $qty Quantity
|
|
* @param int $incdec 1=Increase/decrease stock of child when parent stock increase/decrease
|
|
* @return int < 0 if KO, > 0 if OK
|
|
*/
|
|
public function add_sousproduit($id_pere, $id_fils, $qty, $incdec = 1)
|
|
{
|
|
// phpcs:enable
|
|
// 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 '.MAIN_DB_PREFIX.'product_association';
|
|
$sql .= ' WHERE fk_product_pere = '.$id_fils.' AND fk_product_fils = '.$id_pere;
|
|
if (!$this->db->query($sql)) {
|
|
dol_print_error($this->db);
|
|
return -1;
|
|
}
|
|
else
|
|
{
|
|
$result = $this->db->query($sql);
|
|
if ($result) {
|
|
$num = $this->db->num_rows($result);
|
|
if ($num > 0) {
|
|
$this->error = "isFatherOfThis";
|
|
return -1;
|
|
}
|
|
else
|
|
{
|
|
$sql = 'INSERT INTO '.MAIN_DB_PREFIX.'product_association(fk_product_pere,fk_product_fils,qty,incdec)';
|
|
$sql .= ' VALUES ('.$id_pere.', '.$id_fils.', '.$qty.', '.$incdec.')';
|
|
if (!$this->db->query($sql)) {
|
|
dol_print_error($this->db);
|
|
return -1;
|
|
}
|
|
else
|
|
{
|
|
return 1;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
// phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
|
|
/**
|
|
* Modify composed product
|
|
*
|
|
* @param int $id_pere Id of parent product/service
|
|
* @param int $id_fils Id of child product/service
|
|
* @param int $qty Quantity
|
|
* @param int $incdec 1=Increase/decrease stock of child when parent stock increase/decrease
|
|
* @return int < 0 if KO, > 0 if OK
|
|
*/
|
|
public function update_sousproduit($id_pere, $id_fils, $qty, $incdec = 1)
|
|
{
|
|
// phpcs:enable
|
|
// 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 '.MAIN_DB_PREFIX.'product_association SET ';
|
|
$sql .= 'qty='.$qty;
|
|
$sql .= ',incdec='.$incdec;
|
|
$sql .= ' WHERE fk_product_pere='.$id_pere.' AND fk_product_fils='.$id_fils;
|
|
|
|
if (!$this->db->query($sql)) {
|
|
dol_print_error($this->db);
|
|
return -1;
|
|
}
|
|
else
|
|
{
|
|
return 1;
|
|
}
|
|
}
|
|
|
|
// phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
|
|
/**
|
|
* Retire le lien entre un sousproduit et un produit/service
|
|
*
|
|
* @param int $fk_parent Id du produit auquel ne sera plus lie le produit lie
|
|
* @param int $fk_child Id du produit a ne plus lie
|
|
* @return int < 0 if KO, > 0 if OK
|
|
*/
|
|
public function del_sousproduit($fk_parent, $fk_child)
|
|
{
|
|
// phpcs:enable
|
|
if (!is_numeric($fk_parent)) {
|
|
$fk_parent = 0;
|
|
}
|
|
if (!is_numeric($fk_child)) {
|
|
$fk_child = 0;
|
|
}
|
|
|
|
$sql = "DELETE FROM ".MAIN_DB_PREFIX."product_association";
|
|
$sql .= " WHERE fk_product_pere = ".$fk_parent;
|
|
$sql .= " AND fk_product_fils = ".$fk_child;
|
|
|
|
dol_syslog(get_class($this).'::del_sousproduit', LOG_DEBUG);
|
|
if (!$this->db->query($sql)) {
|
|
dol_print_error($this->db);
|
|
return -1;
|
|
}
|
|
|
|
return 1;
|
|
}
|
|
|
|
// phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
|
|
/**
|
|
* Verifie si c'est un sous-produit
|
|
*
|
|
* @param int $fk_parent Id du produit auquel le produit est lie
|
|
* @param int $fk_child Id du produit lie
|
|
* @return int < 0 si erreur, > 0 si ok
|
|
*/
|
|
public function is_sousproduit($fk_parent, $fk_child)
|
|
{
|
|
// phpcs:enable
|
|
$sql = "SELECT fk_product_pere, qty, incdec";
|
|
$sql .= " FROM ".MAIN_DB_PREFIX."product_association";
|
|
$sql .= " WHERE fk_product_pere = '".$fk_parent."'";
|
|
$sql .= " AND fk_product_fils = '".$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 true;
|
|
}
|
|
else
|
|
{
|
|
return false;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
dol_print_error($this->db);
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
|
|
// phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
|
|
/**
|
|
* Add a supplier price for the product.
|
|
* Note: Duplicate ref is accepted for different quantity only, or for different companies.
|
|
*
|
|
* @param User $user User that make link
|
|
* @param int $id_fourn Supplier id
|
|
* @param string $ref_fourn Supplier ref
|
|
* @param float $quantity Quantity minimum for price
|
|
* @return int < 0 if KO, 0 if link already exists for this product, > 0 if OK
|
|
*/
|
|
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) {
|
|
$sql = "SELECT rowid, fk_product";
|
|
$sql .= " FROM ".MAIN_DB_PREFIX."product_fournisseur_price";
|
|
$sql .= " WHERE fk_soc = ".$id_fourn;
|
|
$sql .= " AND ref_fourn = '".$this->db->escape($ref_fourn)."'";
|
|
$sql .= " AND fk_product != ".$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 ".MAIN_DB_PREFIX."product_fournisseur_price";
|
|
$sql .= " WHERE fk_soc = ".$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 = ".$quantity;
|
|
$sql .= " AND fk_product = ".$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 (!$obj) {
|
|
$sql = "INSERT INTO ".MAIN_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 .= ", ".$conf->entity;
|
|
$sql .= ", ".$this->id;
|
|
$sql .= ", ".$id_fourn;
|
|
$sql .= ", '".$this->db->escape($ref_fourn)."'";
|
|
$sql .= ", ".$quantity;
|
|
$sql .= ", ".$user->id;
|
|
$sql .= ", 0";
|
|
$sql .= ")";
|
|
|
|
if ($this->db->query($sql)) {
|
|
$this->product_fourn_price_id = $this->db->last_insert_id(MAIN_DB_PREFIX."product_fournisseur_price");
|
|
return 1;
|
|
}
|
|
else
|
|
{
|
|
$this->error = $this->db->lasterror();
|
|
return -1;
|
|
}
|
|
}
|
|
// If the supplier price already exists for this product and quantity
|
|
else
|
|
{
|
|
$this->product_fourn_price_id = $obj->rowid;
|
|
return 0;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
$this->error = $this->db->lasterror();
|
|
return -2;
|
|
}
|
|
}
|
|
|
|
|
|
// phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
|
|
/**
|
|
* Renvoie la liste des fournisseurs du produit/service
|
|
*
|
|
* @return array Tableau des id de fournisseur
|
|
*/
|
|
public function list_suppliers()
|
|
{
|
|
// phpcs:enable
|
|
global $conf;
|
|
|
|
$list = array();
|
|
|
|
$sql = "SELECT DISTINCT p.fk_soc";
|
|
$sql .= " FROM ".MAIN_DB_PREFIX."product_fournisseur_price as p";
|
|
$sql .= " WHERE p.fk_product = ".$this->id;
|
|
$sql .= " AND p.entity = ".$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
|
|
/**
|
|
* Recopie les prix d'un produit/service sur un autre
|
|
*
|
|
* @param int $fromId Id product source
|
|
* @param int $toId Id product target
|
|
* @return int < 0 if KO, > 0 if OK
|
|
*/
|
|
public function clone_price($fromId, $toId)
|
|
{
|
|
global $conf, $user;
|
|
|
|
$now = dol_now();
|
|
|
|
$this->db->begin();
|
|
|
|
// prices
|
|
$sql = "INSERT INTO ".MAIN_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 .= ", 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 .= ", ".$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 .= ", default_vat_code";
|
|
$sql .= ", tva_tx";
|
|
$sql .= ", recuperableonly";
|
|
$sql .= ", localtax1_tx";
|
|
$sql .= ", localtax1_type";
|
|
$sql .= ", localtax2_tx";
|
|
$sql .= ", localtax2_type";
|
|
$sql .= ", ".$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 ".MAIN_DB_PREFIX."product_price";
|
|
$sql .= " WHERE fk_product = ".$fromId;
|
|
$sql .= " ORDER BY date_price DESC";
|
|
if ($conf->global->PRODUIT_MULTIPRICES_LIMIT > 0) {
|
|
$sql .= " LIMIT ".$conf->global->PRODUIT_MULTIPRICES_LIMIT;
|
|
}
|
|
|
|
dol_syslog(__METHOD__, LOG_DEBUG);
|
|
$resql = $this->db->query($sql);
|
|
if (!$resql) {
|
|
$this->db->rollback();
|
|
return -1;
|
|
}
|
|
|
|
$this->db->commit();
|
|
return 1;
|
|
}
|
|
|
|
// phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
|
|
/**
|
|
* Clone links between products
|
|
*
|
|
* @param int $fromId Product id
|
|
* @param int $toId Product id
|
|
* @return int <0 if KO, >0 if OK
|
|
*/
|
|
public function clone_associations($fromId, $toId)
|
|
{
|
|
// phpcs:enable
|
|
$this->db->begin();
|
|
|
|
$sql = 'INSERT INTO '.MAIN_DB_PREFIX.'product_association (fk_product_pere, fk_product_fils, qty)';
|
|
$sql .= " SELECT ".$toId.", fk_product_fils, qty FROM ".MAIN_DB_PREFIX."product_association";
|
|
$sql .= " WHERE fk_product_pere = ".$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
|
|
/**
|
|
* Recopie les fournisseurs et prix fournisseurs d'un produit/service sur un autre
|
|
*
|
|
* @param int $fromId Id produit source
|
|
* @param int $toId Id produit cible
|
|
* @return int < 0 si erreur, > 0 si ok
|
|
*/
|
|
public function clone_fournisseurs($fromId, $toId)
|
|
{
|
|
// phpcs:enable
|
|
$this->db->begin();
|
|
|
|
$now = dol_now();
|
|
|
|
// les fournisseurs
|
|
/*$sql = "INSERT ".MAIN_DB_PREFIX."product_fournisseur ("
|
|
. " datec, fk_product, fk_soc, ref_fourn, fk_user_author )"
|
|
. " SELECT '".$this->db->idate($now)."', ".$toId.", fk_soc, ref_fourn, fk_user_author"
|
|
. " FROM ".MAIN_DB_PREFIX."product_fournisseur"
|
|
. " WHERE fk_product = ".$fromId;
|
|
|
|
if ( ! $this->db->query($sql ) )
|
|
{
|
|
$this->db->rollback();
|
|
return -1;
|
|
}*/
|
|
|
|
// les prix de fournisseurs.
|
|
$sql = "INSERT ".MAIN_DB_PREFIX."product_fournisseur_price (";
|
|
$sql .= " datec, fk_product, fk_soc, price, quantity, fk_user)";
|
|
$sql .= " SELECT '".$this->db->idate($now)."', ".$toId.", fk_soc, price, quantity, fk_user";
|
|
$sql .= " FROM ".MAIN_DB_PREFIX."product_fournisseur_price";
|
|
$sql .= " WHERE fk_product = ".$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
|
|
/**
|
|
* Fonction recursive uniquement utilisee par get_arbo_each_prod, recompose l'arborescence des sousproduits
|
|
* Define value of this->res
|
|
*
|
|
* @param array $prod Products array
|
|
* @param string $compl_path Directory path of parents to add before
|
|
* @param int $multiply Because each sublevel must be multiplicated by parent nb
|
|
* @param int $level Init level
|
|
* @param int $id_parent Id parent
|
|
* @return void
|
|
*/
|
|
public function fetch_prod_arbo($prod, $compl_path = "", $multiply = 1, $level = 1, $id_parent = 0)
|
|
{
|
|
// phpcs:enable
|
|
global $conf, $langs;
|
|
|
|
$tmpproduct = null;
|
|
//var_dump($prod);
|
|
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;
|
|
|
|
if ($multiply < 1) { $multiply = 1;
|
|
}
|
|
|
|
//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
|
|
$tmpproduct->load_stock('nobatch,novirtual'); // Load stock to get true ->stock_reel
|
|
//$this->fetch($id); // Load product to get ->ref
|
|
//$this->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 is childs to child
|
|
if (is_array($desc_pere['childs'])) {
|
|
//print 'YYY We go down for '.$desc_pere[3]." -> \n";
|
|
$this->fetch_prod_arbo($desc_pere['childs'], $compl_path.$desc_pere[3]." -> ", $desc_pere[1] * $multiply, $level + 1, $id);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
// phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
|
|
/**
|
|
* Build the tree of subproducts into an array
|
|
* this->sousprods is loaded by this->get_sousproduits_arbo()
|
|
*
|
|
* @param int $multiply Because each sublevel must be multiplicated by parent nb
|
|
* @return array $this->res
|
|
*/
|
|
public function get_arbo_each_prod($multiply = 1)
|
|
{
|
|
// 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);
|
|
}
|
|
}
|
|
}
|
|
//var_dump($this->res);
|
|
return $this->res;
|
|
}
|
|
|
|
/**
|
|
* Count all parent and children products for current product (first level only)
|
|
*
|
|
* @param int $mode 0=Both parent and child, -1=Parents only, 1=Children only
|
|
* @return int Nb of father + child
|
|
* @see getFather(), get_sousproduits_arbo()
|
|
*/
|
|
public function hasFatherOrChild($mode = 0)
|
|
{
|
|
$nb = 0;
|
|
|
|
$sql = "SELECT COUNT(pa.rowid) as nb";
|
|
$sql .= " FROM ".MAIN_DB_PREFIX."product_association as pa";
|
|
if ($mode == 0) {
|
|
$sql .= " WHERE pa.fk_product_fils = ".$this->id." OR pa.fk_product_pere = ".$this->id;
|
|
} elseif ($mode == -1) {
|
|
$sql .= " WHERE pa.fk_product_fils = ".$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 = ".$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 = $obj->nb;
|
|
}
|
|
} else {
|
|
return -1;
|
|
}
|
|
|
|
return $nb;
|
|
}
|
|
|
|
/**
|
|
* Return if a product has variants or not
|
|
*
|
|
* @return int Number of variants
|
|
*/
|
|
public function hasVariants()
|
|
{
|
|
$nb = 0;
|
|
$sql = "SELECT count(rowid) as nb FROM ".MAIN_DB_PREFIX."product_attribute_combination WHERE fk_product_parent = ".$this->id;
|
|
$sql .= " AND entity IN (".getEntity('product').")";
|
|
|
|
$resql = $this->db->query($sql);
|
|
if ($resql) {
|
|
$obj = $this->db->fetch_object($resql);
|
|
if ($obj) { $nb = $obj->nb;
|
|
}
|
|
}
|
|
|
|
return $nb;
|
|
}
|
|
|
|
|
|
/**
|
|
* Return if loaded product is a variant
|
|
*
|
|
* @return int
|
|
*/
|
|
public function isVariant()
|
|
{
|
|
global $conf;
|
|
if (!empty($conf->variants->enabled)) {
|
|
$sql = "SELECT rowid FROM ".MAIN_DB_PREFIX."product_attribute_combination WHERE fk_product_child = ".$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;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Return all parent products for current product (first level only)
|
|
*
|
|
* @return array Array of product
|
|
*/
|
|
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 .= " FROM ".MAIN_DB_PREFIX."product_association as pa,";
|
|
$sql .= " ".MAIN_DB_PREFIX."product as p";
|
|
$sql .= " WHERE p.rowid = pa.fk_product_pere";
|
|
$sql .= " AND pa.fk_product_fils = ".$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']]['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'];
|
|
}
|
|
return $prods;
|
|
}
|
|
else
|
|
{
|
|
dol_print_error($this->db);
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
* Return childs of product $id
|
|
*
|
|
* @param int $id Id of product to search childs of
|
|
* @param int $firstlevelonly Return only direct child
|
|
* @param int $level Level of recursing call (start to 1)
|
|
* @return array Return array(prodid=>array(0=prodid, 1=>qty, 2=> ...)
|
|
*/
|
|
public function getChildsArbo($id, $firstlevelonly = 0, $level = 1)
|
|
{
|
|
global $alreadyfound;
|
|
|
|
$sql = "SELECT p.rowid, p.label as label, pa.qty as qty, pa.fk_product_fils as id, p.fk_product_type, pa.incdec";
|
|
$sql .= " FROM ".MAIN_DB_PREFIX."product as p";
|
|
$sql .= ", ".MAIN_DB_PREFIX."product_association as pa";
|
|
$sql .= " WHERE p.rowid = pa.fk_product_fils";
|
|
$sql .= " AND pa.fk_product_pere = ".$id;
|
|
$sql .= " AND pa.fk_product_fils != ".$id; // This should not happens, it is to avoid infinite loop if it happens
|
|
|
|
dol_syslog(get_class($this).'::getChildsArbo id='.$id.' level='.$level, LOG_DEBUG);
|
|
|
|
if ($level == 1) { $alreadyfound = array($id=>1); // We init array of found object to start of tree, so if we found it later (should not happened), we stop immediatly
|
|
}
|
|
// Protection against infinite loop
|
|
if ($level > 30) { return array();
|
|
}
|
|
|
|
$res = $this->db->query($sql);
|
|
if ($res) {
|
|
$prods = array();
|
|
while ($rec = $this->db->fetch_array($res))
|
|
{
|
|
if (!empty($alreadyfound[$rec['rowid']])) {
|
|
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;
|
|
}
|
|
$alreadyfound[$rec['rowid']] = 1;
|
|
$prods[$rec['rowid']] = array(
|
|
0=>$rec['rowid'],
|
|
1=>$rec['qty'],
|
|
2=>$rec['fk_product_type'],
|
|
3=>$this->db->escape($rec['label']),
|
|
4=>$rec['incdec']
|
|
);
|
|
//$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);
|
|
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
|
|
/**
|
|
* Return tree of all subproducts for product. Tree contains id, name and quantity.
|
|
* Set this->sousprods
|
|
*
|
|
* @return void
|
|
*/
|
|
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 childs
|
|
{
|
|
$this->sousprods[$key] = $value;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Return clicable link of object (with eventually picto)
|
|
*
|
|
* @param int $withpicto Add picto into link
|
|
* @param string $option Where point the link ('stock', 'composition', 'category', 'supplier', '')
|
|
* @param int $maxlength Maxlength of ref
|
|
* @param int $save_lastsearch_value -1=Auto, 0=No save of lastsearch_values when clicking, 1=Save lastsearch_values whenclicking
|
|
* @param int $notooltip No tooltip
|
|
* @return string String with URL
|
|
*/
|
|
public function getNomUrl($withpicto = 0, $option = '', $maxlength = 0, $save_lastsearch_value = -1, $notooltip = 0)
|
|
{
|
|
global $conf, $langs, $hookmanager;
|
|
include_once DOL_DOCUMENT_ROOT.'/core/lib/product.lib.php';
|
|
|
|
$result = '';
|
|
$newref = $this->ref;
|
|
if ($maxlength) { $newref = dol_trunc($newref, $maxlength, 'middle');
|
|
}
|
|
|
|
if ($this->type == Product::TYPE_PRODUCT) { $label = '<u>'.$langs->trans("Product").'</u>';
|
|
}
|
|
if ($this->type == Product::TYPE_SERVICE) { $label = '<u>'.$langs->trans("Service").'</u>';
|
|
}
|
|
if (!empty($this->ref)) {
|
|
$label .= '<br><b>'.$langs->trans('ProductRef').':</b> '.$this->ref;
|
|
}
|
|
if (!empty($this->label)) {
|
|
$label .= '<br><b>'.$langs->trans('ProductLabel').':</b> '.$this->label;
|
|
}
|
|
if ($this->type == Product::TYPE_PRODUCT || !empty($conf->global->STOCK_SUPPORTS_SERVICES)) {
|
|
if (!empty($conf->productbatch->enabled)) {
|
|
$langs->load("productbatch");
|
|
$label .= "<br><b>".$langs->trans("ManageLotSerial").'</b>: '.$this->getLibStatut(0, 2);
|
|
}
|
|
}
|
|
if (!empty($conf->barcode->enabled)) {
|
|
$label .= '<br><b>'.$langs->trans('BarCode').':</b> '.$this->barcode;
|
|
}
|
|
|
|
if ($this->type == Product::TYPE_PRODUCT)
|
|
{
|
|
if ($this->weight) {
|
|
$label .= "<br><b>".$langs->trans("Weight").'</b>: '.$this->weight.' '.measuringUnitString(0, "weight", $this->weight_units);
|
|
}
|
|
$labelsize = "";
|
|
if ($this->length) {
|
|
$labelsize .= ($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) $label .= "<br>".$labelsize;
|
|
|
|
$labelsurfacevolume = "";
|
|
if ($this->surface) {
|
|
$labelsurfacevolume .= ($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) $label .= "<br>".$labelsurfacevolume;
|
|
}
|
|
|
|
if (!empty($conf->accounting->enabled) && $this->status) {
|
|
include_once DOL_DOCUMENT_ROOT.'/core/lib/accounting.lib.php';
|
|
$label .= '<br><b>'.$langs->trans('ProductAccountancySellCode').':</b> '.length_accountg($this->accountancy_code_sell);
|
|
$label .= '<br><b>'.$langs->trans('ProductAccountancySellIntraCode').':</b> '.length_accountg($this->accountancy_code_sell_intra);
|
|
$label .= '<br><b>'.$langs->trans('ProductAccountancySellExportCode').':</b> '.length_accountg($this->accountancy_code_sell_export);
|
|
}
|
|
if (!empty($conf->accounting->enabled) && $this->status_buy) {
|
|
include_once DOL_DOCUMENT_ROOT.'/core/lib/accounting.lib.php';
|
|
$label .= '<br><b>'.$langs->trans('ProductAccountancyBuyCode').':</b> '.length_accountg($this->accountancy_code_buy);
|
|
$label .= '<br><b>'.$langs->trans('ProductAccountancyBuyIntraCode').':</b> '.length_accountg($this->accountancy_code_buy_intra);
|
|
$label .= '<br><b>'.$langs->trans('ProductAccountancyBuyExportCode').':</b> '.length_accountg($this->accountancy_code_buy_export);
|
|
}
|
|
if (isset($this->status) && isset($this->status_buy)) {
|
|
$label .= '<br><b>'.$langs->trans("Status").":</b> ".$this->getLibStatut(5, 0);
|
|
$label .= ' '.$this->getLibStatut(5, 1);
|
|
}
|
|
|
|
if (!empty($this->entity)) {
|
|
$tmpphoto = $this->show_photos('product', $conf->product->multidir_output[$this->entity], 1, 1, 0, 0, 0, 80);
|
|
if ($this->nbphoto > 0) { $label .= '<br>'.$tmpphoto;
|
|
}
|
|
}
|
|
|
|
$linkclose = '';
|
|
if (empty($notooltip)) {
|
|
if (!empty($conf->global->MAIN_OPTIMIZEFORTEXTBROWSER)) {
|
|
$label = $langs->trans("ShowProduct");
|
|
$linkclose .= ' alt="'.dol_escape_htmltag($label, 1).'"';
|
|
}
|
|
|
|
$linkclose .= ' title="'.dol_escape_htmltag($label, 1, 1).'"';
|
|
$linkclose .= ' class="nowraponall classfortooltip"';
|
|
}
|
|
else
|
|
{
|
|
$linkclose = ' class="nowraponall"';
|
|
}
|
|
|
|
if ($option == 'supplier' || $option == 'category') {
|
|
$url = DOL_URL_ROOT.'/product/fournisseurs.php?id='.$this->id;
|
|
} elseif ($option == 'stock') {
|
|
$url = DOL_URL_ROOT.'/product/stock/product.php?id='.$this->id;
|
|
} elseif ($option == 'composition') {
|
|
$url = DOL_URL_ROOT.'/product/composition/card.php?id='.$this->id;
|
|
} else {
|
|
$url = DOL_URL_ROOT.'/product/card.php?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 && preg_match('/list\.php/', $_SERVER["PHP_SELF"])) { $add_save_lastsearch_values = 1;
|
|
}
|
|
if ($add_save_lastsearch_values) { $url .= '&save_lastsearch_values=1';
|
|
}
|
|
}
|
|
|
|
$linkstart = '<a href="'.$url.'"';
|
|
$linkstart .= $linkclose.'>';
|
|
$linkend = '</a>';
|
|
|
|
$result .= $linkstart;
|
|
if ($withpicto)
|
|
{
|
|
if ($this->type == Product::TYPE_PRODUCT) {
|
|
$result .= (img_object(($notooltip ? '' : $label), 'product', ($notooltip ? 'class="paddingright"' : 'class="paddingright classfortooltip"'), 0, 0, $notooltip ? 0 : 1));
|
|
}
|
|
if ($this->type == Product::TYPE_SERVICE) {
|
|
$result .= (img_object(($notooltip ? '' : $label), 'service', ($notooltip ? 'class="paddinright"' : 'class="paddingright classfortooltip"'), 0, 0, $notooltip ? 0 : 1));
|
|
}
|
|
}
|
|
$result .= $newref;
|
|
$result .= $linkend;
|
|
|
|
global $action;
|
|
$hookmanager->initHooks(array('productdao'));
|
|
$parameters = array('id'=>$this->id, 'getnomurl'=>$result);
|
|
$reshook = $hookmanager->executeHooks('getNomUrl', $parameters, $this, $action); // Note that $action and $object may have been modified by some hooks
|
|
if ($reshook > 0) {
|
|
$result = $hookmanager->resPrint;
|
|
} else {
|
|
$result .= $hookmanager->resPrint;
|
|
}
|
|
|
|
return $result;
|
|
}
|
|
|
|
|
|
/**
|
|
* Create a document onto disk according to template module.
|
|
*
|
|
* @param string $modele Force model to use ('' to not force)
|
|
* @param Translate $outputlangs Object langs to use for output
|
|
* @param int $hidedetails Hide details of lines
|
|
* @param int $hidedesc Hide description
|
|
* @param int $hideref Hide ref
|
|
* @return int 0 if KO, 1 if OK
|
|
*/
|
|
public function generateDocument($modele, $outputlangs, $hidedetails = 0, $hidedesc = 0, $hideref = 0)
|
|
{
|
|
global $conf, $user, $langs;
|
|
|
|
$langs->load("products");
|
|
$outputlangs->load("products");
|
|
|
|
// Positionne le modele sur le nom du modele a utiliser
|
|
if (!dol_strlen($modele)) {
|
|
if (!empty($conf->global->PRODUCT_ADDON_PDF)) {
|
|
$modele = $conf->global->PRODUCT_ADDON_PDF;
|
|
}
|
|
else
|
|
{
|
|
$modele = 'strato';
|
|
}
|
|
}
|
|
|
|
$modelpath = "core/modules/product/doc/";
|
|
|
|
return $this->commonGenerateDocument($modelpath, $modele, $outputlangs, $hidedetails, $hidedesc, $hideref);
|
|
}
|
|
|
|
/**
|
|
* Return label of status of object
|
|
*
|
|
* @param int $mode 0=long label, 1=short label, 2=Picto + short label, 3=Picto, 4=Picto + long label, 5=Short label + Picto
|
|
* @param int $type 0=Sell, 1=Buy, 2=Batch Number management
|
|
* @return string Label of status
|
|
*/
|
|
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
|
|
/**
|
|
* Return label of a given status
|
|
*
|
|
* @param int $status Statut
|
|
* @param int $mode 0=long label, 1=short label, 2=Picto + short label, 3=Picto, 4=Picto + long label, 5=Short label + Picto, 6=Long label + Picto
|
|
* @param int $type 0=Status "to sell", 1=Status "to buy", 2=Status "to Batch"
|
|
* @return string Label of status
|
|
*/
|
|
public function LibStatut($status, $mode = 0, $type = 0)
|
|
{
|
|
// phpcs:enable
|
|
global $conf, $langs;
|
|
|
|
$labelStatus = $labelStatusShort = '';
|
|
|
|
$langs->load('products');
|
|
if (!empty($conf->productbatch->enabled)) { $langs->load("productbatch");
|
|
}
|
|
|
|
if ($type == 2) {
|
|
switch ($mode)
|
|
{
|
|
case 0:
|
|
$label = ($status == 0 ? $langs->trans('ProductStatusNotOnBatch') : $langs->trans('ProductStatusOnBatch'));
|
|
return dolGetStatus($label);
|
|
case 1:
|
|
$label = ($status == 0 ? $langs->trans('ProductStatusNotOnBatchShort') : $langs->trans('ProductStatusOnBatchShort'));
|
|
return dolGetStatus($label);
|
|
case 2:
|
|
return $this->LibStatut($status, 3, 2).' '.$this->LibStatut($status, 1, 2);
|
|
case 3:
|
|
return dolGetStatus($langs->trans('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->trans('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->trans('ProductStatusNotOnSellShort');
|
|
$labelStatusShort = $langs->trans('ProductStatusNotOnSell');
|
|
}
|
|
elseif ($type == 1) {
|
|
$labelStatus = $langs->trans('ProductStatusNotOnBuyShort');
|
|
$labelStatusShort = $langs->trans('ProductStatusNotOnBuy');
|
|
}
|
|
elseif ($type == 2) {
|
|
$labelStatus = $langs->trans('ProductStatusNotOnBatch');
|
|
$labelStatusShort = $langs->trans('ProductStatusNotOnBatchShort');
|
|
}
|
|
}
|
|
elseif ($status == 1) {
|
|
// $type 0=Status "to sell", 1=Status "to buy", 2=Status "to Batch"
|
|
if ($type == 0) {
|
|
$labelStatus = $langs->trans('ProductStatusOnSellShort');
|
|
$labelStatusShort = $langs->trans('ProductStatusOnSell');
|
|
}
|
|
elseif ($type == 1) {
|
|
$labelStatus = $langs->trans('ProductStatusOnBuyShort');
|
|
$labelStatusShort = $langs->trans('ProductStatusOnBuy');
|
|
}
|
|
elseif ($type == 2) {
|
|
$labelStatus = $langs->trans('ProductStatusOnBatch');
|
|
$labelStatusShort = $langs->trans('ProductStatusOnBatchShort');
|
|
}
|
|
}
|
|
|
|
|
|
if ($mode > 6) {
|
|
return dolGetStatus($langs->trans('Unknown'), '', '', 'status0', 0);
|
|
} else {
|
|
return dolGetStatus($labelStatus, $labelStatusShort, '', $statuttrans, $mode);
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
* Retour label of nature of product
|
|
*
|
|
* @return string Label
|
|
*/
|
|
public function getLibFinished()
|
|
{
|
|
global $langs;
|
|
$langs->load('products');
|
|
|
|
if ($this->finished == '0') { return $langs->trans("RowMaterial");
|
|
}
|
|
if ($this->finished == '1') { return $langs->trans("Finished");
|
|
}
|
|
return '';
|
|
}
|
|
|
|
|
|
// phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
|
|
/**
|
|
* Adjust stock in a warehouse for product
|
|
*
|
|
* @param User $user user asking change
|
|
* @param int $id_entrepot id of warehouse
|
|
* @param double $nbpiece nb of units
|
|
* @param int $movement 0 = add, 1 = remove
|
|
* @param string $label Label of stock movement
|
|
* @param double $price Unit price HT of product, used to calculate average weighted price (PMP in french). If 0, average weighted price is not changed.
|
|
* @param string $inventorycode Inventory code
|
|
* @param string $origin_element Origin element type
|
|
* @param int $origin_id Origin id of element
|
|
* @return int <0 if KO, >0 if OK
|
|
*/
|
|
public function correct_stock($user, $id_entrepot, $nbpiece, $movement, $label = '', $price = 0, $inventorycode = '', $origin_element = '', $origin_id = null)
|
|
{
|
|
// phpcs:enable
|
|
if ($id_entrepot) {
|
|
$this->db->begin();
|
|
|
|
include_once DOL_DOCUMENT_ROOT.'/product/stock/class/mouvementstock.class.php';
|
|
|
|
$op[0] = "+".trim($nbpiece);
|
|
$op[1] = "-".trim($nbpiece);
|
|
|
|
$movementstock = new MouvementStock($this->db);
|
|
$movementstock->setOrigin($origin_element, $origin_id); // Set ->origin and ->origin->id
|
|
$result = $movementstock->_create($user, $this->id, $id_entrepot, $op[$movement], $movement, $price, $label, $inventorycode);
|
|
|
|
if ($result >= 0) {
|
|
$this->db->commit();
|
|
return 1;
|
|
}
|
|
else
|
|
{
|
|
$this->error = $movementstock->error;
|
|
$this->errors = $movementstock->errors;
|
|
|
|
$this->db->rollback();
|
|
return -1;
|
|
}
|
|
}
|
|
}
|
|
|
|
// phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
|
|
/**
|
|
* Adjust stock in a warehouse for product with batch number
|
|
*
|
|
* @param User $user user asking change
|
|
* @param int $id_entrepot id of warehouse
|
|
* @param double $nbpiece nb of units
|
|
* @param int $movement 0 = add, 1 = remove
|
|
* @param string $label Label of stock movement
|
|
* @param double $price Price to use for stock eval
|
|
* @param integer $dlc eat-by date
|
|
* @param integer $dluo sell-by date
|
|
* @param string $lot Lot number
|
|
* @param string $inventorycode Inventory code
|
|
* @param string $origin_element Origin element type
|
|
* @param int $origin_id Origin id of element
|
|
* @return int <0 if KO, >0 if OK
|
|
*/
|
|
public function correct_stock_batch($user, $id_entrepot, $nbpiece, $movement, $label = '', $price = 0, $dlc = '', $dluo = '', $lot = '', $inventorycode = '', $origin_element = '', $origin_id = null)
|
|
{
|
|
// phpcs:enable
|
|
if ($id_entrepot) {
|
|
$this->db->begin();
|
|
|
|
include_once DOL_DOCUMENT_ROOT.'/product/stock/class/mouvementstock.class.php';
|
|
|
|
$op[0] = "+".trim($nbpiece);
|
|
$op[1] = "-".trim($nbpiece);
|
|
|
|
$movementstock = new MouvementStock($this->db);
|
|
$movementstock->setOrigin($origin_element, $origin_id);
|
|
$result = $movementstock->_create($user, $this->id, $id_entrepot, $op[$movement], $movement, $price, $label, $inventorycode, '', $dlc, $dluo, $lot);
|
|
|
|
if ($result >= 0) {
|
|
$this->db->commit();
|
|
return 1;
|
|
}
|
|
else
|
|
{
|
|
$this->error = $movementstock->error;
|
|
$this->errors = $movementstock->errors;
|
|
|
|
$this->db->rollback();
|
|
return -1;
|
|
}
|
|
}
|
|
}
|
|
|
|
// phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
|
|
/**
|
|
* Load information about stock of a product into ->stock_reel, ->stock_warehouse[] (including stock_warehouse[idwarehouse]->detail_batch for batch products)
|
|
* This function need a lot of load. If you use it on list, use a cache to execute it once for each product id.
|
|
* If ENTREPOT_EXTRA_STATUS set, filtering on warehouse status possible.
|
|
*
|
|
* @param string $option '' = Load all stock info, also from closed and internal warehouses, 'nobatch', 'novirtual'
|
|
* @param int $includedraftpoforvirtual Include draft status of PO for virtual stock calculation
|
|
* @return int < 0 if KO, > 0 if OK
|
|
* @see load_virtual_stock(), loadBatchInfo()
|
|
*/
|
|
public function load_stock($option = '', $includedraftpoforvirtual = null)
|
|
{
|
|
// phpcs:enable
|
|
global $conf;
|
|
|
|
$this->stock_reel = 0;
|
|
$this->stock_warehouse = array();
|
|
$this->stock_theorique = 0;
|
|
|
|
$warehouseStatus = array();
|
|
|
|
if (preg_match('/warehouseclosed/', $option)) {
|
|
$warehouseStatus[] = Entrepot::STATUS_CLOSED;
|
|
}
|
|
if (preg_match('/warehouseopen/', $option)) {
|
|
$warehouseStatus[] = Entrepot::STATUS_OPEN_ALL;
|
|
}
|
|
if (preg_match('/warehouseinternal/', $option)) {
|
|
$warehouseStatus[] = Entrepot::STATUS_OPEN_INTERNAL;
|
|
}
|
|
|
|
$sql = "SELECT ps.rowid, ps.reel, ps.fk_entrepot";
|
|
$sql .= " FROM ".MAIN_DB_PREFIX."product_stock as ps";
|
|
$sql .= ", ".MAIN_DB_PREFIX."entrepot as w";
|
|
$sql .= " WHERE w.entity IN (".getEntity('stock').")";
|
|
$sql .= " AND w.rowid = ps.fk_entrepot";
|
|
$sql .= " AND ps.fk_product = ".$this->id;
|
|
if ($conf->global->ENTREPOT_EXTRA_STATUS && count($warehouseStatus)) {
|
|
$sql .= " AND w.statut IN (".$this->db->escape(implode(',', $warehouseStatus)).")";
|
|
}
|
|
|
|
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->db->free($result);
|
|
|
|
if (!preg_match('/novirtual/', $option)) {
|
|
$this->load_virtual_stock($includedraftpoforvirtual); // This also load stats_commande_fournisseur, ...
|
|
}
|
|
|
|
return 1;
|
|
}
|
|
else
|
|
{
|
|
$this->error = $this->db->lasterror();
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
|
|
// phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
|
|
/**
|
|
* Load value ->stock_theorique of a product. Property this->id must be defined.
|
|
* This function need a lot of load. If you use it on list, use a cache to execute it one for each product id.
|
|
*
|
|
* @param int $includedraftpoforvirtual Include draft status of PO for virtual stock calculation
|
|
* @return int < 0 if KO, > 0 if OK
|
|
* @see load_stock(), loadBatchInfo()
|
|
*/
|
|
public function load_virtual_stock($includedraftpoforvirtual = null)
|
|
{
|
|
// phpcs:enable
|
|
global $conf, $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 (!empty($conf->commande->enabled))
|
|
{
|
|
$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 (!empty($conf->expedition->enabled))
|
|
{
|
|
require_once DOL_DOCUMENT_ROOT.'/expedition/class/expedition.class.php';
|
|
$filterShipmentStatus = '';
|
|
if (!empty($conf->global->STOCK_CALCULATE_ON_SHIPMENT)) {
|
|
$filterShipmentStatus = Expedition::STATUS_VALIDATED.','.Expedition::STATUS_CLOSED;
|
|
} elseif (!empty($conf->global->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'];
|
|
}
|
|
if (!empty($conf->fournisseur->enabled) && empty($conf->global->MAIN_USE_NEW_SUPPLIERMOD) || ! empty($conf->supplier_order->enabled))
|
|
{
|
|
$filterStatus = '1,2,3,4';
|
|
if (isset($includedraftpoforvirtual)) $filterStatus = '0,'.$filterStatus;
|
|
$result = $this->load_stats_commande_fournisseur(0, $filterStatus, 1);
|
|
if ($result < 0) dol_print_error($this->db, $this->error);
|
|
$stock_commande_fournisseur = $this->stats_commande_fournisseur['qty'];
|
|
}
|
|
if ((!empty($conf->fournisseur->enabled) && empty($conf->global->MAIN_USE_NEW_SUPPLIERMOD) || !empty($conf->supplier_order->enabled) || !empty($conf->supplier_invoice->enabled)) && empty($conf->reception->enabled))
|
|
{
|
|
$filterStatus = '4';
|
|
if (isset($includedraftpoforvirtual)) $filterStatus = '0,'.$filterStatus;
|
|
$result = $this->load_stats_reception(0, $filterStatus, 1);
|
|
if ($result < 0) dol_print_error($this->db, $this->error);
|
|
$stock_reception_fournisseur = $this->stats_reception['qty'];
|
|
}
|
|
if ((!empty($conf->fournisseur->enabled) && empty($conf->global->MAIN_USE_NEW_SUPPLIERMOD) || !empty($conf->supplier_order->enabled) || !empty($conf->supplier_invoice->enabled)) && empty($conf->reception->enabled))
|
|
{
|
|
$filterStatus = '4';
|
|
if (isset($includedraftpoforvirtual)) $filterStatus = '0,'.$filterStatus;
|
|
$result = $this->load_stats_reception(0, $filterStatus, 1); // Use same tables than when module reception is not used.
|
|
if ($result < 0) dol_print_error($this->db, $this->error);
|
|
$stock_reception_fournisseur = $this->stats_reception['qty'];
|
|
}
|
|
if (!empty($conf->mrp->enabled))
|
|
{
|
|
$result = $this->load_stats_inproduction(0, '1,2', 1);
|
|
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;
|
|
|
|
// Stock decrease mode
|
|
if (!empty($conf->global->STOCK_CALCULATE_ON_SHIPMENT) || !empty($conf->global->STOCK_CALCULATE_ON_SHIPMENT_CLOSE)) {
|
|
$this->stock_theorique -= ($stock_commande_client - $stock_sending_client);
|
|
}
|
|
elseif (!empty($conf->global->STOCK_CALCULATE_ON_VALIDATE_ORDER)) {
|
|
$this->stock_theorique += 0;
|
|
}
|
|
elseif (!empty($conf->global->STOCK_CALCULATE_ON_BILL)) {
|
|
$this->stock_theorique -= $stock_commande_client;
|
|
}
|
|
// Stock Increase mode
|
|
if (!empty($conf->global->STOCK_CALCULATE_ON_RECEPTION) || !empty($conf->global->STOCK_CALCULATE_ON_RECEPTION_CLOSE)) {
|
|
$this->stock_theorique += ($stock_commande_fournisseur - $stock_reception_fournisseur);
|
|
}
|
|
elseif (!empty($conf->global->STOCK_CALCULATE_ON_SUPPLIER_DISPATCH_ORDER)) {
|
|
$this->stock_theorique += ($stock_commande_fournisseur - $stock_reception_fournisseur);
|
|
}
|
|
elseif (!empty($conf->global->STOCK_CALCULATE_ON_SUPPLIER_VALIDATE_ORDER)) {
|
|
$this->stock_theorique -= $stock_reception_fournisseur;
|
|
}
|
|
elseif (!empty($conf->global->STOCK_CALCULATE_ON_SUPPLIER_BILL)) {
|
|
$this->stock_theorique += ($stock_commande_fournisseur - $stock_reception_fournisseur);
|
|
}
|
|
|
|
if (!is_object($hookmanager)) {
|
|
include_once DOL_DOCUMENT_ROOT.'/core/class/hookmanager.class.php';
|
|
$hookmanager = new HookManager($this->db);
|
|
}
|
|
$hookmanager->initHooks(array('productdao'));
|
|
$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'];
|
|
|
|
return 1;
|
|
}
|
|
|
|
|
|
/**
|
|
* Load existing information about a serial
|
|
*
|
|
* @param string $batch Lot/serial number
|
|
* @return array Array with record into product_batch
|
|
* @see load_stock(), load_virtual_stock()
|
|
*/
|
|
public function loadBatchInfo($batch)
|
|
{
|
|
$result = array();
|
|
|
|
$sql = "SELECT pb.batch, pb.eatby, pb.sellby, SUM(pb.qty) AS qty FROM ".MAIN_DB_PREFIX."product_batch as pb, ".MAIN_DB_PREFIX."product_stock as ps";
|
|
$sql .= " WHERE pb.fk_product_stock = ps.rowid AND ps.fk_product = ".$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
|
|
/**
|
|
* Move an uploaded file described into $file array into target directory $sdir.
|
|
*
|
|
* @param string $sdir Target directory
|
|
* @param string $file Array of file info of file to upload: array('name'=>..., 'tmp_name'=>...)
|
|
* @return int <0 if KO, >0 if OK
|
|
*/
|
|
public function add_photo($sdir, $file)
|
|
{
|
|
// phpcs:enable
|
|
global $conf;
|
|
|
|
include_once DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php';
|
|
|
|
$result = 0;
|
|
|
|
$dir = $sdir;
|
|
if (!empty($conf->global->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
|
|
/**
|
|
* Return if at least one photo is available
|
|
*
|
|
* @param string $sdir Directory to scan
|
|
* @return boolean True if at least one photo is available, False if not
|
|
*/
|
|
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';
|
|
|
|
global $conf;
|
|
|
|
$dir = $sdir;
|
|
if (!empty($conf->global->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).'/';
|
|
}
|
|
|
|
$nbphoto = 0;
|
|
|
|
$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 = utf8_encode($file); // 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
|
|
/**
|
|
* Retourne tableau de toutes les photos du produit
|
|
*
|
|
* @param string $dir Repertoire a scanner
|
|
* @param int $nbmax Nombre maximum de photos (0=pas de max)
|
|
* @return array Tableau de photos
|
|
*/
|
|
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 = utf8_encode($file); // readdir returns ISO
|
|
}
|
|
if (dol_is_file($dir.$file) && image_format_supported($file) >= 0) {
|
|
$nbphoto++;
|
|
|
|
// On determine nom du fichier vignette
|
|
$photo = $file;
|
|
$photo_vignette = '';
|
|
if (preg_match('/('.$this->regeximgext.')$/i', $photo, $regs)) {
|
|
$photo_vignette = preg_replace('/'.$regs[0].'/i', '', $photo).'_small'.$regs[0];
|
|
}
|
|
|
|
$dirthumb = $dir.'thumbs/';
|
|
|
|
// Objet
|
|
$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;
|
|
|
|
// On continue ou on arrete de boucler ?
|
|
if ($nbmax && $nbphoto >= $nbmax) { break;
|
|
}
|
|
}
|
|
}
|
|
|
|
closedir($handle);
|
|
}
|
|
|
|
return $tabobj;
|
|
}
|
|
|
|
// phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
|
|
/**
|
|
* Efface la photo du produit et sa vignette
|
|
*
|
|
* @param string $file Chemin de l'image
|
|
* @return void
|
|
*/
|
|
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
|
|
/**
|
|
* Load size of image file
|
|
*
|
|
* @param string $file Path to file
|
|
* @return void
|
|
*/
|
|
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
|
|
}
|
|
|
|
// phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
|
|
/**
|
|
* Load indicators this->nb for the dashboard
|
|
*
|
|
* @return int <0 if KO, >0 if OK
|
|
*/
|
|
public function load_state_board()
|
|
{
|
|
// phpcs:enable
|
|
global $conf, $user, $hookmanager;
|
|
|
|
$this->nb = array();
|
|
|
|
$sql = "SELECT count(p.rowid) as nb, fk_product_type";
|
|
$sql .= " FROM ".MAIN_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); // 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;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Return if object is a product
|
|
*
|
|
* @return boolean True if it's a product
|
|
*/
|
|
public function isProduct()
|
|
{
|
|
return ($this->type == Product::TYPE_PRODUCT ? true : false);
|
|
}
|
|
|
|
/**
|
|
* Return if object is a product
|
|
*
|
|
* @return boolean True if it's a service
|
|
*/
|
|
public function isService()
|
|
{
|
|
return ($this->type == Product::TYPE_SERVICE ? true : false);
|
|
}
|
|
|
|
// phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
|
|
/**
|
|
* Get a barcode from the module to generate barcode values.
|
|
* Return value is stored into this->barcode
|
|
*
|
|
* @param Product $object Object product or service
|
|
* @param string $type Barcode type (ean, isbn, ...)
|
|
* @return string
|
|
*/
|
|
public function get_barcode($object, $type = '')
|
|
{
|
|
// phpcs:enable
|
|
global $conf;
|
|
|
|
$result = '';
|
|
if (!empty($conf->global->BARCODE_PRODUCT_ADDON_NUM)) {
|
|
$dirsociete = array_merge(array('/core/modules/barcode/'), $conf->modules_parts['barcode']);
|
|
foreach ($dirsociete as $dirroot)
|
|
{
|
|
$res = dol_include_once($dirroot.$conf->global->BARCODE_PRODUCT_ADDON_NUM.'.php');
|
|
if ($res) { break;
|
|
}
|
|
}
|
|
$var = $conf->global->BARCODE_PRODUCT_ADDON_NUM;
|
|
$mod = new $var;
|
|
|
|
$result = $mod->getNextValue($object, $type);
|
|
|
|
dol_syslog(get_class($this)."::get_barcode barcode=".$result." module=".$var);
|
|
}
|
|
return $result;
|
|
}
|
|
|
|
/**
|
|
* Initialise an instance with random values.
|
|
* Used to build previews or test instances.
|
|
* id must be 0 if object instance is a specimen.
|
|
*
|
|
* @return void
|
|
*/
|
|
public function initAsSpecimen()
|
|
{
|
|
global $user, $langs, $conf, $mysoc;
|
|
|
|
$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->tosell = 1;
|
|
$this->tobuy = 1;
|
|
$this->tobatch = 0;
|
|
$this->note = 'This is a comment (private)';
|
|
$this->date_creation = $now;
|
|
$this->date_modification = $now;
|
|
|
|
$this->weight = 4;
|
|
$this->weight_unit = 1;
|
|
|
|
$this->length = 5;
|
|
$this->length_unit = 1;
|
|
$this->width = 6;
|
|
$this->width_unit = 0;
|
|
$this->height = null;
|
|
$this->height_unit = null;
|
|
|
|
$this->surface = 30;
|
|
$this->surface_unit = 0;
|
|
$this->volume = 300;
|
|
$this->volume_unit = 0;
|
|
|
|
$this->barcode = -1; // Create barcode automatically
|
|
}
|
|
|
|
/**
|
|
* Returns the label, shot_label or code found in units dictionary from ->fk_unit.
|
|
* A langs->trans() must be called on result to get translated value.
|
|
*
|
|
* @param string $type Label type (long, short or code)
|
|
* @return string|int <0 if ko, label if ok
|
|
* @see getLabelOfUnit() in CommonObjectLine
|
|
*/
|
|
public function getLabelOfUnit($type = 'long')
|
|
{
|
|
global $langs;
|
|
|
|
if (!$this->fk_unit) {
|
|
return '';
|
|
}
|
|
|
|
$langs->load('products');
|
|
|
|
$label_type = 'label';
|
|
if ($type == 'short') $label_type = 'short_label';
|
|
elseif ($type == 'code') $label_type = 'code';
|
|
|
|
$sql = 'select '.$label_type.', code from '.MAIN_DB_PREFIX.'c_units where rowid='.$this->fk_unit;
|
|
$resql = $this->db->query($sql);
|
|
if ($resql && $this->db->num_rows($resql) > 0) {
|
|
$res = $this->db->fetch_array($resql);
|
|
if ($label_type == 'code') $label = 'unit'.$res['code'];
|
|
else $label = $res[$label_type];
|
|
$this->db->free($resql);
|
|
return $label;
|
|
}
|
|
else
|
|
{
|
|
$this->error = $this->db->error().' sql='.$sql;
|
|
dol_syslog(get_class($this)."::getLabelOfUnit Error ".$this->error, LOG_ERR);
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Return if object has a sell-by date or eat-by date
|
|
*
|
|
* @return boolean True if it's has
|
|
*/
|
|
public function hasbatch()
|
|
{
|
|
return ($this->status_batch == 1 ? true : false);
|
|
}
|
|
|
|
|
|
// phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
|
|
/**
|
|
* Return minimum product recommended price
|
|
*
|
|
* @return int Minimum recommanded price that is higher price among all suppliers * PRODUCT_MINIMUM_RECOMMENDED_PRICE
|
|
*/
|
|
public function min_recommended_price()
|
|
{
|
|
// phpcs:enable
|
|
global $conf;
|
|
|
|
$maxpricesupplier = 0;
|
|
|
|
if (!empty($conf->global->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 *= $conf->global->PRODUCT_MINIMUM_RECOMMENDED_PRICE;
|
|
}
|
|
}
|
|
|
|
return $maxpricesupplier;
|
|
}
|
|
|
|
|
|
/**
|
|
* Sets object to supplied categories.
|
|
*
|
|
* Deletes object from existing categories not supplied.
|
|
* Adds it to non existing supplied categories.
|
|
* Existing categories are left untouch.
|
|
*
|
|
* @param int[]|int $categories Category or categories IDs
|
|
* @return void
|
|
*/
|
|
public function setCategories($categories)
|
|
{
|
|
// Handle single category
|
|
if (!is_array($categories)) {
|
|
$categories = array($categories);
|
|
}
|
|
|
|
// Get current categories
|
|
include_once DOL_DOCUMENT_ROOT.'/categories/class/categorie.class.php';
|
|
$c = new Categorie($this->db);
|
|
$existing = $c->containing($this->id, Categorie::TYPE_PRODUCT, 'id');
|
|
|
|
// Diff
|
|
if (is_array($existing)) {
|
|
$to_del = array_diff($existing, $categories);
|
|
$to_add = array_diff($categories, $existing);
|
|
} else {
|
|
$to_del = array(); // Nothing to delete
|
|
$to_add = $categories;
|
|
}
|
|
|
|
// Process
|
|
foreach ($to_del as $del) {
|
|
if ($c->fetch($del) > 0) {
|
|
$c->del_type($this, Categorie::TYPE_PRODUCT);
|
|
}
|
|
}
|
|
foreach ($to_add as $add) {
|
|
if ($c->fetch($add) > 0) {
|
|
$c->add_type($this, Categorie::TYPE_PRODUCT);
|
|
}
|
|
}
|
|
|
|
return;
|
|
}
|
|
|
|
/**
|
|
* Function used to replace a thirdparty id with another one.
|
|
*
|
|
* @param DoliDB $db Database handler
|
|
* @param int $origin_id Old thirdparty id
|
|
* @param int $dest_id New thirdparty id
|
|
* @return bool
|
|
*/
|
|
public static function replaceThirdparty(DoliDB $db, $origin_id, $dest_id)
|
|
{
|
|
$tables = array(
|
|
'product_customer_price',
|
|
'product_customer_price_log'
|
|
);
|
|
|
|
return CommonObject::commonReplaceThirdparty($db, $origin_id, $dest_id, $tables);
|
|
}
|
|
|
|
/**
|
|
* Generates prices for a product based on product multiprice generation rules
|
|
*
|
|
* @param User $user User that updates the prices
|
|
* @param float $baseprice Base price
|
|
* @param string $price_type Base price type
|
|
* @param float $price_vat VAT % tax
|
|
* @param int $npr NPR
|
|
* @param string $psq ¿?
|
|
* @return int -1 KO, 1 OK
|
|
*/
|
|
public function generateMultiprices(User $user, $baseprice, $price_type, $price_vat, $npr, $psq)
|
|
{
|
|
global $conf, $db;
|
|
|
|
$sql = "SELECT rowid, level, fk_level, var_percent, var_min_percent FROM ".MAIN_DB_PREFIX."product_pricerules";
|
|
$query = $db->query($sql);
|
|
|
|
$rules = array();
|
|
|
|
while ($result = $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
|
|
);
|
|
|
|
for ($i = 1; $i <= $conf->global->PRODUIT_MULTIPRICES_LIMIT; $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, true) < 0) {
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
return 1;
|
|
}
|
|
|
|
/**
|
|
* Returns the rights used for this class
|
|
*
|
|
* @return Object
|
|
*/
|
|
public function getRights()
|
|
{
|
|
global $user;
|
|
|
|
if ($this->isProduct()) {
|
|
return $user->rights->produit;
|
|
} else {
|
|
return $user->rights->service;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Load information for tab info
|
|
*
|
|
* @param int $id Id of thirdparty to load
|
|
* @return void
|
|
*/
|
|
public function info($id)
|
|
{
|
|
$sql = "SELECT p.rowid, p.ref, p.datec as date_creation, p.tms as date_modification,";
|
|
$sql .= " p.fk_user_author, p.fk_user_modif";
|
|
$sql .= " FROM ".MAIN_DB_PREFIX.$this->table_element." as p";
|
|
$sql .= " WHERE p.rowid = ".$id;
|
|
|
|
$result = $this->db->query($sql);
|
|
if ($result) {
|
|
if ($this->db->num_rows($result)) {
|
|
$obj = $this->db->fetch_object($result);
|
|
|
|
$this->id = $obj->rowid;
|
|
|
|
if ($obj->fk_user_author) {
|
|
$cuser = new User($this->db);
|
|
$cuser->fetch($obj->fk_user_author);
|
|
$this->user_creation = $cuser;
|
|
}
|
|
|
|
if ($obj->fk_user_modif) {
|
|
$muser = new User($this->db);
|
|
$muser->fetch($obj->fk_user_modif);
|
|
$this->user_modification = $muser;
|
|
}
|
|
|
|
$this->ref = $obj->ref;
|
|
$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);
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
* Class to manage products or services.
|
|
* Do not use 'Service' as class name since it is already used by APIs.
|
|
*/
|
|
class ProductService extends Product
|
|
{
|
|
public $picto = 'service';
|
|
}
|