categorie.class.php

Go to the documentation of this file.

<?php
/* Copyright (C) 2005       Matthieu Valleton       <mv@seeschloss.org>
 * Copyright (C) 2005       Davoleau Brice          <brice.davoleau@gmail.com>
 * Copyright (C) 2005       Rodolphe Quiedeville    <rodolphe@quiedeville.org>
 * Copyright (C) 2006-2012  Regis Houssin           <regis.houssin@inodbox.com>
 * Copyright (C) 2006-2012  Laurent Destailleur     <eldy@users.sourceforge.net>
 * Copyright (C) 2007       Patrick Raguin          <patrick.raguin@gmail.com>
 * Copyright (C) 2013-2016  Juanjo Menent           <jmenent@2byte.es>
 * Copyright (C) 2013-2018  Philippe Grand          <philippe.grand@atoo-net.com>
 * Copyright (C) 2015       Marcos García           <marcosgdf@gmail.com>
 * Copyright (C) 2015       Raphaël Doursenaud      <rdoursenaud@gpcsolutions.fr>
 * Copyright (C) 2016       Charlie Benke           <charlie@patas-monkey.com>
 * Copyright (C) 2018-2022  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/>.
 */
 
require_once DOL_DOCUMENT_ROOT.'/core/class/commonobject.class.php';
require_once DOL_DOCUMENT_ROOT.'/product/class/product.class.php';
require_once DOL_DOCUMENT_ROOT.'/ticket/class/ticket.class.php';
require_once DOL_DOCUMENT_ROOT.'/fourn/class/fournisseur.class.php';
require_once DOL_DOCUMENT_ROOT.'/contact/class/contact.class.php';
require_once DOL_DOCUMENT_ROOT.'/knowledgemanagement/class/knowledgerecord.class.php';
 
 
class Categorie extends CommonObject
{
  // Categories types (we use string because we want to accept any modules/types in a future)
  const TYPE_PRODUCT   = 'product';
  const TYPE_SUPPLIER  = 'supplier';
  const TYPE_CUSTOMER  = 'customer';
  const TYPE_MEMBER    = 'member';
  const TYPE_CONTACT   = 'contact';
  const TYPE_USER      = 'user';
  const TYPE_PROJECT   = 'project';
  const TYPE_ACCOUNT   = 'bank_account';
  const TYPE_BANK_LINE = 'bank_line';
  const TYPE_WAREHOUSE = 'warehouse';
  const TYPE_ACTIONCOMM = 'actioncomm';
  const TYPE_WEBSITE_PAGE = 'website_page';
  const TYPE_TICKET = 'ticket';
  const TYPE_KNOWLEDGEMANAGEMENT = 'knowledgemanagement';
 
  public $picto = 'category';
 
 
  protected $MAP_ID = array(
    'product'      => 0,
    'supplier'     => 1,
    'customer'     => 2,
    'member'       => 3,
    'contact'      => 4,
    'bank_account' => 5,
    'project'      => 6,
    'user'         => 7,
    'bank_line'    => 8,
    'warehouse'    => 9,
    'actioncomm'   => 10,
    'website_page' => 11,
    'ticket'       => 12,
    'knowledgemanagement' => 13
  );
 
  public static $MAP_ID_TO_CODE = array(
    0 => 'product',
    1 => 'supplier',
    2 => 'customer',
    3 => 'member',
    4 => 'contact',
    5 => 'bank_account',
    6 => 'project',
    7 => 'user',
    8 => 'bank_line',
    9 => 'warehouse',
    10 => 'actioncomm',
    11 => 'website_page',
    12 => 'ticket',
    13 => 'knowledgemanagement'
  );
 
  public $MAP_CAT_FK = array(
    'customer' => 'soc',
    'supplier' => 'soc',
    'contact'  => 'socpeople',
    'bank_account' => 'account',
  );
 
  public $MAP_CAT_TABLE = array(
    'customer' => 'societe',
    'supplier' => 'fournisseur',
    'bank_account'=> 'account',
  );
 
  public $MAP_OBJ_CLASS = array(
    'product'  => 'Product',
    'customer' => 'Societe',
    'supplier' => 'Fournisseur',
    'member'   => 'Adherent',
    'contact'  => 'Contact',
    'user'     => 'User',
    'account'  => 'Account', // old for bank account
    'bank_account'  => 'Account',
    'project'  => 'Project',
    'warehouse'=> 'Entrepot',
    'actioncomm' => 'ActionComm',
    'website_page' => 'WebsitePage',
    'ticket' => 'Ticket',
    'knowledgemanagement' => 'KnowledgeRecord'
  );
 
  public static $MAP_TYPE_TITLE_AREA = array(
    'product' => 'ProductsCategoriesArea',
    'customer' => 'CustomersCategoriesArea',
    'supplier' => 'SuppliersCategoriesArea',
    'member' => 'MembersCategoriesArea',
    'contact' => 'ContactsCategoriesArea',
    'user' => 'UsersCategoriesArea',
    'account' => 'AccountsCategoriesArea', // old for bank account
    'bank_account' => 'AccountsCategoriesArea',
    'project' => 'ProjectsCategoriesArea',
    'warehouse'=> 'StocksCategoriesArea',
    'actioncomm' => 'ActioncommCategoriesArea',
    'website_page' => 'WebsitePageCategoriesArea'
  );
 
  public $MAP_OBJ_TABLE = array(
    'customer' => 'societe',
    'supplier' => 'societe',
    'member'   => 'adherent',
    'contact'  => 'socpeople',
    'account'  => 'bank_account', // old for bank account
    'project'  => 'projet',
    'warehouse'=> 'entrepot',
    'knowledgemanagement' => 'knowledgemanagement_knowledgerecord'
  );
 
  public $element = 'category';
 
  public $table_element = 'categorie';
 
  public $fk_parent;
 
  public $label;
 
  public $description;
 
  public $color;
 
  public $visible;
 
  public $socid;
 
  public $type;
 
  public $cats = array();
 
  public $motherof = array();
 
  public $childs = array();
 
 
  public function __construct($db)
  {
    global $hookmanager;
 
    $this->db = $db;
 
    if (is_object($hookmanager)) {
      $hookmanager->initHooks(array('category'));
      $parameters = array();
      $reshook = $hookmanager->executeHooks('constructCategory', $parameters, $this); // Note that $action and $object may have been modified by some hooks
      if ($reshook >= 0 && !empty($hookmanager->resArray)) {
        foreach ($hookmanager->resArray as $mapList) {
          $mapId = $mapList['id'];
          $mapCode = $mapList['code'];
          self::$MAP_ID_TO_CODE[$mapId] = $mapCode;
          $this->MAP_ID[$mapCode] = $mapId;
          $this->MAP_CAT_FK[$mapCode] = $mapList['cat_fk'];
          $this->MAP_CAT_TABLE[$mapCode] = $mapList['cat_table'];
          $this->MAP_OBJ_CLASS[$mapCode] = $mapList['obj_class'];
          $this->MAP_OBJ_TABLE[$mapCode] = $mapList['obj_table'];
        }
      }
    }
  }
 
