actioncomm.class.php

Go to the documentation of this file.

<?php
/* Copyright (C) 2002-2004  Rodolphe Quiedeville    <rodolphe@quiedeville.org>
 * Copyright (C) 2004-2011  Laurent Destailleur     <eldy@users.sourceforge.net>
 * Copyright (C) 2005-2012  Regis Houssin           <regis.houssin@inodbox.com>
 * Copyright (C) 2011-2017  Juanjo Menent           <jmenent@2byte.es>
 * Copyright (C) 2015     Marcos García       <marcosgdf@gmail.com>
 * Copyright (C) 2018     Nicolas ZABOURI         <info@inovea-conseil.com>
 * Copyright (C) 2018-2026  Frédéric France         <frederic.france@free.fr>
 * Copyright (C) 2024-2026  MDW           <mdeweerd@users.noreply.github.com>
 * Copyright (C) 2024   William Mead      <william.mead@manchenumerique.fr>
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 3 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program. If not, see <https://www.gnu.org/licenses/>.
 */
 
require_once DOL_DOCUMENT_ROOT.'/comm/action/class/cactioncomm.class.php';
require_once DOL_DOCUMENT_ROOT.'/core/class/commonobject.class.php';
require_once DOL_DOCUMENT_ROOT.'/core/class/CMailFile.class.php';
require_once DOL_DOCUMENT_ROOT.'/core/class/CSMSFile.class.php';
require_once DOL_DOCUMENT_ROOT.'/comm/action/class/actioncommreminder.class.php';
 
 
class ActionComm extends CommonObject
{
  public $element = 'action';
 
  public $TRIGGER_PREFIX = 'ACTION';
 
  public $table_element = 'actioncomm';
 
  public $table_rowid = 'id';
 
  public $picto = 'action';
 
  public $restrictiononfksoc = 2;
 
  public $id;
 
  public $ref;
 
  public $type_id;
 
  public $type;
 
  public $type_code;
 
  public $type_label;
 
  public $type_color;
 
  public $type_picto;
 
  public $code;
 
  public $label;
 
  public $datec;
 
  public $duree;
 
  public $datem;
 
  public $author;
 
  public $usermod;
 
  public $authorid;
 
  public $usermodid;
 
  public $datep;
 
  public $datef;
 
  public $date_start_in_calendar;
 
  public $date_end_in_calendar;
 
  public $datep2;
 
  public $durationp = -1;
 
  public $fulldayevent = 0;
 
  public $ponctuel;
 
  public $percentage;
 
  public $location;
 
  public $max_participants;
 
  public $transparency;
 
  public $priority;
 
  public $userassigned = array();
 
  public $userownerid;
 
  public $socpeopleassigned = array();
 
  public $otherassigned = array();
 
  public $reminders = array();
 
  public $socid;
 
  public $contact_id;
 
  public $fk_task;
 
  public $societe;
 
  public $contact;
 
  // Properties for links to other objects
  public $fk_element; // Id of record
 
  public $elementid;
 
  public $elementtype;
 
  public $fk_bookcal_calendar;
 
  public $icalname;
 
  public $icalcolor;
 
  public $extraparams;
 
  public $actions = array();
 
  public $email_msgid;
 
  public $email_from;
 
  public $email_reply_to;
 
  public $email_sender;
 
  public $email_to;
 
  public $email_tocc;
  public $email_tobcc;
 
  public $email_subject;
 
  public $errors_to;
 
  public $num_vote;
 
  public $event_paid;
 
  public $status;
 
  public $ip;
 
  /*
   * Properties to manage the recurring events
   */
  public $recurid;
  public $recurrule;
  public $recurdateend;
 
  public $calling_duration;
 
 
  const EVENT_TODO = 0;
 
  const EVENT_IN_PROGRESS = 50;
 
  const EVENT_FINISHED = 100;
 
 
  // BEGIN MODULEBUILDER PROPERTIES
  public $fields = array(
    "id" => array("type" => "integer", "label" => "Ref", "enabled" => "1", 'position' => 10, 'notnull' => 1, "visible" => "1",),
    "ref" => array("type" => "varchar(30)", "label" => "Ref", "enabled" => "1", 'position' => 15, 'notnull' => 1, "visible" => "0", "csslist" => "tdoverflowmax150", "showoncombobox" => "1",),
    "ref_ext" => array("type" => "varchar(255)", "label" => "Refext", "enabled" => "1", 'position' => 20, 'notnull' => 0, "visible" => "0",),
    "datep" => array("type" => "datetime", "label" => "DateStart", "enabled" => "1", 'position' => 25, 'notnull' => 0, "visible" => "1",),
    "datep2" => array("type" => "datetime", "label" => "DateEnd", "enabled" => "1", 'position' => 26, 'notnull' => 0, "visible" => "-1",),
    "fk_action" => array("type" => "integer", "label" => "Fkaction", "enabled" => "1", 'position' => 40, 'notnull' => 0, "visible" => "0", "css" => "maxwidth500 widthcentpercentminusxx",),
    "code" => array("type" => "varchar(50)", "label" => "Code", "enabled" => "1", 'position' => 45, 'notnull' => 0, "visible" => "0", "showoncombobox" => "1",),
    "label" => array("type" => "varchar(255)", "label" => "Title", "enabled" => "1", 'position' => 50, 'notnull' => 1, "visible" => "1", "alwayseditable" => "1", "css" => "minwidth300", "cssview" => "wordbreak", "csslist" => "tdoverflowmax150",),
    "note" => array("type" => "mediumtext", "label" => "Description", "enabled" => "1", 'position' => 51, 'notnull' => 0, "visible" => "-1",),
    "fk_project" => array("type" => "integer", "label" => "Project", "picto" => "project", "enabled" => "1", 'position' => 75, 'notnull' => 0, "visible" => "0", "css" => "maxwidth500 widthcentpercentminusxx",),
    "fk_soc" => array("type" => "integer", "label" => "ThirdParty", "picto" => "company", "enabled" => "1", 'position' => 80, 'notnull' => 0, "visible" => "0", "css" => "maxwidth500 widthcentpercentminusxx",),
    "fk_contact" => array("type" => "integer", "label" => "Contact", "picto" => "contact", "enabled" => "1", 'position' => 85, 'notnull' => 0, "visible" => "-1", "css" => "maxwidth500 widthcentpercentminusxx",),
    "fk_parent" => array("type" => "integer", "label" => "Parent", "enabled" => "1", 'position' => 90, 'notnull' => 1, "visible" => "0", "css" => "maxwidth500 widthcentpercentminusxx",),
    "fk_user_action" => array("type" => "integer", "label" => "Fkuseraction", "picto" => "user", "enabled" => "1", 'position' => 95, 'notnull' => 0, "visible" => "0", "css" => "maxwidth500 widthcentpercentminusxx",),
    "transparency" => array("type" => "integer", "label" => "Transparency", "enabled" => "1", 'position' => 100, 'notnull' => 0, "visible" => "0",),
    "fk_user_done" => array("type" => "integer", "label" => "Fkuserdone", "picto" => "user", "enabled" => "1", 'position' => 105, 'notnull' => 0, "visible" => "0", "css" => "maxwidth500 widthcentpercentminusxx",),
    "priority" => array("type" => "smallint(6)", "label" => "Priority", "enabled" => "1", 'position' => 110, 'notnull' => 0, "visible" => "0",),
    "fulldayevent" => array("type" => "smallint(6)", "label" => "Fulldayevent", "enabled" => "1", 'position' => 115, 'notnull' => 1, "visible" => "0",),
    "location" => array("type" => "varchar(128)", "label" => "Location", "enabled" => "1", 'position' => 125, 'notnull' => 0, "visible" => "0",),
    "max_participants" => array("type" => "integer", "label" => "MaxNbOfAttendees", "enabled" => "1", 'position' => 126, 'notnull' => 0, "visible" => "0",),
    "durationp" => array("type" => "double", "label" => "Durationp", "enabled" => "1", 'position' => 130, 'notnull' => 0, "visible" => "0",),
    "durationa" => array("type" => "double", "label" => "Durationa", "enabled" => "1", 'position' => 135, 'notnull' => 0, "visible" => "0",),
    "fk_element" => array("type" => "integer", "label" => "LinkedObject", "enabled" => "getDolGlobalString('AGENDA_SHOW_LINKED_OBJECT')", 'position' => 145, 'notnull' => 0, "visible" => "0", "css" => "maxwidth500 widthcentpercentminusxx",),
    "elementtype" => array("type" => "varchar(255)", "label" => "Elementtype", "enabled" => "1", 'position' => 150, 'notnull' => 0, "visible" => "0",),
    "email_msgid" => array("type" => "varchar(256)", "label" => "Emailmsgid", "enabled" => "1", 'position' => 155, 'notnull' => 0, "visible" => "0",),
    "email_subject" => array("type" => "varchar(256)", "label" => "Emailsubject", "enabled" => "1", 'position' => 160, 'notnull' => 0, "visible" => "0",),
    "email_from" => array("type" => "varchar(256)", "label" => "Emailfrom", "enabled" => "1", 'position' => 165, 'notnull' => 0, "visible" => "0",),
    "email_sender" => array("type" => "varchar(256)", "label" => "Emailsender", "enabled" => "1", 'position' => 170, 'notnull' => 0, "visible" => "0",),
    "email_to" => array("type" => "varchar(256)", "label" => "Emailto", "enabled" => "1", 'position' => 175, 'notnull' => 0, "visible" => "0",),
    "email_tocc" => array("type" => "varchar(256)", "label" => "Emailtocc", "enabled" => "1", 'position' => 180, 'notnull' => 0, "visible" => "0",),
    "email_tobcc" => array("type" => "varchar(256)", "label" => "Emailtobcc", "enabled" => "1", 'position' => 185, 'notnull' => 0, "visible" => "0",),
    "errors_to" => array("type" => "varchar(256)", "label" => "Errorsto", "enabled" => "1", 'position' => 190, 'notnull' => 0, "visible" => "0",),
    "recurid" => array("type" => "varchar(128)", "label" => "Recurid", "enabled" => "1", 'position' => 195, 'notnull' => 0, "visible" => "0",),
    "recurrule" => array("type" => "varchar(128)", "label" => "Recurrule", "enabled" => "1", 'position' => 200, 'notnull' => 0, "visible" => "0",),
    "recurdateend" => array("type" => "datetime", "label" => "Recurdateend", "enabled" => "1", 'position' => 205, 'notnull' => 0, "visible" => "0",),
    "import_key" => array("type" => "varchar(14)", "label" => "ImportId", "enabled" => "1", 'position' => 900, 'notnull' => 0, "visible" => "-1",),
    "extraparams" => array("type" => "varchar(255)", "label" => "Extraparams", "enabled" => "1", 'position' => 215, 'notnull' => 0, "visible" => "0",),
    "calling_duration" => array("type" => "integer", "label" => "Callingduration", "enabled" => "1", 'position' => 220, 'notnull' => 0, "visible" => "0",),
    "visibility" => array("type" => "varchar(12)", "label" => "Visibility", "enabled" => "1", 'position' => 225, 'notnull' => 0, "visible" => "0",),
    "reply_to" => array("type" => "varchar(255)", "label" => "Replyto", "enabled" => "1", 'position' => 230, 'notnull' => 0, "visible" => "0",),
    "num_vote" => array("type" => "integer", "label" => "Numvote", "enabled" => "1", 'position' => 235, 'notnull' => 0, "visible" => "0",),
    "event_paid" => array("type" => "smallint(6)", "label" => "Eventpaid", "enabled" => "1", 'position' => 240, 'notnull' => 1, "visible" => "0",),
    "status" => array("type" => "smallint(6)", "label" => "Status", "enabled" => "1", 'position' => 500, 'notnull' => 1, "visible" => "0",),
    "ip" => array("type" => "varchar(250)", "label" => "Ip", "enabled" => "1", 'position' => 250, 'notnull' => 0, "visible" => "0",),
    "fk_bookcal_calendar" => array("type" => "integer", "label" => "Fkbookcalcalendar", "enabled" => "1", 'position' => 255, 'notnull' => 0, "visible" => "0", "css" => "maxwidth500 widthcentpercentminusxx",),
    "fk_task" => array("type" => "integer", "label" => "Task", "picto" => "task", "enabled" => "1", 'position' => 260, 'notnull' => 0, "visible" => "0", "css" => "maxwidth500 widthcentpercentminusxx",),
    "fk_user_author" => array("type" => "integer", "label" => "UserCreation", "picto" => "user", "enabled" => "1", 'position' => 505, 'notnull' => 0, "visible" => "0", "css" => "maxwidth500 widthcentpercentminusxx",),
    "fk_user_mod" => array("type" => "integer", "label" => "UserModification", "picto" => "user", "enabled" => "1", 'position' => 506, 'notnull' => 0, "visible" => "0", "css" => "maxwidth500 widthcentpercentminusxx",),
    "datec" => array("type" => "datetime", "label" => "DateCreation", "enabled" => "1", 'position' => 510, 'notnull' => 0, "visible" => "-1",),
    "tms" => array("type" => "timestamp", "label" => "DateModification", "enabled" => "1", 'position' => 520, 'notnull' => 1, "visible" => "-1",),
    "percent" => array("type" => "smallint(6)", "label" => "Status", "enabled" => "1", 'position' => 1000, 'notnull' => 1, "visible" => "1",),  // status
  );
  // END MODULEBUILDER PROPERTIES
 
 
  public function __construct(DoliDB $db)
  {
    $this->db = $db;
 
    $this->ismultientitymanaged = 1;
  }
 
