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-2020  Frédéric France         <frederic.france@netlogic.fr>
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 3 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program. If not, see <https://www.gnu.org/licenses/>.
 */

require_once DOL_DOCUMENT_ROOT.'/comm/action/class/cactioncomm.class.php';
require_once DOL_DOCUMENT_ROOT.'/core/class/commonobject.class.php';
require_once DOL_DOCUMENT_ROOT.'/core/class/html.formmail.class.php';
require_once DOL_DOCUMENT_ROOT.'/core/class/CMailFile.class.php';
require_once DOL_DOCUMENT_ROOT.'/comm/action/class/actioncommreminder.class.php';


class ActionComm extends CommonObject
{
  public $element = 'action';

  public $table_element = 'actioncomm';

  public $table_rowid = 'id';

  public $picto = 'action';

  public $ismultientitymanaged = 1;

  public $restrictiononfksoc = 2;

  public $id;

  public $ref;

  public $type_id;

  public $type_code;

  public $type_label;

  public $type;

  public $type_color;

  public $code;

  public $label;

  public $datec;

  public $datef;

  public $duree;

  public $datem;

  public $author;

  public $usermod;

  public $authorid;

  public $usermodid;

  public $datep;

  public $datep2;

  public $durationp = -1;

  public $fulldayevent = 0;

  public $percentage;

  public $location;

  public $transparency;

  public $priority;

  public $userassigned = array();

  public $userownerid;

  public $userdoneid;

  public $socpeopleassigned = array();

  public $otherassigned = array();

  public $reminders = array();

  public $usertodo;

  public $userdone;

  public $socid;

  public $contactid;

  public $societe;

  public $contact;

  // Properties for links to other objects
  public $fk_element; // Id of record

  public $elementid;

  public $elementtype;

  public $icalname;

  public $icalcolor;

  public $extraparams;

  public $actions = array();

  public $email_msgid;

  public $email_from;

  public $email_sender;

  public $email_to;

  public $email_tocc;
  public $email_tobcc;

  public $email_subject;

  public $errors_to;

  const EVENT_TODO = 0;

  const EVENT_IN_PROGRESS = 50;

  const EVENT_FINISHED = 100;

  public function __construct(DoliDB $db)
  {
    $this->db = $db;
  }

  public function create(User $user, $notrigger = 0)
  {
    global $langs, $conf, $hookmanager;

    $error = 0;
    $now = dol_now();

    // Check parameters
    if (!isset($this->userownerid) || $this->userownerid === '')  // $this->userownerid may be 0 (anonymous event) of > 0
    {
      dol_syslog("You tried to create an event but mandatory property ownerid was not defined", LOG_WARNING);
      $this->errors[] = 'ErrorPropertyUserowneridNotDefined';
      return -1;
    }

    // Clean parameters
    $this->label = dol_trunc(trim($this->label), 128);
    $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 ($this->percentage == 100 && ! $this->dateend) $this->dateend = $this->date;
    if (!empty($this->datep) && !empty($this->datef))   $this->durationp = ($this->datef - $this->datep); // deprecated
    //if (! empty($this->date)  && ! empty($this->dateend)) $this->durationa=($this->dateend - $this->date);
    if (!empty($this->datep) && !empty($this->datef) && $this->datep > $this->datef) $this->datef = $this->datep;
    //if (! empty($this->date)  && ! empty($this->dateend) && $this->date > $this->dateend) $this->dateend=$this->date;
    if (!isset($this->fk_project) || $this->fk_project < 0) $this->fk_project = 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 (!is_array($this->userassigned) && !empty($this->userassigned))  // For backward compatibility when userassigned was an int instead fo array
    {
      $tmpid = $this->userassigned;
      $this->userassigned = array();
      $this->userassigned[$tmpid] = array('id'=>$tmpid, 'transparency'=>$this->transparency);
    }

    $userownerid = $this->userownerid;
    $userdoneid = $this->userdoneid;

    // 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 = 'Failed to get record with id '.$this->type_id.' code '.$this->type_code.' from dictionary "type of events"';
        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;
    }

    $this->db->begin();