  public function getMapList()
  {
    $mapList = array();
 
    foreach ($this->MAP_ID as $mapCode => $mapId) {
      $mapList[] = array(
        'id'        => $mapId,
        'code'      => $mapCode,
        'cat_fk'    => (empty($this->MAP_CAT_FK[$mapCode]) ? $mapCode : $this->MAP_CAT_FK[$mapCode]),
        'cat_table' => (empty($this->MAP_CAT_TABLE[$mapCode]) ? $mapCode : $this->MAP_CAT_TABLE[$mapCode]),
        'obj_class' => (empty($this->MAP_OBJ_CLASS[$mapCode]) ? $mapCode : $this->MAP_OBJ_CLASS[$mapCode]),
        'obj_table' => (empty($this->MAP_OBJ_TABLE[$mapCode]) ? $mapCode : $this->MAP_OBJ_TABLE[$mapCode])
      );
    }
 
    return $mapList;
  }
 
  public function fetch($id, $label = '', $type = null, $ref_ext = '')
  {
    global $conf;
 
    // Check parameters
    if (empty($id) && empty($label) && empty($ref_ext)) {
      $this->error = "No category to search for";
      return -1;
    }
    if (!is_null($type) && !is_numeric($type)) {
      $type = $this->MAP_ID[$type];
    }
 
    $sql = "SELECT rowid, fk_parent, entity, label, description, color, fk_soc, visible, type, ref_ext";
    $sql .= ", date_creation, tms, fk_user_creat, fk_user_modif";
    $sql .= " FROM ".MAIN_DB_PREFIX."categorie";
    if ($id) {
      $sql .= " WHERE rowid = ".((int) $id);
    } elseif (!empty($ref_ext)) {
      $sql .= " WHERE ref_ext LIKE '".$this->db->escape($ref_ext)."'";
    } else {
      $sql .= " WHERE label = '".$this->db->escape($label)."' AND entity IN (".getEntity('category').")";
      if (!is_null($type)) {
        $sql .= " AND type = ".((int) $type);
      }
    }
 
    dol_syslog(get_class($this)."::fetch", LOG_DEBUG);
    $resql = $this->db->query($sql);
    if ($resql) {
      if ($this->db->num_rows($resql) > 0) {
        $res = $this->db->fetch_array($resql);
 
        $this->id = $res['rowid'];
        //$this->ref = $res['rowid'];
        $this->fk_parent  = (int) $res['fk_parent'];
        $this->label    = $res['label'];
        $this->description = $res['description'];
        $this->color      = $res['color'];
        $this->socid    = (int) $res['fk_soc'];
        $this->visible = (int) $res['visible'];
        $this->type = (int) $res['type'];
        $this->ref_ext = $res['ref_ext'];
        $this->entity = (int) $res['entity'];
        $this->date_creation = $this->db->jdate($res['date_creation']);
        $this->date_modification = $this->db->jdate($res['tms']);
        $this->user_creation_id = (int) $res['fk_user_creat'];
        $this->user_modification_id = (int) $res['fk_user_modif'];
        $this->user_creation = (int) $res['fk_user_creat'];
        $this->user_modification = (int) $res['fk_user_modif'];
 
        // Retrieve all extrafield
        // fetch optionals attributes and labels
        $this->fetch_optionals();
 
        $this->db->free($resql);
 
        // multilangs
        if (getDolGlobalInt('MAIN_MULTILANGS')) {
          $this->getMultiLangs();
        }
 
        return 1;
      } else {
        $this->error = "No category found";
        return 0;
      }
    } else {
      dol_print_error($this->db);
      $this->error = $this->db->lasterror;
      $this->errors[] = $this->db->lasterror;
      return -1;
    }
  }
 
  public function create($user)
  {
    global $conf, $langs, $hookmanager;
    $langs->load('categories');
 
    $type = $this->type;
 
    if (!is_numeric($type)) {
      $type = $this->MAP_ID[$type];
    }
 
    $error = 0;
 
    dol_syslog(get_class($this).'::create', LOG_DEBUG);
 
    // Clean parameters
    $this->label = trim($this->label);
    $this->description = trim($this->description);
    $this->color = trim($this->color);
    $this->import_key = trim($this->import_key);
    $this->ref_ext = trim($this->ref_ext);
    if (empty($this->visible)) {
      $this->visible = 0;
    }
    $this->fk_parent = ($this->fk_parent != "" ? intval($this->fk_parent) : 0);
 
    if ($this->already_exists()) {
      $this->error = $langs->trans("ImpossibleAddCat", $this->label);
      $this->error .= " : ".$langs->trans("CategoryExistsAtSameLevel");
      dol_syslog($this->error, LOG_WARNING);
      return -4;
    }
 
    $this->db->begin();
    $now = dol_now();
    $sql = "INSERT INTO ".MAIN_DB_PREFIX."categorie (";
    $sql .= "fk_parent,";
    $sql .= " label,";
    $sql .= " description,";
    $sql .= " color,";
    if (!empty($conf->global->CATEGORY_ASSIGNED_TO_A_CUSTOMER)) {
      $sql .= "fk_soc,";
    }
    $sql .= " visible,";
    $sql .= " type,";
    $sql .= " import_key,";
    $sql .= " ref_ext,";
    $sql .= " entity,";
    $sql .= " date_creation,";
    $sql .= " fk_user_creat";
    $sql .= ") VALUES (";
    $sql .= (int) $this->fk_parent.",";
    $sql .= "'".$this->db->escape($this->label)."', ";
    $sql .= "'".$this->db->escape($this->description)."', ";
    $sql .= "'".$this->db->escape($this->color)."', ";
    if (!empty($conf->global->CATEGORY_ASSIGNED_TO_A_CUSTOMER)) {
      $sql .= ($this->socid > 0 ? $this->socid : 'null').", ";
    }
    $sql .= "'".$this->db->escape($this->visible)."', ";
    $sql .= ((int) $type).", ";
    $sql .= (!empty($this->import_key) ? "'".$this->db->escape($this->import_key)."'" : 'null').", ";
    $sql .= (!empty($this->ref_ext) ? "'".$this->db->escape($this->ref_ext)."'" : 'null').", ";
    $sql .= (int) $conf->entity.", ";
    $sql .= "'".$this->db->idate($now)."', ";
    $sql .= (int) $user->id;
    $sql .= ")";
 
    $res = $this->db->query($sql);
    if ($res) {
      $id = $this->db->last_insert_id(MAIN_DB_PREFIX."categorie");
 
      if ($id > 0) {
        $this->id = $id;
 
        $action = 'create';
 
        // Actions on extra fields
        if (!$error) {
          $result = $this->insertExtraFields();
          if ($result < 0) {
            $error++;
          }
        }
 
        if (!$error) {
          // Call trigger
          $result = $this->call_trigger('CATEGORY_CREATE', $user);
          if ($result < 0) {
            $error++;
          }
          // End call triggers
        }
 
        if (!$error) {
          $this->db->commit();
          return $id;
        } else {
          $this->db->rollback();
          return -3;
        }
      } else {
        $this->db->rollback();
        return -2;
      }
    } else {
      $this->error = $this->db->error();
      $this->db->rollback();
      return -1;
    }
  }
 