  public function create(User $user, $notrigger = 0)
  {
    global $langs, $conf;
 
    $error = 0;
    $now = dol_now();
 
    // Check parameters
    if (!isset($this->userownerid) || (string) $this->userownerid === '') { // $this->userownerid may be 0 (anonymous event) or > 0
      dol_syslog("You tried to create an event but mandatory property userownerid was empty (you can define it to 0 for anonymous event)", LOG_WARNING);
      $this->errors[] = 'ErrorActionCommPropertyUserowneridNotDefined';
      return -1;
    }
 
    // Clean parameters
    $this->label = dol_trunc(trim($this->label), 128);
    $this->location = (!empty($this->location) ? dol_trunc(trim($this->location), 128) : "");
    $this->note_private = dol_htmlcleanlastbr(trim(empty($this->note_private) ? $this->note : $this->note_private));
    if (empty($this->percentage)) {
      $this->percentage = 0;
    }
    if (empty($this->priority) || !is_numeric($this->priority)) {
      $this->priority = 0;
    }
    if (empty($this->fulldayevent)) {
      $this->fulldayevent = 0;
    }
    if (empty($this->transparency)) {
      $this->transparency = 0;
    }
    if ($this->percentage > 100) {
      $this->percentage = 100;
    }
    if (empty($this->datep) && $this->datep != '0') { // We should not insert event in calendar without a start date
      $this->datep = $now;
    }
    if (!empty($this->datep) && !empty($this->datef)) {
      $this->durationp = ($this->datef - $this->datep); // deprecated
    }
    if (!empty($this->datep) && !empty($this->datef) && $this->datep > $this->datef) {
      $this->datef = $this->datep;
    }
    if (!isset($this->fk_project) || $this->fk_project < 0) {
      $this->fk_project = 0;
    }
    if (!isset($this->fk_task) || $this->fk_task < 0) {
      $this->fk_task = 0;
    }
    // For backward compatibility
    if ($this->elementtype == 'facture') {
      $this->elementtype = 'invoice';
    }
    if ($this->elementtype == 'commande') {
      $this->elementtype = 'order';
    }
    if ($this->elementtype == 'contrat') {
      $this->elementtype = 'contract';
    }
    if (empty($this->fk_element) && !empty($this->elementid)) {
      $this->fk_element = $this->elementid;
    }
    if (empty($this->elementid) && !empty($this->fk_element)) {
      $this->elementid = $this->fk_element;
    }
 
    if (!is_array($this->userassigned) && !empty($this->userassigned)) {  // For backward compatibility when userassigned was an int instead of an array
      $tmpid = (int) $this->userassigned;
      $this->userassigned = array();
      $this->userassigned[$tmpid] = array('id' => $tmpid, 'transparency' => $this->transparency);
    }
 
    $userownerid = $this->userownerid;
 
    // Be sure assigned user is defined as an array of array('id'=>,'mandatory'=>,...).
    if (empty($this->userassigned) || count($this->userassigned) == 0 || !is_array($this->userassigned)) {
      $this->userassigned = array($userownerid => array('id' => $userownerid, 'transparency' => $this->transparency));
    }
 
    if (!$this->type_id || !$this->type_code) {
      $key = empty($this->type_id) ? $this->type_code : $this->type_id;
 
      // Get id from code
      $cactioncomm = new CActionComm($this->db);
      $result = $cactioncomm->fetch($key);
 
      if ($result > 0) {
        $this->type_id = $cactioncomm->id;
        $this->type_code = $cactioncomm->code;
      } elseif ($result == 0) {
        $this->error = $langs->trans('ErrorActionCommBadType', $this->type_id, $this->type_code);
        return -1;
      } else {
        $this->error = $cactioncomm->error;
        return -1;
      }
    }
    $code = empty($this->code) ? $this->type_code : $this->code;
 
    // Check parameters
    if (!$this->type_id) {
      $this->error = "ErrorWrongParameters";
      return -1;
    }
 
    $extraparams = (!empty($this->extraparams) ? json_encode($this->extraparams) : null);
    $extraparams = dol_trunc($extraparams, 250);
 
    $this->db->begin();
 
    $sql = "INSERT INTO ".MAIN_DB_PREFIX."actioncomm";
    $sql .= "(ref,";
    $sql .= "datec,";
    $sql .= "datep,";
    $sql .= "datep2,";
    $sql .= "durationp,"; // deprecated
    $sql .= "fk_action,";
    $sql .= "code,";
    $sql .= "ref_ext,";
    $sql .= "fk_soc,";
    $sql .= "fk_project,";
    $sql .= "note,";
    $sql .= "fk_contact,";
    $sql .= "fk_user_author,";
    $sql .= "fk_user_action,";
    $sql .= "fk_task,";
    $sql .= "label,percent,priority,fulldayevent,location,max_participants,";
    $sql .= "transparency,";
    $sql .= "fk_element,";
    $sql .= "elementtype,";
    $sql .= "fk_bookcal_calendar,";
    $sql .= "entity,";
    $sql .= "extraparams,";
    // Fields emails
    $sql .= "email_msgid,";
    $sql .= "email_from,";
    $sql .= "email_sender,";
    $sql .= "email_to,";
    $sql .= "email_tocc,";
    $sql .= "email_tobcc,";
    $sql .= "email_subject,";
    $sql .= "errors_to,";
    $sql .= "recurid,";
    $sql .= "recurrule,";
    $sql .= "recurdateend,";
    $sql .= "num_vote,";
    $sql .= "event_paid,";
    $sql .= "status,";
    $sql .= "ip";
    $sql .= ") VALUES (";
    $sql .= "'(PROV)', ";
    $sql .= "'".$this->db->idate($now)."', "; // date creation
    $sql .= "'".$this->db->idate($this->datep)."', "; // date start event
    $sql .= (strval($this->datef) != '' ? "'".$this->db->idate($this->datef)."'" : "null").", ";
    $sql .= ((isset($this->durationp) && $this->durationp >= 0 && $this->durationp != '') ? "'".$this->db->escape((string) $this->durationp)."'" : "null").", "; // deprecated
    $sql .= (isset($this->type_id) ? ((int) $this->type_id) : "null").",";
    $sql .= ($code ? ("'".$this->db->escape($code)."'") : "null").", ";
    $sql .= (!empty($this->ref_ext) ? "'".$this->db->escape($this->ref_ext)."'" : "null").", ";
    $sql .= ((isset($this->socid) && $this->socid > 0) ? ((int) $this->socid) : "null").", ";
    $sql .= ((isset($this->fk_project) && $this->fk_project > 0) ? ((int) $this->fk_project) : "null").", ";
    $sql .= " '".$this->db->escape($this->note_private)."', ";
    $sql .= ((isset($this->contact_id) && $this->contact_id > 0) ? ((int) $this->contact_id) : "null").", "; // deprecated, use ->socpeopleassigned
    $sql .= (isset($user->id) && $user->id > 0 ? ((int) $user->id) : "null").", ";
    $sql .= ($userownerid > 0 ? ((int) $userownerid) : "null").", ";
    $sql .= (!empty($this->fk_task) ? ((int) $this->fk_task) : "null").", ";
    $sql .= "'".$this->db->escape($this->label)."', ";
    $sql .= "'".$this->db->escape((string) $this->percentage)."', ";
    $sql .= "'".$this->db->escape((string) $this->priority)."', ";
    $sql .= "'".$this->db->escape((string) $this->fulldayevent)."', ";
    $sql .= "'".$this->db->escape($this->location)."', ";
    $sql .= (isset($this->max_participants) && $this->max_participants > 0 ? ((int) $this->max_participants) : "null").", ";
    $sql .= "'".$this->db->escape((string) $this->transparency)."', ";
    $sql .= (!empty($this->elementid) ? ((int) $this->elementid) : "null").", ";
    $sql .= (!empty($this->elementtype) ? "'".$this->db->escape($this->elementtype)."'" : "null").", ";
    $sql .= (!empty($this->fk_bookcal_calendar) ? "'".$this->db->escape((string) $this->fk_bookcal_calendar)."'" : "null").", ";
    $sql .= ((int) $conf->entity).",";
    $sql .= (!empty($extraparams) ? "'".$this->db->escape($extraparams)."'" : "null").", ";
    // Fields emails
    $sql .= (!empty($this->email_msgid) ? "'".$this->db->escape($this->email_msgid)."'" : "null").", ";
    $sql .= (!empty($this->email_from) ? "'".$this->db->escape($this->email_from)."'" : "null").", ";
    $sql .= (!empty($this->email_sender) ? "'".$this->db->escape($this->email_sender)."'" : "null").", ";
    $sql .= (!empty($this->email_to) ? "'".$this->db->escape($this->email_to)."'" : "null").", ";
    $sql .= (!empty($this->email_tocc) ? "'".$this->db->escape($this->email_tocc)."'" : "null").", ";
    $sql .= (!empty($this->email_tobcc) ? "'".$this->db->escape($this->email_tobcc)."'" : "null").", ";
    $sql .= (!empty($this->email_subject) ? "'".$this->db->escape($this->email_subject)."'" : "null").", ";
    $sql .= (!empty($this->errors_to) ? "'".$this->db->escape($this->errors_to)."'" : "null").", ";
    $sql .= (!empty($this->recurid) ? "'".$this->db->escape($this->recurid)."'" : "null").", ";
    $sql .= (!empty($this->recurrule) ? "'".$this->db->escape($this->recurrule)."'" : "null").", ";
    $sql .= (!empty($this->recurdateend) ? "'".$this->db->idate($this->recurdateend)."'" : "null").", ";
    $sql .= (!empty($this->num_vote) ? (int) $this->num_vote : "null").", ";
    $sql .= (!empty($this->event_paid) ? (int) $this->event_paid : 0).", ";
    $sql .= (!empty($this->status) ? (int) $this->status : "0").", ";
    $sql .= (!empty($this->ip) ? "'".$this->db->escape($this->ip)."'" : "null");
    $sql .= ")";
 
    dol_syslog(get_class($this)."::add", LOG_DEBUG);
    $resql = $this->db->query($sql);
    if ($resql) {
      $this->id = $this->db->last_insert_id(MAIN_DB_PREFIX."actioncomm", "id");
      $this->ref = (string) $this->id;
      $sql = "UPDATE ".MAIN_DB_PREFIX."actioncomm SET ref='".$this->db->escape($this->ref)."' WHERE id=".((int) $this->id);
      $resql = $this->db->query($sql);
      if (!$resql) {
        $error++;
        dol_syslog('Error to process ref: '.$this->db->lasterror(), LOG_ERR);
        $this->errors[] = $this->db->lasterror();
      }
      // Now insert assigned users
      if (!$error) {
        //dol_syslog(var_export($this->userassigned, true));
        $already_inserted = array();
        foreach ($this->userassigned as $key => $val) {
          // Common value with new behavior is to have $val = array('id'=>iduser, 'transparency'=>0|1) and $this->userassigned is an array of iduser => $val.
          if (!is_array($val)) {  // For backward compatibility when $val='id'.
            $val = array('id' => $val);
          }
 
          if ($val['id'] > 0) {
            if (!empty($already_inserted[$val['id']])) {
              continue;
            }
 
            $sql = "INSERT INTO ".MAIN_DB_PREFIX."actioncomm_resources(fk_actioncomm, element_type, fk_element, mandatory, transparency, answer_status)";
            $sql .= " VALUES(".((int) $this->id).", 'user', ".((int) $val['id']).", ".(empty($val['mandatory']) ? '0' : ((int) $val['mandatory'])).", ".(empty($val['transparency']) ? '0' : ((int) $val['transparency'])).", ".(empty($val['answer_status']) ? '0' : ((int) $val['answer_status'])).")";
 
            $resql = $this->db->query($sql);
            if (!$resql) {
              $error++;
              dol_syslog('Error to process userassigned: ' . $this->db->lasterror(), LOG_ERR);
              $this->errors[] = $this->db->lasterror();
            } else {
              $already_inserted[$val['id']] = true;
            }
            //var_dump($sql);exit;
          }
        }
      }
 
      if (!$error) {
        if (!empty($this->socpeopleassigned)) {
          $already_inserted = array();
          foreach ($this->socpeopleassigned as $id => $val) {
            // Common value with new behavior is to have $this->socpeopleassigned an array of idcontact => dummyvalue
            if (!empty($already_inserted[$id])) {
              continue;
            }
 
            $sql = "INSERT INTO ".MAIN_DB_PREFIX."actioncomm_resources(fk_actioncomm, element_type, fk_element, mandatory, transparency, answer_status)";
            $sql .= " VALUES(".((int) $this->id).", 'socpeople', ".((int) $id).", 0, 0, 0)";
 
            $resql = $this->db->query($sql);
            if (!$resql) {
              $error++;
              dol_syslog('Error to process socpeopleassigned: ' . $this->db->lasterror(), LOG_ERR);
              $this->errors[] = $this->db->lasterror();
            } else {
              $already_inserted[$id] = true;
            }
          }
        }
      }
 
      if (!$error) {
        // Actions on extra fields
        $result = $this->insertExtraFields();
        if ($result < 0) {
          $error++;
        }
      }
 
      if (!$error && !$notrigger) {
        // Call trigger
        $result = $this->call_trigger('ACTION_CREATE', $user);
        if ($result < 0) {
          $error++;
        }
        // End call triggers
      }
 
      if (!$error) {
        $this->db->commit();
        return $this->id;
      } else {
        $this->db->rollback();
        return -1;
      }
    } else {
      $this->db->rollback();
      $this->error = $this->db->lasterror();
      return -1;
    }
  }
 
  public function createFromClone(User $fuser, $socid)
  {
    global $hookmanager;
 
    $error = 0;
 
    $this->db->begin();
 
    // Load source object
    $objFrom = clone $this;
 
    // Retrieve all extrafield
    // fetch optionals attributes and labels
    $this->fetch_optionals();
 
    //$this->fetch_userassigned();
    $this->fetchResources();
 
    $this->id = 0;
    $this->recurid = '';
    $this->recurrule = '';
    $this->recurdateend = '';
 
    // Create clone
    $this->context['createfromclone'] = 'createfromclone';
    $result = $this->create($fuser);
    if ($result < 0) {
      $error++;
    } else {
      $resultcat = $this->cloneCategories($objFrom->id, $this->id);
      if ($resultcat < 0) {
        $error++;
      }
    }
 
    if (!$error) {
      // Hook of thirdparty module
      if (is_object($hookmanager)) {
        $parameters = array('objFrom' => $objFrom);
        $action = '';
        $reshook = $hookmanager->executeHooks('createFrom', $parameters, $this, $action); // Note that $action and $object may have been modified by some hooks
        if ($reshook < 0) {
          $this->setErrorsFromObject($hookmanager);
          $error++;
        }
      }
 
      // Call trigger
      $result = $this->call_trigger('ACTION_CLONE', $fuser);
      if ($result < 0) {
        $error++;
      }
      // End call triggers
    }
 
    unset($this->context['createfromclone']);
 
    // End
    if (!$error) {
      $this->db->commit();
      return $this->id;
    } else {
      $this->db->rollback();
      return -1;
    }
  }
 
