extrafields.class.php

Go to the documentation of this file.

<?php
/* Copyright (C) 2002-2003  Rodolphe Quiedeville    <rodolphe@quiedeville.org>
 * Copyright (C) 2002-2003  Jean-Louis Bergamo      <jlb@j1b.org>
 * Copyright (C) 2004       Sebastien Di Cintio     <sdicintio@ressource-toi.org>
 * Copyright (C) 2004       Benoit Mortier          <benoit.mortier@opensides.be>
 * Copyright (C) 2009-2012  Laurent Destailleur     <eldy@users.sourceforge.net>
 * Copyright (C) 2009-2012  Regis Houssin           <regis.houssin@inodbox.com>
 * Copyright (C) 2013       Florian Henry           <forian.henry@open-concept.pro>
 * Copyright (C) 2015-2025  Charlene BENKE          <charlene@patas-monkey.com>
 * Copyright (C) 2016       Raphaël Doursenaud      <rdoursenaud@gpcsolutions.fr>
 * Copyright (C) 2017       Nicolas ZABOURI         <info@inovea-conseil.com>
 * Copyright (C) 2018-2025  Frédéric France         <frederic.france@free.fr>
 * Copyright (C) 2022     Antonin MARCHAL         <antonin@letempledujeu.fr>
 * Copyright (C) 2024-2025  MDW           <mdeweerd@users.noreply.github.com>
 * Copyright (C) 2024   Benoît PASCAL     <contact@p-ben.com>
 * Copyright (C) 2024   Joachim Kueter      <git-jk@bloxera.com>
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 3 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program. If not, see <https://www.gnu.org/licenses/>.
 */
 
class ExtraFields
{
  public $db;
 
  public $attributes = array();
 
  public $expand_display;
 
  public $error = '';
 
  public $errors = array();
 
  public $errno;
 
  public static $type2label = array(
    'varchar' => 'String1Line',
    'text' => 'TextLongNLines',
    'html' => 'HtmlText',
    'int' => 'Int',
    'double' => 'Float',
    'date' => 'Date',
    'datetime' => 'DateAndTime',
    'duration' => 'Duration',
    //'datetimegmt'=>'DateAndTimeUTC',
    'boolean' => 'Boolean',
    'price' => 'ExtrafieldPrice',
    'pricecy' => 'ExtrafieldPriceWithCurrency',
    'phone' => 'ExtrafieldPhone',
    'email' => 'ExtrafieldMail',
    'url' => 'ExtrafieldUrl',
    'ip' => 'ExtrafieldIP',
    'icon' => 'Icon',
    'password' => 'ExtrafieldPassword',
    'radio' => 'ExtrafieldRadio',
    'select' => 'ExtrafieldSelect',
    'sellist' => 'ExtrafieldSelectList',
    'checkbox' => 'ExtrafieldCheckBox',
    'chkbxlst' => 'ExtrafieldCheckBoxFromList',
    'link' => 'ExtrafieldLink',
    'point' => 'ExtrafieldPointGeo',
    'multipts' => 'ExtrafieldMultiPointGeo',
    'linestrg' => 'ExtrafieldLinestringGeo',
    'polygon' => 'ExtrafieldPolygonGeo',
    'separate' => 'ExtrafieldSeparator',
    'stars' => 'ExtrafieldStars',
  );
 
  public static $geoDataTypes = array(
    'point' => array(
      'ST_Function' => 'ST_PointFromText',
      'shortname' => 'point'
    ),
    'multipts' => array(
      'ST_Function' => 'ST_MultiPointFromText',
      'shortname' => 'multipoint'
    ),
    'linestrg' => array(
      'ST_Function' => 'ST_LineFromText',
      'shortname' => 'line'
    ),
    'polygon' => array(
      'ST_Function' => 'ST_PolyFromText',
      'shortname' => 'polygon'
    )
  );
 
  public function __construct($db)
  {
    $this->db = $db;
  }
 
  public function addExtraField($attrname, $label, $type, $pos, $size, $elementtype, $unique = 0, $required = 0, $default_value = '', $param = '', $alwayseditable = 0, $perms = '', $list = '-1', $help = '', $computed = '', $entity = '', $langfile = '', $enabled = '1', $totalizable = 0, $printable = 0, $moreparams = array(), $aiprompt = "", $emptyonclone = 0)
  {
    if (empty($attrname)) {
      return -1;
    }
    if (empty($label)) {
      return -1;
    }
 
    $result = 0;
 
    // Clean properties
    if ($type == 'separator' || $type == 'separate') {
      $type = 'separate';
      $unique = 0;
      $required = 0;
    } // Force unique and not required if this is a separator field to avoid troubles.
    if ($elementtype == 'thirdparty') {
      $elementtype = 'societe';
    }
    if ($elementtype == 'contact') {
      $elementtype = 'socpeople';
    }
    // If property has a computed formula, it must not be a required or unique field
    if (!empty($computed)) {
      $required = 0;
      $unique = 0;
    }
 
    // Create field into database except for separator type which is not stored in database
    if ($type != 'separate') {
      $result = $this->create($attrname, $type, $size, $elementtype, $unique, $required, $default_value, $param, $perms, $list, $computed, $help, $moreparams);
    }
    $err1 = $this->errno;
    if ($result > 0 || $err1 == 'DB_ERROR_COLUMN_ALREADY_EXISTS' || $type == 'separate') {
      // Add declaration of field into table
      $result2 = $this->create_label($attrname, $label, $type, $pos, $size, $elementtype, $unique, $required, $param, $alwayseditable, $perms, $list, $help, $default_value, $computed, $entity, $langfile, $enabled, $totalizable, $printable, $moreparams, $aiprompt, $emptyonclone);
      $err2 = $this->errno;
      if ($result2 > 0
        || ($err1 == 'DB_ERROR_COLUMN_ALREADY_EXISTS' && $err2 == 'DB_ERROR_RECORD_ALREADY_EXISTS')
        || ($type == 'separate' && $err2 == 'DB_ERROR_RECORD_ALREADY_EXISTS')) {
        $this->error = '';
        $this->errno = '0';
        return 1;
      } else {
        return -2;
      }
    } else {
      return -1;
    }
  }
 
  public function updateExtraField($attrname, $label, $type, $pos, $size, $elementtype, $unique = 0, $required = 0, $default_value = '', $param = '', $alwayseditable = 0, $perms = '', $list = '-1', $help = '', $computed = '', $entity = '', $langfile = '', $enabled = '1', $totalizable = 0, $printable = 0, $moreparams = array(), $emptyonclone = 0)
  {
    if (empty($attrname)) {
      return -1;
    }
    if (empty($label)) {
      return -1;
    }
 
    $result = 0;
 
    if ($type == 'separator' || $type == 'separate') {
      $type = 'separate';
      $unique = 0;
      $required = 0;
    } // Force unique and not required if this is a separator field to avoid troubles.
    if ($elementtype == 'thirdparty') {
      $elementtype = 'societe';
    }
    if ($elementtype == 'contact') {
      $elementtype = 'socpeople';
    }
 
    // Create field into database except for separator type which is not stored in database
    if ($type != 'separate') {
      dol_syslog(get_class($this).'::thisupdate', LOG_DEBUG);
      $result = $this->update($attrname, $label, $type, $size, $elementtype, $unique, $required, $pos, $param, $alwayseditable, $perms, $list, $help, $default_value, $computed, $entity, $langfile, $enabled, $totalizable, $printable, $moreparams, '', $emptyonclone);
    }
    $err1 = $this->errno;
    if ($result > 0 || $err1 == 'DB_ERROR_COLUMN_ALREADY_EXISTS' || $type == 'separate') {
      // Add declaration of field into table
      dol_syslog(get_class($this).'::thislabel', LOG_DEBUG);
      $result2 = $this->update_label($attrname, $label, $type, $size, $elementtype, $unique, $required, $pos, $param, $alwayseditable, $perms, $list, $help, $default_value, $computed, $entity, $langfile, $enabled, $totalizable, $printable, $moreparams, '', $emptyonclone);
      $err2 = $this->errno;
      if ($result2 > 0 || ($err1 == 'DB_ERROR_COLUMN_ALREADY_EXISTS' && $err2 == 'DB_ERROR_RECORD_ALREADY_EXISTS')) {
        $this->error = '';
        $this->errno = '0';
        return 1;
      } else {
        return -2;
      }
    } else {
      return -1;
    }
  }
 