  public function update(User $user)
  {
    global $conf, $langs, $hookmanager;
 
    $error = 0;
 
    // Clean parameters
    $this->label = trim($this->label);
    $this->description = trim($this->description);
    $this->ref_ext = trim($this->ref_ext);
    $this->fk_parent = ($this->fk_parent != "" ? intval($this->fk_parent) : 0);
    $this->visible = ($this->visible != "" ? intval($this->visible) : 0);
 
    if ($this->already_exists()) {
      $this->error = $langs->trans("ImpossibleUpdateCat");
      $this->error .= " : ".$langs->trans("CategoryExistsAtSameLevel");
      return -1;
    }
 
    $this->db->begin();
 
    $sql = "UPDATE ".MAIN_DB_PREFIX."categorie";
    $sql .= " SET label = '".$this->db->escape($this->label)."',";
    $sql .= " description = '".$this->db->escape($this->description)."',";
    $sql .= " ref_ext = '".$this->db->escape($this->ref_ext)."',";
    $sql .= " color = '".$this->db->escape($this->color)."'";
    if (!empty($conf->global->CATEGORY_ASSIGNED_TO_A_CUSTOMER)) {
      $sql .= ", fk_soc = ".($this->socid > 0 ? $this->socid : 'null');
    }
    $sql .= ", visible = ".(int) $this->visible;
    $sql .= ", fk_parent = ".(int) $this->fk_parent;
    $sql .= ", fk_user_modif = ".(int) $user->id;
    $sql .= " WHERE rowid = ".((int) $this->id);
 
    dol_syslog(get_class($this)."::update", LOG_DEBUG);
    if ($this->db->query($sql)) {
      $action = 'update';
 
      // Actions on extra fields
      if (!$error) {
        $result = $this->insertExtraFields();
        if ($result < 0) {
          $error++;
        }
      }
 
      if (!$error) {
        // Call trigger
        $result = $this->call_trigger('CATEGORY_MODIFY', $user);
        if ($result < 0) {
          $error++; $this->db->rollback(); return -1;
        }
        // End call triggers
      }
 
      $this->db->commit();
 
      return 1;
    } else {
      $this->db->rollback();
      dol_print_error($this->db);
      return -1;
    }
  }
 