  public function fetch($id, $ref = '', $ref_ext = '', $email_msgid = '', $loadresources = 1)
  {
    if (empty($id) && empty($ref) && empty($ref_ext) && empty($email_msgid)) {
      dol_syslog(get_class($this)."::fetch Bad parameters", LOG_WARNING);
      return -1;
    }
 
    $sql = "SELECT a.id,";
    $sql .= " a.ref as ref,";
    $sql .= " a.entity,";
    $sql .= " a.ref_ext,";
    $sql .= " a.datep,";
    $sql .= " a.datep2,";
    $sql .= " a.durationp,"; // deprecated
    $sql .= " a.datec,";
    $sql .= " a.tms as datem,";
    $sql .= " a.code, a.label, a.note as note_private,";
    $sql .= " a.fk_soc,";
    $sql .= " a.fk_project,";
    $sql .= " a.fk_user_author, a.fk_user_mod,";
    $sql .= " a.fk_user_action,";
    $sql .= " a.fk_task,";
    $sql .= " a.fk_contact, a.percent as percentage,";
    $sql .= " a.fk_element as elementid, a.elementtype,";
    $sql .= " a.priority, a.fulldayevent, a.location, a.max_participants, a.transparency,";
    $sql .= " a.email_msgid, a.email_subject, a.email_from, a.email_sender, a.email_to, a.email_tocc, a.email_tobcc, a.errors_to,";
    $sql .= " a.recurid, a.recurrule, a.recurdateend,";
    $sql .= " c.id as type_id, c.type as type_type, c.code as type_code, c.libelle as type_label, c.color as type_color, c.picto as type_picto,";
    $sql .= " s.nom as socname,";
    $sql .= " u.firstname, u.lastname as lastname,";
    $sql .= " num_vote, event_paid, a.status";
    $sql .= " FROM ".MAIN_DB_PREFIX."actioncomm as a ";
    $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."c_actioncomm as c ON a.fk_action=c.id ";
    $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."user as u on u.rowid = a.fk_user_author";
    $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."societe as s on s.rowid = a.fk_soc";
    $sql .= " WHERE ";
    if ($ref) {
      $sql .= " a.ref = '".$this->db->escape($ref)."'";
    } elseif ($ref_ext) {
      $sql .= " a.ref_ext = '".$this->db->escape($ref_ext)."'";
    } elseif ($email_msgid) {
      $sql .= " a.email_msgid = '".$this->db->escape($email_msgid)."'";
    } else {
      $sql .= " a.id = ".((int) $id);
    }
 
    dol_syslog(get_class($this)."::fetch", LOG_DEBUG);
    $resql = $this->db->query($sql);
    if ($resql) {
      $num = $this->db->num_rows($resql);
      if ($num) {
        $obj = $this->db->fetch_object($resql);
 
        $this->id         = $obj->id;
        $this->entity = $obj->entity;
        $this->ref        = $obj->ref;
        $this->ref_ext    = $obj->ref_ext;
 
        // Properties of parent table llx_c_actioncomm
        $this->type_id    = $obj->type_id;
        $this->type_code  = $obj->type_code;
        $this->type_color = $obj->type_color;
        $this->type_picto = $obj->type_picto;
        $this->type       = $obj->type_type;
        $this->type_label = $obj->type_label;
 
        $this->code = $obj->code;
        $this->label = $obj->label;
        $this->datep = $this->db->jdate($obj->datep);
        $this->datef = $this->db->jdate($obj->datep2);
 
        $this->datec = $this->db->jdate($obj->datec);
        $this->datem = $this->db->jdate($obj->datem);
 
        $this->note = $obj->note_private; // deprecated
        $this->note_private = $obj->note_private;
        $this->percentage = $obj->percentage;
 
        $this->authorid = $obj->fk_user_author;
        $this->usermodid = $obj->fk_user_mod;
 
        if (!is_object($this->author)) {
          $this->author = new User($this->db); // To avoid warning
        }
        $this->author->id = $obj->fk_user_author; // deprecated
        $this->author->firstname = $obj->firstname; // deprecated
        $this->author->lastname = $obj->lastname; // deprecated
        if (!is_object($this->usermod)) {
          $this->usermod = new User($this->db); // To avoid warning
        }
        $this->usermod->id = $obj->fk_user_mod; // deprecated
 
        $this->userownerid = $obj->fk_user_action;
        $this->fk_task = $obj->fk_task;
        $this->priority       = $obj->priority;
        $this->fulldayevent     = $obj->fulldayevent;
        $this->location       = $obj->location;
        $this->max_participants   = $obj->max_participants;
        $this->transparency     = $obj->transparency;
 
        $this->socid = $obj->fk_soc; // To have fetch_thirdparty method working
        if (!empty($obj->socname)) {
          require_once DOL_DOCUMENT_ROOT.'/societe/class/societe.class.php';
          $this->thirdparty = new Societe($this->db);
          $this->thirdparty->id = $obj->fk_soc;
          $this->thirdparty->name = $obj->socname;
        }
        $this->contact_id = $obj->fk_contact; // To have fetch_contact method working
        $this->fk_project = $obj->fk_project; // To have fetch_projet method working
 
        //$this->societe->id      = $obj->fk_soc;     // deprecated
        //$this->contact->id      = $obj->fk_contact;   // deprecated
 
        $this->fk_element = $obj->elementid;
        $this->elementid = $obj->elementid;
        $this->elementtype = $obj->elementtype;
 
        $this->recurid = $obj->recurid;
        $this->recurrule = $obj->recurrule;
        $this->recurdateend = $this->db->jdate($obj->recurdateend);
 
        $this->num_vote = $obj->num_vote;
        $this->event_paid = $obj->event_paid;
        $this->status = $obj->status;
 
        //email information
        $this->email_msgid = $obj->email_msgid;
        $this->email_from = $obj->email_from;
        $this->email_sender = $obj->email_sender;
        $this->email_to = $obj->email_to;
        $this->email_tocc = $obj->email_tocc;
        $this->email_tobcc = $obj->email_tobcc;
        $this->email_subject = $obj->email_subject;
        $this->errors_to = $obj->errors_to;
 
        $this->fetch_optionals();
 
        if ($loadresources) {
          $this->fetchResources();
        }
      }
 
      $this->db->free($resql);
    } else {
      $this->error = $this->db->lasterror();
      return -1;
    }
 
    return $num;
  }
 