  private function create($attrname, $type = 'varchar', $length = '255', $elementtype = '', $unique = 0, $required = 0, $default_value = '', $param = array(), $perms = '', $list = '0', $computed = '', $help = '', $moreparams = array())
  {
    if ($elementtype == 'thirdparty') {
      $elementtype = 'societe';
    }
    if ($elementtype == 'contact') {
      $elementtype = 'socpeople';
    }
 
    $table = $elementtype.'_extrafields';
    if ($elementtype == 'categorie') {
      $table = 'categories_extrafields';
    }
 
    if (!empty($attrname) && preg_match("/^\w[a-zA-Z0-9_]*$/", $attrname) && !is_numeric($attrname)) {
      if ($type == 'boolean') {
        $typedb = 'int';
        $lengthdb = '1';
      } elseif ($type == 'price') {
        $typedb = 'double';
        $lengthdb = '24,8';
      } elseif ($type == 'pricecy') {
        $typedb = 'varchar';
        $lengthdb = '64';
      } elseif ($type == 'phone') {
        $typedb = 'varchar';
        $lengthdb = '20';
      } elseif ($type == 'email' || $type == 'mail' || $type == 'ip' || $type == 'icon') {
        $typedb = 'varchar';
        $lengthdb = '128';
      } elseif ($type == 'url') {
        $typedb = 'varchar';
        $lengthdb = '255';
      } elseif (($type == 'select') || ($type == 'sellist') || ($type == 'radio') || ($type == 'checkbox') || ($type == 'chkbxlst')) {
        $typedb = 'varchar';
        $lengthdb = '255';
      } elseif ($type == 'link') {
        $typedb = 'int';
        $lengthdb = '11';
      } elseif ($type == 'duration') {
        $typedb = 'int';
        $lengthdb = '11';
      } elseif ($type == 'point') {
        $typedb = 'point';
        $lengthdb = '';
      } elseif ($type == 'multipts') {
        $typedb = 'multipoint';
        $lengthdb = '';
      } elseif ($type == 'linestrg') {
        $typedb = 'linestring';
        $lengthdb = '';
      } elseif ($type == 'polygon') {
        $typedb = 'polygon';
        $lengthdb = '';
      } elseif ($type == 'html') {
        $typedb = 'text';
        $lengthdb = $length;
      } elseif ($type == 'password') {
        $typedb = 'varchar';
        $lengthdb = '128';
      } elseif ($type == 'stars') {
        $typedb = 'int';
        $lengthdb = $length;
      } else {
        $typedb = $type;
        $lengthdb = $length;
        if ($type == 'varchar' && empty($lengthdb)) {
          $lengthdb = '255';
        }
      }
      $field_desc = array(
        'type' => $typedb,
        'value' => $lengthdb,
        'null' => ($required ? 'NOT NULL' : 'NULL'),
        'default' => $default_value
      );
 
      $result = $this->db->DDLAddField($this->db->prefix().$this->db->sanitize($table), $attrname, $field_desc);
      if ($result > 0) {
        if ($unique) {
          $sql = "ALTER TABLE ".$this->db->prefix().$this->db->sanitize($table)." ADD UNIQUE INDEX uk_".$this->db->sanitize($table)."_".$attrname." (".$attrname.")";
          $resql = $this->db->query($sql, 1, 'dml');
        }
        return 1;
      } else {
        $this->error = $this->db->lasterror();
        $this->errno = $this->db->lasterrno();
        return -1;
      }
    } else {
      return 0;
    }
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  private function create_label($attrname, $label = '', $type = '', $pos = 0, $size = '', $elementtype = '', $unique = 0, $required = 0, $param = '', $alwayseditable = 0, $perms = '', $list = '-1', $help = '', $default = '', $computed = '', $entity = '', $langfile = '', $enabled = '1', $totalizable = 0, $printable = 0, $moreparams = array(), $aiprompt = "", $emptyonclone = 0)
  {
    // phpcs:enable
    global $conf, $user;
 
    if ($elementtype == 'thirdparty') {
      $elementtype = 'societe';
    }
    if ($elementtype == 'contact') {
      $elementtype = 'socpeople';
    }
 
    // Clean parameters
    if (empty($pos)) {
      $pos = 0;
    }
    if (empty($list)) {
      $list = '0';
    }
    if (empty($required)) {
      $required = 0;
    }
    if (empty($unique)) {
      $unique = 0;
    }
    if (empty($printable)) {
      $printable = 0;
    }
    if (empty($alwayseditable)) {
      $alwayseditable = 0;
    }
    if (empty($emptyonclone)) {
      $emptyonclone = 0;
    }
    if (empty($totalizable)) {
      $totalizable = 0;
    }
 
    $css = '';
    if (!empty($moreparams) && !empty($moreparams['css'])) {
      $css = $moreparams['css'];
    }
    $csslist = '';
    if (!empty($moreparams) && !empty($moreparams['csslist'])) {
      $csslist = $moreparams['csslist'];
    }
    $cssview = '';
    if (!empty($moreparams) && !empty($moreparams['cssview'])) {
      $cssview = $moreparams['cssview'];
    }
 
    if (!empty($attrname) && preg_match("/^\w[a-zA-Z0-9-_]*$/", $attrname) && !is_numeric($attrname)) {
      if (is_array($param) && count($param) > 0) {
        $params = serialize($param);
      } elseif (strlen($param) > 0) {
        $params = trim($param);
      } else {
        $params = '';
      }
 
      $sql = "INSERT INTO ".$this->db->prefix()."extrafields(";
      $sql .= " name,";
      $sql .= " label,";
      $sql .= " type,";
      $sql .= " pos,";
      $sql .= " size,";
      $sql .= " entity,";
      $sql .= " elementtype,";
      $sql .= " fieldunique,";
      $sql .= " fieldrequired,";
      $sql .= " param,";
      $sql .= " alwayseditable,";
      $sql .= " perms,";
      $sql .= " langs,";
      $sql .= " list,";
      $sql .= " printable,";
      $sql .= " fielddefault,";
      $sql .= " fieldcomputed,";
      $sql .= " fk_user_author,";
      $sql .= " fk_user_modif,";
      $sql .= " datec,";
      $sql .= " enabled,";
      $sql .= " help,";
      $sql .= " totalizable,";
      $sql .= " css,";
      $sql .= " csslist,";
      $sql .= " cssview,";
      $sql .= " aiprompt,";
      $sql .= " emptyonclone";
      $sql .= " )";
      $sql .= " VALUES('".$this->db->escape($attrname)."',";
      $sql .= " '".$this->db->escape($label)."',";
      $sql .= " '".$this->db->escape($type)."',";
      $sql .= " ".((int) $pos).",";
      $sql .= " '".$this->db->escape($size)."',";
      $sql .= " ".($entity === '' ? $conf->entity : $entity).",";
      $sql .= " '".$this->db->escape($elementtype)."',";
      $sql .= " ".((int) $unique).",";
      $sql .= " ".((int) $required).",";
      $sql .= " '".$this->db->escape($params)."',";
      $sql .= " ".((int) $alwayseditable).",";
      $sql .= " ".($perms ? "'".$this->db->escape($perms)."'" : "null").",";
      $sql .= " ".($langfile ? "'".$this->db->escape($langfile)."'" : "null").",";
      $sql .= " '".$this->db->escape($list)."',";
      $sql .= " '".$this->db->escape((string) $printable)."',";
      $sql .= " ".($default ? "'".$this->db->escape($default)."'" : "null").",";
      $sql .= " ".($computed ? "'".$this->db->escape($computed)."'" : "null").",";
      $sql .= " ".(is_object($user) ? $user->id : 0).",";
      $sql .= " ".(is_object($user) ? $user->id : 0).",";
      $sql .= "'".$this->db->idate(dol_now())."',";
      $sql .= " ".($enabled ? "'".$this->db->escape($enabled)."'" : "1").",";
      $sql .= " ".($help ? "'".$this->db->escape($help)."'" : "null").",";
      $sql .= " ".($totalizable ? 'TRUE' : 'FALSE').",";
      $sql .= " ".($css ? "'".$this->db->escape($css)."'" : "null").",";
      $sql .= " ".($csslist ? "'".$this->db->escape($csslist)."'" : "null").",";
      $sql .= " ".($cssview ? "'".$this->db->escape($cssview)."'" : "null").",";
      $sql .= " '".$this->db->escape($aiprompt)."',";
      $sql .= " ".((int) $emptyonclone);
      $sql .= ')';
 
      if ($this->db->query($sql)) {
        dol_syslog(get_class($this)."::create_label_success", LOG_DEBUG);
        return 1;
      } else {
        dol_syslog(get_class($this)."::create_label_error", LOG_DEBUG);
        $this->error = $this->db->lasterror();
        $this->errno = $this->db->lasterrno();
        return -1;
      }
    }
    return -1;
  }
 
  public function delete($attrname, $elementtype = '')
  {
    if ($elementtype == 'thirdparty') {
      $elementtype = 'societe';
    }
    if ($elementtype == 'contact') {
      $elementtype = 'socpeople';
    }
 
    $table = $elementtype.'_extrafields';
    if ($elementtype == 'categorie') {
      $table = 'categories_extrafields';
    }
 
    $error = 0;
 
    if (!empty($attrname) && preg_match("/^\w[a-zA-Z0-9-_]*$/", $attrname)) {
      $result = $this->delete_label($attrname, $elementtype);
      if ($result < 0) {
        $this->error = $this->db->lasterror();
        $this->errors[] = $this->db->lasterror();
        $error++;
      }
 
      if (!$error) {
        $sql = "SELECT COUNT(rowid) as nb";
        $sql .= " FROM ".$this->db->prefix()."extrafields";
        $sql .= " WHERE elementtype = '".$this->db->escape($elementtype)."'";
        $sql .= " AND name = '".$this->db->escape($attrname)."'";
        //$sql.= " AND entity IN (0,".$conf->entity.")";      Do not test on entity here. We want to see if there is still on field remaining in other entities before deleting field in table
        $resql = $this->db->query($sql);
        if ($resql) {
          $obj = $this->db->fetch_object($resql);
          if ($obj->nb <= 0) {
            $result = $this->db->DDLDropField($this->db->prefix().$table, $attrname); // This also drop the unique key
            if ($result < 0) {
              $this->error = $this->db->lasterror();
              $this->errors[] = $this->db->lasterror();
              $error++;
            }
          }
        } else {
          $this->error = $this->db->lasterror();
          $this->errors[] = $this->db->lasterror();
          $error++;
        }
      }
      if (empty($error)) {
        return $result;
      } else {
        return $error * -1;
      }
    } else {
      return 0;
    }
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  private function delete_label($attrname, $elementtype = '')
  {
    // phpcs:enable
    global $conf;
 
    if ($elementtype == 'thirdparty') {
      $elementtype = 'societe';
    }
    if ($elementtype == 'contact') {
      $elementtype = 'socpeople';
    }
 
    if (isset($attrname) && $attrname != '' && preg_match("/^\w[a-zA-Z0-9-_]*$/", $attrname)) {
      $sql = "DELETE FROM ".$this->db->prefix()."extrafields";
      $sql .= " WHERE name = '".$this->db->escape($attrname)."'";
      $sql .= " AND entity IN  (0,".$conf->entity.')';
      if (!empty($elementtype)) {
        $sql .= " AND elementtype = '".$this->db->escape($elementtype)."'";
      }
 
      dol_syslog(get_class($this)."::delete_label", LOG_DEBUG);
      $resql = $this->db->query($sql);
      if ($resql) {
        return 1;
      } else {
        dol_print_error($this->db);
        return -1;
      }
    } else {
      return 0;
    }
  }
 
  public function update($attrname, $label, $type, $length, $elementtype, $unique = 0, $required = 0, $pos = 0, $param = array(), $alwayseditable = 0, $perms = '', $list = '', $help = '', $default = '', $computed = '', $entity = '', $langfile = '', $enabled = '1', $totalizable = 0, $printable = 0, $moreparams = array(), $aiprompt = "", $emptyonclone = 0)
  {
    global $action, $hookmanager;
 
    $result = 0;
 
    if ($elementtype == 'thirdparty') {
      $elementtype = 'societe';
    }
    if ($elementtype == 'contact') {
      $elementtype = 'socpeople';
    }
 
    $table = $elementtype.'_extrafields';
    if ($elementtype == 'categorie') {
      $table = 'categories_extrafields';
    }
 
    if (isset($attrname) && $attrname != '' && preg_match("/^\w[a-zA-Z0-9-_]*$/", $attrname)) {
      // Clean parameters
      if ($type == 'boolean') {
        $typedb = 'int';
        $lengthdb = '1';
      } elseif ($type == 'price') {
        $typedb = 'double';
        $lengthdb = '24,8';
      } elseif ($type == 'pricecy') {
        $typedb = 'varchar';
        $lengthdb = '64';
      } elseif ($type == 'phone') {
        $typedb = 'varchar';
        $lengthdb = '20';
      } elseif ($type == 'mail' || $type == 'email' || $type == 'ip' || $type == 'icon') {
        $typedb = 'varchar';
        $lengthdb = '128';
      } elseif ($type == 'url') {
        $typedb = 'varchar';
        $lengthdb = '255';
      } elseif (($type == 'select') || ($type == 'sellist') || ($type == 'radio') || ($type == 'checkbox') || ($type == 'chkbxlst')) {
        $typedb = 'varchar';
        $lengthdb = '255';
      } elseif ($type == 'html') {
        $typedb = 'text';
        $lengthdb = $length;
      } elseif ($type == 'link') {
        $typedb = 'int';
        $lengthdb = '11';
      } elseif ($type == 'duration') {
        $typedb = 'int';
        $lengthdb = '11';
      } elseif ($type == 'point') {
        $typedb = 'point';
        $lengthdb = '';
      } elseif ($type == 'multipts') {
        $typedb = 'multipoint';
        $lengthdb = '';
      } elseif ($type == 'linestrg') {
        $typedb = 'linestring';
        $lengthdb = '';
      } elseif ($type == 'polygon') {
        $typedb = 'polygon';
        $lengthdb = '';
      } elseif ($type == 'password') {
        $typedb = 'varchar';
        $lengthdb = '128';
      } elseif ($type == 'stars') {
        $typedb = 'int';
        $lengthdb = $length;
      } else {
        $typedb = $type;
        $lengthdb = $length;
      }
      $field_desc = array('type' => $typedb, 'value' => $lengthdb, 'null' => ($required ? 'NOT NULL' : 'NULL'), 'default' => $default);
 
      // If property has a computed formula, it must not be a required or unique field
      if (!empty($computed)) {
        $required = 0;
        $unique = 0;
      }
 
      if (is_object($hookmanager)) {
        $hookmanager->initHooks(array('extrafieldsdao'));
        $parameters = array('field_desc' => &$field_desc, 'table' => $table, 'attr_name' => $attrname, 'label' => $label, 'type' => $type, 'length' => $length, 'unique' => $unique, 'required' => $required, 'pos' => $pos, 'param' => $param, 'alwayseditable' => $alwayseditable, 'emptyonclone' => $emptyonclone, 'perms' => $perms, 'list' => $list, 'help' => $help, 'default' => $default, 'computed' => $computed, 'entity' => $entity, 'langfile' => $langfile, 'enabled' => $enabled, 'totalizable' => $totalizable, 'printable' => $printable);
        $reshook = $hookmanager->executeHooks('updateExtrafields', $parameters, $this, $action); // Note that $action and $object may have been modified by some hooks
 
        if ($reshook < 0) {
          $this->error = $this->db->lasterror();
          return -1;
        }
      }
 
      dol_syslog(get_class($this).'::DDLUpdateField', LOG_DEBUG);
      if ($type != 'separate') { // No table update when separate type
        // TODO: Verify, adjust - field_desc has 'value' (not expected), and is missing 'label','enabled','position','visible'
        $result = $this->db->DDLUpdateField($this->db->prefix().$table, $attrname, $field_desc);
      }
      if ($result > 0 || $type == 'separate') {
        if ($label) {
          dol_syslog(get_class($this).'::update_label', LOG_DEBUG);
          $result = $this->update_label($attrname, $label, $type, $length, $elementtype, $unique, $required, $pos, $param, $alwayseditable, $perms, $list, $help, $default, $computed, $entity, $langfile, $enabled, $totalizable, $printable, $moreparams, $aiprompt, $emptyonclone);
        }
        if ($result > 0) {
          $sql = '';
          if ($unique) {
            dol_syslog(get_class($this).'::update_unique', LOG_DEBUG);
            $sql = "ALTER TABLE ".$this->db->prefix().$table." ADD UNIQUE INDEX uk_".$table."_".$this->db->sanitize($attrname)." (".$this->db->sanitize($attrname).")";
          } else {
            dol_syslog(get_class($this).'::update_common', LOG_DEBUG);
            $sql = "ALTER TABLE ".$this->db->prefix().$table." DROP INDEX uk_".$table."_".$this->db->sanitize($attrname);
          }
          dol_syslog(get_class($this).'::update', LOG_DEBUG);
          $resql = $this->db->query($sql, 1, 'dml');
          /*if ($resql < 0) {
           $this->error = $this->db->lasterror();
           return -1;
           }*/
          return 1;
        } else {
          $this->error = $this->db->lasterror();
          return -1;
        }
      } else {
        $this->error = $this->db->lasterror();
        return -1;
      }
    } else {
      return 0;
    }
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  private function update_label($attrname, $label, $type, $size, $elementtype, $unique = 0, $required = 0, $pos = 0, $param = array(), $alwayseditable = 0, $perms = '', $list = '0', $help = '', $default = '', $computed = '', $entity = '', $langfile = '', $enabled = '1', $totalizable = 0, $printable = 0, $moreparams = array(), $aiprompt = "", $emptyonclone = 0)
  {
    // phpcs:enable
    global $conf, $user;
    dol_syslog(get_class($this)."::update_label ".$attrname.", ".$label.", ".$type.", ".$size.", ".$elementtype.", ".$unique.", ".$required.", ".$pos.", ".$alwayseditable.", ".$perms.", ".$list.", ".$default.", ".$computed.", ".$entity.", ".$langfile.", ".$enabled.", ".$totalizable.", ".$printable.", ".$aiprompt);
 
    // Clean parameters
    if ($elementtype == 'thirdparty') {
      $elementtype = 'societe';
    }
    if ($elementtype == 'contact') {
      $elementtype = 'socpeople';
    }
 
    if (empty($pos)) {
      $pos = 0;
    }
    if (empty($list)) {
      $list = '0';
    }
    if (empty($totalizable)) {
      $totalizable = 0;
    }
    if (empty($required)) {
      $required = 0;
    }
    if (empty($unique)) {
      $unique = 0;
    }
    if (empty($alwayseditable)) {
      $alwayseditable = 0;
    }
    if (empty($emptyonclone)) {
      $emptyonclone = 0;
    }
 
    $css = '';
    if (!empty($moreparams) && !empty($moreparams['css'])) {
      $css = $moreparams['css'];
    }
    $csslist = '';
    if (!empty($moreparams) && !empty($moreparams['csslist'])) {
      $csslist = $moreparams['csslist'];
    }
    $cssview = '';
    if (!empty($moreparams) && !empty($moreparams['cssview'])) {
      $cssview = $moreparams['cssview'];
    }
 
    if (isset($attrname) && $attrname != '' && preg_match("/^\w[a-zA-Z0-9-_]*$/", $attrname)) {
      $this->db->begin();
 
      if (is_array($param) && count($param) > 0) {
        $params = serialize($param);
      } elseif (is_array($param)) {
        $params = '';
      } elseif (strlen($param) > 0) {
        $params = trim($param);
      } else {
        $params = '';
      }
 
      if ($entity === '' || $entity != '0') {
        // We don't want on all entities, we delete all and current
        $sql_del = "DELETE FROM ".$this->db->prefix()."extrafields";
        $sql_del .= " WHERE name = '".$this->db->escape($attrname)."'";
        $sql_del .= " AND entity IN (0, ".($entity === '' ? $conf->entity : $entity).")";
        $sql_del .= " AND elementtype = '".$this->db->escape($elementtype)."'";
      } else {
        // We want on all entities ($entities = '0'), we delete on all only (we keep setup specific to each entity)
        $sql_del = "DELETE FROM ".$this->db->prefix()."extrafields";
        $sql_del .= " WHERE name = '".$this->db->escape($attrname)."'";
        $sql_del .= " AND entity = 0";
        $sql_del .= " AND elementtype = '".$this->db->escape($elementtype)."'";
      }
      $resql1 = $this->db->query($sql_del);
 
      $sql = "INSERT INTO ".$this->db->prefix()."extrafields(";
      $sql .= " name,"; // This is code
      $sql .= " entity,";
      $sql .= " label,";
      $sql .= " type,";
      $sql .= " size,";
      $sql .= " elementtype,";
      $sql .= " fieldunique,";
      $sql .= " fieldrequired,";
      $sql .= " perms,";
      $sql .= " langs,";
      $sql .= " pos,";
      $sql .= " alwayseditable,";
      $sql .= " param,";
      $sql .= " list,";
      $sql .= " printable,";
      $sql .= " totalizable,";
      $sql .= " fielddefault,";
      $sql .= " fieldcomputed,";
      $sql .= " fk_user_author,";
      $sql .= " fk_user_modif,";
      $sql .= " datec,";
      $sql .= " enabled,";
      $sql .= " help,";
      $sql .= " css,";
      $sql .= " csslist,";
      $sql .= " cssview,";
      $sql .= " aiprompt,";
      $sql .= " emptyonclone";
      $sql .= ") VALUES (";
      $sql .= "'".$this->db->escape($attrname)."',";
      $sql .= " ".($entity === '' ? $conf->entity : $entity).",";
      $sql .= " '".$this->db->escape($label)."',";
      $sql .= " '".$this->db->escape($type)."',";
      $sql .= " '".$this->db->escape($size)."',";
      $sql .= " '".$this->db->escape($elementtype)."',";
      $sql .= " ".((int) $unique).",";
      $sql .= " ".((int) $required).",";
      $sql .= " ".($perms ? "'".$this->db->escape($perms)."'" : "null").",";
      $sql .= " ".($langfile ? "'".$this->db->escape($langfile)."'" : "null").",";
      $sql .= " ".((int) $pos).",";
      $sql .= " ".((int) $alwayseditable).",";
      $sql .= " '".$this->db->escape($params)."',";
      $sql .= " '".$this->db->escape($list)."',";
      $sql .= " ".((int) $printable).",";
      $sql .= " ".($totalizable ? 'TRUE' : 'FALSE').",";
      $sql .= " ".(($default != '') ? "'".$this->db->escape($default)."'" : "null").",";
      $sql .= " ".($computed ? "'".$this->db->escape($computed)."'" : "null").",";
      $sql .= " ".((int) $user->id).",";
      $sql .= " ".((int) $user->id).",";
      $sql .= "'".$this->db->idate(dol_now())."',";
      $sql .= "'".$this->db->escape($enabled)."',";
      $sql .= " ".($help ? "'".$this->db->escape($help)."'" : "null").",";
      $sql .= " ".($css ? "'".$this->db->escape($css)."'" : "null").",";
      $sql .= " ".($csslist ? "'".$this->db->escape($csslist)."'" : "null").",";
      $sql .= " ".($cssview ? "'".$this->db->escape($cssview)."'" : "null").",";
      $sql .= " '".$this->db->escape($aiprompt)."',";
      $sql .= " ".((int) $emptyonclone);
      $sql .= ")";
 
      $resql2 = $this->db->query($sql);
 
      if ($resql1 && $resql2) {
        $this->db->commit();
        return 1;
      } else {
        $this->db->rollback();
        dol_print_error($this->db);
        return -1;
      }
    } else {
      return 0;
    }
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function fetch_name_optionals_label($elementtype, $forceload = false, $attrname = '')
  {
    // phpcs:enable
    global $conf;
 
    if (empty($elementtype)) {
      return array();
    }
 
    if ($elementtype == 'thirdparty') {
      $elementtype = 'societe';
    }
    if ($elementtype == 'contact') {
      $elementtype = 'socpeople';
    }
    if ($elementtype == 'order_supplier') {
      $elementtype = 'commande_fournisseur';
    }
 
    if ($elementtype != 'all' && isset($this->attributes[$elementtype]) && $this->attributes[$elementtype]['loaded'] == 1 && !$forceload && isset($this->attributes[$elementtype]['label'])) {
      return $this->attributes[$elementtype]['label'];
    }
 
    $array_name_label = array();
 
    // We should not have several time this request. If we have, there is some optimization to do by calling a simple $extrafields->fetch_optionals() in top of code and not into subcode
    $sql = "SELECT rowid, name, label, type, size, elementtype, fieldunique, fieldrequired, param, pos, alwayseditable, emptyonclone, perms, langs, list, printable, totalizable, fielddefault, fieldcomputed, entity, enabled, help, aiprompt,";
    $sql .= " css, cssview, csslist";
    $sql .= " FROM ".$this->db->prefix()."extrafields";
    //$sql.= " WHERE entity IN (0,".$conf->entity.")";    // Filter is done later
    if ($elementtype && $elementtype != 'all') {
      $sql .= " WHERE elementtype = '".$this->db->escape($elementtype)."'"; // Filed with object->table_element
    }
    if ($attrname && $elementtype && $elementtype != 'all') {
      $sql .= " AND name = '".$this->db->escape($attrname)."'";
    }
    $sql .= " ORDER BY pos";
 
    $resql = $this->db->query($sql);
    if ($resql) {
      $count = 0;
      if ($this->db->num_rows($resql)) {
        while ($tab = $this->db->fetch_object($resql)) {
          if ($tab->entity != 0 && $tab->entity != $conf->entity) {
            // This field is not in current entity. We discard but before we save it into the array of mandatory fields if it is a mandatory field without default value
            if ($tab->fieldrequired && is_null($tab->fielddefault)) {
              $this->attributes[$tab->elementtype]['mandatoryfieldsofotherentities'][$tab->name] = $tab->type;
            }
            continue;
          }
 
          // We can add this attribute to object. TODO Remove this and return $this->attributes[$elementtype]['label']
          if ($tab->type != 'separate') {
            $array_name_label[$tab->name] = $tab->label;
          }
 
 
          $this->attributes[$tab->elementtype]['type'][$tab->name] = $tab->type;
          $this->attributes[$tab->elementtype]['label'][$tab->name] = $tab->label;
          $this->attributes[$tab->elementtype]['size'][$tab->name] = $tab->size;
          $this->attributes[$tab->elementtype]['elementtype'][$tab->name] = $tab->elementtype;
          $this->attributes[$tab->elementtype]['default'][$tab->name] = $tab->fielddefault;
          $this->attributes[$tab->elementtype]['computed'][$tab->name] = $tab->fieldcomputed;
          $this->attributes[$tab->elementtype]['unique'][$tab->name] = $tab->fieldunique;
          $this->attributes[$tab->elementtype]['required'][$tab->name] = $tab->fieldrequired;
          $this->attributes[$tab->elementtype]['param'][$tab->name] = ($tab->param ? jsonOrUnserialize($tab->param) : '');
          $this->attributes[$tab->elementtype]['pos'][$tab->name] = $tab->pos;
          $this->attributes[$tab->elementtype]['alwayseditable'][$tab->name] = $tab->alwayseditable;
          $this->attributes[$tab->elementtype]['emptyonclone'][$tab->name] = $tab->emptyonclone;
          $this->attributes[$tab->elementtype]['perms'][$tab->name] = $tab->perms;
          $this->attributes[$tab->elementtype]['langfile'][$tab->name] = $tab->langs;
          $this->attributes[$tab->elementtype]['list'][$tab->name] = $tab->list;
          $this->attributes[$tab->elementtype]['printable'][$tab->name] = $tab->printable;
          $this->attributes[$tab->elementtype]['totalizable'][$tab->name] = ($tab->totalizable ? 1 : 0);
          $this->attributes[$tab->elementtype]['entityid'][$tab->name] = $tab->entity;
          $this->attributes[$tab->elementtype]['enabled'][$tab->name] = $tab->enabled;
          $this->attributes[$tab->elementtype]['help'][$tab->name] = $tab->help;
          $this->attributes[$tab->elementtype]['aiprompt'][$tab->name] = $tab->aiprompt;
          $this->attributes[$tab->elementtype]['css'][$tab->name] = $tab->css;
          $this->attributes[$tab->elementtype]['cssview'][$tab->name] = $tab->cssview;
          $this->attributes[$tab->elementtype]['csslist'][$tab->name] = $tab->csslist;
 
          $this->attributes[$tab->elementtype]['loaded'] = 1;
          $count++;
        }
      }
      if ($elementtype) {
        $this->attributes[$elementtype]['loaded'] = 1; // Note: If nothing is found, we also set the key 'loaded' to 1.
        $this->attributes[$elementtype]['count'] = $count;
      }
    } else {
      $this->error = $this->db->lasterror();
      dol_syslog(get_class($this)."::fetch_name_optionals_label ".$this->error, LOG_ERR);
    }
 
    return $array_name_label;
  }
 
 
  public function showInputField($key, $value, $moreparam = '', $keysuffix = '', $keyprefix = '', $morecss = '', $object = 0, $extrafieldsobjectkey = '', $mode = 0)
  {
    global $conf, $langs, $form, $hookmanager;
 
    if (!is_object($form)) {
      require_once DOL_DOCUMENT_ROOT.'/core/class/html.form.class.php';
      $form = new Form($this->db);
    }
 
    if ($mode == 1) { // When field is used for search input into a list, we limit its size.
      $morecss = 'maxwidth125';
    }
 
    $parameters = array(
      'key'                  => $key,
      'value'                => &$value,
      'moreparam'            => $moreparam,
      'keysuffix'            => $keysuffix,
      'keyprefix'            => $keyprefix,
      'morecss'              => $morecss,
      'object'               => $object,
      'extrafieldsobjectkey' => $extrafieldsobjectkey,
      'mode'                 => $mode
    );
    $action = '';
 
    $reshook = $hookmanager->executeHooks('showInputExtraField', $parameters, $this, $action); // Note that $action and $object may have been modified by hook
    if ($reshook > 0) {
      return $hookmanager->resPrint;
    }
 
    $objectid = (is_numeric($object) ? $object : $object->id);
 
    $out = '';
 
    if (!preg_match('/options_$/', $keyprefix)) { // Because we work on extrafields, we add 'options_' to prefix if not already added
      $keyprefix .= 'options_';
    }
 
    if (empty($extrafieldsobjectkey)) {
      dol_syslog(get_class($this).'::showInputField extrafieldsobjectkey required', LOG_ERR);
      return 'BadValueForParamExtraFieldsObjectKey';
    }
 
    $label = $this->attributes[$extrafieldsobjectkey]['label'][$key];
    $type = $this->attributes[$extrafieldsobjectkey]['type'][$key];
    $size = $this->attributes[$extrafieldsobjectkey]['size'][$key];
    $default = $this->attributes[$extrafieldsobjectkey]['default'][$key];
    $computed = $this->attributes[$extrafieldsobjectkey]['computed'][$key];
    $unique = $this->attributes[$extrafieldsobjectkey]['unique'][$key];
    $required = $this->attributes[$extrafieldsobjectkey]['required'][$key];
    $param = $this->attributes[$extrafieldsobjectkey]['param'][$key];
    $perms = (int) dol_eval((string) $this->attributes[$extrafieldsobjectkey]['perms'][$key], 1, 1, '2');
    $langfile = $this->attributes[$extrafieldsobjectkey]['langfile'][$key];
    $list = (string) dol_eval((string) $this->attributes[$extrafieldsobjectkey]['list'][$key], 1, 1, '2');
    $totalizable = $this->attributes[$extrafieldsobjectkey]['totalizable'][$key];
    $help = $this->attributes[$extrafieldsobjectkey]['help'][$key];
    $alwayseditable = $this->attributes[$extrafieldsobjectkey]['alwayseditable'][$key];
    $hidden = (empty($list) ? 1 : 0); // If empty, we are sure it is hidden, otherwise we show. If it depends on mode (view/create/edit form or list, this must be filtered by caller)
 
    //var_dump('key='.$key.' '.$value.' '.$moreparam.' '.$keysuffix.' '.$keyprefix.' '.$objectid.' '.$extrafieldsobjectkey.' '.$mode);
    //var_dump('label='.$label.' type='.$type.' param='.var_export($param, 1));
 
    if ($computed) {
      if (!preg_match('/^search_/', $keyprefix)) {
        return '<span class="opacitymedium">'.$langs->trans("AutomaticallyCalculated").'</span>';
      } else {
        return '';
      }
    }
 
    //
    // 'css' is used in creation and update. 'cssview' is used in view mode. 'csslist' is used for columns in lists. For example: 'css'=>'minwidth300 maxwidth500 widthcentpercentminusx', 'cssview'=>'wordbreak', 'csslist'=>'tdoverflowmax200'
    if (empty($morecss)) {
      // Add automatic css
      if ($type == 'date') {
        $morecss = 'minwidth100imp';
      } elseif ($type == 'datetime' || $type == 'datetimegmt' || $type == 'link') {
        $morecss = 'minwidth200imp';
      } elseif (in_array($type, array('int', 'integer', 'double', 'price'))) {
        $morecss = 'maxwidth75';
      } elseif ($type == 'password') {
        $morecss = 'maxwidth100';
      } elseif ($type == 'url') {
        $morecss = 'minwidth400';
      } elseif ($type == 'boolean') {
        $morecss = '';
      } elseif ($type == 'radio') {
        $morecss = 'width25';
      } else {
        if (empty($size) || round((float) $size) < 12) {
          $morecss = 'minwidth100';
        } elseif (round((float) $size) <= 48) {
          $morecss = 'minwidth200';
        } else {
          $morecss = 'minwidth400';
        }
      }
      // If css forced in attribute, we use this one
      if (!empty($this->attributes[$extrafieldsobjectkey]['css'][$key])) {
        $morecss = $this->attributes[$extrafieldsobjectkey]['css'][$key];
      }
    }
 
    if (in_array($type, array('date'))) {
      $tmp = explode(',', $size);
      $newsize = $tmp[0];
      $showtime = 0;
 
      // Do not show current date when field not required (see selectDate() method)
      if (!$required && $value == '') {
        $value = '-1';
      }
 
      if ($mode == 1) {
        // mode input for a search filter, we show two inputs to select a date range
        $prefill = array(
          'start' => isset($value['start']) ? $value['start'] : '',
          'end'   => isset($value['end']) ? $value['end'] : ''
        );
        $out = '<div ' . ($moreparam ? $moreparam : '') . '><div class="nowrap">';
        $out .= $form->selectDate($prefill['start'], $keyprefix.$key.$keysuffix.'_start', 0, 0, 1, '', 1, 0, 0, '', '', '', '', 1, '', $langs->trans("From"));
        $out .= '</div><div class="nowrap">';
        $out .= $form->selectDate($prefill['end'], $keyprefix.$key.$keysuffix.'_end', 0, 0, 1, '', 1, 0, 0, '', '', '', '', 1, '', $langs->trans("to"));
        $out .= '</div></div>';
      } else {
        // mode input into a create/update form
        // TODO Must also support $moreparam
        $out = $form->selectDate($value, $keyprefix.$key.$keysuffix, $showtime, $showtime, $required ? 0 : 2, '', 1, (($keyprefix != 'search_' && $keyprefix != 'search_options_') ? 1 : 0), 0, 1);
      }
    } elseif (in_array($type, array('datetime', 'datetimegmt'))) {
      $tmp = explode(',', $size);
      $newsize = $tmp[0];
      $showtime = 1;
 
      // Do not show current date when field not required (see selectDate() method)
      if (!$required && $value == '') {
        $value = '-1';
      }
 
      if ($mode == 1) {
        // mode input for a search filter, we show two inputs to select a date range
        $prefill = array(
          'start' => isset($value['start']) ? $value['start'] : '',
          'end'   => isset($value['end']) ? $value['end'] : ''
        );
        $out = '<div ' . ($moreparam ? $moreparam : '') . '><div class="nowrap">';
        $out .= $form->selectDate($prefill['start'], $keyprefix.$key.$keysuffix.'_start', 1, 1, 1, '', 1, 0, 0, '', '', '', '', 1, '', $langs->trans("From"), 'tzuserrel');
        $out .= '</div><div class="nowrap">';
        $out .= $form->selectDate($prefill['end'], $keyprefix.$key.$keysuffix.'_end', 1, 1, 1, '', 1, 0, 0, '', '', '', '', 1, '', $langs->trans("to"), 'tzuserrel');
        $out .= '</div></div>';
      } else {
        // mode input into a create/update form
        // TODO Must also support $moreparam
        $out = $form->selectDate($value, $keyprefix.$key.$keysuffix, $showtime, $showtime, $required ? 0 : 2, '', 1, (($keyprefix != 'search_' && $keyprefix != 'search_options_') ? 1 : 0), 0, 1, '', '', '', 1, '', '', 'tzuserrel');
      }
    } elseif (in_array($type, array('int', 'integer'))) {
      $tmp = explode(',', $size);
      $newsize = $tmp[0];
      $out = '<input type="text" class="flat '.$morecss.' maxwidthonsmartphone" name="'.$keyprefix.$key.$keysuffix.'" id="'.$keyprefix.$key.$keysuffix.'" maxlength="'.$newsize.'" value="'.dol_escape_htmltag($value).'"'.($moreparam ? $moreparam : '').'>';
    } elseif (preg_match('/varchar/', $type)) {
      $out = '<input type="text" class="flat '.$morecss.' maxwidthonsmartphone" name="'.$keyprefix.$key.$keysuffix.'" id="'.$keyprefix.$key.$keysuffix.'" maxlength="'.$size.'" value="'.dol_escape_htmltag($value).'"'.($moreparam ? $moreparam : '').'>';
    } elseif (in_array($type, array('email', 'mail', 'ip', 'phone', 'url'))) {
      $out = '<input type="text" class="flat '.$morecss.' maxwidthonsmartphone" name="'.$keyprefix.$key.$keysuffix.'" id="'.$keyprefix.$key.$keysuffix.'" value="'.dol_escape_htmltag($value).'" '.($moreparam ? $moreparam : '').'>';
    } elseif ($type == 'icon') {
      /* External lib inclusion are not allowed in backoffice. Also lib is included several time if there is several icon file.
       Some code must be added into main when MAIN_ADD_ICONPICKER_JS is set to add of lib in html header
       $out ='<link rel="stylesheet" href="'.dol_buildpath('/myfield/css/fontawesome-iconpicker.min.css', 1).'">';
       $out.='<script src="'.dol_buildpath('/myfield/js/fontawesome-iconpicker.min.js', 1).'"></script>';
       */
      $out .= '<input type="text" class="form-control icp icp-auto iconpicker-element iconpicker-input flat '.$morecss.' maxwidthonsmartphone"';
      $out .= ' name="'.$keyprefix.$key.$keysuffix.'" id="'.$keyprefix.$key.$keysuffix.'" value="'.dol_escape_htmltag($value).'" '.($moreparam ? $moreparam : '').'>';
      if (getDolGlobalInt('MAIN_ADD_ICONPICKER_JS')) {
        $out .= '<script>';
        $options = "{ title: '<b>".$langs->trans("IconFieldSelector")."</b>', placement: 'right', showFooter: false, templates: {";
        $options .= "iconpicker: '<div class=\"iconpicker\"><div style=\"background-color:#EFEFEF;\" class=\"iconpicker-items\"></div></div>',";
        $options .= "iconpickerItem: '<a role=\"button\" href=\"#\" class=\"iconpicker-item\" style=\"background-color:#DDDDDD;\"><i></i></a>',";
        // $options.="buttons: '<button style=\"background-color:#FFFFFF;\" class=\"iconpicker-btn iconpicker-btn-cancel btn btn-default btn-sm\">".$langs->trans("Cancel")."</button>";
        // $options.="<button style=\"background-color:#FFFFFF;\" class=\"iconpicker-btn iconpicker-btn-accept btn btn-primary btn-sm\">".$langs->trans("Save")."</button>',";
        $options .= "footer: '<div class=\"popover-footer\" style=\"background-color:#EFEFEF;\"></div>',";
        $options .= "search: '<input type=\"search\" class\"form-control iconpicker-search\" placeholder=\"".$langs->trans("TypeToFilter")."\" />',";
        $options .= "popover: '<div class=\"iconpicker-popover popover\">";
        $options .= "   <div class=\"arrow\" ></div>";
        $options .= "   <div class=\"popover-title\" style=\"text-align:center;background-color:#EFEFEF;\"></div>";
        $options .= "   <div class=\"popover-content \" ></div>";
        $options .= "</div>'}}";
        $out .= "$('#".$keyprefix.$key.$keysuffix."').iconpicker(".$options.");";
        $out .= '</script>';
      }
    } elseif ($type == 'text') {
      if (!preg_match('/search_/', $keyprefix)) {   // If keyprefix is search_ or search_options_, we must just use a simple text field
        require_once DOL_DOCUMENT_ROOT.'/core/class/doleditor.class.php';
        $doleditor = new DolEditor($keyprefix.$key.$keysuffix, $value, '', 200, 'dolibarr_notes', 'In', false, false, false, ROWS_5, '90%');
        $out = (string) $doleditor->Create(1);
      } else {
        $out = '<input type="text" class="flat '.$morecss.' maxwidthonsmartphone" name="'.$keyprefix.$key.$keysuffix.'" id="'.$keyprefix.$key.$keysuffix.'" value="'.dol_escape_htmltag($value).'" '.($moreparam ? $moreparam : '').'>';
      }
    } elseif ($type == 'html') {
      if (!preg_match('/search_/', $keyprefix)) {   // If keyprefix is search_ or search_options_, we must just use a simple text field
        require_once DOL_DOCUMENT_ROOT.'/core/class/doleditor.class.php';
        $doleditor = new DolEditor($keyprefix.$key.$keysuffix, $value, '', 200, 'dolibarr_notes', 'In', false, false, isModEnabled('fckeditor') && getDolGlobalInt('FCKEDITOR_ENABLE_SOCIETE'), ROWS_5, '90%');
        $out = (string) $doleditor->Create(1);
      } else {
        $out = '<input type="text" class="flat '.$morecss.' maxwidthonsmartphone" name="'.$keyprefix.$key.$keysuffix.'" id="'.$keyprefix.$key.$keysuffix.'" value="'.dol_escape_htmltag($value).'" '.($moreparam ? $moreparam : '').'>';
      }
    } elseif ($type == 'boolean') {
      if (empty($mode)) {
        $checked = '';
        if (!empty($value)) {
          $checked = ' checked value="1" ';
        } else {
          $checked = ' value="1" ';
        }
        $out = '<input type="checkbox" class="flat valignmiddle'.($morecss ? ' '.$morecss : '').' maxwidthonsmartphone" name="'.$keyprefix.$key.$keysuffix.'" id="'.$keyprefix.$key.$keysuffix.'" '.$checked.' '.($moreparam ? $moreparam : '').'>';
      } else {
        $out = $form->selectyesno($keyprefix.$key.$keysuffix, $value, 1, false, 1, 1, 'width75 yesno');
      }
      $out .= '<input type="hidden" name="'.$keyprefix.$key.$keysuffix.'_boolean" value="1">';  // A hidden field ending with "_boolean" that is always set to 1.
    } elseif ($type == 'price') {
      if (!empty($value)) {   // $value in memory is a php numeric, we format it into user number format.
        $value = price($value);
      }
      $out = '<input type="text" class="flat '.$morecss.' maxwidthonsmartphone right" name="'.$keyprefix.$key.$keysuffix.'" id="'.$keyprefix.$key.$keysuffix.'" value="'.$value.'" '.($moreparam ? $moreparam : '').' placeholder="'.$langs->getCurrencySymbol($conf->currency).'">';
    } elseif ($type == 'pricecy') {
      $currency = $conf->currency;
      if (!empty($value)) {
        // $value in memory is a php string like '10.01:USD'
        $pricetmp = explode(':', $value);
        $currency = !empty($pricetmp[1]) ? $pricetmp[1] : $conf->currency;
        $value = price($pricetmp[0]);
      }
      $out = '<input type="text" class="flat '.$morecss.' maxwidthonsmartphone" name="'.$keyprefix.$key.$keysuffix.'" id="'.$keyprefix.$key.$keysuffix.'" value="'.$value.'" '.($moreparam ? $moreparam : '').'> ';
      $out .= $form->selectCurrency($currency, $keyprefix.$key.$keysuffix.'currency_id');
    } elseif ($type == 'duration') {
      $value = intval($value);
      $out = $form->select_duration($keyprefix . $key, $value, 0, 'text', 0, 1);
    } elseif ($type == 'double') {
      if (!empty($value)) {   // $value in memory is a php numeric, we format it into user number format.
        $value = price($value);
      }
      $out = '<input type="text" class="flat '.$morecss.' maxwidthonsmartphone" name="'.$keyprefix.$key.$keysuffix.'" id="'.$keyprefix.$key.$keysuffix.'" value="'.$value.'" '.($moreparam ? $moreparam : '').'> ';
    } elseif ($type == 'select') {
      $out = '';
      if ($mode) {
        $options = array();
        foreach ($param['options'] as $okey => $val) {
          if ((string) $okey == '') {
            continue;
          }
 
          $valarray = explode('|', $val);
          $val = $valarray[0];
 
          if ($langfile && $val) {
            $options[$okey] = $langs->trans($val);
          } else {
            $options[$okey] = $val;
          }
        }
        $selected = array();
        if (!is_array($value)) {
          $selected = explode(',', $value);
        }
 
        $out .= $form->multiselectarray($keyprefix.$key.$keysuffix, $options, $selected, 0, 0, $morecss, 0, 0, '', '', '', (int) (!empty($conf->use_javascript_ajax) && !getDolGlobalString('MAIN_EXTRAFIELDS_DISABLE_SELECT2')));
      } else {
        if (!empty($conf->use_javascript_ajax) && !getDolGlobalString('MAIN_EXTRAFIELDS_DISABLE_SELECT2')) {
          include_once DOL_DOCUMENT_ROOT.'/core/lib/ajax.lib.php';
          $out .= ajax_combobox($keyprefix.$key.$keysuffix, array(), 0);
        }
 
        $out .= '<select class="flat '.$morecss.' maxwidthonsmartphone" name="'.$keyprefix.$key.$keysuffix.'" id="'.$keyprefix.$key.$keysuffix.'" '.($moreparam ? $moreparam : '').'>';
        $out .= '<option value="0">&nbsp;</option>';
        foreach ($param['options'] as $key2 => $val2) {
          if ((string) $key2 == '') {
            continue;
          }
          $valarray = explode('|', $val2);
          $val2 = $valarray[0];
          $parent = '';
          if (!empty($valarray[1])) {
            $parent = $valarray[1];
          }
          $out .= '<option value="'.$key2.'"';
          $out .= (((string) $value == (string) $key2) ? ' selected' : '');
          $out .= (!empty($parent) ? ' parent="'.$parent.'"' : '');
          $out .= '>';
          if ($langfile && $val2) {
            $out .= $langs->trans($val2);
          } else {
            $out .= $val2;
          }
          $out .= '</option>';
        }
        $out .= '</select>';
      }
    } elseif ($type == 'sellist') {   // List of values selected from a table (1 choice)
      $out = '';
      if (!empty($conf->use_javascript_ajax)) {
        if (getDolGlobalString('MAIN_EXTRAFIELDS_ENABLE_NEW_SELECT2')) {
          $out .= "
          <script>
          $(document).ready(function () {
            $('#".$keyprefix.$key.$keysuffix."').select2({
              ajax: {
                url: '".DOL_URL_ROOT.'/core/ajax/ajaxextrafield.php'."',
                dataType: 'json',
                delay: 250, // wait 250 milliseconds before triggering the request
                data: function (params) {
                  var query = {
                    search: params.term,
                    page: params.page || 1,
                    objecttype: '".$extrafieldsobjectkey."',
                    objectid: '".$objectid."',
                    objectkey: '".$key."',
                    mode: '".$mode."',
                    value: '".$value."'
                  }
                  return query;
                }
              }
            })
          });
          </script>";
          $out .= '<select class="flat '.$morecss.' maxwidthonsmartphone" name="'.$keyprefix.$key.$keysuffix.'" id="'.$keyprefix.$key.$keysuffix.'" '.($moreparam ? $moreparam : '').'>';
          $out .= ' <option value="'.$value.'" selected>'.$this->showOutputField($key, $value, $moreparam, $extrafieldsobjectkey).'</option>';
          $out .= '</select>';
        } elseif (!getDolGlobalString('MAIN_EXTRAFIELDS_DISABLE_SELECT2')) {
          include_once DOL_DOCUMENT_ROOT.'/core/lib/ajax.lib.php';
          $out .= ajax_combobox($keyprefix.$key.$keysuffix, array(), 0);
        }
      }
      if (!getDolGlobalString('MAIN_EXTRAFIELDS_ENABLE_NEW_SELECT2')) {
        //$out .= '<!-- type = sellist -->';
        $out .= '<select class="flat '.$morecss.' maxwidthonsmartphone" name="'.$keyprefix.$key.$keysuffix.'" id="'.$keyprefix.$key.$keysuffix.'" '.($moreparam ? $moreparam : '').'>';
        if (is_array($param['options'])) {
          // WARNING!! @FIXME This code is duplicated into core/class/extrafields.class.php
 
          $tmpparamoptions = array_keys($param['options']);
          $paramoptions = preg_split('/[\r\n]+/', $tmpparamoptions[0]);
 
          $InfoFieldList = explode(":", $paramoptions[0], 5);
          // 0 : tableName
          // 1 : label field name
          // 2 : key fields name (if different of rowid)
          // optional parameters...
          // 3 : key field parent (for dependent lists). How this is used ?
          // 4 : where clause filter on column or table extrafield, syntax field='value' or extra.field=value. Or use USF on the second line.
          // 5 : string category type. This replace the filter.
          // 6 : ids categories list separated by comma for category root. This replace the filter.
          // 7 : sort field (not used here but used into format for commobject)
 
          // If there is a filter, we extract it by taking all content inside parenthesis.
          if (! empty($InfoFieldList[4])) {
            $pos = 0; // $pos will be position of ending filter
            $parenthesisopen = 0;
            while (substr($InfoFieldList[4], $pos, 1) !== '' && ($parenthesisopen || $pos == 0 || substr($InfoFieldList[4], $pos, 1) != ':')) {
              if (substr($InfoFieldList[4], $pos, 1) == '(') {
                $parenthesisopen++;
              }
              if (substr($InfoFieldList[4], $pos, 1) == ')') {
                $parenthesisopen--;
              }
              $pos++;
            }
            $tmpbefore = substr($InfoFieldList[4], 0, $pos);
            $tmpafter = substr($InfoFieldList[4], $pos + 1);
            //var_dump($InfoFieldList[4].' -> '.$pos); var_dump($tmpafter);
            $InfoFieldList[4] = $tmpbefore;
            if ($tmpafter !== '') {
              $InfoFieldList = array_merge($InfoFieldList, explode(':', $tmpafter));
            }
 
            // Fix better compatibility with some old extrafield syntax filter "(field=123)"
            $reg = array();
            if (preg_match('/^\‍(?([a-z0-9]+)([=<>]+)(\d+)\‍)?$/i', $InfoFieldList[4], $reg)) {
              $InfoFieldList[4] = '('.$reg[1].':'.$reg[2].':'.$reg[3].')';
            }
 
            //var_dump($InfoFieldList);
          }
 
          //$Usf = empty($paramoptions[1]) ? '' :$paramoptions[1];
 
          $parentName = '';
          $parentField = '';
          $keyList = (empty($InfoFieldList[2]) ? 'rowid' : $InfoFieldList[2].' as rowid');
 
          if (count($InfoFieldList) > 4 && !empty($InfoFieldList[4])) {
            if (strpos($InfoFieldList[4], 'extra.') !== false) {
              $keyList = 'main.'.$InfoFieldList[2].' as rowid';
            } else {
              $keyList = $InfoFieldList[2].' as rowid';
            }
          }
          if (count($InfoFieldList) > 3 && !empty($InfoFieldList[3])) {
            list($parentName, $parentField) = explode('|', $InfoFieldList[3]);
            if (!empty($InfoFieldList[4]) && strpos($InfoFieldList[4], 'extra.') !== false) {
              $keyList .= ', main.'.$parentField;
            } else {
              $keyList .= ', '.$parentField;
            }
            // Re-add parent field that was removed by keyList reset above
            if (!empty($parentField)) {
              $keyList .= ', '.$parentField;
            }
          }
 
          $filter_categorie = false;
          if (count($InfoFieldList) > 5) {
            if ($InfoFieldList[0] == 'categorie') {
              $filter_categorie = true;
            }
          }
 
          if (!$filter_categorie) {
            $fields_label = isset($InfoFieldList[1]) ? explode('|', $InfoFieldList[1]) : array();
            if (!empty($fields_label)) {
              $keyList .= ', ';
              $keyList .= implode(', ', $fields_label);
            }
 
            // WARNING!! This code is duplicated into core/ajax/ajaxextrafield.php
 
            $sqlwhere = '';
            $sql = "SELECT ".$keyList;
            $sql .= ' FROM '.$this->db->prefix().$InfoFieldList[0];
 
            // Add filter from 4th field
            if (!empty($InfoFieldList[4])) {
              // can use current entity filter
              if (strpos($InfoFieldList[4], '$ENTITY$') !== false) {
                $InfoFieldList[4] = str_replace('$ENTITY$', (string) $conf->entity, $InfoFieldList[4]);
              }
              // can use SELECT request
              if (!getDolGlobalString("MAIN_DISALLOW_UNSECURED_SELECT_INTO_EXTRAFIELDS_FILTER")) {
                if (strpos($InfoFieldList[4], '$SEL$') !== false) {
                  $InfoFieldList[4] = str_replace('$SEL$', 'SELECT', $InfoFieldList[4]);
                }
              }
              // can use MODE parameter (list or view)
              if (strpos($InfoFieldList[4], '$MODE$') !== false) {
                $InfoFieldList[4] = str_replace('$MODE$', preg_replace('/[^a-z0-9_]/i', '', (string) $mode), $InfoFieldList[4]);
              }
 
              // current object id can be use into filter
              if (strpos($InfoFieldList[4], '$ID$') !== false && !empty($objectid)) {
                $InfoFieldList[4] = str_replace('$ID$', (string) $objectid, $InfoFieldList[4]);
              } elseif (substr($_SERVER["PHP_SELF"], -8) == 'list.php') {
                // In filters of list views, we do not want $ID$ replaced by 0. So we remove the '=' condition.
                // Do nothing if condition is using 'IN' keyword
                // Replace 'column = $ID$' by an always true test, the parent object is unknown in a list
                $word = '#\b([a-zA-Z0-9-\.-_]+)\b *= *\$ID\$#';
                $InfoFieldList[4] = preg_replace($word, '1 = 1', $InfoFieldList[4]);
                // Replace '$ID$ = column' by an always true test
                $word = '#\$ID\$ *= *\b([a-zA-Z0-9-\.-_]+)\b#';
                $InfoFieldList[4] = preg_replace($word, '1 = 1', $InfoFieldList[4]);
                // Same with the Universal Search Filter syntax, '(column:=:$ID$)'
                $word = '#\b([a-zA-Z0-9-\.-_]+)\b *: *[<>!=]?= *: *\$ID\$#';
                $InfoFieldList[4] = preg_replace($word, '1 = 1', $InfoFieldList[4]);
              } else {
                $InfoFieldList[4] = str_replace('$ID$', '0', $InfoFieldList[4]);
              }
 
              // can use filter on any field of object
              if (is_object($object)) {
                $tags = [];
                preg_match_all('/\$(.*?)\$/', $InfoFieldList[4], $tags);  // Example: $InfoFieldList[4] is ($dateadh$:<=:CURRENT_DATE)
                foreach ($tags[0] as $keytag => $valuetag) {
                  $property = preg_replace('/[^a-z0-9_]/', '', strtolower($tags[1][$keytag]));
                  if (strpos($InfoFieldList[4], $valuetag) !== false && property_exists($object, $property) && !empty($object->$property)) {
                    $InfoFieldList[4] = str_replace($valuetag, (string) $object->$property, $InfoFieldList[4]);
                  } else {
                    $InfoFieldList[4] = str_replace($valuetag, '0', $InfoFieldList[4]);
                  }
                }
              }
 
              // We have to join on extrafield table
              $errstr = '';
              if (strpos($InfoFieldList[4], 'extra.') !== false) {
                $sql .= ' as main, '.$this->db->sanitize($this->db->prefix().$InfoFieldList[0]).'_extrafields as extra';
                $sqlwhere .= " WHERE extra.fk_object = main.".$this->db->sanitize($InfoFieldList[2]);
                $sqlwhere .= " AND " . forgeSQLFromUniversalSearchCriteria($InfoFieldList[4], $errstr, 1);
              } else {
                $sqlwhere .= " WHERE " . forgeSQLFromUniversalSearchCriteria($InfoFieldList[4], $errstr, 1);
              }
            } else {
              $sqlwhere .= ' WHERE 1=1';
            }
 
            // Add Usf filter on second line
            /*
             if ($Usf) {
             $errorstr = '';
             $sqlusf .= forgeSQLFromUniversalSearchCriteria($Usf, $errorstr);
             if (!$errorstr) {
             $sqlwhere .= $sqlusf;
             } else {
             $sqlwhere .= " AND invalid_usf_filter_of_extrafield";
             }
             }
             */
 
            // Some tables may have field, some other not. For the moment we disable it.
            if (in_array($InfoFieldList[0], array('tablewithentity'))) {
              $sqlwhere .= ' AND entity = '.((int) $conf->entity);
            }
            $sql .= $sqlwhere;
 
            $sql .= $this->db->order(implode(', ', $fields_label));
            $sql .= ' LIMIT ' . getDolGlobalInt('MAIN_EXTRAFIELDS_LIMIT_SELLIST_SQL', 1000);
            //print $sql;
 
            dol_syslog(get_class($this).'::showInputField type=sellist', LOG_DEBUG);
            $resql = $this->db->query($sql);
            if ($resql) {
              $out .= '<option value="0">&nbsp;</option>';
              $num = $this->db->num_rows($resql);
              $i = 0;
              while ($i < $num) {
                $labeltoshow = '';
                $obj = $this->db->fetch_object($resql);
 
                $nameFields = $InfoFieldList[1];
                // If text is "field1|f(a,b,c) as xxx|field2", we must convert string into 'field1|xxx|field2'
                $nameFields = preg_replace('/[a-z_]+\‍([^\‍)]*\‍) as ([\w]+)/i', '\1', $nameFields);
                // Sanitize field names to avoid error when doing $obj->field
                $nameFields = preg_replace('/[^0-9a-z_\.\|]/i', '', $nameFields);
 
                // Several fields into label (eq table:code|label:rowid)
                $notrans = false;
                $fields_label = explode('|', $nameFields);
                if (is_array($fields_label) && count($fields_label) > 1) {
                  $notrans = true;
                  foreach ($fields_label as $field_toshow) {
                    $field_toshow = preg_replace('/^.*\./', '', $field_toshow);
                    $labeltoshow .= $obj->$field_toshow.' ';
                  }
                } else {
                  $labeltoshow = $obj->$nameFields;
                }
 
                if ($value == $obj->rowid) {
                  if (!$notrans) {
                    foreach ($fields_label as $field_toshow) {
                      $translabel = $langs->trans($obj->$field_toshow);
                      $labeltoshow = $translabel.' ';
                    }
                  }
                  $out .= '<option value="'.$obj->rowid.'" selected>'.$labeltoshow.'</option>';
                } else {
                  if (!$notrans) {
                    $translabel = $langs->trans($obj->$nameFields);
                    $labeltoshow = $translabel;
                  }
                  if (empty($labeltoshow)) {
                    $labeltoshow = '(not defined)';
                  }
 
                  if (!empty($InfoFieldList[3]) && $parentField) {
                    // Sanitize parent field name to avoid when doing $obj->field
                    $parentField = preg_replace('/[^a-zA-Z0-9_\-]/', '', $parentField);
                    $parent = $parentName.':'.$obj->{$parentField};
                  }
 
                  $out .= '<option value="'.$obj->rowid.'"';
                  $out .= ($value == $obj->rowid ? ' selected' : '');
                  $out .= (!empty($parent) ? ' parent="'.$parent.'"' : '');
                  $out .= '>'.$labeltoshow.'</option>';
                }
 
                $i++;
              }
              $this->db->free($resql);
            } else {
              print 'Error in request '.$sql.' '.$this->db->lasterror().'. Check setup of extra parameters.<br>';
            }
          } else {
            require_once DOL_DOCUMENT_ROOT.'/categories/class/categorie.class.php';
            $categcode = $InfoFieldList[5];
            if (is_numeric($categcode)) { // deprecated: must use the category code instead of id. For backward compatibility.
              $tmpcategory = new Categorie($this->db);
              $MAP_ID_TO_CODE = array_flip($tmpcategory->MAP_ID);
              $categcode = $MAP_ID_TO_CODE[(int) $categcode];
            }
 
            $data = $form->select_all_categories($categcode, '', 'parent', 64, $InfoFieldList[6], 1, 1);
            $out .= '<option value="0">&nbsp;</option>';
            if (is_array($data)) {
              foreach ($data as $data_key => $data_value) {
                $out .= '<option value="'.$data_key.'"';
                $out .= ($value == $data_key ? ' selected' : '');
                $out .= '>'.$data_value.'</option>';
              }
            }
          }
        }
        $out .= '</select>';
      }
    } elseif ($type == 'checkbox') {
      $value_arr = $value;
      if (!is_array($value)) {
        $value_arr = explode(',', $value);
      }
      $out = $form->multiselectarray($keyprefix.$key.$keysuffix, (empty($param['options']) ? null : $param['options']), $value_arr, 0, 0, '', 0, '100%');
    } elseif ($type == 'radio') {
      $out = '';
      foreach ($param['options'] as $keyopt => $val) {
        $out .= '<input class="flat '.$morecss.'" type="radio" name="'.$keyprefix.$key.$keysuffix.'" id="'.$keyprefix.$key.$keysuffix.'" '.($moreparam ? $moreparam : '');
        $out .= ' value="'.$keyopt.'"';
        $out .= ' id="'.$keyprefix.$key.$keysuffix.'_'.$keyopt.'"';
        $out .= ($value == $keyopt ? 'checked' : '');
        $out .= '/><label for="'.$keyprefix.$key.$keysuffix.'_'.$keyopt.'">'.$langs->trans($val).'</label><br>';
      }
    } elseif ($type == 'chkbxlst') {  // List of values selected from a table (n choices)
      if (is_array($value)) {
        $value_arr = $value;
      } else {
        $value_arr = explode(',', $value);
      }
 
      if (is_array($param['options'])) {
        $tmpparamoptions = array_keys($param['options']);
        $paramoptions = preg_split('/[\r\n]+/', $tmpparamoptions[0]);
 
        $InfoFieldList = explode(":", $paramoptions[0], 5);   // We will extract field at position 6,7... later from the 5th one.
        // 0 : tableName
        // 1 : label field name
        // 2 : rowid field name (if different of rowid)
        // Optional parameters...
        // 3 : key field parent (for dependent lists). How this is used ?
        // 4 : where clause filter on column or table extrafield, syntax field='value' or extra.field=value. Or use USF on the second line.
 
        // To add a filter on category (not possible with USF restricted to table)
        // 5 : string category type ('product', 'customer', ...). This is added to the filter.
        // 6 : list of parent categories ids. This replace the filter.
        // 7 : sort field (not used here but used into format for commobject)
 
        // For backward compatibility when tableName = 'category', so when we want a list of categories
        // 5 : string category type ('product', 'customer', ...). This replace the filter.
        // 6 : list of parent categories ids. This replace the filter.
        // 7 : sort field (not used here but used into format for commobject)
 
        // Example with extrafield value = "societe:nom:rowid" or "categorie:label:rowid:::product"
 
        // If there is a filter, we extract it by taking all content inside parenthesis.
        if (! empty($InfoFieldList[4])) {
          $pos = 0;
          $parenthesisopen = 0;
          while (substr($InfoFieldList[4], $pos, 1) !== '' && ($parenthesisopen || $pos == 0 || substr($InfoFieldList[4], $pos, 1) != ':')) {
            if (substr($InfoFieldList[4], $pos, 1) == '(') {
              $parenthesisopen++;
            }
            if (substr($InfoFieldList[4], $pos, 1) == ')') {
              $parenthesisopen--;
            }
            $pos++;
          }
          $tmpbefore = substr($InfoFieldList[4], 0, $pos);
          $tmpafter = substr($InfoFieldList[4], $pos + 1);
          //var_dump($InfoFieldList[4].' -> '.$pos); var_dump($tmpafter);
          $InfoFieldList[4] = $tmpbefore;
          if ($tmpafter !== '') {
            $InfoFieldList = array_merge($InfoFieldList, explode(':', $tmpafter));
          }
 
          // Fix better compatibility with some old extrafield syntax filter "(field_name=123)"
          $reg = array();
          if (preg_match('/^\‍(?([a-z0-9_]+)([=<>]+)(\d+)\‍)?$/i', $InfoFieldList[4], $reg)) {
            $InfoFieldList[4] = '('.$reg[1].':'.$reg[2].':'.$reg[3].')';
          }
 
          //var_dump($InfoFieldList);
        }
 
        //$Usf = empty($paramoptions[1]) ? '' :$paramoptions[1];
 
 
        $parentName = '';
        $parentField = '';
        $keyList = (empty($InfoFieldList[2]) ? 'rowid' : $InfoFieldList[2].' as rowid');
 
        if (count($InfoFieldList) > 4 && !empty($InfoFieldList[4])) {
          if (strpos($InfoFieldList[4], 'extra.') !== false) {
            $keyList = 'main.'.$InfoFieldList[2].' as rowid';
          } else {
            $keyList = $InfoFieldList[2].' as rowid';
          }
        }
        if (count($InfoFieldList) > 3 && !empty($InfoFieldList[3])) {
          list($parentName, $parentField) = explode('|', $InfoFieldList[3]);
          if (!empty($InfoFieldList[4]) && strpos($InfoFieldList[4], 'extra.') !== false) {
            $keyList .= ', main.'.$parentField;
          } else {
            $keyList .= ', '.$parentField;
          }
          // Re-add parent field that was removed by keyList reset above
          if (!empty($parentField)) {
            $keyList .= ', '.$parentField;
          }
        }
 
        $InfoFieldList[5] = (string) ($InfoFieldList[5]??'');
 
        $filter_categorie = false;
        if (count($InfoFieldList) > 5 && ($InfoFieldList[5] != '')) {
          if ($InfoFieldList[0] == 'categorie') {
            $filter_categorie = true; // The combo list is a list of categories
          } else {
            $filter_categorie = false;  // We have a filter on category for another table
          }
        }
 
 
        if (!$filter_categorie) {
          $fields_label = explode('|', $InfoFieldList[1]);
          if (is_array($fields_label)) {
            $keyList .= ', ';
            $keyList .= implode(', ', $fields_label);
          }
 
          $sqlwhere = '';
          $sql = "SELECT ".$keyList;
          $sql .= ' FROM '.$this->db->prefix().$InfoFieldList[0];
 
          // Add filter from 4th field
          if (!empty($InfoFieldList[4])) {
            // can use current entity filter
            if (strpos($InfoFieldList[4], '$ENTITY$') !== false) {
              $InfoFieldList[4] = str_replace('$ENTITY$', (string) $conf->entity, $InfoFieldList[4]);
            }
            // can use SELECT request
            if (strpos($InfoFieldList[4], '$SEL$') !== false) {
              $InfoFieldList[4] = str_replace('$SEL$', 'SELECT', $InfoFieldList[4]);
            }
 
            // current object id can be use into filter
            if (strpos($InfoFieldList[4], '$ID$') !== false && !empty($objectid)) {
              $InfoFieldList[4] = str_replace('$ID$', (string) $objectid, $InfoFieldList[4]);
            } elseif (substr($_SERVER["PHP_SELF"], -8) == 'list.php') {
              // In filters of list views, we do not want $ID$ replaced by 0. So we remove the '=' condition.
              // Do nothing if condition is using 'IN' keyword
              // Replace 'column = $ID$' by an always true test, the parent object is unknown in a list
              $word = '#\b([a-zA-Z0-9-\.-_]+)\b *= *\$ID\$#';
              $InfoFieldList[4] = preg_replace($word, '1 = 1', $InfoFieldList[4]);
              // Replace '$ID$ = column' by an always true test
              $word = '#\$ID\$ *= *\b([a-zA-Z0-9-\.-_]+)\b#';
              $InfoFieldList[4] = preg_replace($word, '1 = 1', $InfoFieldList[4]);
              // Same with the Universal Search Filter syntax, '(column:=:$ID$)'
              $word = '#\b([a-zA-Z0-9-\.-_]+)\b *: *[<>!=]?= *: *\$ID\$#';
              $InfoFieldList[4] = preg_replace($word, '1 = 1', $InfoFieldList[4]);
            } else {
              $InfoFieldList[4] = str_replace('$ID$', '0', $InfoFieldList[4]);
            }
 
            // We have to join on extrafield table
            $errstr = '';
            if (strpos($InfoFieldList[4], 'extra.') !== false) {
              $sql .= ' as main, '.$this->db->sanitize($this->db->prefix().$InfoFieldList[0]).'_extrafields as extra';
              $sqlwhere .= " WHERE extra.fk_object = main.".$this->db->sanitize($InfoFieldList[2]);
              $sqlwhere .= " AND " . forgeSQLFromUniversalSearchCriteria($InfoFieldList[4], $errstr, 1);
            } else {
              $sqlwhere .= " WHERE " . forgeSQLFromUniversalSearchCriteria($InfoFieldList[4], $errstr, 1);
            }
          } else {
            $sqlwhere .= ' WHERE 1=1';
          }
 
 
          if ($InfoFieldList[5] != '') {
            // We have a filter on category for another table
            require_once DOL_DOCUMENT_ROOT.'/categories/class/categorie.class.php';
            $tmpcategory = new Categorie($this->db);
            $tablesuffixcategory = empty($tmpcategory->MAP_CAT_TABLE[$InfoFieldList[5]]) ? $InfoFieldList[5] : $tmpcategory->MAP_CAT_TABLE[$InfoFieldList[5]];
            $fksuffixcategory = empty($tmpcategory->MAP_CAT_FK[$InfoFieldList[5]]) ? $InfoFieldList[5] : $tmpcategory->MAP_CAT_FK[$InfoFieldList[5]];
 
            $sqlwhere .= ' AND EXISTS (SELECT fk_categorie as categid FROM '.MAIN_DB_PREFIX.'categorie_'.$this->db->sanitize($tablesuffixcategory);
            $sqlwhere .= ' WHERE fk_categorie IN ('.$this->db->sanitize($InfoFieldList[6]).')';
            $sqlwhere .= ' AND fk_'.$this->db->sanitize($fksuffixcategory).' = rowid)';
            //var_dump($sqlwhere);exit;
          }
 
          // Add Usf filter on second line
          /*
           if ($Usf) {
           $errorstr = '';
           $sqlusf .= forgeSQLFromUniversalSearchCriteria($Usf, $errorstr);
           if (!$errorstr) {
           $sqlwhere .= $sqlusf;
           } else {
           $sqlwhere .= " AND invalid_usf_filter_of_extrafield";
           }
           }
           */
 
          // Some tables may have field, some other not. For the moment we disable it.
          if (in_array($InfoFieldList[0], array('tablewithentity'))) {
            $sqlwhere .= " AND entity = ".((int) $conf->entity);
          }
          // $sql.=preg_replace('/^ AND /','',$sqlwhere);
          // print $sql;
 
          $sql .= $sqlwhere;
          $sql .= ' ORDER BY '.implode(', ', $fields_label);
 
          dol_syslog(get_class($this).'::showInputField type=chkbxlst', LOG_DEBUG);
 
          $resql = $this->db->query($sql);
          if ($resql) {
            $num = $this->db->num_rows($resql);
            $i = 0;
 
            $data = array();
 
            while ($i < $num) {
              $labeltoshow = '';
              $obj = $this->db->fetch_object($resql);
 
              $notrans = false;
              // Several field into label (eq table:code|label:rowid)
              $fields_label = explode('|', $InfoFieldList[1]);
              if (is_array($fields_label)) {
                $notrans = true;
                foreach ($fields_label as $field_toshow) {
                  $labeltoshow .= $obj->$field_toshow.' ';
                }
              } else {
                $labeltoshow = $obj->{$InfoFieldList[1]};
              }
              $labeltoshow = dol_trunc($labeltoshow, 45);
 
              if (is_array($value_arr) && in_array($obj->rowid, $value_arr)) {
                $labeltoshow = '';
                foreach ($fields_label as $field_toshow) {
                  $translabel = $langs->trans($obj->$field_toshow);
                  if ($translabel != $obj->$field_toshow) {
                    $labeltoshow .= ' '.dol_trunc($translabel, 18).' ';
                  } else {
                    $labeltoshow .= ' '.dol_trunc($obj->$field_toshow, 18).' ';
                  }
                }
                $data[$obj->rowid] = $labeltoshow;
              } else {
                if (!$notrans) {
                  $translabel = $langs->trans($obj->{$InfoFieldList[1]});
                  if ($translabel != $obj->{$InfoFieldList[1]}) {
                    $labeltoshow = dol_trunc($translabel, 18);
                  } else {
                    $labeltoshow = dol_trunc($obj->{$InfoFieldList[1]}, 18);
                  }
                }
                if (empty($labeltoshow)) {
                  $labeltoshow = '(not defined)';
                }
 
                if (is_array($value_arr) && in_array($obj->rowid, $value_arr)) {
                  $data[$obj->rowid] = $labeltoshow;
                }
 
                if (!empty($InfoFieldList[3]) && $parentField) {
                  $parent = $parentName.':'.$obj->{$parentField};
                }
 
                $data[$obj->rowid] = $labeltoshow;
              }
 
              $i++;
            }
            $this->db->free($resql);
 
            $out = $form->multiselectarray($keyprefix.$key.$keysuffix, $data, $value_arr, 0, 0, '', 0, '100%');
          } else {
            print 'Error in request '.$sql.' '.$this->db->lasterror().'. Check setup of extra parameters.<br>';
          }
        } else {
          require_once DOL_DOCUMENT_ROOT.'/categories/class/categorie.class.php';
          $categcode = $InfoFieldList[5];
          if (is_numeric($categcode)) { // deprecated: must use the category code instead of id. For backward compatibility.
            $tmpcategory = new Categorie($this->db);
            $MAP_ID_TO_CODE = array_flip($tmpcategory->MAP_ID);
            $categcode = $MAP_ID_TO_CODE[(int) $categcode];
          }
 
          $data = $form->select_all_categories($categcode, '', 'parent', 64, $InfoFieldList[6], 1, 1);
          $out = $form->multiselectarray($keyprefix.$key.$keysuffix, $data, $value_arr, 0, 0, '', 0, '100%');
        }
      }
    } elseif ($type == 'link') {
      $param_list = array_keys($param['options']); // $param_list[0] = 'ObjectName:classPath' but can also be 'ObjectName:classPath:1:(status:=:1)'
      /* Removed.
       The selectForForms is called with parameter $objectfield defined, so the app can retrieve the filter inside the ajax component instead of being provided as parameters. The
       filter was used to pass SQL requests leading to serious SQL injection problem. This should not be possible. Also the call of the ajax was broken by some WAF.
       if (strpos($param_list[0], '$ID$') !== false && !empty($objectid)) {
       $param_list[0] = str_replace('$ID$', $objectid, $param_list[0]);
       }*/
      $showempty = (($required && $default != '') ? 0 : 1);
 
      $tmparray = explode(':', $param_list[0]);
 
      $element = $extrafieldsobjectkey;   // $extrafieldsobjectkey comes from $object->table_element but we need $object->element
      if ($element == 'socpeople') {
        $element = 'contact';
      } elseif ($element == 'projet') {
        $element = 'project';
      }
 
      //$objectdesc = $param_list[0];                                           // Example: 'ObjectName:classPath:1:(status:=:1)' Replaced by next line: old line propagated also the filter to ajax call that was blocked by some WAF
      $objectdesc = $tmparray[0].(empty($tmparray[1]) ? "" : ":".$tmparray[1]); // Example: 'ObjectName:classPath'                To not propagate any filter (selectForForms do ajax call and propagating SQL filter is blocked by some WAF). Also we should use the filter into the definition in the ->fields of $elem if found.
      $objectfield = $element.':options_'.$key; // Example: 'actioncomm:options_fff'        To be used in priority to know object linked with all its definition (including filters)
 
      $out = $form->selectForForms($objectdesc, $keyprefix.$key.$keysuffix, $value, $showempty, '', '', $morecss, '', 0, 0, '', $objectfield);
    } elseif (in_array($type, ['point', 'multipts', 'linestrg', 'polygon'])) {
      require_once DOL_DOCUMENT_ROOT.'/core/class/dolgeophp.class.php';
      $dolgeophp = new DolGeoPHP($this->db);
      $geojson = '{}';
      $centroidjson = getDolGlobalString('MAIN_INFO_SOCIETE_GEO_COORDINATES', '{}');
      if (!empty($value)) {
        $tmparray = $dolgeophp->parseGeoString($value);
        $geojson = $tmparray['geojson'];
        $centroidjson = $tmparray['centroidjson'];
      }
      if (!preg_match('/search_/', $keyprefix)) {
        require_once DOL_DOCUMENT_ROOT.'/core/class/geomapeditor.class.php';
        $geomapeditor = new GeoMapEditor();
        $out .= $geomapeditor->getHtml($keyprefix.$key.$keysuffix, $geojson, $centroidjson, $type);
      } else {
        // If keyprefix is search_ or search_options_, we must just use a simple text field
        $out = '';
      }
    } elseif ($type == 'password') {
      // If prefix is 'search_', field is used as a filter, we use a common text field.
      $out = '<input style="display:none" type="text" name="fakeusernameremembered">'; // Hidden field to reduce impact of evil Google Chrome autopopulate bug.
      $out .= '<input autocomplete="new-password" type="'.($keyprefix == 'search_' ? 'text' : 'password').'" class="flat '.$morecss.'" name="'.$keyprefix.$key.$keysuffix.'" id="'.$keyprefix.$key.$keysuffix.'" value="'.$value.'" '.($moreparam ? $moreparam : '').'>';
    } elseif ($type == 'stars') {
      $out = '<input type="hidden" class="flat '.$morecss.'" name="'.$keyprefix.$key.$keysuffix.'" id="'.$keyprefix.$key.$keysuffix.'" value="'.dol_escape_htmltag($value).'"'.($moreparam ? $moreparam : '').'>';
      $out .= '<div class="star-selection" id="'.$keyprefix.$key.$keysuffix.'_selection">';
      $i = 1;
      while ($i <= $size) {
        $out .= '<span class="star" data-value="'.$i.'">'.img_picto('', 'fontawesome_star_fas').'</span>';
        $i++;
      }
      $out .= '</div>';
      $out .= '<script>
        jQuery(function($) {  /* extrafields.class.php 1 */
          let container = $("#'.$keyprefix.$key.$keysuffix.'_selection");
          let selectedStars = parseInt($("#'.$keyprefix.$key.$keysuffix.'").val()) || 0;
          container.find(".star").each(function() {
            $(this).toggleClass("active", $(this).data("value") <= selectedStars);
          });
          container.find(".star").on("mouseover", function() {
            let selectedStar = $(this).data("value");
            container.find(".star").each(function() {
              $(this).toggleClass("active", $(this).data("value") <= selectedStar);
            });
          });
          container.on("mouseout", function() {
            container.find(".star").each(function() {
              $(this).toggleClass("active", $(this).data("value") <= selectedStars);
            });
          });
          container.find(".star").off("click").on("click", function() {
            selectedStars = $(this).data("value");
            if (selectedStars === 1 && $("#'.$keyprefix.$key.$keysuffix.'").val() == 1) {
              selectedStars = 0;
            }
            $("#'.$keyprefix.$key.$keysuffix.'").val(selectedStars);
            container.find(".star").each(function() {
              $(this).toggleClass("active", $(this).data("value") <= selectedStars);
            });
          });
        });
      </script>';
    }
    if (!empty($hidden)) {
      $out = '<input type="hidden" value="'.$value.'" name="'.$keyprefix.$key.$keysuffix.'" id="'.$keyprefix.$key.$keysuffix.'"/>';
    }
 
    // If alwayseditable is false, and object is not in draft, then showOutputField
    // @phan-suppress-next-line PhanUndeclaredConstantOfClass
    if ($alwayseditable == 0 && is_object($object) && isset($object->status) && defined(get_class($object)."::STATUS_DRAFT") && $object->status != $object::STATUS_DRAFT) {
      $out = $this->showOutputField($key, $value, $moreparam, $extrafieldsobjectkey, null, $object);
    }
    /* Add comments
     if ($type == 'date') $out.=' (YYYY-MM-DD)';
     elseif ($type == 'datetime') $out.=' (YYYY-MM-DD HH:MM:SS)';
     */
    /*if (!empty($help) && $keyprefix != 'search_options_') {
     $out .= $form->textwithpicto('', $help, 1, 'help', '', 0, 3);
     }*/
    return $out;
  }
 
 
  public function showOutputField($key, $value, $moreparam = '', $extrafieldsobjectkey = '', $outputlangs = null, $object = null, $mode = '')
  {
    global $conf, $langs, $hookmanager;
 
    if (is_null($outputlangs) || !is_object($outputlangs)) {
      $outputlangs = $langs;
    }
 
    if (empty($extrafieldsobjectkey)) {
      dol_syslog(get_class($this).'::showOutputField extrafieldsobjectkey required', LOG_ERR);
      return 'BadValueForParamExtraFieldsObjectKey';
    }
 
    $parameters = array(
      'key'                  => $key,
      'value'                => &$value,
      'moreparam'            => $moreparam,
      'extrafieldsobjectkey' => $extrafieldsobjectkey,
      'outputlangs'          => $outputlangs,
      'object'               => $object
    );
    $action = '';
 
    $reshook = $hookmanager->executeHooks('showOutputExtraField', $parameters, $this, $action); // Note that $action and $object may have been modified by hook
    if ($reshook > 0) {
      return $hookmanager->resPrint;
    }
 
    $label = $this->attributes[$extrafieldsobjectkey]['label'][$key];
    $type = $this->attributes[$extrafieldsobjectkey]['type'][$key];
    $size = $this->attributes[$extrafieldsobjectkey]['size'][$key];     // Can be '255', '24,8'...
    $default = $this->attributes[$extrafieldsobjectkey]['default'][$key];
    $computed = $this->attributes[$extrafieldsobjectkey]['computed'][$key];
    $unique = $this->attributes[$extrafieldsobjectkey]['unique'][$key];
    $required = $this->attributes[$extrafieldsobjectkey]['required'][$key];
    $param = $this->attributes[$extrafieldsobjectkey]['param'][$key];
    $perms = (int) dol_eval((string) $this->attributes[$extrafieldsobjectkey]['perms'][$key], 1, 1, '2');
    $langfile = $this->attributes[$extrafieldsobjectkey]['langfile'][$key];
    $list = (string) dol_eval((string) $this->attributes[$extrafieldsobjectkey]['list'][$key], 1, 1, '2');
    $help = $this->attributes[$extrafieldsobjectkey]['help'][$key];
    $cssview = $this->attributes[$extrafieldsobjectkey]['cssview'][$key];
    $alwayseditable = $this->attributes[$extrafieldsobjectkey]['alwayseditable'][$key];
 
    // If alwayseditable is false, and object is not in draft, then we show value instead of input field
    $showValueInsteadOfInputField = 0; // Variable used to disable update of fields via ajax
    // @phan-suppress-next-line PhanUndeclaredConstantOfClass
    if ($alwayseditable == 0 && is_object($object) && isset($object->status) && defined(get_class($object)."::STATUS_DRAFT") && $object->status != $object::STATUS_DRAFT) {
      $showValueInsteadOfInputField = 1;
    }
 
    $hidden = (empty($list) ? 1 : 0); // If $list empty, we are sure it is hidden, otherwise we show. If it depends on mode (view/create/edit form or list, this must be filtered by caller)
 
    if ($hidden) {
      return ''; // This is a protection. If field is hidden, we should just not call this method.
    }
 
    //print $key.' '.$type.'<br>';
 
    $showsize = 0;
    if ($type == 'date') {
      $showsize = 10;
      if ($value !== '') {
        $value = dol_print_date($value, 'day'); // For date without hour, date is always GMT for storage and output
      }
    } elseif ($type == 'datetime') {
      $showsize = 19;
      if ($value !== '') {
        $value = dol_print_date($value, 'dayhour', 'tzuserrel');
      }
    } elseif ($type == 'duration') {
      $showsize = 10;
      if ($value !== '') {
        $value = intval($value);
        $value = convertSecondToTime($value);
      }
    } elseif ($type == 'datetimegmt') {
      $showsize = 19;
      if ($value !== '') {
        $value = dol_print_date($value, 'dayhour', 'gmt');
      }
    } elseif ($type == 'int') {
      $showsize = 10;
    } elseif ($type == 'double') {
      if (!empty($value)) {
        //$value=price($value);
        //$sizeparts = explode(",", $size);
        //$number_decimals = array_key_exists(1, $sizeparts) ? $sizeparts[1] : 0;
        $value = price($value, 0, $outputlangs, 0, 0, -2, '');
      }
    } elseif ($type == 'boolean') {
      $checked = '';
      if (!empty($value)) {
        $checked = ' checked ';
      }
      if (getDolGlobalInt('MAIN_OPTIMIZEFORTEXTBROWSER') < 2) {
        $value = '<input type="checkbox" '.$checked.' '.($moreparam ? $moreparam : '').' readonly disabled>';
      } else {
        $value = yn($value ? 1 : 0);
      }
    } elseif ($type == 'mail' || $type == 'email') {
      $value = dol_print_email($value, 0, 0, 0, 64, 1, 1);
    } elseif ($type == 'ip') {
      $value = dol_print_ip($value, 0);
    } elseif ($type == 'icon') {
      $value = '<span class="'.$value.'"></span>';
    } elseif ($type == 'url') {
      $value = dol_print_url($value, '_blank', 32, 1);
    } elseif ($type == 'phone') {
      $value = dol_print_phone($value, '', 0, 0, '', '&nbsp;', 'phone');
    } elseif ($type == 'price') {
      //$value = price($value, 0, $langs, 0, 0, -1, $conf->currency);
      if ($value || $value == '0') {
        $value = price($value, 0, $outputlangs, 0, getDolGlobalInt('MAIN_MAX_DECIMALS_TOT'), -1).' '.$outputlangs->getCurrencySymbol($conf->currency);
      }
    } elseif ($type == 'pricecy') {
      $currency = $conf->currency;
      if (!empty($value)) {
        // $value in memory is a php string like '0.01:EUR'
        $pricetmp = explode(':', $value);
        $currency = !empty($pricetmp[1]) ? $pricetmp[1] : $conf->currency;
        $value = $pricetmp[0];
      }
      if ($value || $value == '0') {
        $value = price($value, 0, $outputlangs, 0, getDolGlobalInt('MAIN_MAX_DECIMALS_TOT'), -1, $currency);
      }
    } elseif ($type == 'select') {
      $valstr = (!empty($param['options'][$value]) ? $param['options'][$value] : '');
      if (($pos = strpos($valstr, "|")) !== false) {
        $valstr = substr($valstr, 0, $pos);
      }
      if ($langfile && $valstr) {
        $value = $outputlangs->trans($valstr);
      } else {
        $value = $valstr;
      }
    } elseif ($type == 'sellist') {
      $param_list = array_keys($param['options']);
      $InfoFieldList = explode(":", $param_list[0]);
 
      $selectkey = "rowid";
      $keyList = 'rowid';
 
      if (count($InfoFieldList) >= 3) {
        $selectkey = $InfoFieldList[2];
        $keyList = $InfoFieldList[2].' as rowid';
      }
 
      $fields_label = explode('|', $InfoFieldList[1]);
      if (is_array($fields_label)) {
        $keyList .= ', ';
        $keyList .= implode(', ', $fields_label);
      }
 
      $filter_categorie = false;
      if (count($InfoFieldList) > 5) {
        if ($InfoFieldList[0] == 'categorie') {
          $filter_categorie = true;
        }
      }
 
      $sql = "SELECT ".$keyList;
      $sql .= ' FROM '.$this->db->prefix().$InfoFieldList[0];
      if (!empty($InfoFieldList[4]) && strpos($InfoFieldList[4], 'extra.') !== false) {
        $sql .= ' as main';
      }
      if ($selectkey == 'rowid' && empty($value)) {
        $sql .= " WHERE ".$this->db->sanitize($selectkey)." = 0";
      } elseif ($selectkey == 'rowid') {
        $sql .= " WHERE ".$this->db->sanitize($selectkey)." = ".((int) $value);
      } else {
        $sql .= " WHERE ".$this->db->sanitize($selectkey)." = '".$this->db->escape($value)."'";
      }
      //$sql.= ' AND entity = '.$conf->entity;
 
      dol_syslog(get_class($this).':showOutputField:$type=sellist', LOG_DEBUG);
 
      $resql = $this->db->query($sql);
      if ($resql) {
        if (!$filter_categorie) {
          $value = ''; // value was used, so now we reset it to use it to build final output
 
          $obj = $this->db->fetch_object($resql);
 
          // Several field into label (eq table:code|label:rowid)
          $fields_label = explode('|', $InfoFieldList[1]);
 
          if (is_array($fields_label) && count($fields_label) > 1) {
            foreach ($fields_label as $field_toshow) {
              $translabel = '';
              $field_toshow = preg_replace('/^.*\./', '', $field_toshow);
              if (!empty($obj->$field_toshow)) {
                $translabel = $outputlangs->trans($obj->$field_toshow);
 
                if ($translabel != $obj->$field_toshow) {
                  $value .= dol_trunc($translabel, 24) . ' ';
                } else {
                  $value .= $obj->$field_toshow . ' ';
                }
              }
            }
          } else {
            $translabel = '';
            $tmppropname = $InfoFieldList[1];
            //$obj->$tmppropname = '';
            if (!empty(isset($obj->$tmppropname) ? $obj->$tmppropname : '')) {
              $translabel = $outputlangs->trans($obj->$tmppropname);
            }
            if ($translabel != (isset($obj->$tmppropname) ? $obj->$tmppropname : '')) {
              $value = dol_trunc($translabel, 18);
            } else {
              $value = isset($obj->$tmppropname) ? $obj->$tmppropname : '';
            }
          }
        } else {
          $toprint = array();
          $obj = $this->db->fetch_object($resql);
          if ($obj->rowid) {
            require_once DOL_DOCUMENT_ROOT . '/categories/class/categorie.class.php';
            $c = new Categorie($this->db);
            $result = $c->fetch($obj->rowid);
            if ($result > 0) {
              $ways = $c->print_all_ways(); // $ways[0] = "ccc2 >> ccc2a >> ccc2a1" with html formatted text
              foreach ($ways as $way) {
                $toprint[] = '<li class="select2-search-choice-dolibarr noborderoncategories'.($mode ? ' '.$mode : '').'"' . ($c->color ? ' style="background: #' . $c->color . ';"' : ' style="background: #bbb"') . '>' . img_object('', 'category') . ' ' . $way . '</li>';
              }
            }
          }
          $value = '<div class="select2-container-multi-dolibarr" style="width: 90%;"><ul class="select2-choices-dolibarr">'.implode(' ', $toprint).'</ul></div>';
        }
      } else {
        dol_syslog(get_class($this).'::showOutputField error '.$this->db->lasterror(), LOG_WARNING);
      }
    } elseif ($type == 'radio') {
      if ($required && !isset($param['options'][$value])) {
        $outputlangs->load('errors');
        $value = '<span class="opacitymedium">'.$outputlangs->trans('ErrorNoValueForRadioType').'</span>';
      } else {
        if (isset($param['options'][$value])) {
          $value = $outputlangs->trans($param['options'][$value]);
        } else {
          $value = '';
        }
      }
    } elseif ($type == 'checkbox') {
      $value_arr = explode(',', $value);
      $value = '';
      $toprint = array();
      if (is_array($value_arr)) {
        foreach ($value_arr as $keyval => $valueval) {
          if (!empty($valueval)) {
            $toprint[] = '<li class="select2-search-choice-dolibarr noborderoncategories'.($mode ? ' '.$mode : '').'" style="background: #bbb">'.$param['options'][$valueval].'</li>';
          }
        }
      }
      $value = '<div class="select2-container-multi-dolibarr" style="width: 90%;"><ul class="select2-choices-dolibarr">'.implode(' ', $toprint).'</ul></div>';
    } elseif ($type == 'chkbxlst') {        // Example with extrafield value = "societe:nom:rowid" or "categorie:label:rowid:::product"
      // Only if something to display (perf)
      if (!is_null($value) && $value != '') {
        $value_arr = explode(',', $value);
 
        $param_list = array_keys($param['options']);
        $InfoFieldList = explode(":", $param_list[0]);
 
        $selectkey = "rowid";
        $keyList = 'rowid';
 
        if (count($InfoFieldList) >= 3) {
          $selectkey = $InfoFieldList[2];
          $keyList = $InfoFieldList[2].' as rowid';
        }
 
        $fields_label = explode('|', $InfoFieldList[1]);
        if (is_array($fields_label)) {
          $keyList .= ', ';
          $keyList .= implode(', ', $fields_label);
        }
 
        $filter_categorie = false;
        if (count($InfoFieldList) > 5 && ((string) $InfoFieldList[5] != '')) {
          if ($InfoFieldList[0] == 'categorie') {
            $filter_categorie = true;
          }
        }
 
        $sql = "SELECT ".$keyList;
        $sql .= " FROM ".$this->db->prefix().$InfoFieldList[0];
        if (strpos($InfoFieldList[4], 'extra.') !== false) {
          $sql .= ' as main';
        }
        $sql .= " WHERE ".$this->db->sanitize($selectkey)." IN (".$this->db->sanitize(implode(',', $value_arr)).")";
 
        dol_syslog(get_class($this).':showOutputField type=chkbxlst', LOG_DEBUG);
 
        $resql = $this->db->query($sql);
 
        if ($resql) {
          if (!$filter_categorie) {
            $value = ''; // value was used, so now we reset it to use it to build final output
            $toprint = array();
            $numOfElem = $this->db->num_rows($resql);
            while ($obj = $this->db->fetch_object($resql)) {
              // Several field into label (eq table:code|label:rowid)
              $fields_label = explode('|', $InfoFieldList[1]);
              $txtcolor = '#bbb';
              //var_dump($key, $type, $InfoFieldList, $fields_label, $object);
              if (count($fields_label) > 0) {
                if ($InfoFieldList[0] == 'societe' && $InfoFieldList[1] == 'nom' && $InfoFieldList[2] == 'rowid') {
                  // Special cas for thirdparties
                  require_once DOL_DOCUMENT_ROOT.'/societe/class/societe.class.php';
                  $tmpthirdpartystatic = new Societe($this->db);
                  $tmpthirdpartystatic->id = $obj->rowid;
                  $tmpthirdpartystatic->name = $obj->nom;
                  if ($numOfElem >= 3) {
                    $tmpthirdpartystatic->name = $obj->nom;
                    $label = $tmpthirdpartystatic->getNomUrl(2);
                  } elseif ($numOfElem >= 2) {
                    $tmpthirdpartystatic->name = dol_trunc($obj->nom, 5);
                    $label = $tmpthirdpartystatic->getNomUrl(1);
                  } else {
                    $tmpthirdpartystatic->name = $obj->nom;
                    $label = $tmpthirdpartystatic->getNomUrl(1);
                  }
                } else {
                  $label = '<li class="select2-search-choice-dolibarr noborderoncategories'.($mode ? ' '.$mode : '').'" style="background: '.$txtcolor.'">';
                  foreach ($fields_label as $field_toshow) {
                    $translabel = '';
                    if (!empty($obj->$field_toshow)) {
                      $translabel = $outputlangs->trans($obj->$field_toshow);
                    }
                    if ($translabel != $field_toshow) {
                      $label .= ' '.dol_trunc($translabel, 18);
                    } else {
                      $label .= ' '.$obj->$field_toshow;
                    }
                  }
                  $label .= '</li>';
                }
                $toprint[] = $label;
              }
            }
          } else {
            require_once DOL_DOCUMENT_ROOT.'/categories/class/categorie.class.php';
 
            $toprint = array();
            $numElem = $this->db->num_rows($resql);
            while ($obj = $this->db->fetch_object($resql)) {
              $c = new Categorie($this->db);
              $c->fetch($obj->rowid);
              if ((string) $mode != 'list') {
                $ways = $c->print_all_ways(); // $ways[0] = "ccc2 >> ccc2a >> ccc2a1" with html formatted text
                foreach ($ways as $way) {
                  $toprint[] = '<li class="select2-search-choice-dolibarr noborderoncategories'.($mode ? ' '.$mode : '').'"'.($c->color ? ' style="background: #'.$c->color.';"' : ' style="background: #bbb"').'>'.img_object('', 'category').' '.$way.'</li>';
                }
              } else {
                // Check contrast with background and correct text color
                $forced_color = 'categtextwhite'; // We want color white because the getNomUrl of a tag is always called inside a dark background like '<span color="bbb"></span>' to show it as a tag. TODO Add this in param to force when called outside of span.
                if ($c->color) {
                  if (colorIsLight($c->color)) {
                    $forced_color = 'categtextblack';
                  }
                }
 
                $s = '<li class="select2-search-choice-dolibarr noborderoncategories '.$forced_color.' list"'.($c->color ? ' style="background: #'.$c->color.';"' : ' style="background: #bbb"').'>';
                if ($numElem >= 2) {
                  $s .= img_object($c->label, 'category', 'class="small"');
                } else {
                  $s .= img_object($c->label, 'category', 'class="small"').' '.$c->label;
                }
                $s .= '</li>';
                $toprint[] = $s;
              }
            }
          }
          if (!empty($toprint)) {
            $value = '<div class="select2-container-multi-dolibarr" style="width: 90%;"><ul class="select2-choices-dolibarr">'.implode(' ', $toprint).'</ul></div>';
          }
        } else {
          dol_syslog(get_class($this).'::showOutputField error '.$this->db->lasterror(), LOG_WARNING);
        }
      }
    } elseif ($type == 'link') {
      // Only if something to display (perf)
      if ($value) {   // If we have -1 here, pb is into insert, not into output (fix insert instead of changing code here to compensate)
        $param_list = array_keys($param['options']); // $param_list='ObjectName:classPath'
 
        $InfoFieldList = explode(":", $param_list[0]);
        $classname = $InfoFieldList[0];
        $classpath = $InfoFieldList[1];
        if (!empty($classpath)) {
          dol_include_once($InfoFieldList[1]);
          if (!$classname || !class_exists($classname)) {
            // Without this, the raw id is printed with nothing telling why, which is very
            // hard to diagnose. Most often the class path stored in the definition is wrong.
            dol_syslog('Extrafields::showOutputField the class '.$classname.' of the link field '.$key.' could not be loaded from '.$classpath.', check the extrafield definition', LOG_WARNING);
          }
          if ($classname && class_exists($classname)) {
            $tmpobject = new $classname($this->db);
            '@phan-var-force CommonObject $tmpobject';
            $tmpobject->fetch($value);
 
            if (get_class($tmpobject) == 'Categorie') {
              // For category object, rendering must use the same method than the one defined into showCategories()
              $color = $tmpobject->color;
              $sfortag = '<span class="noborderoncategories"' . ($color ? ' style="background: #' . $color . ';"' : ' style="background: #bbb"') . '>';
              $sfortag .= $tmpobject->getNomUrl(3);
              $sfortag .= '</span>';
              $value = $sfortag;
            } else {
              $value = $tmpobject->getNomUrl(3);
            }
          }
        } else {
          dol_syslog('Error bad setup of extrafield', LOG_WARNING);
          return 'Error bad setup of extrafield';
        }
      }
    } elseif ($type == 'point') {
      if (!empty($value)) {
        require_once DOL_DOCUMENT_ROOT.'/core/class/dolgeophp.class.php';
        $dolgeophp = new DolGeoPHP($this->db);
        $value = $dolgeophp->getXYString($value);
      } else {
        $value = '';
      }
    } elseif (in_array($type, ['multipts', 'linestrg', 'polygon'])) {
      if (!empty($value)) {
        require_once DOL_DOCUMENT_ROOT.'/core/class/dolgeophp.class.php';
        $dolgeophp = new DolGeoPHP($this->db);
        $value = $dolgeophp->getPointString($value);
      } else {
        $value = '';
      }
    } elseif ($type == 'text') {
      $value = '<div class="'.($cssview ? $cssview : 'shortmessagecut').'">'.dol_htmlentitiesbr($value).'</div>';
    } elseif ($type == 'html') {
      $value = dol_htmlentitiesbr($value);
    } elseif ($type == 'password') {
      $value = dol_trunc(preg_replace('/./i', '*', $value), 8, 'right', 'UTF-8', 1);
    } elseif ($type == 'stars') {
      $objectid = (int) $object->id;
      $nbstars = (int) $value;
      if ($showValueInsteadOfInputField == 1) {
        $value = '<span style="display:none;" id="'.$key.$object->id.'">'.dol_escape_htmltag($value).'</span>';
      } else {
        $value = '<input type="hidden" class="flat" name="'.$key.'" id="'.$key.$objectid.'" value="'.dol_escape_htmltag($value).'"'.($moreparam ? $moreparam : '').'>';
      }
 
      $value .= '<div class="star-selection" id="'.$key.$objectid.'_selection">';
      $i = 1;
      while ($i <= $size) {
        $value .= '<span class="star'.($i <= $nbstars ? ' active' : '').'" data-value="'.$i.'">'.img_picto('', 'fontawesome_star_fas').'</span>';
        $i++;
      }
      $value .= '</div>';
      $value .= '<script>
        $(document).ready(function() {  /* extrafields.class.php 2 */
          let container = $("#'.$key.$objectid.'_selection");
          let selectedStars = parseInt($("#'.$key.$objectid.'").val() || $("#'.$key.$objectid.'").text()) || 0;
          ';
      if ($showValueInsteadOfInputField == 0) {
        $value .= '
            container.find(".star").on("mouseover", function() {
              console.log("Mouse over a star");
              let selectedStar = $(this).data("value");
              container.find(".star").each(function() {
                $(this).toggleClass("active", $(this).data("value") <= selectedStar);
              });
            });
            container.on("mouseout", function() {
              console.log("Mouse out of star");
              container.find(".star").each(function() {
                $(this).toggleClass("active", $(this).data("value") <= selectedStars);
              });
            });
            container.find(".star").off("click").on("click", function() {
              console.log("We click on star, we call the ajax core/ajax/updateextrafield.php");
              selectedStars = $(this).data("value");
              if (selectedStars == 1 && $("#'.$key.$objectid.'").val() == 1) {
                selectedStars = 0;
              }
              container.find("#'.$key.$objectid.'").val(selectedStars);
              container.find(".star").each(function() {
                $(this).toggleClass("active", $(this).data("value") <= selectedStars);
              });
              $.ajax({
                url: "'.DOL_URL_ROOT.'/core/ajax/updateextrafield.php",
                method: "POST",
                data: {
                  objectType: \''.dol_escape_js($extrafieldsobjectkey).'\',
                  objectId: '.((int) $objectid).',
                  field: \''.dol_escape_js($key).'\',
                  value: selectedStars,
                  token: \''.newToken().'\'
                },
                success: function(response) {
                  var res = JSON.parse(response);
                  console[res.status === "success" ? "log" : "error"](res.message);
                },
                error: function(xhr, status, error) {
                  console.log("Ajax request failed while updating '.$key.':", error);
                }
              });
            });';
      }
      $value .= '
        });
      </script>';
    } else {
      $showsize = round((float) $size);
      if ($showsize > 48) {
        $showsize = 48;
      }
    }
 
    //print $type.'-'.$size;
    $out = $value;
 
    return $out;
  }
 
  public function getAlignFlag($key, $extrafieldsobjectkey = '')
  {
    return $this->getCSSClass($key, $extrafieldsobjectkey);
  }
 
  public function getCSSClass($key, $extrafieldsobjectkey = '', $mode = 'csslist')
  {
    $type = 'varchar';
    if (!empty($extrafieldsobjectkey)) {
      $type = $this->attributes[$extrafieldsobjectkey]['type'][$key];
    }
 
    $cssstring = '';
 
    if ($mode == 'csslist') {
      if (in_array($type, array('date', 'datetime', 'datetimegmt',))) {
        $cssstring = "center";
      } elseif (in_array($type, array('int', 'price', 'double', 'duration'))) {
        $cssstring = "right";
      } elseif (in_array($type, array('boolean', 'radio', 'checkbox', 'ip', 'icon'))) {
        $cssstring = "center";
      }
 
      if (!empty($this->attributes[$extrafieldsobjectkey][$mode][$key])) {
        $cssstring .= ($cssstring ? ' ' : '').$this->attributes[$extrafieldsobjectkey][$mode][$key];
      } else {
        if (in_array($type, array('ip'))) {
          $cssstring .= ($cssstring ? ' ' : '').'tdoverflowmax150';
        }
      }
    }
 
    if ($mode == 'css' || $mode == 'cssview') {
      if (!empty($this->attributes[$extrafieldsobjectkey][$mode][$key])) {
        $cssstring = ($cssstring ? ' ' : '').$this->attributes[$extrafieldsobjectkey][$mode][$key];
      }
    }
 
    return $cssstring;
  }
 
  public function showSeparator($key, $object, $colspan = 2, $display_type = 'card', $mode = '')
  {
    global $conf, $langs;
 
    $tagtype = 'tr';
    $tagtype_dyn = 'td';
 
    if ($display_type == 'line') {
      $tagtype = 'div';
      $tagtype_dyn = 'span';
      $colspan = 0;
    }
 
    $extrafield_param = $this->attributes[$object->table_element]['param'][$key];
    $extrafield_param_list = array();
    if (!empty($extrafield_param) && is_array($extrafield_param)) {
      $extrafield_param_list = array_keys($extrafield_param['options']);
    }
 
    // Set $extrafield_collapse_display_value (do we have to collapse/expand the group after the separator)
    $extrafield_collapse_display_value = -1;
    $expand_display = false;
    if (is_array($extrafield_param_list) && count($extrafield_param_list) > 0) {
      $extrafield_collapse_display_value = intval($extrafield_param_list[0]);
      $expand_display = ((isset($_COOKIE['DOLUSER_COLLAPSE_'.$object->table_element.'_extrafields_'.$key]) || GETPOSTINT('ignorecollapsesetup')) ? (!empty($_COOKIE['DOLUSER_COLLAPSE_'.$object->table_element.'_extrafields_'.$key])) : !($extrafield_collapse_display_value == 2));
    }
    $disabledcookiewrite = 0;
    if ($mode == 'create') {
      // On create mode, force separator group to not be collapsible
      $extrafield_collapse_display_value = 1;
      $expand_display = true; // We force group to be shown expanded
      $disabledcookiewrite = 1; // We keep status of group unchanged into the cookie
    }
 
    $out = '<'.$tagtype.' id="trextrafieldseparator'.$key.(!empty($object->id) ? '_'.$object->id : '').'" class="trextrafieldseparator trextrafieldseparator'.$key.(!empty($object->id) ? '_'.$object->id : '').'">';
    $out .= '<'.$tagtype_dyn.' '.(!empty($colspan) ? 'colspan="' . $colspan . '"' : '').'>';
    // Some js code will be injected here to manage the collapsing of extrafields
    // Output the picto
    $out .= '<span class="'.($extrafield_collapse_display_value ? 'cursorpointer ' : '').($extrafield_collapse_display_value == 0 ? 'fas fa-square opacitymedium' : 'far fa-'.(($expand_display ? 'minus' : 'plus').'-square')).'"></span>';
    $out .= '&nbsp;';
    $out .= '<strong>';
    $out .= $langs->trans($this->attributes[$object->table_element]['label'][$key]);
    $out .= '</strong>';
    $out .= '</'.$tagtype_dyn.'>';
    $out .= '</'.$tagtype.'>';
 
    $collapse_group = $key.(!empty($object->id) ? '_'.$object->id : '');
    //$extrafields_collapse_num = $this->attributes[$object->table_element]['pos'][$key].(!empty($object->id)?'_'.$object->id:'');
 
    if ($extrafield_collapse_display_value == 1 || $extrafield_collapse_display_value == 2) {
      // Set the collapse_display status to cookie in priority or if ignorecollapsesetup is 1, if cookie and ignorecollapsesetup not defined, use the setup.
      $this->expand_display[$collapse_group] = $expand_display;
 
      if (!empty($conf->use_javascript_ajax)) {
        $out .= '<!-- Add js script to manage the collapse/uncollapse of extrafields separators '.$key.' -->'."\n";
        $out .= '<script nonce="'.getNonce().'" type="text/javascript">'."\n";
        $out .= 'jQuery(document).ready(function(){'."\n";
        if (empty($disabledcookiewrite)) {
          if (!$expand_display) {
            $out .= '   console.log("Inject js for the collapsing of extrafield '.$key.' - hide");'."\n";
            $out .= '   jQuery(".trextrafields_collapse'.$collapse_group.'").hide();'."\n";
          } else {
            $out .= '   console.log("Inject js for collapsing of extrafield '.$key.' - keep visible and set cookie");'."\n";
            $out .= '   document.cookie = "DOLUSER_COLLAPSE_'.$object->table_element.'_extrafields_'.$key.'=1; path='.$_SERVER["PHP_SELF"].'"'."\n";
          }
        }
        $out .= '   jQuery("#trextrafieldseparator'.$key.(!empty($object->id) ? '_'.$object->id : '').'").click(function(){'."\n";
        $out .= '       console.log("We click on collapse/uncollapse to hide/show .trextrafields_collapse'.$collapse_group.'");'."\n";
        $out .= '       jQuery(".trextrafields_collapse'.$collapse_group.'").toggle(100, function(){'."\n";
        $out .= '           if (jQuery(".trextrafields_collapse'.$collapse_group.'").is(":hidden")) {'."\n";
        $out .= '               jQuery("#trextrafieldseparator'.$key.(!empty($object->id) ? '_'.$object->id : '').' '.$tagtype_dyn.' span").addClass("fa-plus-square").removeClass("fa-minus-square");'."\n";
        $out .= '               document.cookie = "DOLUSER_COLLAPSE_'.$object->table_element.'_extrafields_'.$key.'=0; path='.$_SERVER["PHP_SELF"].'"'."\n";
        $out .= '           } else {'."\n";
        $out .= '               jQuery("#trextrafieldseparator'.$key.(!empty($object->id) ? '_'.$object->id : '').' '.$tagtype_dyn.' span").addClass("fa-minus-square").removeClass("fa-plus-square");'."\n";
        $out .= '               document.cookie = "DOLUSER_COLLAPSE_'.$object->table_element.'_extrafields_'.$key.'=1; path='.$_SERVER["PHP_SELF"].'"'."\n";
        $out .= '           }'."\n";
        $out .= '       });'."\n";
        $out .= '   });'."\n";
        $out .= '});'."\n";
        $out .= '</script>'."\n";
      }
    } else {
      $this->expand_display[$collapse_group] = 1;
    }
 
    return $out;
  }
 
  public function setOptionalsFromPost($extralabels, $object, $onlykey = '', $todefaultifmissing = 0)
  {
    global $langs;
 
    $nofillrequired = 0; // For error when required field left blank
    $error_field_required = array();
 
    if (isset($this->attributes[$object->table_element]['label']) && is_array($this->attributes[$object->table_element]['label'])) {
      $extralabels = $this->attributes[$object->table_element]['label'];
    }
 
    if (is_array($extralabels)) {
      // Get extra fields
      foreach ($extralabels as $key => $value) {
        if (!empty($onlykey) && $onlykey != '@GETPOSTISSET' && $key != $onlykey) {
          continue;
        }
 
        if (!empty($onlykey) && $onlykey == '@GETPOSTISSET' && !GETPOSTISSET('options_'.$key) && (! in_array($this->attributes[$object->table_element]['type'][$key], array('boolean', 'checkbox', 'chkbxlst', 'point', 'multipts', 'linestrg', 'polygon', 'duration')))) {
          //when unticking boolean field, it's not set in POST
          continue;
        }
 
        $key_type = $this->attributes[$object->table_element]['type'][$key];
        if ($key_type == 'separate') {
          continue;
        }
 
        $enabled = 1;
        if (isset($this->attributes[$object->table_element]['enabled'][$key])) {  // 'enabled' is often a condition on module enabled or not
          $enabled = (int) dol_eval((string) $this->attributes[$object->table_element]['enabled'][$key], 1, 1, '2');
        }
 
        $visibility = 1;
        if (isset($this->attributes[$object->table_element]['list'][$key])) {   // 'list' is option for visibility
          $visibility = (int) dol_eval((string) $this->attributes[$object->table_element]['list'][$key], 1, 1, '2');
        }
 
        $perms = 1;
        if (isset($this->attributes[$object->table_element]['perms'][$key])) {
          $perms = (int) dol_eval((string) $this->attributes[$object->table_element]['perms'][$key], 1, 1, '2');
        }
        if (empty($enabled)
          || (
            $onlykey === '@GETPOSTISSET'
            && in_array($this->attributes[$object->table_element]['type'][$key], array('boolean', 'checkbox', 'chkbxlst'))
            && in_array(abs($enabled), array(2, 5))
            && ! GETPOSTISSET('options_' . $key) // Update hidden checkboxes and multiselect only if they are provided
          )
        ) {
          continue;
        }
 
        $visibility_abs = abs($visibility);
        // not modify if extra field is not in update form (0 : never, 2 or -2 : list only, 5 or - 5 : list and view only)
        if (empty($visibility_abs) || $visibility_abs == 2 || $visibility_abs == 5) {
          continue;
        }
        if (empty($perms)) {
          continue;
        }
 
        if ($this->attributes[$object->table_element]['required'][$key]) {  // Value is required
          // Check if functionally empty without using GETPOST (depending on the type of extrafield, a
          // technically non-empty value may be treated as empty functionally).
          // value can be alpha, int, array, etc...
          $v = $_POST["options_".$key] ?? null;
          $type = $this->attributes[$object->table_element]['type'][$key];
          if (self::isEmptyValue($v, $type)) {
            //print 'ccc'.$value.'-'.$this->attributes[$object->table_element]['required'][$key];
 
            // Field is not defined. We mark this as an error. We may fix it later if there is a default value and $todefaultifmissing is set.
 
            $nofillrequired++;
            if (!empty($this->attributes[$object->table_element]['langfile'][$key])) {
              $langs->load($this->attributes[$object->table_element]['langfile'][$key]);
            }
            $error_field_required[$key] = $langs->transnoentitiesnoconv($value);
          }
        }
 
        if (in_array($key_type, array('date'))) {
          // Clean parameters
          $value_key = dol_mktime(12, 0, 0, GETPOSTINT("options_".$key."month"), GETPOSTINT("options_".$key."day"), GETPOSTINT("options_".$key."year"));
        } elseif (in_array($key_type, array('datetime'))) {
          // Clean parameters
          $value_key = dol_mktime(GETPOSTINT("options_".$key."hour"), GETPOSTINT("options_".$key."min"), GETPOSTINT("options_".$key."sec"), GETPOSTINT("options_".$key."month"), GETPOSTINT("options_".$key."day"), GETPOSTINT("options_".$key."year"), 'tzuserrel');
        } elseif (in_array($key_type, array('datetimegmt'))) {
          // Clean parameters
          $value_key = dol_mktime(GETPOSTINT("options_".$key."hour"), GETPOSTINT("options_".$key."min"), GETPOSTINT("options_".$key."sec"), GETPOSTINT("options_".$key."month"), GETPOSTINT("options_".$key."day"), GETPOSTINT("options_".$key."year"), 'gmt');
        } elseif (in_array($key_type, array('duration'))) {
          $value_hours = GETPOSTINT("options_" . $key . "hour");
          $value_minutes = GETPOSTINT("options_" . $key . "min");
          $value_key = $value_hours * 3600 + $value_minutes * 60;
        } elseif (in_array($key_type, array('checkbox', 'chkbxlst'))) {
          $value_arr = GETPOST("options_".$key, 'array'); // check if an array
          if (!empty($value_arr)) {
            $value_key = implode(',', $value_arr);
          } else {
            $value_key = '';
          }
        } elseif (in_array($key_type, array('price', 'double'))) {
          $value_arr = GETPOST("options_".$key, 'alpha');
          $value_key = price2num($value_arr);
        } elseif (in_array($key_type, array('pricecy'))) {
          $value_key = price2num(GETPOST("options_".$key, 'alpha')).':'.GETPOST("options_".$key."currency_id", 'alpha');
        } elseif (in_array($key_type, array('html'))) {
          $value_key = GETPOST("options_".$key, 'restricthtml');
        } elseif (in_array($key_type, ['point', 'multipts', 'linestrg', 'polygon'])) {
          // construct point
          require_once DOL_DOCUMENT_ROOT.'/core/class/dolgeophp.class.php';
          $geojson = GETPOST("options_".$key, 'restricthtml');
          if ($geojson != '{}') {
            $dolgeophp = new DolGeoPHP($this->db);
            $value_key = $dolgeophp->getWkt($geojson);
          } else {
            $value_key = '';
          }
        } elseif (in_array($key_type, array('text'))) {
          $label_security_check = 'alphanohtml';
          // by default 'alphanohtml' (better security); hidden conf MAIN_SECURITY_ALLOW_UNSECURED_LABELS_WITH_HTML allows basic html
          if (getDolGlobalString('MAIN_SECURITY_ALLOW_UNSECURED_REF_LABELS')) {
            $label_security_check = 'nohtml';
          } else {
            $label_security_check = !getDolGlobalString('MAIN_SECURITY_ALLOW_UNSECURED_LABELS_WITH_HTML') ? 'alphanohtml' : 'restricthtml';
          }
          $value_key = GETPOST("options_".$key, $label_security_check);
        } else {
          $value_key = GETPOST("options_".$key);
          if (in_array($key_type, array('link')) && $value_key == '-1') {
            $value_key = '';
          }
        }
 
        if (!empty($error_field_required[$key]) && $todefaultifmissing) {
          // Value is required but we have a default value and we asked to set empty value to the default value
          if (!empty($this->attributes[$object->table_element]['default']) && !is_null($this->attributes[$object->table_element]['default'][$key])) {
            $value_key = $this->attributes[$object->table_element]['default'][$key];
            unset($error_field_required[$key]);
            $nofillrequired--;
          }
        }
 
        $object->array_options["options_".$key] = $value_key;
      }
 
      if ($nofillrequired) {
        $langs->load('errors');
        $this->error = $langs->trans('ErrorFieldsRequired').' : '.implode(', ', $error_field_required);
        setEventMessages($this->error, null, 'errors');
        return -1;
      } else {
        return 1;
      }
    } else {
      return 0;
    }
  }
 
  public function getOptionalsFromPost($extrafieldsobjectkey, $keysuffix = '', $keyprefix = '')
  {
    global $_POST;
 
    if (is_string($extrafieldsobjectkey) && !empty($this->attributes[$extrafieldsobjectkey]['label']) && is_array($this->attributes[$extrafieldsobjectkey]['label'])) {
      $extralabels = $this->attributes[$extrafieldsobjectkey]['label'];
    } else {
      $extralabels = $extrafieldsobjectkey;
    }
 
    if (is_array($extralabels)) {
      $array_options = array();
 
      // Get extra fields
      foreach ($extralabels as $key => $value) {
        $key_type = '';
        if (is_string($extrafieldsobjectkey)) {
          $key_type = $this->attributes[$extrafieldsobjectkey]['type'][$key];
        }
 
        if (in_array($key_type, array('date'))) {
          $dateparamname_start = $keyprefix . 'options_' . $key . $keysuffix . '_start';
          $dateparamname_end   = $keyprefix . 'options_' . $key . $keysuffix . '_end';
 
          if (GETPOST($dateparamname_start . 'year') || GETPOST($dateparamname_end . 'year')) {
            $value_key = array();
            // values provided as a component year, month, day, etc.
            if (GETPOST($dateparamname_start . 'year')) {
              $value_key['start'] = dol_mktime(0, 0, 0, GETPOSTINT($dateparamname_start . 'month'), GETPOSTINT($dateparamname_start . 'day'), GETPOSTINT($dateparamname_start . 'year'));
            }
            if (GETPOST($dateparamname_end . 'year')) {
              $value_key['end'] = dol_mktime(23, 59, 59, GETPOSTINT($dateparamname_end . 'month'), GETPOSTINT($dateparamname_end . 'day'), GETPOSTINT($dateparamname_end . 'year'));
            }
          } elseif (GETPOST($keyprefix."options_".$key.$keysuffix."year")) {
            // Clean parameters
            $value_key = dol_mktime(12, 0, 0, GETPOSTINT($keyprefix."options_".$key.$keysuffix."month"), GETPOSTINT($keyprefix."options_".$key.$keysuffix."day"), GETPOSTINT($keyprefix."options_".$key.$keysuffix."year"));
          } else {
            continue; // Value was not provided, we should not set it.
          }
        } elseif (in_array($key_type, array('datetime', 'datetimegmt'))) {
          $dateparamname_start = $keyprefix . 'options_' . $key . $keysuffix . '_start';
          $dateparamname_end   = $keyprefix . 'options_' . $key . $keysuffix . '_end';
 
          if (GETPOST($dateparamname_start . 'year') || GETPOST($dateparamname_end . 'year')) {
            // values provided as a date pair (start date + end date), each date being broken down as year, month, day, etc.
            $dateparamname_start_hour = GETPOSTINT($dateparamname_start . 'hour') != '-1' ? GETPOSTINT($dateparamname_start . 'hour') : '00';
            $dateparamname_start_min = GETPOSTINT($dateparamname_start . 'min') != '-1' ? GETPOSTINT($dateparamname_start . 'min') : '00';
            $dateparamname_start_sec = GETPOSTINT($dateparamname_start . 'sec') != '-1' ? GETPOSTINT($dateparamname_start . 'sec') : '00';
            $dateparamname_end_hour = GETPOSTINT($dateparamname_end . 'hour') != '-1' ? GETPOSTINT($dateparamname_end . 'hour') : '23';
            $dateparamname_end_min = GETPOSTINT($dateparamname_end . 'min') != '-1' ? GETPOSTINT($dateparamname_end . 'min') : '59';
            $dateparamname_end_sec = GETPOSTINT($dateparamname_end . 'sec') != '-1' ? GETPOSTINT($dateparamname_end . 'sec') : '59';
            if ($key_type == 'datetimegmt') {
              $value_key = array(
                'start' => dol_mktime($dateparamname_start_hour, $dateparamname_start_min, $dateparamname_start_sec, GETPOSTINT($dateparamname_start . 'month'), GETPOSTINT($dateparamname_start . 'day'), GETPOSTINT($dateparamname_start . 'year'), 'gmt'),
                'end' => dol_mktime($dateparamname_end_hour, $dateparamname_end_min, $dateparamname_end_sec, GETPOSTINT($dateparamname_end . 'month'), GETPOSTINT($dateparamname_end . 'day'), GETPOSTINT($dateparamname_end . 'year'), 'gmt')
              );
            } else {
              $value_key = array(
                'start' => dol_mktime($dateparamname_start_hour, $dateparamname_start_min, $dateparamname_start_sec, GETPOSTINT($dateparamname_start . 'month'), GETPOSTINT($dateparamname_start . 'day'), GETPOSTINT($dateparamname_start . 'year'), 'tzuserrel'),
                'end' => dol_mktime($dateparamname_end_hour, $dateparamname_end_min, $dateparamname_end_sec, GETPOSTINT($dateparamname_end . 'month'), GETPOSTINT($dateparamname_end . 'day'), GETPOSTINT($dateparamname_end . 'year'), 'tzuserrel')
              );
            }
          } elseif (GETPOST($keyprefix."options_".$key.$keysuffix."year")) {
            // Clean parameters
            if ($key_type == 'datetimegmt') {
              $value_key = dol_mktime(GETPOSTINT($keyprefix."options_".$key.$keysuffix."hour"), GETPOSTINT($keyprefix."options_".$key.$keysuffix."min"), GETPOSTINT($keyprefix."options_".$key.$keysuffix."sec"), GETPOSTINT($keyprefix."options_".$key.$keysuffix."month"), GETPOSTINT($keyprefix."options_".$key.$keysuffix."day"), GETPOSTINT($keyprefix."options_".$key.$keysuffix."year"), 'gmt');
            } else {
              $value_key = dol_mktime(GETPOSTINT($keyprefix."options_".$key.$keysuffix."hour"), GETPOSTINT($keyprefix."options_".$key.$keysuffix."min"), GETPOSTINT($keyprefix."options_".$key.$keysuffix."sec"), GETPOSTINT($keyprefix."options_".$key.$keysuffix."month"), GETPOSTINT($keyprefix."options_".$key.$keysuffix."day"), GETPOSTINT($keyprefix."options_".$key.$keysuffix."year"), 'tzuserrel');
            }
          } else {
            continue; // Value was not provided, we should not set it.
          }
        } elseif ($key_type == 'select') {
          // to detect if we are in search context
          if (GETPOSTISARRAY($keyprefix."options_".$key.$keysuffix)) {
            $value_arr = GETPOST($keyprefix."options_".$key.$keysuffix, 'array:aZ09');
            // Make sure we get an array even if there's only one selected
            $value_arr = (array) $value_arr;
            $value_key = implode(',', $value_arr);
          } else {
            $value_key = GETPOST($keyprefix."options_".$key.$keysuffix);
          }
        } elseif (in_array($key_type, array('checkbox', 'chkbxlst'))) {
          // We test on a hidden field named "..._multiselect" that is always set to 1 if param is in form so
          // when nothing is provided we can make a difference between noparam in the form and param was set to nothing.
          if (!GETPOSTISSET($keyprefix."options_".$key.$keysuffix.'_multiselect')) {
            continue; // Value was not provided, we should not set it.
          }
          $value_arr = GETPOST($keyprefix."options_".$key.$keysuffix);
          // Make sure we get an array even if there's only one checkbox
          $value_arr = (array) $value_arr;
          $value_key = implode(',', $value_arr);
        } elseif (in_array($key_type, array('pricecy'))) {
          if (!GETPOSTISSET($keyprefix."options_".$key.$keysuffix)) {
            continue; // Value was not provided, we should not set it.
          }
          $value_arr = GETPOST($keyprefix."options_".$key.$keysuffix);
          if ($keyprefix != 'search_') {    // If value is for a search, we must keep complex string like '>100 <=150'
            $value_key = price2num($value_arr).':'.GETPOST($keyprefix."options_".$key.$keysuffix."currency_id", 'alpha');
          } else {
            $value_key = $value_arr;
          }
        } elseif (in_array($key_type, array('price', 'double', 'int'))) {
          if (!GETPOSTISSET($keyprefix."options_".$key.$keysuffix)) {
            continue; // Value was not provided, we should not set it.
          }
          $value_arr = GETPOST($keyprefix."options_".$key.$keysuffix);
          if ($keyprefix != 'search_') {    // If value is for a search, we must keep complex string like '>100 <=150'
            $value_key = price2num($value_arr);
          } else {
            $value_key = $value_arr;
          }
        } elseif (in_array($key_type, array('boolean'))) {
          // We test on a hidden field named "..._boolean" that is always set to 1 if param is in form so
          // when nothing is provided we can make a difference between noparam in the form and param was set to nothing.
          if (!GETPOSTISSET($keyprefix."options_".$key.$keysuffix."_boolean")) {
            $value_key = '';
          } else {
            $value_arr = GETPOST($keyprefix."options_".$key.$keysuffix);
            $value_key = $value_arr;
          }
        } elseif (in_array($key_type, array('html'))) {
          if (!GETPOSTISSET($keyprefix."options_".$key.$keysuffix)) {
            continue; // Value was not provided, we should not set it.
          }
          $value_key = dol_htmlcleanlastbr(GETPOST($keyprefix."options_".$key.$keysuffix, 'restricthtml'));
        } else {
          if (!GETPOSTISSET($keyprefix."options_".$key.$keysuffix)) {
            continue; // Value was not provided, we should not set it.
          }
 
          $value_key = GETPOST($keyprefix."options_".$key.$keysuffix);
          if ($value_key === '') {
            $value_key = null;
          }
        }
 
        $array_options[$keyprefix."options_".$key] = $value_key; // No keyprefix here. keyprefix is used only for read.
      }
 
      return $array_options;
    }
 
    return 0;
  }
 
  public static function getListOfTypesLabels()
  {
    global $langs;
 
    $arraytype2label = array('');
 
    $tmptype2label = ExtraFields::$type2label;
    foreach ($tmptype2label as $key => $val) {
      $arraytype2label[$key] = $langs->transnoentitiesnoconv($val);
    }
 
    if (!getDolGlobalString('MAIN_USE_EXTRAFIELDS_ICON')) {
      unset($arraytype2label['icon']);
    }
    if (!getDolGlobalString('MAIN_USE_GEOPHP')) {
      unset($arraytype2label['point']);
      unset($arraytype2label['multipts']);
      unset($arraytype2label['linestrg']);
      unset($arraytype2label['polygon']);
    }
 
    return $arraytype2label;
  }
 
  public static function isEmptyValue($v, string $type)
  {
    if ($v === null || $v === '') {
      return true;
    }
    if (is_array($v) || $type == 'select') {
      return empty($v);
    }
    if ($type == 'link') {
      return ($v == '-1');
    }
    if ($type == 'sellist') {
      return ($v == '0');
    }
    return empty($v);  // Note empty('0') is also true, tested 7.0 up to 8.3.12
  }
}