    $sql = "INSERT INTO ".MAIN_DB_PREFIX."actioncomm";
    $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_user_done,";
    $sql .= "label,percent,priority,fulldayevent,location,";
    $sql .= "transparency,";
    $sql .= "fk_element,";
    $sql .= "elementtype,";
    $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 .= ") VALUES (";
    $sql .= "'".$this->db->idate($now)."', ";
    $sql .= (strval($this->datep) != '' ? "'".$this->db->idate($this->datep)."'" : "null").", ";
    $sql .= (strval($this->datef) != '' ? "'".$this->db->idate($this->datef)."'" : "null").", ";
    $sql .= ((isset($this->durationp) && $this->durationp >= 0 && $this->durationp != '') ? "'".$this->db->escape($this->durationp)."'" : "null").", "; // deprecated
    $sql .= (isset($this->type_id) ? $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) ? $this->socid : "null").", ";
    $sql .= ((isset($this->fk_project) && $this->fk_project > 0) ? $this->fk_project : "null").", ";
    $sql .= " '".$this->db->escape($this->note_private)."', ";
    $sql .= ((isset($this->contact_id) && $this->contact_id > 0) ? $this->contact_id : "null").", "; // deprecated, use ->socpeopleassigned
    $sql .= (isset($user->id) && $user->id > 0 ? $user->id : "null").", ";
    $sql .= ($userownerid > 0 ? $userownerid : "null").", ";
    $sql .= ($userdoneid > 0 ? $userdoneid : "null").", ";
    $sql .= "'".$this->db->escape($this->label)."','".$this->db->escape($this->percentage)."','".$this->db->escape($this->priority)."','".$this->db->escape($this->fulldayevent)."','".$this->db->escape($this->location)."', ";
    $sql .= "'".$this->db->escape($this->transparency)."', ";
    $sql .= (!empty($this->fk_element) ? $this->fk_element : "null").", ";
    $sql .= (!empty($this->elementtype) ? "'".$this->db->escape($this->elementtype)."'" : "null").", ";
    $sql .= $conf->entity.",";
    $sql .= (!empty($this->extraparams) ? "'".$this->db->escape($this->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 .= ")";

    dol_syslog(get_class($this)."::add", LOG_DEBUG);
    $resql = $this->db->query($sql);
    if ($resql)
    {
      $this->ref = $this->id = $this->db->last_insert_id(MAIN_DB_PREFIX."actioncomm", "id");

      // Now insert assigned users
      if (!$error)
      {
        //dol_syslog(var_export($this->userassigned, true));
        foreach ($this->userassigned as $key => $val)
        {
          if (!is_array($val))  // For backward compatibility when val=id
          {
            $val = array('id'=>$val);
          }

          if ($val['id'] > 0)
          {
            $sql = "INSERT INTO ".MAIN_DB_PREFIX."actioncomm_resources(fk_actioncomm, element_type, fk_element, mandatory, transparency, answer_status)";
            $sql .= " VALUES(".$this->id.", 'user', ".$val['id'].", ".(empty($val['mandatory']) ? '0' : $val['mandatory']).", ".(empty($val['transparency']) ? '0' : $val['transparency']).", ".(empty($val['answer_status']) ? '0' : $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();
            }
            //var_dump($sql);exit;
          }
        }
      }

      if (!$error)
      {
        if (!empty($this->socpeopleassigned))
        {
          foreach ($this->socpeopleassigned as $id => $val)
          {
            $sql = "INSERT INTO ".MAIN_DB_PREFIX."actioncomm_resources(fk_actioncomm, element_type, fk_element, mandatory, transparency, answer_status)";
            $sql .= " VALUES(".$this->id.", 'socpeople', ".$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();
            }
          }
        }
      }

      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 $db, $conf, $hookmanager;

    $error = 0;
    $now = dol_now();

    $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;

    // Create clone
    $this->context['createfromclone'] = 'createfromclone';
    $result = $this->create($fuser);
    if ($result < 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) $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 = '')
  {
    global $langs;

    $sql = "SELECT a.id,";
    $sql .= " a.id 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,";
    $sql .= " a.fk_soc,";
    $sql .= " a.fk_project,";
    $sql .= " a.fk_user_author, a.fk_user_mod,";
    $sql .= " a.fk_user_action, a.fk_user_done,";
    $sql .= " a.fk_contact, a.percent as percentage,";
    $sql .= " a.fk_element as elementid, a.elementtype,";
    $sql .= " a.priority, a.fulldayevent, a.location, a.transparency,";
    $sql .= " a.email_msgid, a.email_subject, a.email_from, a.email_to, a.email_tocc, a.email_tobcc, a.errors_to,";
    $sql .= " c.id as type_id, 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 .= " 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.id = ".((int) $ref); // No field ref, we use id
    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;
        $transcode = $langs->trans("Action".$obj->type_code);
        $this->type       = (($transcode != "Action".$obj->type_code) ? $transcode : $obj->type_label);
        $transcode = $langs->trans("Action".$obj->type_code.'Short');
        $this->type_short = (($transcode != "Action".$obj->type_code.'Short') ? $transcode : '');

        $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; // deprecated
        $this->note_private = $obj->note;
        $this->percentage = $obj->percentage;

        $this->authorid = $obj->fk_user_author;
        $this->usermodid = $obj->fk_user_mod;

        if (!is_object($this->author)) $this->author = new stdClass(); // 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 stdClass(); // To avoid warning
        $this->usermod->id = $obj->fk_user_mod; // deprecated

        $this->userownerid = $obj->fk_user_action;
        $this->userdoneid = $obj->fk_user_done;
        $this->priority       = $obj->priority;
        $this->fulldayevent     = $obj->fulldayevent;
        $this->location       = $obj->location;
        $this->transparency     = $obj->transparency;

        $this->socid = $obj->fk_soc; // To have fetch_thirdparty method working
        $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->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 = '.$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 = ".$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($notrigger = 0)
  {
    global $user;

    $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=".$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=".$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 = ".$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=".$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, $notrigger = 0)
  {
    global $langs, $conf, $hookmanager;

    $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;

    // Check parameters
    if ($this->percentage == 0 && $this->userdoneid > 0)
    {
      $this->error = "ErrorCantSaveADoneUserWithZeroPercentage";
      return -1;
    }

    $socid = (($this->socid > 0) ? $this->socid : 0);
    $contactid = (($this->contact_id > 0) ? $this->contact_id : 0);
    $userownerid = ($this->userownerid ? $this->userownerid : 0);
    $userdoneid = ($this->userdoneid ? $this->userdoneid : 0);

    $this->db->begin();

    $sql = "UPDATE ".MAIN_DB_PREFIX."actioncomm ";
    $sql .= " SET percent = '".$this->db->escape($this->percentage)."'";
    if ($this->type_id > 0) $sql .= ", fk_action = '".$this->db->escape($this->type_id)."'";
    $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($this->durationp)."'" : "null"); // deprecated
    $sql .= ", note = '".$this->db->escape($this->note_private)."'";
    $sql .= ", fk_project =".($this->fk_project > 0 ? $this->fk_project : "null");
    $sql .= ", fk_soc =".($socid > 0 ? $socid : "null");
    $sql .= ", fk_contact =".($contactid > 0 ? $contactid : "null");
    $sql .= ", priority = '".$this->db->escape($this->priority)."'";
    $sql .= ", fulldayevent = '".$this->db->escape($this->fulldayevent)."'";
    $sql .= ", location = ".($this->location ? "'".$this->db->escape($this->location)."'" : "null");
    $sql .= ", transparency = '".$this->db->escape($this->transparency)."'";
    $sql .= ", fk_user_mod = ".$user->id;
    $sql .= ", fk_user_action = ".($userownerid > 0 ? "'".$this->db->escape($userownerid)."'" : "null");
    $sql .= ", fk_user_done = ".($userdoneid > 0 ? "'".$this->db->escape($userdoneid)."'" : "null");
    if (!empty($this->fk_element)) $sql .= ", fk_element=".($this->fk_element ? $this->db->escape($this->fk_element) : "null");
    if (!empty($this->elementtype)) $sql .= ", elementtype=".($this->elementtype ? "'".$this->db->escape($this->elementtype)."'" : "null");
    $sql .= " WHERE id=".$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 = ".$this->id." AND element_type = 'user'";
        $resql = $this->db->query($sql);

        foreach ($this->userassigned as $key => $val)
        {
          if (!is_array($val))  // For backward compatibility when val=id
          {
            $val = array('id'=>$val);
          }
          $sql = "INSERT INTO ".MAIN_DB_PREFIX."actioncomm_resources(fk_actioncomm, element_type, fk_element, mandatory, transparency, answer_status)";
          $sql .= " VALUES(".$this->id.", 'user', ".$val['id'].", ".(empty($val['mandatory']) ? '0' : $val['mandatory']).", ".(empty($val['transparency']) ? '0' : $val['transparency']).", ".(empty($val['answer_status']) ? '0' : $val['answer_status']).")";

          $resql = $this->db->query($sql);
          if (!$resql)
          {
            $error++;
              $this->errors[] = $this->db->lasterror();
          }
          //var_dump($sql);exit;
        }
      }

      if (!$error)
      {
        $sql = "DELETE FROM ".MAIN_DB_PREFIX."actioncomm_resources where fk_actioncomm = ".$this->id." AND element_type = 'socpeople'";
        $resql = $this->db->query($sql);

        if (!empty($this->socpeopleassigned))
        {
          foreach (array_keys($this->socpeopleassigned) as $id)
          {
            $sql = "INSERT INTO ".MAIN_DB_PREFIX."actioncomm_resources(fk_actioncomm, element_type, fk_element, mandatory, transparency, answer_status)";
            $sql .= " VALUES(".$this->id.", 'socpeople', ".$id.", 0, 0, 0)";

            $resql = $this->db->query($sql);
            if (!$resql)
            {
              $error++;
              $this->errors[] = $this->db->lasterror();
            }
          }
        }
      }

      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 ".join(',', $this->errors), LOG_ERR);
        return -2;
      }
    } else {
      $this->db->rollback();
      $this->error = $this->db->lasterror();
      return -1;
    }
  }

  public static function getActions($db, $socid = 0, $fk_element = 0, $elementtype = '', $filter = '', $sortfield = 'a.datep', $sortorder = 'DESC', $limit = 0)
  {
    global $conf, $langs;

    $resarray = array();

    dol_syslog(get_class()."::getActions", LOG_DEBUG);

    $sql = "SELECT a.id";
    $sql .= " FROM ".MAIN_DB_PREFIX."actioncomm as a";
    $sql .= " WHERE a.entity IN (".getEntity('agenda').")";
    if (!empty($socid)) $sql .= " AND a.fk_soc = ".$socid;
    if (!empty($elementtype))
    {
      if ($elementtype == 'project') {
        $sql .= ' AND a.fk_project = '.$fk_element;
      }
      elseif ($elementtype == 'contact') {
        $sql .= ' AND a.id IN';
        $sql .= " (SELECT fk_actioncomm FROM ".MAIN_DB_PREFIX."actioncomm_resources WHERE";
        $sql .= " element_type = 'socpeople' AND fk_element = ".$fk_element.')';
      }
      else {
        $sql .= " AND a.fk_element = ".(int) $fk_element." AND a.elementtype = '".$db->escape($elementtype)."'";
      }
    }
    if (!empty($filter)) $sql .= $filter;
    if ($sortorder && $sortfield) $sql .= $db->order($sortfield, $sortorder);
    $sql .= $db->plimit($limit, 0);

    $resql = $db->query($sql);
    if ($resql)
    {
      $num = $db->num_rows($resql);

      if ($num)
      {
        for ($i = 0; $i < $num; $i++)
        {
          $obj = $db->fetch_object($resql);
          $actioncommstatic = new ActionComm($db);
          $actioncommstatic->fetch($obj->id);
          $resarray[$i] = $actioncommstatic;
        }
      }
      $db->free($resql);
      return $resarray;
    } else {
      return $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)) {
      $sql = "SELECT a.id, a.datep as dp";
    } else {
      $this->nb = array();
      $sql = "SELECT count(a.id) as nb";
    }
    $sql .= " FROM ".MAIN_DB_PREFIX."actioncomm as a";
    if (!$user->rights->societe->client->voir && !$user->socid) $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."societe_commerciaux as sc ON a.fk_soc = sc.fk_soc";
      if (!$user->rights->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 = ".$user->id;
      }
    $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."societe as s ON a.fk_soc = s.rowid";
    $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->rights->societe->client->voir && !$user->socid) $sql .= " AND (a.fk_soc IS NULL OR sc.fk_user = ".$user->id.")";
    if ($user->socid) $sql .= " AND a.fk_soc = ".$user->socid;
    if (!$user->rights->agenda->allactions->read) {
          $sql .= " AND (a.fk_user_author = ".$user->id." OR a.fk_user_action = ".$user->id." OR a.fk_user_done = ".$user->id;
          $sql .= " OR ar.fk_element = ".$user->id; // Added by PV
          $sql .= ")";
    }

    $resql = $this->db->query($sql);
    if ($resql)
    {
      if (empty($load_state_board)) {
        $agenda_static = new ActionComm($this->db);
        $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?action=show_list&actioncode=0&status=todo&mainmenu=agenda';
        if ($user->rights->agenda->allactions->read) $response->url .= '&filtert=-1';
        $response->img = img_object('', "action", 'class="inline-block valigntextmiddle"');
      }
      // This assignment in condition is not a bug. It allows walking the results.
      while ($obj = $this->db->fetch_object($resql)) {
        if (empty($load_state_board)) {
          $response->nbtodo++;
          $agenda_static->datep = $this->db->jdate($obj->dp);
          if ($agenda_static->hasDelay()) $response->nbtodolate++;
        } else {
          $this->nb["actionscomm"] = $obj->nb;
        }
      }

      $this->db->free($resql);
      if (empty($load_state_board)) 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 = '.$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;
        if ($obj->fk_user_author)
        {
          $cuser = new User($this->db);
          $cuser->fetch($obj->fk_user_author);
          $this->user_creation = $cuser;
        }
        if ($obj->fk_user_mod)
        {
          $muser = new User($this->db);
          $muser->fetch($obj->fk_user_mod);
          $this->user_modification = $muser;
        }

        $this->date_creation = $this->db->jdate($obj->datec);
        if (!empty($obj->fk_user_mod)) $this->date_modification = $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->trans('StatusNotApplicable');
      if ($percent == -1 && !$hidenastatus) $labelStatus = $langs->trans('StatusNotApplicable');
      elseif ($percent == 0) $labelStatus = $langs->trans('StatusActionToDo').' (0%)';
      elseif ($percent > 0 && $percent < 100) $labelStatus = $langs->trans('StatusActionInProcess').' ('.$percent.'%)';
      elseif ($percent >= 100) $labelStatus = $langs->trans('StatusActionDone').' (100%)';

    $labelStatusShort = $langs->trans('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';

    return dolGetStatus($labelStatus, $labelStatusShort, '', $statusType, $mode);
  }

  public function getNomUrl($withpicto = 0, $maxlength = 0, $classname = '', $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->rights->agenda->myactions->read && $this->authorid == $user->id) $canread = 1; // Can read my event
    if ($user->rights->agenda->myactions->read && array_key_exists($user->id, $this->userassigned)) $canread = 1; // Can read my event i am assigned
    if ($user->rights->agenda->allactions->read) $canread = 1; // Can read all event of other
    if (!$canread)
    {
      $option = 'nolink';
    }

    $label = $this->label;
    if (empty($label)) $label = $this->libelle; // For backward compatibility

    $result = '';

    // Set label of type
    $labeltype = '';
    if ($this->type_code)
    {
      $labeltype = ($langs->transnoentities("Action".$this->type_code) != "Action".$this->type_code) ? $langs->transnoentities("Action".$this->type_code) : $this->type_label;
    }
    if (empty($conf->global->AGENDA_USE_EVENT_TYPE))
    {
      if ($this->type_code != 'AC_OTH_AUTO') $labeltype = $langs->trans('ActionAC_MANUAL');
    }

    $tooltip = img_picto('', $this->picto).' <u>'.$langs->trans('Action').'</u>';
    if (!empty($this->ref))
      $tooltip .= '<br><b>'.$langs->trans('Ref').':</b> '.$this->ref;
    if (!empty($label))
      $tooltip .= '<br><b>'.$langs->trans('Title').':</b> '.$label;
    if (!empty($labeltype))
      $tooltip .= '<br><b>'.$langs->trans('Type').':</b> '.$labeltype;
    if (!empty($this->location))
      $tooltip .= '<br><b>'.$langs->trans('Location').':</b> '.$this->location;
    if (isset($this->transparency))
      $tooltip .= '<br><b>'.$langs->trans('Busy').':</b> '.yn($this->transparency);
    if (!empty($this->note_private))
      $tooltip .= '<br><b>'.$langs->trans('Note').':</b> '.(dol_textishtml($this->note_private) ? str_replace(array("\r", "\n"), "", $this->note_private) : str_replace(array("\r", "\n"), '<br>', $this->note_private));
    $linkclose = '';
    if (!empty($conf->global->AGENDA_USE_EVENT_TYPE) && $this->type_color)
      $linkclose = ' style="background-color:#'.$this->type_color.'"';

    if (empty($notooltip))
    {
      if (!empty($conf->global->MAIN_OPTIMIZEFORTEXTBROWSER))
      {
        $label = $langs->trans("ShowAction");
        $linkclose .= ' alt="'.dol_escape_htmltag($tooltip, 1).'"';
      }
      $linkclose .= ' title="'.dol_escape_htmltag($tooltip, 1).'"';
      $linkclose .= ' class="'.$classname.' classfortooltip"';

      /*
        $hookmanager->initHooks(array('actiondao'));
        $parameters=array('id'=>$this->id);
        $reshook=$hookmanager->executeHooks('getnomurltooltip',$parameters,$this,$action);    // Note that $action and $object may have been modified by some hooks
        $linkclose = ($hookmanager->resPrint ? $hookmanager->resPrint : $linkclose);
        */
    } else $linkclose .= ' class="'.$classname.'"';

    $url = '';
    if ($option == 'birthday')
      $url = DOL_URL_ROOT.'/contact/perso.php?id='.$this->id;
    elseif ($option == 'holiday')
      $url = DOL_URL_ROOT.'/holiday/card.php?id='.$this->id;
    else $url = DOL_URL_ROOT.'/comm/action/card.php?id='.$this->id;
    if ($option !== 'nolink')
    {
      // Add param to save lastsearch_values or not
      $add_save_lastsearch_values = ($save_lastsearch_value == 1 ? 1 : 0);
      if ($save_lastsearch_value == -1 && preg_match('/list\.php/', $_SERVER["PHP_SELF"])) $add_save_lastsearch_values = 1;
      if ($add_save_lastsearch_values) $url .= '&save_lastsearch_values=1';
    }

    $linkstart = '<a href="'.$url.'"';
    $linkstart .= $linkclose.'>';
    $linkend = '</a>';

    if ($option == 'nolink') {
      $linkstart = '';
      $linkend = '';
    }

    if ($withpicto == 2)
    {
      $libelle = $label;
      if (!empty($conf->global->AGENDA_USE_EVENT_TYPE)) $libelle = $labeltype;
      $libelleshort = '';
    } else {
      $libelle = (empty($this->libelle) ? $label : $this->libelle.(($label && $label != $this->libelle) ? ' '.$label : ''));
      if (!empty($conf->global->AGENDA_USE_EVENT_TYPE) && empty($libelle)) $libelle = $labeltype;
      if ($maxlength < 0) $libelleshort = $this->ref;
      else $libelleshort = dol_trunc($libelle, $maxlength);
    }

    if ($withpicto)
    {
      if (!empty($conf->global->AGENDA_USE_EVENT_TYPE)) // Add code into ()
      {
        if ($labeltype)
        {
          $libelle .= (preg_match('/'.preg_quote($labeltype, '/').'/', $libelle) ? '' : ' ('.$langs->transnoentities("Action".$this->type_code).')');
        }
      }
    }

    $result .= $linkstart;
    if ($withpicto) $result .= img_object(($notooltip ? '' : $langs->trans("ShowAction").': '.$libelle), ($overwritepicto ? $overwritepicto : 'action'), ($notooltip ? 'class="'.(($withpicto != 2) ? 'paddingright ' : '').'"' : 'class="'.(($withpicto != 2) ? 'paddingright ' : '').'classfortooltip"'), 0, 0, $notooltip ? 0 : 1);
    $result .= $libelleshort;
    $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 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;
  }

  // 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 = ''; $logind = ''; $logint = '';

    $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();

      $sql = "SELECT a.id,";
      $sql .= " a.datep,"; // Start
      $sql .= " a.datep2,"; // End
      $sql .= " a.durationp,"; // deprecated
      $sql .= " a.datec, a.tms as datem,";
      $sql .= " a.label, a.code, a.note, 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 .= " 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 assignement table
      if ($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 == 'actiontype')    $sql .= " AND c.type = '".$this->db->escape($value)."'";
        if ($key == 'notactiontype') $sql .= " AND c.type <> '".$this->db->escape($value)."'";
        // We must filter on assignement table
        if ($key == 'logint')       $sql .= " AND ar.fk_actioncomm = a.id AND ar.element_type='user'";
        if ($key == 'logina')
        {
          $logina = $value;
          $condition = '=';
          if (preg_match('/^!/', $logina))
          {
            $logina = preg_replace('/^!/', '', $logina);
            $condition = '<>';
          }
          $userforfilter = new User($this->db);
          $result = $userforfilter->fetch('', $logina);
          if ($result > 0) $sql .= " AND a.fk_user_author ".$condition." ".$userforfilter->id;
          elseif ($result < 0 || $condition == '=') $sql .= " AND a.fk_user_author = 0";
        }
        if ($key == 'logint')
        {
          $logint = $value;
          $condition = '=';
          if (preg_match('/^!/', $logint))
          {
            $logint = preg_replace('/^!/', '', $logint);
            $condition = '<>';
          }
          $userforfilter = new User($this->db);
          $result = $userforfilter->fetch('', $logint);
          if ($result > 0) $sql .= " AND ar.fk_element = ".$userforfilter->id;
          elseif ($result < 0 || $condition == '=') $sql .= " AND ar.fk_element = 0";
        }
      }

      $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";
      //print $sql;exit;

      dol_syslog(get_class($this)."::build_exportfile select events", LOG_DEBUG);
      $resql = $this->db->query($sql);
      if ($resql)
      {
        // Note: Output of sql request is encoded in $conf->file->character_set_client
        // This assignment in condition is not a bug. It allows walking the results.
        $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-'.$this->db->database_name.'-'.$obj->id."@".$_SERVER["SERVER_NAME"];
          $event['type'] = $type;
          $datestart = $this->db->jdate($obj->datep) - (empty($conf->global->AGENDA_EXPORT_FIX_TZ) ? 0 : ($conf->global->AGENDA_EXPORT_FIX_TZ * 3600));

          // fix for -> Warning: A non-numeric value encountered
          if (is_numeric($this->db->jdate($obj->datep2)))
          {
            $dateend = $this->db->jdate($obj->datep2)
                 - (empty($conf->global->AGENDA_EXPORT_FIX_TZ) ? 0 : ($conf->global->AGENDA_EXPORT_FIX_TZ * 3600));
          } else {
            // use start date as fall-back to avoid import erros on empty end date
            $dateend = $datestart;
          }

          $duration = ($datestart && $dateend) ? ($dateend - $datestart) : 0;
          $event['summary'] = $obj->label.($obj->socname ? " (".$obj->socname.")" : "");
          $event['desc'] = $obj->note;
          $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;
          // Define $urlwithroot
          $urlwithouturlroot = preg_replace('/'.preg_quote(DOL_URL_ROOT, '/').'$/i', '', trim($dolibarr_main_url_root));
          $urlwithroot = $urlwithouturlroot.DOL_URL_ROOT; // This is to use external domain name found into config file
          //$urlwithroot=DOL_MAIN_URL_ROOT;           // This is to use same domain name than current
          $url = $urlwithroot.'/comm/action/card.php?id='.$obj->id;
          $event['url'] = $url;
          $event['created'] = $this->db->jdate($obj->datec) - (empty($conf->global->AGENDA_EXPORT_FIX_TZ) ? 0 : ($conf->global->AGENDA_EXPORT_FIX_TZ * 3600));
          $event['modified'] = $this->db->jdate($obj->datem) - (empty($conf->global->AGENDA_EXPORT_FIX_TZ) ? 0 : ($conf->global->AGENDA_EXPORT_FIX_TZ * 3600));

          // 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;
          }

          $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("holidays");
        $title = $langs->trans("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 (!empty($conf->global->AGENDA_EXPORT_FIX_TZ))
            {
              $timestampStart = - ($conf->global->AGENDA_EXPORT_FIX_TZ * 3600);
              $timestampEnd   = - ($conf->global->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-'.$this->db->database_name.'-'.$obj->rowid."@".$_SERVER["SERVER_NAME"];
            $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
      $more = '';
      if ($login)  $more = $langs->transnoentities("User").' '.$login;
      if ($logina) $more = $langs->transnoentities("ActionsAskedBy").' '.$logina;
      if ($logint) $more = $langs->transnoentities("ActionsToDoBy").' '.$logint;
      if ($logind) $more = $langs->transnoentities("ActionsDoneBy").' '.$logind;
      if ($more)
      {
        $title = 'Dolibarr actions '.$mysoc->name.' - '.$more;
        $desc = $more;
        $desc .= ' ('.$mysoc->name.' - built by Dolibarr)';
      } else {
        $title = 'Dolibarr actions '.$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
      @chmod($outputfiletmp, octdec($conf->global->MAIN_UMASK));

      // 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)) $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 parametres
    $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->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 $db, $origin_id, $dest_id)
  {
    $tables = array(
      'actioncomm'
    );

    return CommonObject::commonReplaceThirdparty($db, $origin_id, $dest_id, $tables);
  }

  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)
  {
    global $conf, $langs, $user;

    $error = 0;

    $this->reminders = array();

    //Select all action comm reminders for event
    $sql = "SELECT rowid as id, typeremind, dateremind, status, offsetvalue, offsetunit, fk_user";
    $sql .= " FROM ".MAIN_DB_PREFIX."actioncomm_reminder";
    $sql .= " WHERE fk_actioncomm = ".$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 (empty($conf->global->AGENDA_REMINDER_EMAIL)) $sql .= " AND typeremind != 'email'";
    if (empty($conf->global->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 = $obj->dateremind;
        $tmpactioncommreminder->offsetvalue = $obj->offsetvalue;
        $tmpactioncommreminder->offsetunit = $obj->offsetunit;
        $tmpactioncommreminder->status = $obj->status;
        $tmpactioncommreminder->fk_user = $obj->fk_user;

        $this->reminders[$obj->id] = $tmpactioncommreminder;
      }
    } else {
      $this->error = $this->db->lasterror();
      $error++;
    }

    return count($this->reminders);
  }


  public function sendEmailsReminder()
  {
    global $conf, $langs, $user;

    $error = 0;
    $this->output = '';
    $this->error = '';
    $nbMailSend = 0;
    $errorsMsg = array();

    if (empty($conf->agenda->enabled))  // 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 (empty($conf->global->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__, LOG_DEBUG);

    $this->db->begin();

    //Select all action comm reminder
    $sql = "SELECT rowid as id FROM ".MAIN_DB_PREFIX."actioncomm_reminder";
    $sql .= " WHERE typeremind = 'email' AND status = 0";
    $sql .= " AND dateremind <= '".$this->db->idate(dol_now())."'";
    $sql .= $this->db->order("dateremind", "ASC");
    $resql = $this->db->query($sql);

    if ($resql) {
      $formmail = new FormMail($this->db);

      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 = '';

            // Make substitution in email content
            $substitutionarray = getCommonSubstitutionArray($langs, 0, '', $this);

            complete_substitutions_array($substitutionarray, $langs, $this);

            // Content
            $sendContent = make_substitutions($langs->trans($arraymessage->content), $substitutionarray);

            //Topic
            $sendTopic = (!empty($arraymessage->topic)) ? $arraymessage->topic : html_entity_decode($langs->trans('EventReminder'));

            // 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 = $conf->global->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 = $conf->global->MAIN_MAIL_ERRORS_TO;

              // Mail Creation
              $cMailFile = new CMailFile($sendTopic, $to, $from, $sendContent, array(), array(), array(), '', "", 0, 1, $errors_to, '', '', '', '', '');

              // Sending Mail
              if ($cMailFile->sendfile()) {
                $nbMailSend++;
              } else {
                $errormesg = $cMailFile->error.' : '.$to;
                $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 = ".$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();
      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)) ? join(', ', $errorsMsg) : $error;
      return $error;
    }
  }

  public function updatePercent($id, $percent)
  {
    $this->db->begin();

    $sql = "UPDATE ".MAIN_DB_PREFIX."actioncomm ";
    $sql .= " SET percent = ".(int) $percent;
    $sql .= " WHERE id=".$id;

    if ($this->db->query($sql))
    {
      $this->db->commit();
      return 1;
    } else {
      $this->db->rollback();
      $this->error = $this->db->lasterror();
      return -1;
    }
  }
}