  public function fetchResources()
  {
    $this->userassigned = array();
    $this->socpeopleassigned = array();
 
    $sql = 'SELECT fk_actioncomm, element_type, fk_element, answer_status, mandatory, transparency';
    $sql .= ' FROM '.MAIN_DB_PREFIX.'actioncomm_resources';
    $sql .= ' WHERE fk_actioncomm = '.((int) $this->id);
    $sql .= " AND element_type IN ('user', 'socpeople')";
    $resql = $this->db->query($sql);
    if ($resql) {
      // If owner is known, we must but id first into list
      if ($this->userownerid > 0) {
        $this->userassigned[$this->userownerid] = array('id' => $this->userownerid); // Set first so will be first into list.
      }
 
      while ($obj = $this->db->fetch_object($resql)) {
        if ($obj->fk_element > 0) {
          switch ($obj->element_type) {
            case 'user':
              $this->userassigned[$obj->fk_element] = array('id' => $obj->fk_element, 'mandatory' => $obj->mandatory, 'answer_status' => $obj->answer_status, 'transparency' => $obj->transparency);
              if (empty($this->userownerid)) {
                $this->userownerid = $obj->fk_element; // If not defined (should not happened, we fix this)
              }
              break;
            case 'socpeople':
              $this->socpeopleassigned[$obj->fk_element] = array('id' => $obj->fk_element, 'mandatory' => $obj->mandatory, 'answer_status' => $obj->answer_status, 'transparency' => $obj->transparency);
              break;
          }
        }
      }
 
      return 1;
    } else {
      dol_print_error($this->db);
      return -1;
    }
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function fetch_userassigned($override = true)
  {
    // phpcs:enable
    $sql = "SELECT fk_actioncomm, element_type, fk_element, answer_status, mandatory, transparency";
    $sql .= " FROM ".MAIN_DB_PREFIX."actioncomm_resources";
    $sql .= " WHERE element_type = 'user' AND fk_actioncomm = ".((int) $this->id);
 
    $resql2 = $this->db->query($sql);
    if ($resql2) {
      $this->userassigned = array();
 
      // If owner is known, we must but id first into list
      if ($this->userownerid > 0) {
        // Set first so will be first into list.
        $this->userassigned[$this->userownerid] = array('id' => $this->userownerid);
      }
 
      while ($obj = $this->db->fetch_object($resql2)) {
        if ($obj->fk_element > 0) {
          $this->userassigned[$obj->fk_element] = array('id' => $obj->fk_element,
                                  'mandatory' => $obj->mandatory,
                                  'answer_status' => $obj->answer_status,
                                  'transparency' => $obj->transparency);
        }
 
        if ($override === true) {
          // If not defined (should not happened, we fix this)
          if (empty($this->userownerid)) {
            $this->userownerid = $obj->fk_element;
          }
        }
      }
 
      return 1;
    } else {
      dol_print_error($this->db);
      return -1;
    }
  }
 
  public function delete($user, $notrigger = 0)
  {
    $error = 0;
 
    dol_syslog(get_class($this)."::delete", LOG_DEBUG);
 
    $this->db->begin();
 
    // remove categorie association
    if (!$error) {
      $sql = "DELETE FROM ".MAIN_DB_PREFIX."categorie_actioncomm";
      $sql .= " WHERE fk_actioncomm=".((int) $this->id);
 
      $res = $this->db->query($sql);
      if (!$res) {
        $this->error = $this->db->lasterror();
        $error++;
      }
    }
 
    // remove actioncomm_resources
    if (!$error) {
      $sql = "DELETE FROM ".MAIN_DB_PREFIX."actioncomm_resources";
      $sql .= " WHERE fk_actioncomm=".((int) $this->id);
 
      $res = $this->db->query($sql);
      if (!$res) {
        $this->error = $this->db->lasterror();
        $error++;
      }
    }
 
    if (!$error) {
      $sql = "DELETE FROM ".MAIN_DB_PREFIX."actioncomm_reminder";
      $sql .= " WHERE fk_actioncomm = ".((int) $this->id);
 
      $res = $this->db->query($sql);
      if (!$res) {
        $this->error = $this->db->lasterror();
        $error++;
      }
    }
 
    // Removed extrafields
    if (!$error) {
      $result = $this->deleteExtraFields();
      if ($result < 0) {
        $error++;
        dol_syslog(get_class($this)."::delete error -3 ".$this->error, LOG_ERR);
      }
    }
 
    // remove actioncomm
    if (!$error) {
      $sql = "DELETE FROM ".MAIN_DB_PREFIX."actioncomm";
      $sql .= " WHERE id=".((int) $this->id);
 
      $res = $this->db->query($sql);
      if (!$res) {
        $this->error = $this->db->lasterror();
        $error++;
      }
    }
 
    if (!$error) {
      if (!$notrigger) {
        // Call trigger
        $result = $this->call_trigger('ACTION_DELETE', $user);
        if ($result < 0) {
          $error++;
        }
        // End call triggers
      }
 
      if (!$error) {
        $this->db->commit();
        return 1;
      } else {
        $this->db->rollback();
        return -2;
      }
    } else {
      $this->db->rollback();
      $this->error = $this->db->lasterror();
      return -1;
    }
  }
 
  public function update(User $user, $notrigger = 0)
  {
    $error = 0;
 
    // Clean parameters
    $this->label = trim($this->label);
    $this->note_private = dol_htmlcleanlastbr(trim(!isset($this->note_private) ? $this->note : $this->note_private));
    if (empty($this->percentage)) {
      $this->percentage = 0;
    }
    if (empty($this->priority) || !is_numeric($this->priority)) {
      $this->priority = 0;
    }
    if (empty($this->transparency)) {
      $this->transparency = 0;
    }
    if (empty($this->fulldayevent)) {
      $this->fulldayevent = 0;
    }
    if ($this->percentage > 100) {
      $this->percentage = 100;
    }
    //if ($this->percentage == 100 && ! $this->dateend) $this->dateend = $this->date;
    if ($this->datep && $this->datef) {
      $this->durationp = ($this->datef - $this->datep); // deprecated
    }
    //if ($this->date  && $this->dateend) $this->durationa=($this->dateend - $this->date);
    if ($this->datep && $this->datef && $this->datep > $this->datef) {
      $this->datef = $this->datep;
    }
    //if ($this->date  && $this->dateend && $this->date > $this->dateend) $this->dateend=$this->date;
    if ($this->fk_project < 0) {
      $this->fk_project = 0;
    }
 
    $socid = (($this->socid > 0) ? $this->socid : 0);
    $contactid = (($this->contact_id > 0) ? $this->contact_id : 0);
    $userownerid = ($this->userownerid ? $this->userownerid : 0);
 
    // If a type_id is set, we must also have the type_code set
    if ($this->type_id > 0) {
      if (empty($this->type_code)) {
        $cactioncomm = new CActionComm($this->db);
        $result = $cactioncomm->fetch($this->type_id);
        if ($result >= 0 && !empty($cactioncomm->code)) {
          $this->type_code = $cactioncomm->code;
        }
      }
    }
 
    $code = $this->code;
    if (empty($code) || (!empty($this->oldcopy) && $this->oldcopy->type_code != $this->type_code)) {  // If code unknown or if we change the type, we reset $code too
      $code = $this->type_code;
    }
 
    $this->db->begin();
 
    $sql = "UPDATE ".MAIN_DB_PREFIX."actioncomm";
    $sql .= " SET percent = '".$this->db->escape((string) $this->percentage)."'";
    $sql .= ", fk_action = ".(int) $this->type_id;
    $sql .= ", code = " . ($code ? "'".$this->db->escape($code)."'" : "null");
    $sql .= ", label = ".($this->label ? "'".$this->db->escape($this->label)."'" : "null");
    $sql .= ", datep = ".(strval($this->datep) != '' ? "'".$this->db->idate($this->datep)."'" : 'null');
    $sql .= ", datep2 = ".(strval($this->datef) != '' ? "'".$this->db->idate($this->datef)."'" : 'null');
    $sql .= ", durationp = ".(isset($this->durationp) && $this->durationp >= 0 && $this->durationp != '' ? "'".$this->db->escape((string) $this->durationp)."'" : "null"); // deprecated
    $sql .= ", note = '".$this->db->escape($this->note_private)."'";
    $sql .= ", fk_project =".($this->fk_project > 0 ? ((int) $this->fk_project) : "null");
    $sql .= ", fk_soc =".($socid > 0 ? ((int) $socid) : "null");
    $sql .= ", fk_contact =".($contactid > 0 ? ((int) $contactid) : "null");
    $sql .= ", priority = '".$this->db->escape((string) $this->priority)."'";
    $sql .= ", fulldayevent = '".$this->db->escape((string) $this->fulldayevent)."'";
    $sql .= ", location = ".($this->location ? "'".$this->db->escape($this->location)."'" : "null");
    $sql .= ", max_participants = ".(isset($this->max_participants) && $this->max_participants > 0 ? ((int) $this->max_participants) : "null");
    $sql .= ", transparency = '".$this->db->escape((string) $this->transparency)."'";
    $sql .= ", fk_user_mod = ".((int) $user->id);
    $sql .= ", fk_user_action = ".($userownerid > 0 ? ((int) $userownerid) : "null");
    $sql .= ", fk_task = ".(!empty($this->fk_task) ? ((int) $this->fk_task) : "null");
    if (!empty($this->fk_element)) {
      $sql .= ", fk_element=".($this->fk_element ? ((int) $this->fk_element) : "null");
    }
    if (!empty($this->elementtype)) {
      $sql .= ", elementtype=".($this->elementtype ? "'".$this->db->escape($this->elementtype)."'" : "null");
    }
    if (!empty($this->num_vote)) {
      $sql .= ", num_vote=".($this->num_vote ? (int) $this->num_vote : null);
    }
    if (!empty($this->event_paid)) {
      $sql .= ", event_paid=".($this->event_paid ? (int) $this->event_paid : 0);
    }
    if (!empty($this->status)) {
      $sql .= ", status=".($this->status ? (int) $this->status : 0);
    }
    $sql .= " WHERE id=".((int) $this->id);
 
    dol_syslog(get_class($this)."::update", LOG_DEBUG);
    if ($this->db->query($sql)) {
      $action = 'update';
 
      // Actions on extra fields
      if (!$error) {
        $result = $this->insertExtraFields();
        if ($result < 0) {
          $error++;
        }
      }
 
      // Now insert assignedusers
      if (!$error) {
        $sql = "DELETE FROM ".MAIN_DB_PREFIX."actioncomm_resources where fk_actioncomm = ".((int) $this->id)." AND element_type = 'user'";
        $resql = $this->db->query($sql);
 
        $already_inserted = array();
        foreach ($this->userassigned as $key => $val) {
          if (!is_array($val)) {  // For backward compatibility when val=id
            $val = array('id' => $val);
          }
          if (!isset($val['id']) || !is_scalar($val['id'])) {
            continue;
          }
          if (!empty($already_inserted[$val['id']])) {
            continue;
          }
 
          $sql = "INSERT INTO ".MAIN_DB_PREFIX."actioncomm_resources(fk_actioncomm, element_type, fk_element, mandatory, transparency, answer_status)";
          $sql .= " VALUES(".((int) $this->id).", 'user', ".((int) $val['id']).", ".(empty($val['mandatory']) ? '0' : ((int) $val['mandatory'])).", ".(empty($val['transparency']) ? '0' : ((int) $val['transparency'])).", ".(empty($val['answer_status']) ? '0' : ((int) $val['answer_status'])).")";
 
          $resql = $this->db->query($sql);
          if (!$resql) {
            $error++;
            $this->errors[] = $this->db->lasterror();
          } else {
            $already_inserted[$val['id']] = true;
          }
          //var_dump($sql);exit;
        }
      }
 
      if (!$error) {
        $sql = "DELETE FROM ".MAIN_DB_PREFIX."actioncomm_resources where fk_actioncomm = ".((int) $this->id)." AND element_type = 'socpeople'";
        $resql = $this->db->query($sql);
 
        if (!empty($this->socpeopleassigned)) {
          $already_inserted = array();
          foreach ($this->socpeopleassigned as $val) {
            if (!is_array($val)) {  // For backward compatibility when val=id
              $val = array('id' => $val);
            }
            if (!empty($already_inserted[$val['id']])) {
              continue;
            }
 
            $sql = "INSERT INTO ".MAIN_DB_PREFIX."actioncomm_resources(fk_actioncomm, element_type, fk_element, mandatory, transparency, answer_status)";
            $sql .= " VALUES(".((int) $this->id).", 'socpeople', ".((int) $val['id']).", 0, 0, 0)";
 
            $resql = $this->db->query($sql);
            if (!$resql) {
              $error++;
              $this->errors[] = $this->db->lasterror();
            } else {
              $already_inserted[$val['id']] = true;
            }
          }
        }
      }
 
      if (!$error && !$notrigger) {
        // Call trigger
        $result = $this->call_trigger('ACTION_MODIFY', $user);
        if ($result < 0) {
          $error++;
        }
        // End call triggers
      }
 
      if (!$error) {
        $this->db->commit();
        return 1;
      } else {
        $this->db->rollback();
        dol_syslog(get_class($this)."::update ".implode(',', $this->errors), LOG_ERR);
        return -2;
      }
    } else {
      $this->db->rollback();
      $this->error = $this->db->lasterror();
      return -1;
    }
  }
 
  public function checkResourceConflicts($newdatep, $newdatef)
  {
    if (!getDolGlobalString('RESOURCE_USED_IN_EVENT_CHECK') || $this->element != 'action') {
      return array();
    }
 
    $sql  = "SELECT er.rowid, r.ref as r_ref, ac.id as ac_id, ac.label as ac_label";
    $sql .= " FROM ".MAIN_DB_PREFIX."element_resources as er";
    $sql .= " INNER JOIN ".MAIN_DB_PREFIX."resource as r ON r.rowid = er.resource_id AND er.resource_type = 'dolresource'";
    $sql .= " INNER JOIN ".MAIN_DB_PREFIX."actioncomm as ac ON ac.id = er.element_id AND er.element_type = '".$this->db->escape($this->element)."'";
    $sql .= " WHERE ac.id <> ".((int) $this->id);
    $sql .= " AND er.resource_id IN (";
    $sql .= " SELECT resource_id FROM ".MAIN_DB_PREFIX."element_resources";
    $sql .= " WHERE element_id = ".((int) $this->id);
    $sql .= " AND element_type = '".$this->db->escape($this->element)."'";
    $sql .= " AND busy = 1";
    $sql .= ")";
    $sql .= " AND er.busy = 1";
    $sql .= " AND (";
    $sql .= " (ac.datep <= '".$this->db->idate($newdatep)."' AND (ac.datep2 IS NULL OR ac.datep2 >= '".$this->db->idate($newdatep)."'))";
    if (!empty($newdatef)) {
      $sql .= " OR (ac.datep <= '".$this->db->idate($newdatef)."' AND (ac.datep2 >= '".$this->db->idate($newdatef)."'))";
    }
    $sql .= " OR (";
    $sql .= "ac.datep >= '".$this->db->idate($newdatep)."'";
    if (!empty($newdatef)) {
      $sql .= " AND (ac.datep2 IS NOT NULL AND ac.datep2 <= '".$this->db->idate($newdatef)."')";
    }
    $sql .= ")";
    $sql .= ")";
 
    $resql = $this->db->query($sql);
    if (!$resql) {
      $this->error = $this->db->lasterror();
      return -1;
    }
 
    $conflicts = array();
    while ($obj = $this->db->fetch_object($resql)) {
      $conflicts[] = array('r_ref' => $obj->r_ref, 'ac_id' => (int) $obj->ac_id, 'ac_label' => $obj->ac_label);
    }
    $this->db->free($resql);
 
    return $conflicts;
  }
 
  public function formatResourceConflicts($conflicts, $langs)
  {
    $message = $langs->trans('ErrorResourcesAlreadyInUse').' : ';
    foreach ($conflicts as $conflict) {
      $message .= '<br> - '.$langs->trans('ErrorResourceUseInEvent', $conflict['r_ref'], $conflict['ac_label'].' ['.$conflict['ac_id'].']');
    }
    return $message;
  }
 
  public function getActions($socid = 0, $fk_element = 0, $elementtype = '', $sqlfilter = '', $sortfield = 'a.datep', $sortorder = 'DESC', $limit = 0)
  {
    global $hookmanager;
 
    $resarray = array();
 
    dol_syslog(get_class($this)."::getActions", LOG_DEBUG);
 
    // Initialize a technical object to manage hooks of page. Note that conf->hooks_modules contains an array of hook context
    if (!is_object($hookmanager)) {
      include_once DOL_DOCUMENT_ROOT.'/core/class/hookmanager.class.php';
      $hookmanager = new HookManager($this->db);
    }
    $hookmanager->initHooks(array('agendadao'));
 
    $sql = "SELECT a.id";
    if ($elementtype == 'user') {
      $sql .= ",a.datep";
    }
    $sql .= " FROM ".MAIN_DB_PREFIX."actioncomm as a";
    // Fields from hook
    $parameters = array('sql' => &$sql, 'socid' => $socid, 'fk_element' => $fk_element, 'elementtype' => $elementtype);
    $reshook = $hookmanager->executeHooks('getActionsListFrom', $parameters);    // Note that $action and $object may have been modified by hook
    if (!empty($hookmanager->resPrint)) {
      $sql .= $hookmanager->resPrint;
    }
    $sql .= " WHERE a.entity IN (".getEntity('agenda').")";
    if (!empty($socid)) {
      $sql .= " AND a.fk_soc = ".((int) $socid);
    }
    if (!empty($elementtype)) {
      if ($elementtype == 'project') {
        $sql .= ' AND a.fk_project = '.((int) $fk_element);
      } elseif ($elementtype == 'contact') {
        $sql .= ' AND EXISTS';
        $sql .= " (SELECT r.rowid FROM ".MAIN_DB_PREFIX."actioncomm_resources as r WHERE";
        $sql .= " r.element_type = 'socpeople' AND r.fk_element = ".((int) $fk_element).' AND r.fk_actioncomm = a.id)';
      } elseif ($elementtype == 'user') {
        $sql1 = $sql;
        $sql .= " AND a.fk_user_action = ".((int) $fk_element);
        $sql = "SELECT a.id FROM ((" . $sql . ") UNION (" . $sql1;
        $sql .= " AND EXISTS (SELECT r.rowid FROM ".MAIN_DB_PREFIX."actioncomm_resources as r WHERE";
        $sql .= " r.element_type = 'user' AND r.fk_element = ".((int) $fk_element).' AND r.fk_actioncomm = a.id)';
        $sql .= " AND a.fk_user_action <> ".((int) $fk_element);
        $sql .= ")) as a";
      } else {
        $sql .= " AND a.fk_element = ".((int) $fk_element)." AND a.elementtype = '".$this->db->escape($elementtype)."'";
      }
    }
    if (!empty($sqlfilter)) {
      $sql .= $sqlfilter;
    }
    // Fields where hook
    $parameters = array('sql' => &$sql, 'socid' => $socid, 'fk_element' => $fk_element, 'elementtype' => $elementtype);
    $reshook = $hookmanager->executeHooks('getActionsListWhere', $parameters);    // Note that $action and $object may have been modified by hook
    if (!empty($hookmanager->resPrint)) {
      $sql .= $hookmanager->resPrint;
    }
    if ($sortorder && $sortfield) {
      $sql .= $this->db->order($sortfield, $sortorder);
    }
    $sql .= $this->db->plimit($limit, 0);
 
    $resql = $this->db->query($sql);
    if ($resql) {
      $num = $this->db->num_rows($resql);
 
      if ($num) {
        for ($i = 0; $i < $num; $i++) {
          $obj = $this->db->fetch_object($resql);
          $actioncommstatic = new ActionComm($this->db);
          $actioncommstatic->fetch($obj->id);
          $resarray[$i] = $actioncommstatic;
        }
      }
      $this->db->free($resql);
      return $resarray;
    } else {
      return $this->db->lasterror();
    }
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function load_board($user, $load_state_board = 0)
  {
    // phpcs:enable
    global $conf, $langs;
 
    if (empty($load_state_board)) {
      // The count and the number of late events are computed by the database instead of reading every event to do. An event
      // is late when it has a date and that date is before now minus the warning delay (the rule of hasDelay()).
      $sql = "SELECT COUNT(a.id) as nb,";
      $sql .= " SUM(CASE WHEN a.datep IS NOT NULL AND a.datep < '".$this->db->idate(dol_now() - $conf->agenda->warning_delay)."' THEN 1 ELSE 0 END) as nblate";
    } else {
      $this->nb = array();
      $sql = "SELECT count(a.id) as nb";
    }
    $sql .= " FROM ".MAIN_DB_PREFIX."actioncomm as a";
    if (!$user->hasRight('agenda', 'allactions', 'read')) {
      $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."actioncomm_resources AS ar ON a.id = ar.fk_actioncomm AND ar.element_type ='user' AND ar.fk_element = ".((int) $user->id);
    }
    $sql .= " WHERE 1 = 1";
    if (empty($load_state_board)) {
      $sql .= " AND a.percent >= 0 AND a.percent < 100";
    }
    $sql .= " AND a.entity IN (".getEntity('agenda').")";
    if (!$user->hasRight('agenda', 'allactions', 'read')) {
      $sql .= " AND (a.fk_user_author = ".((int) $user->id)." OR a.fk_user_action = ".((int) $user->id);
      $sql .= " OR ar.fk_element = ".((int) $user->id);
      $sql .= ")";
    }
    // If the internal user must only see his customers, force searching by him
    $search_sale = 0;
    if (!$user->hasRight('societe', 'client', 'voir')) {
      $search_sale = $user->id;
    }
    // Search on sale representative
    if ($search_sale && $search_sale != '-1') {
      if ($search_sale == -2) {
        $sql .= " AND NOT EXISTS (SELECT sc.fk_soc FROM ".MAIN_DB_PREFIX."societe_commerciaux as sc WHERE sc.fk_soc = a.fk_soc)";
      } elseif ($search_sale > 0) {
        $sql .= " AND (a.fk_soc IS NULL OR EXISTS (SELECT sc.fk_soc FROM ".MAIN_DB_PREFIX."societe_commerciaux as sc WHERE sc.fk_soc = a.fk_soc AND sc.fk_user = ".((int) $search_sale)."))";
      }
    }
 
    $resql = $this->db->query($sql);
    if ($resql) {
      $response = null;  // Ensure the variable is defined
      if (empty($load_state_board)) {
        $response = new WorkboardResponse();
        $response->warning_delay = $conf->agenda->warning_delay / 60 / 60 / 24;
        $response->label = $langs->trans("ActionsToDo");
        $response->labelShort = $langs->trans("ActionsToDoShort");
        $response->url = DOL_URL_ROOT.'/comm/action/list.php?mode=show_list&actioncode=0&status=todo&mainmenu=agenda';
        if ($user->hasRight("agenda", "allactions", "read")) {
          $response->url .= '&filtert=-1';
        }
        $response->img = img_object('', "action", 'class="inline-block valigntextmiddle"');
 
        $obj = $this->db->fetch_object($resql);
        if ($obj) {
          $response->nbtodo = (int) $obj->nb;
          $response->nbtodolate = (int) $obj->nblate;
        }
      } else {
        $obj = $this->db->fetch_object($resql);
        if ($obj) {
          $this->nb["actionscomm"] = $obj->nb;
        }
      }
 
      $this->db->free($resql);
      if (empty($load_state_board) && $response instanceof WorkboardResponse) {
        return $response;
      } else {
        return 1;
      }
    } else {
      dol_print_error($this->db);
      $this->error = $this->db->error();
      return -1;
    }
  }
 
 
  public function info($id)
  {
    $sql = 'SELECT ';
    $sql .= ' a.id,';
    $sql .= ' datec,';
    $sql .= ' tms as datem,';
    $sql .= ' fk_user_author,';
    $sql .= ' fk_user_mod';
    $sql .= ' FROM '.MAIN_DB_PREFIX.'actioncomm as a';
    $sql .= ' WHERE a.id = '.((int) $id);
 
    dol_syslog(get_class($this)."::info", LOG_DEBUG);
    $result = $this->db->query($sql);
    if ($result) {
      if ($this->db->num_rows($result)) {
        $obj = $this->db->fetch_object($result);
 
        $this->id = $obj->id;
 
        $this->user_creation_id = $obj->fk_user_author;
        $this->user_modification_id = $obj->fk_user_mod;
        $this->date_creation     = $this->db->jdate($obj->datec);
        $this->date_modification = empty($obj->datem) ? '' : $this->db->jdate($obj->datem);
      }
      $this->db->free($result);
    } else {
      dol_print_error($this->db);
    }
  }
 
 
  public function getLibStatut($mode, $hidenastatus = 0)
  {
    return $this->LibStatut($this->percentage, $mode, $hidenastatus, $this->datep);
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function LibStatut($percent, $mode, $hidenastatus = 0, $datestart = '')
  {
    // phpcs:enable
    global $langs;
 
    $labelStatus = $langs->transnoentitiesnoconv('StatusNotApplicable');
    if ($percent == -1 && !$hidenastatus) {
      $labelStatus = $langs->transnoentitiesnoconv('StatusNotApplicable');
    } elseif ($percent == 0) {
      $labelStatus = $langs->transnoentitiesnoconv('StatusActionToDo').' (0%)';
    } elseif ($percent > 0 && $percent < 100) {
      $labelStatus = $langs->transnoentitiesnoconv('StatusActionInProcess').' ('.$percent.'%)';
    } elseif ($percent >= 100) {
      $labelStatus = $langs->transnoentitiesnoconv('StatusActionDone').' (100%)';
    }
 
    $labelStatusShort = $langs->transnoentitiesnoconv('StatusNotApplicable');
    if ($percent == -1 && !$hidenastatus) {
      $labelStatusShort = $langs->trans('NA');
    } elseif ($percent == 0) {
      $labelStatusShort = '0%';
    } elseif ($percent > 0 && $percent < 100) {
      $labelStatusShort = $percent.'%';
    } elseif ($percent >= 100) {
      $labelStatusShort = '100%';
    }
 
    $statusType = 'status9';
    if ($percent == -1 && !$hidenastatus) {
      $statusType = 'status9';
    }
    if ($percent == 0) {
      $statusType = 'status1';
    }
    if ($percent > 0 && $percent < 100) {
      $statusType = 'status3';
    }
    if ($percent >= 100) {
      $statusType = 'status6';
    }
 
    $params = array('badgeParams' => array('attr' => array('title' => '<b>'.$langs->trans("Progression").'</b> : '.$labelStatus)));
 
    return dolGetStatus($labelStatus, $labelStatusShort, '', $statusType, $mode, '', $params);
  }
 
  public function getTooltipContentArray($params)
  {
    global $langs, $form;
 
    $langs->load('agenda');
 
    $datas = array();
    $nofetch = !empty($params['nofetch']);
 
    // Set label of type
    $labeltype = '';
    if ($this->type_code) {
      $langs->load("commercial");
      $labeltype = ($langs->transnoentities("Action".$this->type_code) != "Action".$this->type_code) ? $langs->transnoentities("Action".$this->type_code) : $this->type_label;
    }
    if (!getDolGlobalString('AGENDA_USE_EVENT_TYPE')) {
      if ($this->type_code != 'AC_OTH_AUTO') {
        $labeltype = $langs->trans('ActionAC_MANUAL');
      }
    }
    $datas['picto'] = img_picto('', $this->picto).' <u>'.$langs->trans('Action').'</u>';
    if (!empty($this->ref)) {
      $datas['ref'] = '<br><b>'.$langs->trans('Ref').':</b> '.dol_escape_htmltag($this->ref);
    }
    $translatedlabel = $this->getTranslatedLabel();
    if (!empty($translatedlabel)) {
      $datas['title'] = '<br><b>'.$langs->trans('Title').':</b> '.dol_escape_htmltag($translatedlabel);
    }
    if (!empty($labeltype)) {
      $datas['labeltype'] = '<br><b>'.$langs->trans('Type').':</b> '.dol_escape_htmltag($labeltype);
    }
    if (!empty($this->location)) {
      $datas['location'] = '<br><b>'.$langs->trans('Location').':</b> '.dol_escape_htmltag($this->location);
    }
    if (isset($this->transparency) && $this->datef && $this->datep != $this->datef && isset($this->transparency)) {
      $datas['transparency'] = '<br><b>'.$langs->trans('Busy').':</b> '.yn($this->transparency);
    }
 
    $datas['date'] = '<br><b>'.$langs->trans('Date').':</b> '.dol_print_date($this->datep, 'dayhourreduceformat', 'tzuserrel');
    if ($this->datef) {
      $tmpa = dol_getdate($this->datep);
      $tmpb = dol_getdate($this->datef);
      if ($tmpa['mday'] == $tmpb['mday'] && $tmpa['mon'] == $tmpb['mon'] && $tmpa['year'] == $tmpb['year']) {
        if ($tmpa['hours'] != $tmpb['hours'] || $tmpa['minutes'] != $tmpb['minutes']) {
          $datas['date'] .= '-'.dol_print_date($this->datef, 'hour', 'tzuserrel');
        }
      } else {
        $datas['date'] .= '-'.dol_print_date($this->datef, 'dayhourreduceformat', 'tzuserrel');
      }
    }
 
    if (!empty($this->recurid)) {
      $datas['recurring'] = '<br><b>'.$langs->trans("RecurringEvent").':</b> ';
      $datas['recurring'] .= img_picto($langs->trans("EventPartOfARecurringSerie", $this->recurid), 'recurring', 'class="pictofixedwidth"');
      $reg = array();
      if (preg_match('/FREQ=MONTHLY_BYMONTHDAY(\d+)/', $this->recurrule, $reg)) {
        $datas['recurring'] .= $langs->trans("EveryMonth").' <span class="opacitymedium small">('.$langs->trans("DayOfMonth").' '.$reg[1].' - '.$langs->trans("Until").' '.dol_print_date($this->recurdateend, 'day').')</span>';
      }
    }
 
    if (!empty($this->email_msgid)) {
      $langs->load("mails");
      $datas['space'] = '<br>';
      // $datas['email'] = '<br><b>'.img_picto('', 'email').' '.$langs->trans("Email").'</b>';
      $datas['mailtopic'] = '<br><b>'.$langs->trans('MailTopic').':</b> '.dol_escape_htmltag($this->email_subject);
      $datas['mailfrom'] = '<br><b>'.$langs->trans('MailFrom').':</b> '.dol_htmlentities($this->email_from);
      $datas['mailto'] = '<br><b>'.$langs->trans('MailTo').':</b> '.dol_htmlentities($this->email_to);
      if (!empty($this->email_tocc)) {
        $datas['mailcc'] = '<br><b>'.$langs->trans('MailCC').':</b> '.dol_htmlentities($this->email_tocc);
      }
      /* Disabled because bcc must remain by definition not visible
      if (!empty($this->email_tobcc)) {
        $datas['mailccc'] = '<br><b>'.$langs->trans('MailCCC').':</b> '.$this->email_tobcc;
      } */
    }
    if (!empty($this->note_private)) {
      $datas['description'] = '<br><hr>';
      // Try to limit length of content
      $texttoshow = dolGetFirstLineOfText($this->note_private, 10);
      // Restrict height of content into the tooltip
      $datas['note'] = '<div class="tenlinesmax">';
      $datas['note'] .= (dol_textishtml($texttoshow) ? str_replace(array("\r", "\n"), "", $texttoshow) : str_replace(array("\r", "\n"), '<br>', $texttoshow));
      $datas['note'] .= '</div>';
    }
 
    // show categories for this record only in ajax to not overload lists
    if (isModEnabled('category') && !$nofetch) {
      require_once DOL_DOCUMENT_ROOT . '/categories/class/categorie.class.php';
      if (empty($form)) {
        include_once DOL_DOCUMENT_ROOT.'/core/class/html.form.class.php';
        $form = new Form($this->db);
      }
      $tmpcategstring = $form->showCategories($this->id, Categorie::TYPE_ACTIONCOMM, 1);
      if ($tmpcategstring) {
        $datas['categories'] = '<br>'.$tmpcategstring;
      }
    }
 
    return $datas;
  }
 
  public function getNomUrl($withpicto = 0, $maxlength = 0, $morecss = '', $option = '', $overwritepicto = 0, $notooltip = 0, $save_lastsearch_value = -1)
  {
    global $conf, $langs, $user, $hookmanager, $action;
 
    if (!empty($conf->dol_no_mouse_hover)) {
      $notooltip = 1; // Force disable tooltips
    }
 
    $canread = 0;
    if ($user->hasRight('agenda', 'myactions', 'read') && ($this->authorid == $user->id || $this->userownerid == $user->id)) {
      $canread = 1; // Can read my event
    }
    if ($user->hasRight('agenda', 'myactions', 'read') && array_key_exists($user->id, $this->userassigned)) {
      $canread = 1; // Can read my event i am assigned
    }
    if ($user->hasRight('agenda', 'allactions', 'read')) {
      $canread = 1; // Can read all event of other
    }
    if (!$canread) {
      $option = 'nolink';
    }
 
    $label = $this->getTranslatedLabel();
 
    $result = '';
 
    // Set label of type
    $labeltype = $this->getTypeLabel(1);
 
    $linkclose = '';
 
    $params = [
      'id' => (string) $this->id,
      'objecttype' => $this->element.($this->module ? '@'.$this->module : ''),
      'option' => $option,
      'nofetch' => 1,
    ];
    $classfortooltip = 'classfortooltip';
    $dataparams = '';
    if (getDolGlobalInt('MAIN_ENABLE_AJAX_TOOLTIP')) {
      $classfortooltip = 'classforajaxtooltip';
      $dataparams = ' data-params="'.dol_escape_htmltag(json_encode($params)).'"';
      //$label = '';    // $label is used as ref when $maxlength is not negative, so we must not empty it.
    } else {
      $label = implode($this->getTooltipContentArray($params));
    }
 
    if (empty($notooltip)) {
      if (getDolGlobalString('MAIN_OPTIMIZEFORTEXTBROWSER')) {
        $label = $langs->trans("ShowAction");
        $linkclose .= ' alt="'.dolPrintHTMLForAttribute($label).'"';
      }
      $linkclose .= ($label ? ' title="'.dolPrintHTMLForAttribute($label).'"' : ' title="tocomplete"');
      $linkclose .= $dataparams.' class="'.$morecss.' '.$classfortooltip.'"';
    } else {
      $linkclose .= ' class="'.$morecss.'"';
    }
 
    $query = ['id' => $this->id];
    if ($option == 'birthday') {
      $baseurl = DOL_URL_ROOT.'/contact/perso.php';
    } elseif ($option == 'holiday') {
      $baseurl = DOL_URL_ROOT.'/holiday/card.php';
    } else {
      $baseurl = DOL_URL_ROOT.'/comm/action/card.php';
    }
 
    if ($option !== 'nolink') {
      // Add param to save lastsearch_values or not
      $add_save_lastsearch_values = ($save_lastsearch_value == 1 ? 1 : 0);
      if ($save_lastsearch_value == -1 && isset($_SERVER["PHP_SELF"]) && preg_match('/list\.php/', $_SERVER["PHP_SELF"])) {
        $add_save_lastsearch_values = 1;
      }
      if ($add_save_lastsearch_values) {
        $query += ['save_lastsearch_values' => 1];
      }
    }
    $url = dolBuildUrl($baseurl, $query);
 
    $linkstart = '<a href="'.$url.'"';
    $linkstart .= $linkclose.'>';
    $linkend = '</a>';
 
    if ($option == 'nolink') {
      $linkstart = '';
      $linkend = '';
    }
 
    if ($withpicto == 2) {
      if (getDolGlobalString('AGENDA_USE_EVENT_TYPE')) {
        $label = $labeltype;
      }
      $labelshort = '';
    } else {
      if (getDolGlobalString('AGENDA_USE_EVENT_TYPE') && empty($label)) {
        if (empty($this->label)) {
          $label = $labeltype;
        } else {
          $label = $this->getTranslatedLabel();
        }
      }
      if ($maxlength < 0) {
        $labelshort = $this->ref;
      } else {
        $labelshort = dol_trunc(empty($label) ? $labeltype : $label, $maxlength);
      }
    }
 
    if ($withpicto) {
      if (getDolGlobalString('AGENDA_USE_EVENT_TYPE')) {  // Add code into ()
        if ($labeltype) {
          $label .= (preg_match('/'.preg_quote($labeltype, '/').'/', $label) ? '' : ' ('.$langs->transnoentities("Action".$this->type_code).')');
        }
      }
    }
 
    $result .= $linkstart;
    if ($withpicto) {
      $result .= img_object(($notooltip ? '' : $langs->trans("ShowAction").': '.$label), ($overwritepicto ? $overwritepicto : 'action'), (($this->type_color && $overwritepicto) ? 'style="color: #'.$this->type_color.' !important;" ' : '').($notooltip ? (($withpicto != 2) ? 'class="paddingright"' : '') : ' class="'.(($withpicto != 2) ? 'paddingright ' : '').'"'), 0, 0, $notooltip ? 0 : 1);
    }
    $result .= dol_escape_htmltag($labelshort);
    $result .= $linkend;
 
    global $action;
    $hookmanager->initHooks(array('actiondao'));
    $parameters = array('id' => $this->id, 'getnomurl' => &$result);
    $reshook = $hookmanager->executeHooks('getNomUrl', $parameters, $this, $action); // Note that $action and $object may have been modified by some hooks
    if ($reshook > 0) {
      $result = $hookmanager->resPrint;
    } else {
      $result .= $hookmanager->resPrint;
    }
 
    return $result;
  }
 
  public function getTranslatedLabel()
  {
    global $langs;
 
    if ($this->code == 'AC_COMPANY_CREATE' && !empty($this->thirdparty->name)) {
      return $langs->transnoentitiesnoconv('NewCompanyToDolibarr', $this->thirdparty->name);
    }
 
    return $this->label;
  }
 
  public function getTypePicto($morecss = 'pictofixedwidth paddingright valignmiddle', $titlealt = '')
  {
    $imgpicto = '';
    if (getDolGlobalString('AGENDA_USE_EVENT_TYPE')) {
      $color = '';
      if ($this->type_color) {
        $color = 'style="color: #'.$this->type_color.' !important;"';
      }
      if ($this->type_picto) {
        $imgpicto = img_picto($titlealt, $this->type_picto, '', 0, 0, 0, '', ($morecss ? ' '.$morecss : ''));
      } else {
        if ($this->type_code === 'AC_RDV') {
          $imgpicto = img_picto($titlealt, 'meeting', $color, 0, 0, 0, '', ($morecss ? ' '.$morecss : ''));
        } elseif ($this->type_code === 'AC_TEL') {
          $imgpicto = img_picto($titlealt, 'object_phoning', $color, 0, 0, 0, '', ($morecss ? ' '.$morecss : ''));
        } elseif ($this->type_code === 'AC_FAX') {
          $imgpicto = img_picto($titlealt, 'object_phoning_fax', $color, 0, 0, 0, '', ($morecss ? ' '.$morecss : ''));
        } elseif ($this->type_code === 'AC_EMAIL' || $this->type_code === 'AC_EMAIL_IN' || $this->type_code === 'AC_EMAILING' || (!empty($this->code) && preg_match('/_SENTBYMAIL/', $this->code))) {
          $imgpicto = img_picto($titlealt, 'object_email', $color, 0, 0, 0, '', ($morecss ? ' '.$morecss : ''));
        } elseif ($this->type_code === 'AC_INT') {
          $imgpicto = img_picto($titlealt, 'object_intervention', $color, 0, 0, 0, '', ($morecss ? ' '.$morecss : ''));
        } elseif (!empty($this->code) && preg_match('/^TICKET_MSG/', $this->code)) {
          $imgpicto = img_picto($titlealt, 'object_conversation', $color, 0, 0, 0, '', ($morecss ? ' '.$morecss : ''));
        } elseif ((string) $this->type != 'systemauto') {
          $imgpicto = img_picto($titlealt, 'user-cog', $color, 0, 0, 0, '', ($morecss ? ' '.$morecss : ''));
        } else {
          $imgpicto = img_picto($titlealt, 'cog', $color, 0, 0, 0, '', ($morecss ? ' '.$morecss : ''));
        }
      }
    } else {
      // 2 picto: 1 for auto, 1 for manual
      if ($this->type != 'systemauto') {
        $imgpicto = img_picto($titlealt, 'user-cog', '', 0, 0, 0, '', ($morecss ? ' '.$morecss : ''));
      } else {
        $imgpicto = img_picto($titlealt, 'cog', '', 0, 0, 0, '', ($morecss ? ' '.$morecss : ''));
      }
    }
 
    return $imgpicto;
  }
 
 
  public function getTypeLabel($mode = 0)
  {
    global $conf, $langs;
 
    // If cache for array of types unknown, we load it
    if (!empty($conf->cache['actioncommgetypelabel'])) {
      $arraylist = $conf->cache['actioncommgetypelabel'];
    } else {
      require_once DOL_DOCUMENT_ROOT.'/comm/action/class/cactioncomm.class.php';
      $caction = new CActionComm($this->db);
      $arraylist = $caction->liste_array(1, 'code', '', (getDolGlobalString('AGENDA_USE_EVENT_TYPE') ? 0 : 1), '', 1);
      $conf->cache['actioncommgetypelabel'] = $arraylist;
    }
 
    $labeltype = $this->type_code;
    if (!getDolGlobalString('AGENDA_USE_EVENT_TYPE') && empty($arraylist[$labeltype])) {
      $labeltype = 'AC_OTH';
    }
    if (!empty($this->code) && preg_match('/^TICKET_MSG/', $this->code)) {
      $labeltype = $langs->trans("Message");
    } else {
      if (!empty($arraylist[$labeltype])) {
        $labeltype = $arraylist[$labeltype];
      }
      if ($this->type_code == 'AC_OTH_AUTO' && ($this->type_code != $this->code) && $labeltype && !empty($arraylist[$this->code])) {
        $labeltype .= ' - '.$arraylist[$this->code]; // Use code in priority over type_code
      }
    }
 
    if ($this->type == 'systemauto' && $mode == 1) {
      $labeltype .= ' ('.$langs->trans("auto").')';
    }
    if ($this->type == 'systemauto' && $mode == 2) {
      $labeltype = $langs->trans("AutoActions").($this->type_code == 'AC_OTH_AUTO' ? '' : ': '.$labeltype);
    } elseif ($this->type != 'systemauto' && $mode == 2) {
      $labeltype = $langs->trans("ManualActions").($this->type_code == 'AC_OTH' ? '' : ': '.$labeltype);
    }
 
 
    return $labeltype;
  }
 
  public function setCategories($categories)
  {
    // Handle single category
    if (!is_array($categories)) {
      $categories = array($categories);
    }
 
    // Get current categories
    include_once DOL_DOCUMENT_ROOT.'/categories/class/categorie.class.php';
    $c = new Categorie($this->db);
    $existing = $c->containing($this->id, Categorie::TYPE_ACTIONCOMM, 'id');
 
    // Diff
    if (is_array($existing)) {
      $to_del = array_diff($existing, $categories);
      $to_add = array_diff($categories, $existing);
    } else {
      $to_del = array(); // Nothing to delete
      $to_add = $categories;
    }
 
    // Process
    foreach ($to_del as $del) {
      if ($c->fetch($del) > 0) {
        $c->del_type($this, Categorie::TYPE_ACTIONCOMM);
      }
    }
    foreach ($to_add as $add) {
      if ($c->fetch($add) > 0) {
        $c->add_type($this, Categorie::TYPE_ACTIONCOMM);
      }
    }
    return 1;
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function build_exportfile($format, $type, $cachedelay, $filename, $filters, $exportholiday = 0)
  {
    global $hookmanager;
 
    // phpcs:enable
    global $conf, $langs, $dolibarr_main_url_root, $mysoc;
 
    require_once DOL_DOCUMENT_ROOT."/core/lib/xcal.lib.php";
    require_once DOL_DOCUMENT_ROOT."/core/lib/date.lib.php";
    require_once DOL_DOCUMENT_ROOT."/core/lib/files.lib.php";
 
    dol_syslog(get_class($this)."::build_exportfile Build export file format=".$format.", type=".$type.", cachedelay=".$cachedelay.", filename=".$filename.", filters size=".count($filters), LOG_DEBUG);
 
    // Check parameters
    if (empty($format)) {
      return -1;
    }
 
    // Clean parameters
    if (!$filename) {
      $extension = 'vcs';
      if ($format == 'ical') {
        $extension = 'ics';
      }
      $filename = $format.'.'.$extension;
    }
 
    // Create dir and define output file (definitive and temporary)
    $result = dol_mkdir($conf->agenda->dir_temp);
    $outputfile = $conf->agenda->dir_temp.'/'.$filename;
 
    $result = 0;
 
    $buildfile = true;
    $login = '';
    $logina = '';
    $logint = '';
    $eventorganization = '';
 
    $now = dol_now();
 
    if ($cachedelay) {
      $nowgmt = dol_now();
      include_once DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php';
      if (dol_filemtime($outputfile) > ($nowgmt - $cachedelay)) {
        dol_syslog(get_class($this)."::build_exportfile file ".$outputfile." is not older than now - cachedelay (".$nowgmt." - ".$cachedelay."). Build is canceled");
        $buildfile = false;
      }
    }
 
    if ($buildfile) {
      // Build event array
      $eventarray = array();
 
      if (!empty($filters['module']) && $filters['module'] == 'project@eventorganization') {
        $sql = "SELECT p.rowid as id,";
        $sql .= " p.date_start_event as datep,"; // Start
        $sql .= " p.date_end_event as datep2,"; // End
        $sql .= " p.datec, p.tms as datem,";
        $sql .= " p.title as label, '' as code, p.note_public, p.note_private, 0 as type_id,";
        $sql .= " p.fk_soc,";
        $sql .= " p.fk_user_creat as fk_user_author, p.fk_user_modif as fk_user_mod,";
        $sql .= " 0 as fk_user_action,";
        $sql .= " 0 as fk_contact, 100 as percentage,";
        $sql .= " 0 as fk_element, '' as elementtype,";
        $sql .= " 1 as priority, 0 as fulldayevent, p.location, 0 as transparency,";
        $sql .= " u.firstname, u.lastname, '".$this->db->escape(getDolGlobalString("MAIN_INFO_SOCIETE_MAIL"))."' as email,";
        $sql .= " s.nom as socname,";
        $sql .= " 0 as type_id, '' as type_code, '' as type_label";
        $sql .= " FROM ".MAIN_DB_PREFIX."projet as p";
        $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."user as u on u.rowid = p.fk_user_creat"; // Link to get author of event for export
        $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."societe as s on s.rowid = p.fk_soc";
 
        $parameters = array('filters' => $filters);
        $reshook = $hookmanager->executeHooks('printFieldListFrom', $parameters); // Note that $action and $object may have been modified by hook
        $sql .= $hookmanager->resPrint;
 
        $sql .= " WHERE p.entity IN (".getEntity('project').")";
 
        foreach ($filters as $key => $value) {
          if ($key == 'notolderthan' && $value != '') {
            $sql .= " AND p.date_start_event >= '".$this->db->idate($now - ($value * 24 * 60 * 60))."'";
          }
          if ($key == 'year') {
            $sql .= " AND p.date_start_event BETWEEN '".$this->db->idate(dol_get_first_day($value, 1))."' AND '".$this->db->idate(dol_get_last_day($value, 12))."'";
          }
          if ($key == 'id') {
            $sql .= " AND p.id = ".(is_numeric($value) ? $value : 0);
          }
          if ($key == 'idfrom') {
            $sql .= " AND p.id >= ".(is_numeric($value) ? $value : 0);
          }
          if ($key == 'idto') {
            $sql .= " AND p.id <= ".(is_numeric($value) ? $value : 0);
          }
          if ($key == 'project') {
            $sql .= " AND p.rowid = ".(is_numeric($value) ? $value : 0);
          }
          if ($key == 'status') {
            $sql .= " AND p.fk_statut = ".((int) $value);
          }
          // TODO Add filters on event code of meetings/talks only
        }
 
        $sql .= " ORDER by date_start_event";
 
        $eventorganization = 'project';
      } else {
        $sql = "SELECT a.id,";
        $sql .= " a.datep,"; // Start
        $sql .= " a.datep2,"; // End
        $sql .= " a.datec, a.tms as datem,";
        $sql .= " a.label, a.code, '' as note_public, a.note as note_private, a.fk_action as type_id,";
        $sql .= " a.fk_soc,";
        $sql .= " a.fk_user_author, a.fk_user_mod,";
        $sql .= " a.fk_user_action,";
        $sql .= " a.fk_contact, a.percent as percentage,";
        $sql .= " a.fk_element, a.elementtype,";
        $sql .= " a.priority, a.fulldayevent, a.location, a.transparency,";
        $sql .= " u.firstname, u.lastname, u.email,";
        $sql .= " s.nom as socname,";
        $sql .= " c.id as type_id, c.code as type_code, c.libelle as type_label,";
        $sql .= " num_vote, event_paid, a.status";
        $sql .= " FROM (".MAIN_DB_PREFIX."c_actioncomm as c, ".MAIN_DB_PREFIX."actioncomm as a)";
        $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."user as u on u.rowid = a.fk_user_author"; // Link to get author of event for export
        $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."societe as s on s.rowid = a.fk_soc";
 
        $parameters = array('filters' => $filters);
        $reshook = $hookmanager->executeHooks('printFieldListFrom', $parameters); // Note that $action and $object may have been modified by hook
        $sql .= $hookmanager->resPrint;
 
        // We must filter on assignment table
        if (!empty($filters['logint']) && $filters['logint']) {
          $sql .= ", ".MAIN_DB_PREFIX."actioncomm_resources as ar";
        }
        $sql .= " WHERE a.fk_action = c.id";
        $sql .= " AND a.entity IN (".getEntity('agenda').")";
 
        foreach ($filters as $key => $value) {
          if ($key == 'notolderthan' && $value != '') {
            $sql .= " AND a.datep >= '".$this->db->idate($now - ($value * 24 * 60 * 60))."'";
          }
          if ($key == 'year') {
            $sql .= " AND a.datep BETWEEN '".$this->db->idate(dol_get_first_day($value, 1))."' AND '".$this->db->idate(dol_get_last_day($value, 12))."'";
          }
          if ($key == 'id') {
            $sql .= " AND a.id = ".(is_numeric($value) ? $value : 0);
          }
          if ($key == 'idfrom') {
            $sql .= " AND a.id >= ".(is_numeric($value) ? $value : 0);
          }
          if ($key == 'idto') {
            $sql .= " AND a.id <= ".(is_numeric($value) ? $value : 0);
          }
          if ($key == 'project') {
            $sql .= " AND a.fk_project = ".(is_numeric($value) ? $value : 0);
          }
          if ($key == 'notactiontype') {  // deprecated
            $sql .= " AND c.type <> '".$this->db->escape($value)."'";
          }
          if ($key == 'actiontype') { // 'system', 'systemauto', 'module', ...
            $newvalue = $value;
            $usenotin = 0;
            if (preg_match('/^!/', $newvalue)) {
              $newvalue = preg_replace('/^!/', '', $value);
              $usenotin = 1;
            }
            $arraynewvalue = explode(',', $newvalue);
            $newvalue = "";
            foreach ($arraynewvalue as $tmpval) {
              $newvalue .= ($newvalue ? "," : "")."'".$tmpval."'";
            }
            if ($usenotin) {
              $sql .= " AND c.type NOT IN (".$this->db->sanitize($newvalue, 1).")";
            } else {
              $sql .= " AND c.type IN (".$this->db->sanitize($newvalue, 1).")";
            }
          }
          if ($key == 'actioncode') { // 'AC_COMPANY_CREATE', 'AC_COMPANY_MODIFY', ...
            $newvalue = $value;
            $usenotin = 0;
            if (preg_match('/^!/', $newvalue)) {
              $newvalue = preg_replace('/^!/', '', $value);
              $usenotin = 1;
            }
            $arraynewvalue = explode(',', $newvalue);
            $newvalue = "";
            foreach ($arraynewvalue as $tmpval) {
              $newvalue .= ($newvalue ? "," : "")."'".$tmpval."'";
            }
            if ($usenotin) {
              $sql .= " AND a.code NOT IN (".$this->db->sanitize($newvalue, 1).")";
            } else {
              $sql .= " AND a.code IN (".$this->db->sanitize($newvalue, 1).")";
            }
          }
 
          // We must filter on assignment table
          if ($key == 'logint') {
            $sql .= " AND ar.fk_actioncomm = a.id AND ar.element_type='user'";
          }
          if ($key == 'logina') {
            $logina = $value;
            $sanitizedcondition = '=';
            if (preg_match('/^!/', $logina)) {
              $logina = preg_replace('/^!/', '', $logina);
              $sanitizedcondition = '<>';
            }
            $userforfilter = new User($this->db);
            $result = $userforfilter->fetch(0, $logina);
            if ($result > 0) {
              $sql .= " AND a.fk_user_author ".$sanitizedcondition." ".((int) $userforfilter->id);
            } elseif ($result < 0 || $sanitizedcondition == '=') {
              $sql .= " AND a.fk_user_author = 0";
            }
          }
          if ($key == 'logint') {
            $logint = $value;
            $sanitizedcondition = '=';
            if (preg_match('/^!/', $logint)) {
              $logint = preg_replace('/^!/', '', $logint);
              $sanitizedcondition = '<>';
            }
            $userforfilter = new User($this->db);
            $result = $userforfilter->fetch(0, $logint);
            if ($result > 0) {
              $sql .= " AND ar.fk_element = ".((int) $userforfilter->id);
            } elseif ($result < 0 || $sanitizedcondition == '=') {
              $sql .= " AND ar.fk_element = 0";
            }
          }
          if ($key == 'module') {
            if ($value == 'conforbooth@eventorganization') {
              $value = '@eventorganization';
            }
            $sql .= " AND c.module LIKE '%".$this->db->escape($value)."'";
          }
          if ($key == 'status') {
            $sql .= " AND a.status = ".((int) $value);
          }
        }
 
        $sql .= " AND a.datep IS NOT NULL"; // To exclude corrupted events and avoid errors in lightning/sunbird import
 
        $parameters = array('filters' => $filters);
        $reshook = $hookmanager->executeHooks('printFieldListWhere', $parameters); // Note that $action and $object may have been modified by hook
        $sql .= $hookmanager->resPrint;
 
        $sql .= " ORDER by datep";
      }
 
      if (!empty($filters['limit'])) {
        $sql .= $this->db->plimit((int) $filters['limit']);
      }
 
      //print $sql;exit;
 
      dol_syslog(get_class($this)."::build_exportfile select event(s)", LOG_DEBUG);
 
      $resql = $this->db->query($sql);
      if ($resql) {
        $diff = 0;
        while ($obj = $this->db->fetch_object($resql)) {
          $qualified = true;
 
          // 'eid','startdate','duration','enddate','title','summary','category','email','url','desc','author'
          $event = array();
          $event['uid'] = 'dolibarragenda-'.$obj->id."@".dol_getprefix('email');
          $event['type'] = $type;
 
          $datestart = (int) $this->db->jdate($obj->datep) - (getDolGlobalInt('AGENDA_EXPORT_FIX_TZ') * 3600);
 
          // fix for -> Warning: A non-numeric value encountered
          if (is_numeric($this->db->jdate($obj->datep2))) {
            $dateend = (int) $this->db->jdate($obj->datep2) - (getDolGlobalInt('AGENDA_EXPORT_FIX_TZ') * 3600);
          } else {
            // use start date as fall-back to avoid pb with empty end date on ICS readers
            $dateend = $datestart;
          }
 
          $duration = ($datestart && $dateend) ? ($dateend - $datestart) : 0;
          $event['summary'] = $obj->label.($obj->socname ? " (".$obj->socname.")" : "");
 
          if (!empty($filters['module']) && $filters['module'] == 'project@eventorganization') {
            $event['desc'] = $obj->note_public;
          } else {
            $event['desc'] = $obj->note_private;
          }
          $event['startdate'] = $datestart;
          $event['enddate'] = $dateend; // Not required with type 'journal'
          $event['duration'] = $duration; // Not required with type 'journal'
          $event['author'] = dolGetFirstLastname($obj->firstname, $obj->lastname);
          $event['priority'] = $obj->priority;
          $event['fulldayevent'] = $obj->fulldayevent;
          $event['location'] = $obj->location;
          $event['transparency'] = (($obj->transparency > 0) ? 'OPAQUE' : 'TRANSPARENT'); // OPAQUE (busy) or TRANSPARENT (not busy)
          $event['category'] = $obj->type_label;
          $event['email'] = $obj->email;
 
          // Public URL of event
          if ($eventorganization != '') {
            $link_subscription = $dolibarr_main_url_root.'/public/eventorganization/attendee_new.php?id='.((int) $obj->id).'&type=global&noregistration=1';
            $encodedsecurekey = dol_hash(getDolGlobalString('EVENTORGANIZATION_SECUREKEY').'conferenceorbooth'.((int) $obj->id), 'md5');
            $link_subscription .= '&securekey='.urlencode($encodedsecurekey);
 
            $event['url'] = $link_subscription;
          } else {
            $event['url'] = $dolibarr_main_url_root.'/comm/action/card.php?id='.$obj->id;
          }
 
          $event['created'] = (int) $this->db->jdate($obj->datec) - (getDolGlobalInt('AGENDA_EXPORT_FIX_TZ') * 3600);
          $event['modified'] = (int) $this->db->jdate($obj->datem) - (getDolGlobalInt('AGENDA_EXPORT_FIX_TZ') * 3600);
          $event['num_vote'] = $this->num_vote;
          $event['event_paid'] = $this->event_paid;
          $event['status'] = $this->status;
 
          // TODO: find a way to call "$this->fetch_userassigned();" without override "$this" properties
          $this->id = $obj->id;
          $this->fetch_userassigned(false);
 
          $assignedUserArray = array();
 
          foreach ($this->userassigned as $key => $value) {
            $assignedUser = new User($this->db);
            $assignedUser->fetch($value['id']);
 
            $assignedUserArray[$key] = $assignedUser;
          }
 
          if (empty($filters['module']) || $filters['module'] != 'project@eventorganization') {
            $event['assignedUsers'] = $assignedUserArray;
          }
 
          if ($qualified && $datestart) {
            $eventarray[] = $event;
          }
          $diff++;
        }
 
        $parameters = array('filters' => $filters, 'eventarray' => &$eventarray);
        $reshook = $hookmanager->executeHooks('addMoreEventsExport', $parameters); // Note that $action and $object may have been modified by hook
        if ($reshook > 0) {
          $eventarray = $hookmanager->resArray;
        }
      } else {
        $this->error = $this->db->lasterror();
        return -1;
      }
 
      if ($exportholiday == 1) {
        $langs->load("holiday");
        $title = $langs->transnoentities("Holidays");
 
        $sql = "SELECT u.rowid as uid, u.lastname, u.firstname, u.email, u.statut, x.rowid, x.date_debut as date_start, x.date_fin as date_end, x.halfday, x.statut as status";
        $sql .= " FROM ".MAIN_DB_PREFIX."holiday as x, ".MAIN_DB_PREFIX."user as u";
        $sql .= " WHERE u.rowid = x.fk_user";
        $sql .= " AND u.statut = '1'"; // Show only active users  (0 = inactive user, 1 = active user)
        $sql .= " AND (x.statut = '2' OR x.statut = '3')"; // Show only public leaves (2 = leave wait for approval, 3 = leave approved)
 
        $resql = $this->db->query($sql);
        if ($resql) {
          $num = $this->db->num_rows($resql);
          $i   = 0;
 
          while ($i < $num) {
            $obj   = $this->db->fetch_object($resql);
            $event = array();
 
            if ($obj->halfday == 1) {
              $event['fulldayevent'] = false;
 
              $timestampStart = dol_stringtotime($obj->date_start." 00:00:00", 0);
              $timestampEnd   = dol_stringtotime($obj->date_end." 12:00:00", 0);
            } elseif ($obj->halfday == -1) {
              $event['fulldayevent'] = false;
 
              $timestampStart = dol_stringtotime($obj->date_start." 12:00:00", 0);
              $timestampEnd   = dol_stringtotime($obj->date_end." 23:59:59", 0);
            } else {
              $event['fulldayevent'] = true;
 
              $timestampStart = dol_stringtotime($obj->date_start." 00:00:00", 0);
              $timestampEnd   = dol_stringtotime($obj->date_end." 23:59:59", 0);
            }
 
            if (getDolGlobalString('AGENDA_EXPORT_FIX_TZ')) {
              $timestampStart -= (getDolGlobalInt('AGENDA_EXPORT_FIX_TZ') * 3600);
              $timestampEnd   -= (getDolGlobalInt('AGENDA_EXPORT_FIX_TZ') * 3600);
            }
 
            $urlwithouturlroot = preg_replace('/'.preg_quote(DOL_URL_ROOT, '/').'$/i', '', trim($dolibarr_main_url_root));
            $urlwithroot       = $urlwithouturlroot.DOL_URL_ROOT;
            $url               = $urlwithroot.'/holiday/card.php?id='.$obj->rowid;
 
            $event['uid']          = 'dolibarrholiday-'.$obj->rowid."@".dol_getprefix('email');
            $event['author']       = dolGetFirstLastname($obj->firstname, $obj->lastname);
            $event['type']         = 'event';
            $event['category']     = "Holiday";
            $event['transparency'] = 'OPAQUE';
            $event['email']        = $obj->email;
            $event['created']      = $timestampStart;
            $event['modified']     = $timestampStart;
            $event['startdate']    = $timestampStart;
            $event['enddate']      = $timestampEnd;
            $event['duration']     = $timestampEnd - $timestampStart;
            $event['url']          = $url;
 
            if ($obj->status == 2) {
              // 2 = leave wait for approval
              $event['summary'] = $title." - ".$obj->lastname." (wait for approval)";
            } else {
              // 3 = leave approved
              $event['summary'] = $title." - ".$obj->lastname;
            }
 
            $eventarray[] = $event;
 
            $i++;
          }
        }
      }
 
      $langs->load("agenda");
 
      // Define title and desc
      $title = '';
      $more = '';
      if ($login) {
        $more = $langs->transnoentities("User").' '.$login;
      }
      if ($logina) {
        $more = $langs->transnoentities("ActionsAskedBy").' '.$logina;
      }
      if ($logint) {
        $more = $langs->transnoentities("ActionsToDoBy").' '.$logint;
      }
      if ($eventorganization) {
        $langs->load("eventorganization");
        $title = $langs->transnoentities("OrganizedEvent").(empty($eventarray[0]['label']) ? '' : ' '.$eventarray[0]['label']);
        $more = 'ICS file - '.$langs->transnoentities("OrganizedEvent").(empty($eventarray[0]['label']) ? '' : ' '.$eventarray[0]['label']);
      }
      if ($more) {
        if (empty($title)) {
          $title = 'Dolibarr actions '.$mysoc->name.' - '.$more;
        }
        $desc = $more;
        $desc .= ' ('.$mysoc->name.' - built by Dolibarr)';
      } else {
        if (empty($title)) {
          $title = $langs->transnoentities("Events").' '.$mysoc->name;
        }
        $desc = $langs->transnoentities('ListOfActions');
        $desc .= ' ('.$mysoc->name.' - built by Dolibarr)';
      }
 
      // Create temp file
      $outputfiletmp = tempnam($conf->agenda->dir_temp, 'tmp'); // Temporary file (allow call of function by different threads
      dolChmod($outputfiletmp);
 
      // Write file
      if ($format == 'vcal') {
        $result = build_calfile($format, $title, $desc, $eventarray, $outputfiletmp);
      } elseif ($format == 'ical') {
        $result = build_calfile($format, $title, $desc, $eventarray, $outputfiletmp);
      } elseif ($format == 'rss') {
        $result = build_rssfile($format, $title, $desc, $eventarray, $outputfiletmp);
      }
 
      if ($result >= 0) {
        if (dol_move($outputfiletmp, $outputfile, '0', 1, 0, 0)) {
          $result = 1;
        } else {
          $this->error = 'Failed to rename '.$outputfiletmp.' into '.$outputfile;
          dol_syslog(get_class($this)."::build_exportfile ".$this->error, LOG_ERR);
          dol_delete_file($outputfiletmp, 0, 1);
          $result = -1;
        }
      } else {
        dol_syslog(get_class($this)."::build_exportfile build_xxxfile function fails to for format=".$format." outputfiletmp=".$outputfile, LOG_ERR);
        dol_delete_file($outputfiletmp, 0, 1);
        $langs->load("errors");
        $this->error = $langs->trans("ErrorFailToCreateFile", $outputfile);
      }
    }
 
    return $result;
  }
 
  public function initAsSpecimen()
  {
    global $user;
 
    $now = dol_now();
 
    // Initialise parameters
    $this->id = 0;
    $this->specimen = 1;
 
    $this->type_code = 'AC_OTH';
    $this->code = 'AC_SPECIMEN_CODE';
    $this->label = 'Label of event Specimen';
    $this->datec = $now;
    $this->datem = $now;
    $this->datep = $now;
    $this->datef = $now;
    $this->fulldayevent = 0;
    $this->percentage = 0;
    $this->status = 0;
    $this->location = 'Location';
    $this->transparency = 1; // 1 means opaque
    $this->priority = 1;
    //$this->note_public = "This is a 'public' note.";
    $this->note_private = "This is a 'private' note.";
 
    $this->userownerid = $user->id;
    $this->userassigned[$user->id] = array('id' => $user->id, 'transparency' => 1);
    return 1;
  }
 
  public static function replaceThirdparty(DoliDB $dbs, $origin_id, $dest_id)
  {
    $tables = array(
      'actioncomm'
    );
 
    return CommonObject::commonReplaceThirdparty($dbs, $origin_id, $dest_id, $tables);
  }
 
  public static function replaceContact(DoliDB $dbs, $origin_id, $dest_id)
  {
    // llx_actioncomm_resources: UNIQUE(fk_actioncomm, element_type, fk_element)
    $sql = 'DELETE FROM '.$dbs->prefix().'actioncomm_resources WHERE rowid IN (';
    $sql .= ' SELECT x.rowid FROM (';
    $sql .= '  SELECT origin.rowid FROM '.$dbs->prefix().'actioncomm_resources as origin';
    $sql .= '  INNER JOIN '.$dbs->prefix().'actioncomm_resources as dest';
    $sql .= '   ON dest.fk_actioncomm = origin.fk_actioncomm AND dest.element_type = origin.element_type';
    $sql .= "  WHERE origin.element_type = 'socpeople'";
    $sql .= '   AND origin.fk_element = '.((int) $origin_id).' AND dest.fk_element = '.((int) $dest_id);
    $sql .= ' ) as x)';
    if (!$dbs->query($sql)) {
      return false;
    }
 
    $sql = 'UPDATE '.$dbs->prefix().'actioncomm_resources SET fk_element = '.((int) $dest_id);
    $sql .= " WHERE element_type = 'socpeople' AND fk_element = ".((int) $origin_id);
    if (!$dbs->query($sql)) {
      return false;
    }
 
    // llx_actioncomm_reminder: UNIQUE(fk_actioncomm, fk_user, fk_soc, fk_contact, typeremind, offsetvalue, offsetunit)
    $sql = 'DELETE FROM '.$dbs->prefix().'actioncomm_reminder WHERE rowid IN (';
    $sql .= ' SELECT x.rowid FROM (';
    $sql .= '  SELECT origin.rowid FROM '.$dbs->prefix().'actioncomm_reminder as origin';
    $sql .= '  INNER JOIN '.$dbs->prefix().'actioncomm_reminder as dest';
    $sql .= '   ON dest.fk_actioncomm = origin.fk_actioncomm AND dest.typeremind = origin.typeremind';
    $sql .= '   AND dest.offsetvalue = origin.offsetvalue AND dest.offsetunit = origin.offsetunit';
    // fk_user and fk_soc are part of the unique key and are nullable, hence the NULL safe
    // comparisons: the MySQL <=> operator is not portable to PostgreSQL
    $sql .= '   AND (dest.fk_user = origin.fk_user OR (dest.fk_user IS NULL AND origin.fk_user IS NULL))';
    $sql .= '   AND (dest.fk_soc = origin.fk_soc OR (dest.fk_soc IS NULL AND origin.fk_soc IS NULL))';
    $sql .= '  WHERE origin.fk_contact = '.((int) $origin_id).' AND dest.fk_contact = '.((int) $dest_id);
    $sql .= ' ) as x)';
    if (!$dbs->query($sql)) {
      return false;
    }
 
    $tables = array(
      'actioncomm', 'actioncomm_reminder'
    );
 
    return CommonObject::commonReplaceContact($dbs, $origin_id, $dest_id, $tables, 'fk_contact');
  }
 
  public static function replaceProduct(DoliDB $dbs, $origin_id, $dest_id)
  {
    $sql = 'UPDATE ' . MAIN_DB_PREFIX . 'actioncomm SET fk_element = ' . ((int) $dest_id) . ' WHERE elementtype="product" AND fk_element = '.((int) $origin_id);
    // using $dbs, not $this->db because function is static
    if (!$dbs->query($sql)) {
      //$this->errors = $dbs->lasterror();
      return false;
    }
 
    return true;
  }
 
  public function hasDelay()
  {
    global $conf;
 
    $now = dol_now();
 
    return $this->datep && ($this->datep < ($now - $conf->agenda->warning_delay));
  }
 
 
  public function loadReminders($type = '', $fk_user = 0, $onlypast = true)
  {
    $error = 0;
 
    $this->reminders = array();
 
    //Select all action comm reminders for event
    $sql = "SELECT rowid as id, typeremind, dateremind, status, offsetvalue, offsetunit, fk_user, fk_email_template, lasterror";
    $sql .= " FROM ".MAIN_DB_PREFIX."actioncomm_reminder";
    $sql .= " WHERE fk_actioncomm = ".((int) $this->id);
    if ($onlypast) {
      $sql .= " AND dateremind <= '".$this->db->idate(dol_now())."'";
    }
    if ($type) {
      $sql .= " AND typeremind = '".$this->db->escape($type)."'";
    }
    if ($fk_user > 0) {
      $sql .= " AND fk_user = ".((int) $fk_user);
    }
    if (!getDolGlobalString('AGENDA_REMINDER_EMAIL')) {
      $sql .= " AND typeremind <> 'email'";
    }
    if (!getDolGlobalString('AGENDA_REMINDER_BROWSER')) {
      $sql .= " AND typeremind <> 'browser'";
    }
 
    $sql .= $this->db->order("dateremind", "ASC");
    $resql = $this->db->query($sql);
 
    if ($resql) {
      while ($obj = $this->db->fetch_object($resql)) {
        $tmpactioncommreminder = new ActionCommReminder($this->db);
        $tmpactioncommreminder->id = $obj->id;
        $tmpactioncommreminder->typeremind = $obj->typeremind;
        $tmpactioncommreminder->dateremind = $this->db->jdate($obj->dateremind);
        $tmpactioncommreminder->offsetvalue = $obj->offsetvalue;
        $tmpactioncommreminder->offsetunit = $obj->offsetunit;
        $tmpactioncommreminder->status = $obj->status;
        $tmpactioncommreminder->fk_user = $obj->fk_user;
        $tmpactioncommreminder->fk_email_template = $obj->fk_email_template;
        $tmpactioncommreminder->lasterror = $obj->lasterror;
        $tmpactioncommreminder->fk_actioncomm = $this->id;
 
        $this->reminders[$obj->id] = $tmpactioncommreminder;
      }
    } else {
      $this->error = $this->db->lasterror();
      $error++;
    }
 
    return count($this->reminders);
  }
 
 
  public function sendEmailsReminder()
  {
    global $langs, $user;
 
    $error = 0;
    $this->output = '';
    $this->error = '';
    $nbMailSend = 0;
    $errorsMsg = array();
 
    if (!isModEnabled('agenda')) {  // Should not happen. If module disabled, cron job should not be visible.
      $langs->load("agenda");
      $this->output = $langs->trans('ModuleNotEnabled', $langs->transnoentitiesnoconv("Agenda"));
      return 0;
    }
    if (!getDolGlobalString('AGENDA_REMINDER_EMAIL')) {
      $langs->load("agenda");
      $this->output = $langs->trans('EventRemindersByEmailNotEnabled', $langs->transnoentitiesnoconv("Agenda"));
      return 0;
    }
 
    $now = dol_now();
    $actionCommReminder = new ActionCommReminder($this->db);
 
    dol_syslog(__METHOD__." start", LOG_INFO);
 
    $this->db->begin();
 
    //Select all action comm reminders
    $sql = "SELECT rowid as id FROM ".MAIN_DB_PREFIX."actioncomm_reminder";
    $sql .= " WHERE typeremind = 'email'";
    $sql .= " AND status = 0";  // 0=No yet sent, -1=Error. TODO Include reminder in error once we can count number of error, so we can try 5 times and not more on errors.
    $sql .= " AND dateremind <= '".$this->db->idate($now)."'";
    $sql .= " AND entity IN (".getEntity('actioncomm').")";
    $sql .= $this->db->order("dateremind", "ASC");
    $resql = $this->db->query($sql);
 
    if ($resql) {
      require_once DOL_DOCUMENT_ROOT.'/core/class/html.formmail.class.php';
      $formmail = new FormMail($this->db);
      $to = null;  // Ensure 'to' is defined for static analysis
 
      while ($obj = $this->db->fetch_object($resql)) {
        $res = $actionCommReminder->fetch($obj->id);
        if ($res < 0) {
          $error++;
          $errorsMsg[] = "Failed to load invoice ActionComm Reminder";
        }
 
        if (!$error) {
          //Select email template
          $arraymessage = $formmail->getEMailTemplate($this->db, 'actioncomm_send', $user, $langs, (!empty($actionCommReminder->fk_email_template)) ? $actionCommReminder->fk_email_template : -1, 1);
 
          // Load event
          $res = $this->fetch($actionCommReminder->fk_actioncomm);
          if ($res > 0) {
            // PREPARE EMAIL
            $errormesg = '';
            $this->fetch_thirdparty();
 
            // Make substitution in email content
            $substitutionarray = getCommonSubstitutionArray($langs, 0, null, $this);
 
            complete_substitutions_array($substitutionarray, $langs, $this);
 
            // Content
            $sendContent = make_substitutions($langs->trans($arraymessage->content), $substitutionarray);
 
            // Topic
            $sendTopic = (!empty($arraymessage->topic)) ? $arraymessage->topic : $langs->transnoentitiesnoconv('EventReminder');
            $sendTopic = make_substitutions($sendTopic, $substitutionarray);
 
            // Recipient
            $recipient = new User($this->db);
            $res = $recipient->fetch($actionCommReminder->fk_user);
            if ($res > 0) {
              if (!empty($recipient->email)) {
                $to = $recipient->email;
              } else {
                $errormesg = "Failed to send remind to user id=" . $actionCommReminder->fk_user . ". No email defined for user.";
                $error++;
              }
            } else {
              $errormesg = "Failed to load recipient with user id=" . $actionCommReminder->fk_user;
              $error++;
            }
 
            // Sender
            $from = getDolGlobalString('MAIN_MAIL_EMAIL_FROM');
            if (empty($from)) {
              $errormesg = "Failed to get sender into global setup MAIN_MAIL_EMAIL_FROM";
              $error++;
            }
 
            if (!$error) {
              // Errors Recipient
              $errors_to = getDolGlobalString('MAIN_MAIL_ERRORS_TO');
 
              // Mail Creation
              $cMailFile = new CMailFile($sendTopic, (string) $to, $from, $sendContent, array(), array(), array(), '', "", 0, 1, $errors_to, '', '', '', '', '');
 
              // Sending Mail
              if ($cMailFile->sendfile()) {
                $nbMailSend++;
              } else {
                $errormesg = 'Failed to send email to: ' . $to . ' ' . $cMailFile->error . implode(',', $cMailFile->errors);
                $error++;
              }
            }
 
            if (!$error) {
              $actionCommReminder->status = $actionCommReminder::STATUS_DONE;
 
              $res = $actionCommReminder->update($user);
              if ($res < 0) {
                $errorsMsg[] = "Failed to update status to done of ActionComm Reminder";
                $error++;
                break; // This is to avoid to have this error on all the selected email. If we fails here for one record, it may fails for others. We must solve first.
              }
            } else {
              $actionCommReminder->status = $actionCommReminder::STATUS_ERROR;
              $actionCommReminder->lasterror = dol_trunc($errormesg, 128, 'right', 'UTF-8', 1);
 
              $res = $actionCommReminder->update($user);
              if ($res < 0) {
                $errorsMsg[] = "Failed to update status to error of ActionComm Reminder";
                $error++;
                break; // This is to avoid to have this error on all the selected email. If we fails here for one record, it may fails for others. We must solve first.
              } else {
                $errorsMsg[] = $errormesg;
              }
            }
          } else {
            $errorsMsg[] = 'Failed to fetch record actioncomm with ID = '.$actionCommReminder->fk_actioncomm;
            $error++;
          }
        }
      }
    } else {
      $error++;
    }
 
    if (!$error) {
      // Delete also very old past events (we do not keep more than 1 month record in past)
      $sql = "DELETE FROM ".MAIN_DB_PREFIX."actioncomm_reminder";
      $sql .= " WHERE dateremind < '".$this->db->idate($now - (3600 * 24 * 32))."'";
      $sql .= " AND status = ".((int) $actionCommReminder::STATUS_DONE);
      $resql = $this->db->query($sql);
 
      if (!$resql) {
        $errorsMsg[] = 'Failed to delete old reminders';
        //$error++;   // If this fails, we must not rollback other SQL requests already done. Never mind.
      }
    }
 
    if (!$error) {
      $this->output = 'Nb of emails sent : '.$nbMailSend;
      $this->db->commit();
 
      dol_syslog(__METHOD__." end - ".$this->output, LOG_INFO);
 
      return 0;
    } else {
      $this->db->commit(); // We commit also on error, to have the error message recorded.
      $this->error = 'Nb of emails sent : '.$nbMailSend.', '.(!empty($errorsMsg) ? implode(', ', $errorsMsg) : $error);
 
      dol_syslog(__METHOD__." end - ".$this->error, LOG_INFO);
 
      return $error;
    }
  }
 
  public function sendSmsReminder()
  {
    global $langs, $user;
 
    $error = 0;
    $this->output = '';
    $this->error = '';
    $nbSmsSent = 0;
    $errorsMsg = array();
 
    if (!isModEnabled('agenda')) {  // Should not happen. If module disabled, cron job should not be visible.
      $langs->load("agenda");
      $this->output = $langs->trans('ModuleNotEnabled', $langs->transnoentitiesnoconv("Agenda"));
      return 0;
    }
    if (!getDolGlobalString('AGENDA_REMINDER_SMS')) {
      $langs->load("agenda");
      $this->output = $langs->trans('EventRemindersBySmsNotEnabled', $langs->transnoentitiesnoconv("Agenda"));
      return 0;
    }
 
    $now = dol_now();
    $actionCommReminder = new ActionCommReminder($this->db);
 
    dol_syslog(__METHOD__." start", LOG_INFO);
 
    $this->db->begin();
 
    //Select all action comm reminders
    $sql = "SELECT rowid as id FROM ".MAIN_DB_PREFIX."actioncomm_reminder";
    $sql .= " WHERE typeremind = 'sms'";
    $sql .= " AND status = 0";  // 0=No yet sent, -1=Error. TODO Include reminder in error once we can count number of error, so we can try 5 times and not more on errors.
    $sql .= " AND dateremind <= '".$this->db->idate($now)."'";
    $sql .= " AND entity IN (".getEntity('actioncomm').")";
    $sql .= $this->db->order("dateremind", "ASC");
    $resql = $this->db->query($sql);
 
    if ($resql) {
      require_once DOL_DOCUMENT_ROOT.'/core/class/html.formmail.class.php';
      $formmail = new FormMail($this->db);
      $to = null;  // Ensure 'to' is defined for static analysis
 
      while ($obj = $this->db->fetch_object($resql)) {
        $res = $actionCommReminder->fetch($obj->id);
        if ($res < 0) {
          $error++;
          $errorsMsg[] = "Failed to load invoice ActionComm Reminder";
        }
 
        if (!$error) {
          //Select email template
          $arraymessage = $formmail->getEMailTemplate($this->db, 'actioncomm_send', $user, $langs, (!empty($actionCommReminder->fk_email_template)) ? $actionCommReminder->fk_email_template : -1, 1);
 
          // Load event
          $res = $this->fetch($actionCommReminder->fk_actioncomm);
          if ($res > 0) {
            // PREPARE SMS
            $errormesg = '';
            $this->fetch_thirdparty();
 
            // Make substitution in email content
            $substitutionarray = getCommonSubstitutionArray($langs, 0, null, $this);
 
            complete_substitutions_array($substitutionarray, $langs, $this);
 
            // Content
            $sendContent = dol_string_nohtmltag(make_substitutions($langs->trans($arraymessage->content), $substitutionarray));
 
            // Topic
            // $sendTopic = (!empty($arraymessage->topic)) ? $arraymessage->topic : html_entity_decode($langs->transnoentities('EventReminder'));
 
            // Recipient
            $recipient = new User($this->db);
            $res = $recipient->fetch($actionCommReminder->fk_user);
            if ($res > 0) {
              if (!empty($recipient->user_mobile)) {
                $to = $recipient->user_mobile;
              } else {
                $errormesg = "Failed to send remind to user id=" . $actionCommReminder->fk_user . ". No email defined for user.";
                $error++;
              }
            } else {
              $errormesg = "Failed to load recipient with user id=" . $actionCommReminder->fk_user;
              $error++;
            }
 
            // Sender
            $from = getDolGlobalString('MAIN_SMS_FROM');
            if (empty($from)) {
              $errormesg = "Failed to get sender into global setup MAIN_SMS_FROM";
              $error++;
            }
 
            if (!$error) {
              // Errors Recipient
              // $errors_to = getDolGlobalString('MAIN_MAIL_ERRORS_TO');
 
              // Sms Creation
              $CSMSFile = new CSMSFile((string) $to, $from, $sendContent, 0, 0, 3, 1);
 
              // Sending Mail
              if ($CSMSFile->sendfile()) {
                $nbSmsSent++;
              } else {
                $errormesg = 'Failed to send email to: ' . $to . ' ' . $CSMSFile->error . implode(',', $CSMSFile->errors);
                $error++;
              }
            }
 
            if (!$error) {
              $actionCommReminder->status = $actionCommReminder::STATUS_DONE;
 
              $res = $actionCommReminder->update($user);
              if ($res < 0) {
                $errorsMsg[] = "Failed to update status to done of ActionComm Reminder";
                $error++;
                break; // This is to avoid to have this error on all the selected email. If we fails here for one record, it may fails for others. We must solve first.
              }
            } else {
              $actionCommReminder->status = $actionCommReminder::STATUS_ERROR;
              $actionCommReminder->lasterror = dol_trunc($errormesg, 128, 'right', 'UTF-8', 1);
 
              $res = $actionCommReminder->update($user);
              if ($res < 0) {
                $errorsMsg[] = "Failed to update status to error of ActionComm Reminder";
                $error++;
                break; // This is to avoid to have this error on all the selected email. If we fails here for one record, it may fails for others. We must solve first.
              } else {
                $errorsMsg[] = $errormesg;
              }
            }
          } else {
            $errorsMsg[] = 'Failed to fetch record actioncomm with ID = '.$actionCommReminder->fk_actioncomm;
            $error++;
          }
        }
      }
    } else {
      $error++;
    }
 
    if (!$error) {
      // Delete also very old past events (we do not keep more than 1 month record in past)
      $sql = "DELETE FROM ".MAIN_DB_PREFIX."actioncomm_reminder";
      $sql .= " WHERE dateremind < '".$this->db->idate($now - (3600 * 24 * 32))."'";
      $sql .= " AND status = ".((int) $actionCommReminder::STATUS_DONE);
      $resql = $this->db->query($sql);
 
      if (!$resql) {
        $errorsMsg[] = 'Failed to delete old reminders';
        //$error++;   // If this fails, we must not rollback other SQL requests already done. Never mind.
      }
    }
 
    if (!$error) {
      $this->output = 'Nb of SMS sent : '.$nbSmsSent;
      $this->db->commit();
      dol_syslog(__METHOD__." end - ".$this->output, LOG_INFO);
 
      return 0;
    } else {
      $this->db->commit(); // We commit also on error, to have the error message recorded.
      $this->error = 'Nb of SMS sent : '.$nbSmsSent.', '.(!empty($errorsMsg) ? implode(', ', $errorsMsg) : $error);
      dol_syslog(__METHOD__." end - ".$this->error, LOG_INFO);
 
      return $error;
    }
  }
 
  public function updatePercent($id, $percent, $usermodid = 0)
  {
    $this->db->begin();
 
    $sql = "UPDATE ".MAIN_DB_PREFIX."actioncomm ";
    $sql .= " SET percent = ".(int) $percent;
    if ($usermodid > 0) {
      $sql .= ", fk_user_mod = ".((int) $usermodid);
    }
    $sql .= " WHERE id = ".((int) $id);
 
    if ($this->db->query($sql)) {
      $this->db->commit();
      return 1;
    } else {
      $this->db->rollback();
      $this->error = $this->db->lasterror();
      return -1;
    }
  }
}