  public function delete($user, $notrigger = 0)
  {
    global $conf, $langs;
 
    $error = 0;
 
    // Clean parameters
    $this->fk_parent = ($this->fk_parent != "" ? intval($this->fk_parent) : 0);
 
    dol_syslog(get_class($this)."::remove");
 
    $this->db->begin();
 
    if (!$error && !$notrigger) {
      // Call trigger
      $result = $this->call_trigger('CATEGORY_DELETE', $user);
      if ($result < 0) {
        $error++;
      }
      // End call triggers
    }
 
    /* FIX #1317 : Check for child category and move up 1 level*/
    if (!$error) {
      $sql = "UPDATE ".MAIN_DB_PREFIX."categorie";
      $sql .= " SET fk_parent = ".((int) $this->fk_parent);
      $sql .= " WHERE fk_parent = ".((int) $this->id);
 
      if (!$this->db->query($sql)) {
        $this->error = $this->db->lasterror();
        $error++;
      }
    }
 
    $arraydelete = array(
      'categorie_account' => 'fk_categorie',
      'categorie_actioncomm' => 'fk_categorie',
      'categorie_contact' => 'fk_categorie',
      'categorie_fournisseur' => 'fk_categorie',
      'categorie_knowledgemanagement' => array('field' => 'fk_categorie', 'enabled' => isModEnabled('knowledgemanagement')),
      'categorie_member' => 'fk_categorie',
      'categorie_user' => 'fk_categorie',
      'categorie_product' => 'fk_categorie',
      'categorie_project' => 'fk_categorie',
      'categorie_societe' => 'fk_categorie',
      'categorie_ticket' => array('field' => 'fk_categorie', 'enabled' => isModEnabled('ticket')),
      'categorie_warehouse' => 'fk_categorie',
      'categorie_website_page' => array('field' => 'fk_categorie', 'enabled' => isModEnabled('website')),
      'bank_class' => 'fk_categ',
      'categorie_lang' => 'fk_category',
      'categorie' => 'rowid',
    );
    foreach ($arraydelete as $key => $value) {
      if (is_array($value)) {
        if (empty($value['enabled'])) {
          continue;
        }
        $value = $value['field'];
      }
      $sql  = "DELETE FROM ".MAIN_DB_PREFIX.$key;
      $sql .= " WHERE ".$value." = ".((int) $this->id);
      if (!$this->db->query($sql)) {
        $this->errors[] = $this->db->lasterror();
        dol_syslog("Error sql=".$sql." ".$this->error, LOG_ERR);
        $error++;
      }
    }
 
    // Removed extrafields
    if (!$error) {
      $result = $this->deleteExtraFields();
      if ($result < 0) {
        $error++;
        dol_syslog(get_class($this)."::delete erreur ".$this->error, LOG_ERR);
      }
    }
 
    if (!$error) {
      $this->db->commit();
      return 1;
    } else {
      $this->db->rollback();
      return -1;
    }
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function add_type($obj, $type = '')
  {
    // phpcs:enable
    global $user, $langs, $conf;
 
    $error = 0;
 
    if ($this->id == -1) {
      return -2;
    }
 
    if (empty($type)) {
      $type = $obj->element;
    }
 
    dol_syslog(get_class($this).'::add_type', LOG_DEBUG);
 
    $this->db->begin();
 
    $sql = "INSERT INTO ".MAIN_DB_PREFIX."categorie_".(empty($this->MAP_CAT_TABLE[$type]) ? $type : $this->MAP_CAT_TABLE[$type]);
    $sql .= " (fk_categorie, fk_".(empty($this->MAP_CAT_FK[$type]) ? $type : $this->MAP_CAT_FK[$type]).")";
    $sql .= " VALUES (".((int) $this->id).", ".((int) $obj->id).")";
 
    if ($this->db->query($sql)) {
      if (!empty($conf->global->CATEGORIE_RECURSIV_ADD)) {
        $sql = 'SELECT fk_parent FROM '.MAIN_DB_PREFIX.'categorie';
        $sql .= " WHERE rowid = ".((int) $this->id);
 
        dol_syslog(get_class($this)."::add_type", LOG_DEBUG);
        $resql = $this->db->query($sql);
        if ($resql) {
          if ($this->db->num_rows($resql) > 0) {
            $objparent = $this->db->fetch_object($resql);
 
            if (!empty($objparent->fk_parent)) {
              $cat = new Categorie($this->db);
              $cat->id = $objparent->fk_parent;
              if (!$cat->containsObject($type, $obj->id)) {
                $result = $cat->add_type($obj, $type);
                if ($result < 0) {
                  $this->error = $cat->error;
                  $error++;
                }
              }
            }
          }
        } else {
          $error++;
          $this->error = $this->db->lasterror();
        }
 
        if ($error) {
          $this->db->rollback();
          return -1;
        }
      }
 
      // Call trigger
      $this->context = array('linkto'=>$obj); // Save object we want to link category to into category instance to provide information to trigger
      $result = $this->call_trigger('CATEGORY_LINK', $user);
      if ($result < 0) {
        $error++;
      }
      // End call triggers
 
      if (!$error) {
        $this->db->commit();
        return 1;
      } else {
        $this->db->rollback();
        return -2;
      }
    } else {
      $this->db->rollback();
      if ($this->db->lasterrno() == 'DB_ERROR_RECORD_ALREADY_EXISTS') {
        $this->error = $this->db->lasterrno();
        return -3;
      } else {
        $this->error = $this->db->lasterror();
      }
      return -1;
    }
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function del_type($obj, $type)
  {
    // phpcs:enable
    global $user, $langs, $conf;
 
    $error = 0;
 
    // For backward compatibility
    if ($type == 'societe') {
      $type = 'customer';
      dol_syslog(get_class($this)."::del_type(): type 'societe' is deprecated, please use 'customer' instead", LOG_WARNING);
    } elseif ($type == 'fournisseur') {
      $type = 'supplier';
      dol_syslog(get_class($this)."::del_type(): type 'fournisseur' is deprecated, please use 'supplier' instead", LOG_WARNING);
    }
 
    $this->db->begin();
 
    $sql = "DELETE FROM ".MAIN_DB_PREFIX."categorie_".(empty($this->MAP_CAT_TABLE[$type]) ? $type : $this->MAP_CAT_TABLE[$type]);
    $sql .= " WHERE fk_categorie = ".((int) $this->id);
    $sql .= " AND fk_".(empty($this->MAP_CAT_FK[$type]) ? $type : $this->MAP_CAT_FK[$type])." = ".((int) $obj->id);
 
    dol_syslog(get_class($this).'::del_type', LOG_DEBUG);
    if ($this->db->query($sql)) {
      // Call trigger
      $this->context = array('unlinkoff'=>$obj); // Save object we want to link category to into category instance to provide information to trigger
      $result = $this->call_trigger('CATEGORY_UNLINK', $user);
      if ($result < 0) {
        $error++;
      }
      // End call triggers
 
      if (!$error) {
        $this->db->commit();
        return 1;
      } else {
        $this->db->rollback();
        return -2;
      }
    } else {
      $this->db->rollback();
      $this->error = $this->db->lasterror();
      return -1;
    }
  }
 
  public function getObjectsInCateg($type, $onlyids = 0, $limit = 0, $offset = 0, $sortfield = '', $sortorder = 'ASC')
  {
    global $user;
 
    $objs = array();
 
    $classnameforobj = $this->MAP_OBJ_CLASS[$type];
    $obj = new $classnameforobj($this->db);
 
    $sql = "SELECT c.fk_".(empty($this->MAP_CAT_FK[$type]) ? $type : $this->MAP_CAT_FK[$type]);
    $sql .= " FROM ".MAIN_DB_PREFIX."categorie_".(empty($this->MAP_CAT_TABLE[$type]) ? $type : $this->MAP_CAT_TABLE[$type])." as c";
    $sql .= ", ".MAIN_DB_PREFIX.(empty($this->MAP_OBJ_TABLE[$type]) ? $type : $this->MAP_OBJ_TABLE[$type])." as o";
    $sql .= " WHERE o.entity IN (".getEntity($obj->element).")";
    $sql .= " AND c.fk_categorie = ".((int) $this->id);
    $sql .= " AND c.fk_".(empty($this->MAP_CAT_FK[$type]) ? $type : $this->MAP_CAT_FK[$type])." = o.rowid";
    // Protection for external users
    if (($type == 'customer' || $type == 'supplier') && $user->socid > 0) {
      $sql .= " AND o.rowid = ".((int) $user->socid);
    }
    if ($limit > 0 || $offset > 0) {
      $sql .= $this->db->plimit($limit + 1, $offset);
    }
    $sql .= $this->db->order($sortfield, $sortorder);
 
    dol_syslog(get_class($this)."::getObjectsInCateg", LOG_DEBUG);
    $resql = $this->db->query($sql);
    if ($resql) {
      while ($rec = $this->db->fetch_array($resql)) {
        if ($onlyids) {
          $objs[] = $rec['fk_'.(empty($this->MAP_CAT_FK[$type]) ? $type : $this->MAP_CAT_FK[$type])];
        } else {
          $classnameforobj = $this->MAP_OBJ_CLASS[$type];
 
          $obj = new $classnameforobj($this->db);
          $obj->fetch($rec['fk_'.(empty($this->MAP_CAT_FK[$type]) ? $type : $this->MAP_CAT_FK[$type])]);
 
          $objs[] = $obj;
        }
      }
      return $objs;
    } else {
      $this->error = $this->db->error().' sql='.$sql;
      return -1;
    }
  }
 
  public function containsObject($type, $object_id)
  {
    $sql = "SELECT COUNT(*) as nb FROM ".MAIN_DB_PREFIX."categorie_".(empty($this->MAP_CAT_TABLE[$type]) ? $type : $this->MAP_CAT_TABLE[$type]);
    $sql .= " WHERE fk_categorie = ".((int) $this->id)." AND fk_".(empty($this->MAP_CAT_FK[$type]) ? $type : $this->MAP_CAT_FK[$type])." = ".((int) $object_id);
    dol_syslog(get_class($this)."::containsObject", LOG_DEBUG);
    $resql = $this->db->query($sql);
    if ($resql) {
      return $this->db->fetch_object($resql)->nb;
    } else {
      $this->error = $this->db->error().' sql='.$sql;
      return -1;
    }
  }
 
  public function getListForItem($id, $type = 'customer', $sortfield = "s.rowid", $sortorder = 'ASC', $limit = 0, $page = 0)
  {
    global $conf;
 
    $categories = array();
 
    $type = sanitizeVal($type, 'aZ09');
 
    $sub_type = $type;
    $subcol_name = "fk_".$type;
    if ($type == "customer") {
      $sub_type = "societe";
      $subcol_name = "fk_soc";
    }
    if ($type == "supplier") {
      $sub_type = "fournisseur";
      $subcol_name = "fk_soc";
    }
    if ($type == "contact") {
      $subcol_name = "fk_socpeople";
    }
 
    $idoftype = array_search($type, self::$MAP_ID_TO_CODE);
 
    $sql = "SELECT s.rowid";
    $sql .= " FROM ".MAIN_DB_PREFIX."categorie as s, ".MAIN_DB_PREFIX."categorie_".$sub_type." as sub";
    $sql .= ' WHERE s.entity IN ('.getEntity('category').')';
    $sql .= ' AND s.type='.((int) $idoftype);
    $sql .= ' AND s.rowid = sub.fk_categorie';
    $sql .= " AND sub.".$subcol_name." = ".((int) $id);
 
    $sql .= $this->db->order($sortfield, $sortorder);
 
    $offset = 0;
    $nbtotalofrecords = '';
    if (empty($conf->global->MAIN_DISABLE_FULL_SCANLIST)) {
      $result = $this->db->query($sql);
      $nbtotalofrecords = $this->db->num_rows($result);
      if (($page * $limit) > $nbtotalofrecords) { // if total resultset is smaller then paging size (filtering), goto and load page 0
        $page = 0;
        $offset = 0;
      }
    }
 
    if ($limit) {
      if ($page < 0) {
        $page = 0;
      }
      $offset = $limit * $page;
 
      $sql .= $this->db->plimit($limit + 1, $offset);
    }
 
    $result = $this->db->query($sql);
    if ($result) {
      $i = 0;
      $num = $this->db->num_rows($result);
      $min = min($num, ($limit <= 0 ? $num : $limit));
      while ($i < $min) {
        $obj = $this->db->fetch_object($result);
        $category_static = new Categorie($this->db);
        if ($category_static->fetch($obj->rowid)) {
          $categories[$i]['id'] = $category_static->id;
          $categories[$i]['fk_parent']    = $category_static->fk_parent;
          $categories[$i]['label']      = $category_static->label;
          $categories[$i]['description'] = $category_static->description;
          $categories[$i]['color']        = $category_static->color;
          $categories[$i]['socid']      = $category_static->socid;
          $categories[$i]['ref_ext'] = $category_static->ref_ext;
          $categories[$i]['visible'] = $category_static->visible;
          $categories[$i]['type'] = $category_static->type;
          $categories[$i]['entity'] = $category_static->entity;
          $categories[$i]['array_options'] = $category_static->array_options;
 
          // multilangs
          if (getDolGlobalInt('MAIN_MULTILANGS') && isset($category_static->multilangs)) {
            $categories[$i]['multilangs'] = $category_static->multilangs;
          }
        }
        $i++;
      }
    } else {
      $this->error = $this->db->lasterror();
      return -1;
    }
    if (!count($categories)) {
      return 0;
    }
 
    return $categories;
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function get_filles()
  {
    // phpcs:enable
    $sql = "SELECT rowid FROM ".MAIN_DB_PREFIX."categorie";
    $sql .= " WHERE fk_parent = ".((int) $this->id);
    $sql .= " AND entity IN (".getEntity('category').")";
 
    $res = $this->db->query($sql);
    if ($res) {
      $cats = array();
      while ($rec = $this->db->fetch_array($res)) {
        $cat = new Categorie($this->db);
        $cat->fetch($rec['rowid']);
        $cats[] = $cat;
      }
      return $cats;
    } else {
      dol_print_error($this->db);
      return -1;
    }
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  protected function load_motherof()
  {
    // phpcs:enable
    $this->motherof = array();
 
    // Load array[child]=parent
    $sql = "SELECT fk_parent as id_parent, rowid as id_son";
    $sql .= " FROM ".MAIN_DB_PREFIX."categorie";
    $sql .= " WHERE fk_parent != 0";
    $sql .= " AND entity IN (".getEntity('category').")";
 
    dol_syslog(get_class($this)."::load_motherof", LOG_DEBUG);
    $resql = $this->db->query($sql);
    if ($resql) {
      while ($obj = $this->db->fetch_object($resql)) {
        $this->motherof[$obj->id_son] = $obj->id_parent;
      }
      return 1;
    } else {
      dol_print_error($this->db);
      return -1;
    }
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function get_full_arbo($type, $markafterid = 0, $include = 0)
  {
    // phpcs:enable
    global $conf, $langs;
 
    if (!is_numeric($type)) {
      $type = $this->MAP_ID[$type];
    }
    if (is_null($type)) {
      $this->error = 'BadValueForParameterType';
      return -1;
    }
 
    if (is_string($markafterid)) {
      $markafterid = explode(',', $markafterid);
    } elseif (is_numeric($markafterid)) {
      if ($markafterid > 0) {
        $markafterid = array($markafterid);
      } else {
        $markafterid = array();
      }
    } elseif (!is_array($markafterid)) {
      $markafterid = array();
    }
 
    $this->cats = array();
 
    // Init this->motherof that is array(id_son=>id_parent, ...)
    $this->load_motherof();
    $current_lang = $langs->getDefaultLang();
 
    // Init $this->cats array
    $sql = "SELECT DISTINCT c.rowid, c.label, c.ref_ext, c.description, c.color, c.fk_parent, c.visible"; // Distinct reduce pb with old tables with duplicates
    if (getDolGlobalInt('MAIN_MULTILANGS')) {
      $sql .= ", t.label as label_trans, t.description as description_trans";
    }
    $sql .= " FROM ".MAIN_DB_PREFIX."categorie as c";
    if (getDolGlobalInt('MAIN_MULTILANGS')) {
      $sql .= " LEFT  JOIN ".MAIN_DB_PREFIX."categorie_lang as t ON t.fk_category=c.rowid AND t.lang='".$this->db->escape($current_lang)."'";
    }
    $sql .= " WHERE c.entity IN (".getEntity('category').")";
    $sql .= " AND c.type = ".(int) $type;
 
    dol_syslog(get_class($this)."::get_full_arbo get category list", LOG_DEBUG);
    $resql = $this->db->query($sql);
    if ($resql) {
      $i = 0;
      while ($obj = $this->db->fetch_object($resql)) {
        $this->cats[$obj->rowid]['rowid'] = $obj->rowid;
        $this->cats[$obj->rowid]['id'] = $obj->rowid;
        $this->cats[$obj->rowid]['fk_parent'] = $obj->fk_parent;
        $this->cats[$obj->rowid]['label'] = !empty($obj->label_trans) ? $obj->label_trans : $obj->label;
        $this->cats[$obj->rowid]['description'] = !empty($obj->description_trans) ? $obj->description_trans : $obj->description;
        $this->cats[$obj->rowid]['color'] = $obj->color;
        $this->cats[$obj->rowid]['visible'] = $obj->visible;
        $this->cats[$obj->rowid]['ref_ext'] = $obj->ref_ext;
        $this->cats[$obj->rowid]['picto'] = 'category';
        $i++;
      }
    } else {
      dol_print_error($this->db);
      return -1;
    }
 
    // We add the fullpath property to each elements of first level (no parent exists)
    dol_syslog(get_class($this)."::get_full_arbo call to buildPathFromId", LOG_DEBUG);
    foreach ($this->cats as $key => $val) {
      //print 'key='.$key.'<br>'."\n";
      $this->buildPathFromId($key, 0); // Process a branch from the root category key (this category has no parent)
    }
 
    // Include or exclude leaf including $markafterid from tree
    if (count($markafterid) > 0) {
      $keyfiltercatid = '('.implode('|', $markafterid).')';
 
      //print "Look to discard category ".$markafterid."\n";
      $keyfilter1 = '^'.$keyfiltercatid.'$';
      $keyfilter2 = '_'.$keyfiltercatid.'$';
      $keyfilter3 = '^'.$keyfiltercatid.'_';
      $keyfilter4 = '_'.$keyfiltercatid.'_';
      foreach ($this->cats as $key => $val) {
        $test = (preg_match('/'.$keyfilter1.'/', $val['fullpath']) || preg_match('/'.$keyfilter2.'/', $val['fullpath'])
          || preg_match('/'.$keyfilter3.'/', $val['fullpath']) || preg_match('/'.$keyfilter4.'/', $val['fullpath']));
 
        if (($test && !$include) || (!$test && $include)) {
          unset($this->cats[$key]);
        }
      }
    }
 
    dol_syslog(get_class($this)."::get_full_arbo dol_sort_array", LOG_DEBUG);
    $this->cats = dol_sort_array($this->cats, 'fulllabel', 'asc', true, false);
 
    //$this->debug_cats();
 
    return $this->cats;
  }
 
  private function buildPathFromId($id_categ, $protection = 1000)
  {
    //dol_syslog(get_class($this)."::buildPathFromId id_categ=".$id_categ." protection=".$protection, LOG_DEBUG);
 
    if (!empty($this->cats[$id_categ]['fullpath'])) {
      // Already defined
      dol_syslog(get_class($this)."::buildPathFromId fullpath and fulllabel already defined", LOG_WARNING);
      return;
    }
 
    // First build full array $motherof
    //$this->load_motherof(); // Disabled because already done by caller of buildPathFromId
 
    // $this->cats[$id_categ] is supposed to be already an array. We just want to complete it with property fullpath and fulllabel
 
    // Define fullpath and fulllabel
    $this->cats[$id_categ]['fullpath'] = '_'.$id_categ;
    $this->cats[$id_categ]['fulllabel'] = $this->cats[$id_categ]['label'];
    $i = 0; $cursor_categ = $id_categ;
    //print 'Work for id_categ='.$id_categ.'<br>'."\n";
    while ((empty($protection) || $i < $protection) && !empty($this->motherof[$cursor_categ])) {
      //print '&nbsp; cursor_categ='.$cursor_categ.' i='.$i.' '.$this->motherof[$cursor_categ].'<br>'."\n";
      $this->cats[$id_categ]['fullpath'] = '_'.$this->motherof[$cursor_categ].$this->cats[$id_categ]['fullpath'];
      $this->cats[$id_categ]['fulllabel'] = (empty($this->cats[$this->motherof[$cursor_categ]]) ? 'NotFound' : $this->cats[$this->motherof[$cursor_categ]]['label']).' >> '.$this->cats[$id_categ]['fulllabel'];
      //print '&nbsp; Result for id_categ='.$id_categ.' : '.$this->cats[$id_categ]['fullpath'].' '.$this->cats[$id_categ]['fulllabel'].'<br>'."\n";
      $i++;
      $cursor_categ = $this->motherof[$cursor_categ];
    }
    //print 'Result for id_categ='.$id_categ.' : '.$this->cats[$id_categ]['fullpath'].'<br>'."\n";
 
    // We count number of _ to have level
    $nbunderscore = substr_count($this->cats[$id_categ]['fullpath'], '_');
    $this->cats[$id_categ]['level'] = ($nbunderscore ? $nbunderscore : null);
 
    return;
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function debug_cats()
  {
    // phpcs:enable
    // Display $this->cats
    foreach ($this->cats as $key => $val) {
      print 'id: '.$this->cats[$key]['id'];
      print ' label: '.$this->cats[$key]['label'];
      print ' mother: '.$this->cats[$key]['fk_parent'];
      //print ' children: '.(is_array($this->cats[$key]['id_children'])?join(',',$this->cats[$key]['id_children']):'');
      print ' fullpath: '.$this->cats[$key]['fullpath'];
      print ' fulllabel: '.$this->cats[$key]['fulllabel'];
      print "<br>\n";
    }
  }
 
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function get_all_categories($type = null, $parent = false)
  {
    // phpcs:enable
    if (!is_numeric($type)) {
      $type = $this->MAP_ID[$type];
    }
 
    $sql = "SELECT rowid FROM ".MAIN_DB_PREFIX."categorie";
    $sql .= " WHERE entity IN (".getEntity('category').")";
    if (!is_null($type)) {
      $sql .= " AND type = ".(int) $type;
    }
    if ($parent) {
      $sql .= " AND fk_parent = 0";
    }
 
    $res = $this->db->query($sql);
    if ($res) {
      $cats = array();
      while ($rec = $this->db->fetch_array($res)) {
        $cat = new Categorie($this->db);
        $cat->fetch($rec['rowid']);
        $cats[$rec['rowid']] = $cat;
      }
      return $cats;
    } else {
      dol_print_error($this->db);
      return -1;
    }
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function get_main_categories($type = null)
  {
    // phpcs:enable
    return $this->get_all_categories($type, true);
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function already_exists()
  {
    // phpcs:enable
    $type = $this->type;
 
    if (!is_numeric($type)) {
      $type = $this->MAP_ID[$type];
    }
 
    /* We have to select any rowid from llx_categorie which category's mother and label
     * are equals to those of the calling category
     */
    $sql = "SELECT c.rowid";
    $sql .= " FROM ".MAIN_DB_PREFIX."categorie as c ";
    $sql .= " WHERE c.entity IN (".getEntity('category').")";
    $sql .= " AND c.type = ".((int) $type);
    $sql .= " AND c.fk_parent = ".((int) $this->fk_parent);
    $sql .= " AND c.label = '".$this->db->escape($this->label)."'";
 
    dol_syslog(get_class($this)."::already_exists", LOG_DEBUG);
    $resql = $this->db->query($sql);
    if ($resql) {
      if ($this->db->num_rows($resql) > 0) {            // Checking for empty resql
        $obj = $this->db->fetch_array($resql);
        /* If object called create, obj cannot have is id.
         * If object called update, he mustn't have the same label as an other category for this mother.
         * So if the result have the same id, update is not for label, and if result have an other one,
         * update may be for label.
         */
        if ($obj[0] > 0 && $obj[0] != $this->id) {
          dol_syslog(get_class($this)."::already_exists category with name=".$this->label." and parent ".$this->fk_parent." exists: rowid=".$obj[0]." current_id=".$this->id, LOG_DEBUG);
          return 1;
        }
      }
      dol_syslog(get_class($this)."::already_exists no category with same name=".$this->label." and same parent ".$this->fk_parent." than category id=".$this->id, LOG_DEBUG);
      return 0;
    } else {
      $this->error = $this->db->error();
      return -1;
    }
  }
 
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function print_all_ways($sep = '&gt;&gt;', $url = '', $nocolor = 0, $addpicto = 0)
  {
    // phpcs:enable
    $ways = array();
 
    $allways = $this->get_all_ways(); // Load array of categories
    foreach ($allways as $way) {
      $w = array();
      $i = 0;
      $forced_color = '';
      foreach ($way as $cat) {
        $i++;
 
        if (empty($nocolor)) {
          $forced_color = 'colortoreplace';
          if ($i == count($way)) {  // Last category in hierarchy
            // Check contrast with background and correct text color
            $forced_color = 'categtextwhite';
            if ($cat->color) {
              if (colorIsLight($cat->color)) {
                $forced_color = 'categtextblack';
              }
            }
          }
        }
 
        if ($url == '') {
          $link = '<a href="'.DOL_URL_ROOT.'/categories/viewcat.php?id='.$cat->id.'&type='.$cat->type.'" class="'.$forced_color.'">';
          $linkend = '</a>';
          $w[] = $link.(($addpicto && $i == 1) ? img_object('', 'category', 'class="paddingright"') : '').$cat->label.$linkend;
        } elseif ($url == 'none') {
          $link = '<span class="'.$forced_color.'">';
          $linkend = '</span>';
          $w[] = $link.(($addpicto && $i == 1) ? img_object('', 'category', 'class="paddingright"') : '').$cat->label.$linkend;
        } else {
          $w[] = '<a class="'.$forced_color.'" href="'.DOL_URL_ROOT.'/'.$url.'?catid='.$cat->id.'">'.($addpicto ? img_object('', 'category') : '').$cat->label.'</a>';
        }
      }
      $newcategwithpath = preg_replace('/colortoreplace/', $forced_color, implode('<span class="inline-block valignmiddle paddingleft paddingright '.$forced_color.'">'.$sep.'</span>', $w));
 
      $ways[] = $newcategwithpath;
    }
 
    return $ways;
  }
 
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function get_meres()
  {
    // phpcs:enable
    $parents = array();
 
    $sql = "SELECT fk_parent FROM ".MAIN_DB_PREFIX."categorie";
    $sql .= " WHERE rowid = ".((int) $this->id);
 
    $res = $this->db->query($sql);
 
    if ($res) {
      while ($rec = $this->db->fetch_array($res)) {
        if ($rec['fk_parent'] > 0) {
          $cat = new Categorie($this->db);
          $cat->fetch($rec['fk_parent']);
          $parents[] = $cat;
        }
      }
      return $parents;
    } else {
      dol_print_error($this->db);
      return -1;
    }
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function get_all_ways()
  {
    // phpcs:enable
    $ways = array();
 
    $parents = $this->get_meres();
    if (!empty($parents)) {
      foreach ($parents as $parent) {
        $allways = $parent->get_all_ways();
        foreach ($allways as $way) {
          $w = $way;
          $w[] = $this;
          $ways[] = $w;
        }
      }
    }
 
    if (count($ways) == 0) {
      $ways[0][0] = $this;
    }
 
    return $ways;
  }
 
  public function containing($id, $type, $mode = 'object')
  {
    $cats = array();
 
    if (is_numeric($type)) {
      $type = Categorie::$MAP_ID_TO_CODE[$type];
    }
 
    if ($type === Categorie::TYPE_BANK_LINE) {   // TODO Remove this with standard category code after migration of llx_bank_categ into llx_categorie
      // Load bank categories
      $sql = "SELECT c.label, c.rowid";
      $sql .= " FROM ".MAIN_DB_PREFIX."bank_class as a, ".MAIN_DB_PREFIX."bank_categ as c";
      $sql .= " WHERE a.lineid=".((int) $id)." AND a.fk_categ = c.rowid";
      $sql .= " AND c.entity IN (".getEntity('category').")";
      $sql .= " ORDER BY c.label";
 
      $res = $this->db->query($sql);
      if ($res) {
        while ($obj = $this->db->fetch_object($res)) {
          if ($mode == 'id') {
            $cats[] = $obj->rowid;
          } elseif ($mode == 'label') {
            $cats[] = $obj->label;
          } else {
            $cat = new Categorie($this->db);
            $cat->id = $obj->rowid;
            $cat->label = $obj->label;
            $cats[] = $cat;
          }
        }
      } else {
        dol_print_error($this->db);
        return -1;
      }
    } else {
      $sql = "SELECT ct.fk_categorie, c.label, c.rowid";
      $sql .= " FROM ".MAIN_DB_PREFIX."categorie_".(empty($this->MAP_CAT_TABLE[$type]) ? $type : $this->MAP_CAT_TABLE[$type])." as ct, ".MAIN_DB_PREFIX."categorie as c";
      $sql .= " WHERE ct.fk_categorie = c.rowid AND ct.fk_".(empty($this->MAP_CAT_FK[$type]) ? $type : $this->MAP_CAT_FK[$type])." = ".(int) $id;
      // This seems useless because the table already contains id of category of 1 unique type. So commented.
      // So now it works also with external added categories.
      //$sql .= " AND c.type = ".((int) $this->MAP_ID[$type]);
      $sql .= " AND c.entity IN (".getEntity('category').")";
 
      $res = $this->db->query($sql);
      if ($res) {
        while ($obj = $this->db->fetch_object($res)) {
          if ($mode == 'id') {
            $cats[] = $obj->rowid;
          } elseif ($mode == 'label') {
            $cats[] = $obj->label;
          } else {
            $cat = new Categorie($this->db);
            $cat->fetch($obj->fk_categorie);
            $cats[] = $cat;
          }
        }
      } else {
        dol_print_error($this->db);
        return -1;
      }
    }
 
    return $cats;
  }
 
  public function rechercher($id, $nom, $type, $exact = false, $case = false)
  {
    // Deprecation warning
    if (is_numeric($type)) {
      dol_syslog(__METHOD__.': using numeric types is deprecated.', LOG_WARNING);
    }
 
    $cats = array();
 
    // For backward compatibility
    if (is_numeric($type)) {
      // We want to reverse lookup
      $map_type = array_flip($this->MAP_ID);
      $type = $map_type[$type];
      dol_syslog(get_class($this)."::rechercher(): numeric types are deprecated, please use string instead", LOG_WARNING);
    }
 
    // Generation requete recherche
    $sql = "SELECT rowid FROM ".MAIN_DB_PREFIX."categorie";
    $sql .= " WHERE type = ".((int) $this->MAP_ID[$type]);
    $sql .= " AND entity IN (".getEntity('category').")";
    if ($nom) {
      if (!$exact) {
        $nom = '%'.$this->db->escape(str_replace('*', '%', $nom)).'%';
      }
      if (!$case) {
        $sql .= " AND label LIKE '".$this->db->escape($nom)."'";
      } else {
        $sql .= " AND label LIKE BINARY '".$this->db->escape($nom)."'";
      }
    }
    if ($id) {
      $sql .= " AND rowid = ".((int) $id);
    }
 
    $res = $this->db->query($sql);
    if ($res) {
      while ($rec = $this->db->fetch_array($res)) {
        $cat = new Categorie($this->db);
        $cat->fetch($rec['rowid']);
        $cats[] = $cat;
      }
 
      return $cats;
    } else {
      $this->error = $this->db->error().' sql='.$sql;
      return -1;
    }
  }
 
  public function getNomUrl($withpicto = 0, $option = '', $maxlength = 0, $moreparam = '')
  {
    global $langs, $hookmanager;
 
    $result = '';
    $label = $langs->trans("ShowCategory").': '.($this->ref ? $this->ref : $this->label);
 
    // Check contrast with background and correct text color
    $forced_color = 'categtextwhite';
    if ($this->color) {
      if (colorIsLight($this->color)) {
        $forced_color = 'categtextblack';
      }
    }
 
    $link = '<a href="'.DOL_URL_ROOT.'/categories/viewcat.php?id='.$this->id.'&type='.$this->type.$moreparam.'&backtopage='.urlencode($_SERVER['PHP_SELF'].($moreparam ? '?'.$moreparam : '')).'" title="'.dol_escape_htmltag($label, 1).'" class="classfortooltip '.$forced_color.'">';
    $linkend = '</a>';
 
    $picto = 'category';
 
 
    if ($withpicto) {
      $result .= ($link.img_object($label, $picto, 'class="classfortooltip"').$linkend);
    }
    if ($withpicto && $withpicto != 2) {
      $result .= ' ';
    }
    if ($withpicto != 2) {
      $result .= $link.dol_trunc(($this->ref ? $this->ref : $this->label), $maxlength).$linkend;
    }
    global $action;
    $hookmanager->initHooks(array($this->element . 'dao'));
    $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;
  }
 
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function add_photo($sdir, $file)
  {
    // phpcs:enable
    require_once DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php';
 
    $dir = $sdir.'/'.get_exdir($this->id, 2, 0, 0, $this, 'category').$this->id."/";
    $dir .= "photos/";
 
    if (!file_exists($dir)) {
      dol_mkdir($dir);
    }
 
    if (file_exists($dir)) {
      if (is_array($file['name']) && count($file['name']) > 0) {
        $nbfile = count($file['name']);
        for ($i = 0; $i <= $nbfile; $i++) {
          $originImage = $dir.$file['name'][$i];
 
          // Cree fichier en taille origine
          dol_move_uploaded_file($file['tmp_name'][$i], $originImage, 1, 0, 0);
 
          if (file_exists($originImage)) {
            // Create thumbs
            $this->addThumbs($originImage);
          }
        }
      } else {
        $originImage = $dir.$file['name'];
 
        // Cree fichier en taille origine
        dol_move_uploaded_file($file['tmp_name'], $originImage, 1, 0, 0);
 
        if (file_exists($originImage)) {
          // Create thumbs
          $this->addThumbs($originImage);
        }
      }
    }
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function liste_photos($dir, $nbmax = 0)
  {
    // phpcs:enable
    include_once DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php';
 
    $nbphoto = 0;
    $tabobj = array();
 
    $dirthumb = $dir.'thumbs/';
 
    if (file_exists($dir)) {
      $handle = opendir($dir);
      if (is_resource($handle)) {
        while (($file = readdir($handle)) !== false) {
          if (dol_is_file($dir.$file) && preg_match('/(\.jpeg|\.jpg|\.bmp|\.gif|\.png|\.tiff)$/i', $dir.$file)) {
            $nbphoto++;
            $photo = $file;
 
            // On determine nom du fichier vignette
            $photo_vignette = '';
            if (preg_match('/(\.jpeg|\.jpg|\.bmp|\.gif|\.png|\.tiff)$/i', $photo, $regs)) {
              $photo_vignette = preg_replace('/'.$regs[0].'/i', '', $photo).'_small'.$regs[0];
            }
 
            // Objet
            $obj = array();
            $obj['photo'] = $photo;
            if ($photo_vignette && 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
  public function delete_photo($file)
  {
    // phpcs:enable
    require_once DOL_DOCUMENT_ROOT.'/core/lib/files.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, 1);
 
    // Si elle existe, on efface la vignette
    if (preg_match('/(\.jpeg|\.jpg|\.bmp|\.gif|\.png|\.tiff)$/i', $filename, $regs)) {
      $photo_vignette = preg_replace('/'.$regs[0].'/i', '', $filename).'_small'.$regs[0];
      if (file_exists($dirthumb.$photo_vignette)) {
        dol_delete_file($dirthumb.$photo_vignette, 1);
      }
    }
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function get_image_size($file)
  {
    // phpcs:enable
    $infoImg = getimagesize($file); // Recuperation des infos de l'image
    $this->imgWidth = $infoImg[0]; // Largeur de l'image
    $this->imgHeight = $infoImg[1]; // Hauteur de l'image
  }
 
  public function setMultiLangs($user)
  {
    global $langs;
 
    $langs_available = $langs->get_available_languages();
    $current_lang = $langs->getDefaultLang();
 
    foreach ($langs_available as $key => $value) {
      $sql = "SELECT rowid";
      $sql .= " FROM ".MAIN_DB_PREFIX."categorie_lang";
      $sql .= " WHERE fk_category=".((int) $this->id);
      $sql .= " AND lang = '".$this->db->escape($key)."'";
 
      $result = $this->db->query($sql);
 
      if ($key == $current_lang) {
        if ($this->db->num_rows($result)) { // si aucune ligne dans la base
          $sql2 = "UPDATE ".MAIN_DB_PREFIX."categorie_lang";
          $sql2 .= " SET label = '".$this->db->escape($this->label)."',";
          $sql2 .= " description = '".$this->db->escape($this->description)."'";
          $sql2 .= " WHERE fk_category = ".((int) $this->id)." AND lang = '".$this->db->escape($key)."'";
        } else {
          $sql2 = "INSERT INTO ".MAIN_DB_PREFIX."categorie_lang (fk_category, lang, label, description)";
          $sql2 .= " VALUES(".((int) $this->id).", '".$this->db->escape($key)."', '".$this->db->escape($this->label)."'";
          $sql2 .= ", '".$this->db->escape($this->multilangs["$key"]["description"])."')";
        }
        dol_syslog(get_class($this).'::setMultiLangs', LOG_DEBUG);
        if (!$this->db->query($sql2)) {
          $this->error = $this->db->lasterror();
          return -1;
        }
      } elseif (isset($this->multilangs["$key"])) {
        if ($this->db->num_rows($result)) { // si aucune ligne dans la base
          $sql2 = "UPDATE ".MAIN_DB_PREFIX."categorie_lang";
          $sql2 .= " SET label='".$this->db->escape($this->multilangs["$key"]["label"])."',";
          $sql2 .= " description='".$this->db->escape($this->multilangs["$key"]["description"])."'";
          $sql2 .= " WHERE fk_category=".((int) $this->id)." AND lang='".$this->db->escape($key)."'";
        } else {
          $sql2 = "INSERT INTO ".MAIN_DB_PREFIX."categorie_lang (fk_category, lang, label, description)";
          $sql2 .= " VALUES(".((int) $this->id).", '".$this->db->escape($key)."', '".$this->db->escape($this->multilangs["$key"]["label"])."'";
          $sql2 .= ",'".$this->db->escape($this->multilangs["$key"]["description"])."')";
        }
 
        // on ne sauvegarde pas des champs vides
        if ($this->multilangs["$key"]["label"] || $this->multilangs["$key"]["description"] || $this->multilangs["$key"]["note"]) {
          dol_syslog(get_class($this).'::setMultiLangs', LOG_DEBUG);
        }
        if (!$this->db->query($sql2)) {
          $this->error = $this->db->lasterror();
          return -1;
        }
      }
    }
 
    // Call trigger
    $result = $this->call_trigger('CATEGORY_SET_MULTILANGS', $user);
    if ($result < 0) {
      $this->error = $this->db->lasterror();
      return -1;
    }
    // End call triggers
 
    return 1;
  }
 
  public function getMultiLangs()
  {
    global $langs;
 
    $current_lang = $langs->getDefaultLang();
 
    $sql = "SELECT lang, label, description";
    $sql .= " FROM ".MAIN_DB_PREFIX."categorie_lang";
    $sql .= " WHERE fk_category=".((int) $this->id);
 
    $result = $this->db->query($sql);
    if ($result) {
      while ($obj = $this->db->fetch_object($result)) {
        //print 'lang='.$obj->lang.' current='.$current_lang.'<br>';
        if ($obj->lang == $current_lang) { // si on a les traduct. dans la langue courante on les charge en infos principales.
          $this->label = $obj->label;
          $this->description = $obj->description;
        }
        $this->multilangs["$obj->lang"]["label"] = $obj->label;
        $this->multilangs["$obj->lang"]["description"] = $obj->description;
      }
      return 1;
    } else {
      $this->error = $langs->trans("Error")." : ".$this->db->error()." - ".$sql;
      return -1;
    }
  }
 
  public function getLibStatut($mode)
  {
    return '';
  }
 
 
  public function initAsSpecimen()
  {
    dol_syslog(get_class($this)."::initAsSpecimen");
 
    // Initialise parametres
    $this->id = 0;
    $this->fk_parent = 0;
    $this->label = 'SPECIMEN';
    $this->specimen = 1;
    $this->description = 'This is a description';
    $this->socid = 1;
    $this->type = self::TYPE_PRODUCT;
  }
 
  public static function replaceThirdparty(DoliDB $dbs, $origin_id, $dest_id)
  {
    $tables = array(
      'categorie_societe'
    );
 
    return CommonObject::commonReplaceThirdparty($dbs, $origin_id, $dest_id, $tables, 1);
  }
 
  public static function getFilterJoinQuery($type, $rowIdName)
  {
    if ($type == 'bank_account') {
      $type = 'account';
    }
 
    return " LEFT JOIN ".MAIN_DB_PREFIX."categorie_".$type." as cp ON ".$rowIdName." = cp.fk_".$type;
  }
 
  public static function getFilterSelectQuery($type, $rowIdName, $searchList)
  {
    if ($type == 'bank_account') {
      $type = 'account';
    }
    if ($type == 'customer') {
      $type = 'societe';
    }
    if ($type == 'supplier') {
      $type = 'fournisseur';
    }
 
    if (empty($searchList) && !is_array($searchList)) {
      return "";
    }
 
    $searchCategorySqlList = array();
    foreach ($searchList as $searchCategory) {
      if (intval($searchCategory) == -2) {
        $searchCategorySqlList[] = " cp.fk_categorie IS NULL";
      } elseif (intval($searchCategory) > 0) {
        $searchCategorySqlList[] = " ".$rowIdName." IN (SELECT fk_".$type." FROM ".MAIN_DB_PREFIX."categorie_".$type." WHERE fk_categorie = ".((int) $searchCategory).")";
      }
    }
 
    if (!empty($searchCategorySqlList)) {
      return " AND (".implode(' AND ', $searchCategorySqlList).")";
    } else {
      return "";
    }
  }
 
  public function countNbOfCategories()
  {
    dol_syslog(get_class($this)."::count_all_categories", LOG_DEBUG);
    $sql = "SELECT COUNT(rowid) FROM ".MAIN_DB_PREFIX."categorie";
    $sql .= " WHERE entity IN (".getEntity('category').")";
 
    $res = $this->db->query($sql);
    if ($res) {
      $obj = $this->db->fetch_object($res);
      return $obj->count;
    } else {
      dol_print_error($this->db);
      return -1;
    }
  }
}