list.php

Go to the documentation of this file.

<?php
/* Copyright (C) 2001-2004  Rodolphe Quiedeville    <rodolphe@quiedeville.org>
 * Copyright (C) 2003   Eric Seigne         <erics@rycks.com>
 * Copyright (C) 2004-2016  Laurent Destailleur     <eldy@users.sourceforge.net>
 * Copyright (C) 2005-2012  Regis Houssin       <regis.houssin@inodbox.com>
 * Copyright (C) 2017   Open-DSI          <support@open-dsi.fr>
 * Copyright (C) 2018-2026  Frédéric France       <frederic.france@free.fr>
 * Copyright (C) 2020   Tobias Sekan        <tobias.sekan@startmail.com>
 * Copyright (C) 2024-2025  MDW             <mdeweerd@users.noreply.github.com>
 * Copyright (C) 2024   Alexandre Spangaro      <alexandre@inovea-conseil.com>
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 3 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program. If not, see <https://www.gnu.org/licenses/>.
 */
 
// Load Dolibarr environment
require '../../main.inc.php';
require_once DOL_DOCUMENT_ROOT.'/contact/class/contact.class.php';
require_once DOL_DOCUMENT_ROOT.'/comm/action/class/actioncomm.class.php';
require_once DOL_DOCUMENT_ROOT.'/core/lib/date.lib.php';
require_once DOL_DOCUMENT_ROOT.'/core/lib/agenda.lib.php';
require_once DOL_DOCUMENT_ROOT.'/core/class/html.formactions.class.php';
require_once DOL_DOCUMENT_ROOT.'/core/lib/functions2.lib.php';
 
// Load translation files required by the page
$langs->loadLangs(array("users", "companies", "agenda", "commercial", "other", "orders", "bills"));
 
// Get Parameters
$action   = GETPOST('action', 'aZ09');
$massaction = GETPOST('massaction', 'alpha');
$confirm  = GETPOST('confirm', 'alpha');
$cancel     = GETPOST('cancel', 'alpha');
$toselect   = GETPOST('toselect', 'array:int');
$contextpage = GETPOST('contextpage', 'aZ') ? GETPOST('contextpage', 'aZ') : 'actioncommlist'; // To manage different context of search
$optioncss  = GETPOST('optioncss', 'alpha');
$mode = GETPOST('mode', 'aZ09');
if (empty($mode) && preg_match('/show_/', $action)) {
  $mode = $action;  // For backward compatibility
}
 
$disabledefaultvalues = GETPOSTINT('disabledefaultvalues');
 
$resourceid = GETPOSTINT("search_resourceid") ? GETPOSTINT("search_resourceid") : GETPOSTINT("resourceid");
$pid = GETPOSTINT("search_projectid", 3) ? GETPOSTINT("search_projectid", 3) : GETPOSTINT("projectid", 3);
$search_status = (GETPOST("search_status", 'aZ09') != '') ? GETPOST("search_status", 'aZ09') : GETPOST("status", 'aZ09');
$search_import_key = GETPOST("search_import_key");
$type = GETPOST('search_type', 'alphanohtml') ? GETPOST('search_type', 'alphanohtml') : GETPOST('type', 'alphanohtml');
$year = GETPOSTINT("year");
$month = GETPOSTINT("month");
$day = GETPOSTINT("day");
// Set actioncode (this code must be same for setting actioncode into peruser, listacton and index)
if (GETPOST('search_actioncode', 'array:aZ09')) {
  $actioncode = GETPOST('search_actioncode', 'array:aZ09', 3);
  if (!count($actioncode)) {
    $actioncode = '0';
  }
} else {
  $actioncode = GETPOST("search_actioncode", "alpha", 3) ? GETPOST("search_actioncode", "alpha", 3) : (GETPOST("search_actioncode") == '0' ? '0' : ((!getDolGlobalString('AGENDA_DEFAULT_FILTER_TYPE') || $disabledefaultvalues) ? '' : getDolGlobalString('AGENDA_DEFAULT_FILTER_TYPE')));
}
if (is_array($actioncode)) {
  // Remove all -1 values
  $actioncode = array_filter(
    $actioncode,
    function ($value) {
      return ((string) $value !== '-1');
    }
  );
}
 
// Search Fields
$search_id = GETPOST('search_id', 'alpha');
$search_title = GETPOST('search_title', 'alpha');
$search_note = GETPOST('search_note', 'alpha');
 
// $dateselect is a day included inside the event range
$dateselect = dol_mktime(0, 0, 0, GETPOSTINT('dateselectmonth'), GETPOSTINT('dateselectday'), GETPOSTINT('dateselectyear'), 'tzuserrel');
$datestart_dtstart = dol_mktime(0, 0, 0, GETPOSTINT('datestart_dtstartmonth'), GETPOSTINT('datestart_dtstartday'), GETPOSTINT('datestart_dtstartyear'), 'tzuserrel');
$datestart_dtend = dol_mktime(23, 59, 59, GETPOSTINT('datestart_dtendmonth'), GETPOSTINT('datestart_dtendday'), GETPOSTINT('datestart_dtendyear'), 'tzuserrel');
$dateend_dtstart = dol_mktime(0, 0, 0, GETPOSTINT('dateend_dtstartmonth'), GETPOSTINT('dateend_dtstartday'), GETPOSTINT('dateend_dtstartyear'), 'tzuserrel');
$dateend_dtend = dol_mktime(23, 59, 59, GETPOSTINT('dateend_dtendmonth'), GETPOSTINT('dateend_dtendday'), GETPOSTINT('dateend_dtendyear'), 'tzuserrel');
if ($search_status == '' && !GETPOSTISSET('search_status')) {
  $search_status = ((!getDolGlobalString('AGENDA_DEFAULT_FILTER_STATUS') || $disabledefaultvalues) ? '' : $conf->global->AGENDA_DEFAULT_FILTER_STATUS);
}
if (empty($mode) && !GETPOSTISSET('mode')) {
  $mode = getDolGlobalString('AGENDA_DEFAULT_VIEW', 'show_list');
}
 
$filter = GETPOST("search_filter", 'alpha', 3) ? GETPOST("search_filter", 'alpha', 3) : GETPOST("filter", 'alpha', 3);
$filtert = GETPOST("search_filtert", "intcomma", 3) ? GETPOST("search_filtert", "intcomma", 3) : GETPOST("filtert", "intcomma", 3);
$usergroup = GETPOSTINT("search_usergroup", 3) ? GETPOSTINT("search_usergroup", 3) : GETPOSTINT("usergroup", 3);
$showbirthday = empty($conf->use_javascript_ajax) ? (GETPOSTINT("search_showbirthday") ? GETPOSTINT("search_showbirthday") : GETPOSTINT("showbirthday")) : 1;
$search_categ_cus = GETPOST("search_categ_cus", "intcomma", 3) ? GETPOST("search_categ_cus", "intcomma", 3) : 0;
 
// Initialize a technical object to manage hooks of page. Note that conf->hooks_modules contains an array of hook context
$object = new ActionComm($db);
$hookmanager->initHooks(array('agendalist'));
 
// fetch optionals attributes and labels
$extrafields->fetch_name_optionals_label($object->table_element);
 
$search_array_options = $extrafields->getOptionalsFromPost($object->table_element, '', 'search_');
// If not choice done on calendar owner, we filter on user.
if (empty($filtert) && !getDolGlobalString('AGENDA_ALL_CALENDARS')) {
  $filtert = (string) $user->id;
}
 
// Pagination parameters
$limit = GETPOSTINT('limit') ? GETPOSTINT('limit') : $conf->liste_limit;
$sortfield = GETPOST('sortfield', 'aZ09comma');
$sortorder = GETPOST('sortorder', 'aZ09comma');
$page = GETPOSTISSET('pageplusone') ? (GETPOSTINT('pageplusone') - 1) : GETPOSTINT("page");
if (empty($page) || $page < 0 || GETPOST('button_search', 'alpha') || GETPOST('button_removefilter', 'alpha')) {
  // If $page is not defined, or '' or -1 or if we click on clear filters
  $page = 0;
}
$offset = $limit * $page;
if (!$sortorder) {
  $sortorder = "DESC,DESC";
  if ($search_status == 'todo') {
    $sortorder = "DESC,DESC";
  }
}
if (!$sortfield) {
  $sortfield = "a.datep,a.id";
  if ($search_status == 'todo') {
    $sortfield = "a.datep,a.id";
  }
}
 
// Security check
$socid = GETPOSTINT("search_socid") ? GETPOSTINT("search_socid") : GETPOSTINT("socid");
if ($user->socid) {
  $socid = $user->socid;
}
if ($socid < 0) {
  $socid = '';
}
 
$canedit = 1;
if (!$user->hasRight('agenda', 'myactions', 'read')) {
  accessforbidden();
}
if (!$user->hasRight('agenda', 'allactions', 'read')) {
  $canedit = 0;
}
if (!$user->hasRight('agenda', 'allactions', 'read') || $filter == 'mine') {  // If no permission to see all, we show only affected to me
  $filtert = (string) $user->id;
}
 
// Definition of array of fields for columns
$tableprefix = 'a';
$arrayfields = array();
foreach ($object->fields as $key => $val) {
  // If $val['visible']==0, then we never show the field
  if (!empty($val['visible'])) {
    $visible = (int) dol_eval((string) $val['visible'], 1);
    $arrayfields[$tableprefix.'.'.$key] = array(
      'label' => $val['label'],
      'checked' => (($visible < 0) ? '0' : '1'),
      'enabled' => (string) (int) (abs($visible) != 3 && (bool) dol_eval((string) $val['enabled'], 1)),
      'position' => $val['position'],
      'help' => isset($val['help']) ? $val['help'] : ''
    );
  }
}
 
// Extra fields
include DOL_DOCUMENT_ROOT.'/core/tpl/extrafields_list_array_fields.tpl.php';
 
// Complete arrayfields with special fields
$arrayfields = array_merge($arrayfields, array(
  'owner' => array('label' => "Owner", 'checked' => '1', 'position' => 46),
  'c.libelle' => array('label' => "Type", 'checked' => '1', 'position' => 47),
  's.nom' => array('label' => "ThirdParty", 'checked' => '1', 'position' => 54),
  'a.fk_element' => array('label' => "LinkedObject", 'checked' => '1', 'position' => 86),
));
 
$object->fields = dol_sort_array($object->fields, 'position');
$arrayfields = dol_sort_array($arrayfields, 'position');
 
// Security check
$result = restrictedArea($user, 'agenda', 0, '', 'myactions');
if ($user->socid && $socid) {
  $result = restrictedArea($user, 'societe', $socid);
}
 
 
/*
 *  Actions
 */
 
if (GETPOST('cancel', 'alpha')) {
  $mode = 'show_list';
  $massaction = '';
}
 
if (GETPOST("viewcal") || GETPOST("viewweek") || GETPOST("viewday")) {
  $param = '';
  if (is_array($_POST)) {
    foreach ($_POST as $key => $val) {
      $param .= '&'.urlencode($key).'='.urlencode($val);
    }
  }
  //print $param;
  header("Location: ".DOL_URL_ROOT.'/comm/action/index.php?'.$param);
  exit;
}
 
$parameters = array('id' => $socid);
$reshook = $hookmanager->executeHooks('doActions', $parameters, $object, $action); // Note that $action and $object may have been modified by some hooks
if ($reshook < 0) {
  setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
}
 
// Selection of new fields
include DOL_DOCUMENT_ROOT.'/core/actions_changeselectedfields.inc.php';
// Purge search criteria
if (GETPOST('button_removefilter_x', 'alpha') || GETPOST('button_removefilter.x', 'alpha') || GETPOST('button_removefilter', 'alpha')) { // All tests are required to be compatible with all browsers
  //$actioncode='';
  $search_id = '';
  $search_title = '';
  $search_note = '';
  $datestart_dtstart = '';
  $datestart_dtend = '';
  $dateend_dtstart = '';
  $dateend_dtend = '';
  $actioncode = '';
  $search_status = '';
  $search_import_key = '';
  $pid = '';
  $socid = '';
  $resourceid = '';
  $filter = '';
  $filtert = '';
  $usergroup = '';
  $toselect = array();
  $search_array_options = array();
}
 
if (empty($reshook) && !empty($massaction)) {
  $percent = null;
 
  switch ($massaction) {
    case 'set_all_events_to_todo':
      $percent = ActionComm::EVENT_TODO;
      break;
 
    case 'set_all_events_to_in_progress':
      $percent = ActionComm::EVENT_IN_PROGRESS;
      break;
 
    case 'set_all_events_to_finished':
      $percent = ActionComm::EVENT_FINISHED;
      break;
  }
 
  if (isset($percent)) {
    foreach ($toselect as $toselectid) {
      $result = $object->updatePercent($toselectid, $percent);
      if ($result < 0) {
        dol_print_error($db);
        break;
      }
    }
  }
}
 
// As mass deletion happens with a confirm step, $massaction is not use for the final step (deletion).
if (empty($reshook)) {
  $objectclass = 'ActionComm';
  $objectlabel = 'Events';
  $uploaddir = true;
  // Only users that can delete any event can remove records.
  $permissiontodelete = $user->hasRight('agenda', 'allactions', 'delete');
  $permissiontoadd = $user->hasRight('agenda', 'myactions', 'create');
  include DOL_DOCUMENT_ROOT.'/core/actions_massactions.inc.php';
}
 
 
/*
 * View
 */
 
$form = new Form($db);
$userstatic = new User($db);
$formactions = new FormActions($db);
 
$actionstatic = new ActionComm($db);
$societestatic = new Societe($db);
$contactstatic = new Contact($db);
 
$nav = '';
$nav .= $form->selectDate($dateselect, 'dateselect', 0, 0, 1, '', 1, 0);
$nav .= ' <input type="submit" name="submitdateselect" class="button" value="'.$langs->trans("Refresh").'">';
 
$now = dol_now();
 
$help_url = 'EN:Module_Agenda_En|FR:Module_Agenda|ES:M&oacute;dulo_Agenda|DE:Modul_Terminplanung';
$title = $langs->trans("Agenda");
llxHeader('', $title, $help_url, '', 0, 0, '', '', '', 'bodyforlist');
 
// Define list of all external calendars
// $listofextcals = array(); Not used yet in lists
 
$param = '';
if (!empty($contextpage) && $contextpage != $_SERVER["PHP_SELF"]) {
  $param .= '&contextpage='.urlencode($contextpage);
}
if ($limit > 0 && $limit != $conf->liste_limit) {
  $param .= '&limit='.((int) $limit);
}
if ($actioncode != '') {
  if (is_array($actioncode)) {
    foreach ($actioncode as $str_action) {
      $param .= "&search_actioncode[]=".urlencode($str_action);
    }
  } else {
    $param .= "&search_actioncode=".urlencode($actioncode);
  }
}
if ($resourceid > 0) {
  $param .= "&search_resourceid=".urlencode((string) ($resourceid));
}
if ($search_status != '') {
  $param .= "&search_status=".urlencode($search_status);
}
if ($search_import_key != '') {
  $param .= "&search_import_key=".urlencode($search_import_key);
}
if ($filter) {
  $param .= "&search_filter=".urlencode((string) $filter);
}
if ($filtert) {
  $param .= "&search_filtert=".urlencode((string) $filtert);
}
if ($usergroup > 0) {
  $param .= "&search_usergroup=".urlencode((string) ($usergroup));
}
if ($socid > 0) {
  $param .= "&search_socid=".urlencode((string) ($socid));
}
if ($showbirthday) {
  $param .= "&search_showbirthday=1";
}
if ($pid) {
  $param .= "&search_projectid=".urlencode((string) ($pid));
}
if ($type) {
  $param .= "&search_type=".urlencode($type);
}
if ($search_id != '') {
  $param .= '&search_id='.urlencode($search_id);
}
if ($search_title != '') {
  $param .= '&search_title='.urlencode($search_title);
}
if ($search_note != '') {
  $param .= '&search_note='.urlencode($search_note);
}
if (GETPOSTINT('datestart_dtstartday')) {
  $param .= '&datestart_dtstartday='.GETPOSTINT('datestart_dtstartday');
}
if (GETPOSTINT('datestart_dtstartmonth')) {
  $param .= '&datestart_dtstartmonth='.GETPOSTINT('datestart_dtstartmonth');
}
if (GETPOSTINT('datestart_dtstartyear')) {
  $param .= '&datestart_dtstartyear='.GETPOSTINT('datestart_dtstartyear');
}
if (GETPOSTINT('datestart_dtendday')) {
  $param .= '&datestart_dtendday='.GETPOSTINT('datestart_dtendday');
}
if (GETPOSTINT('datestart_dtendmonth')) {
  $param .= '&datestart_dtendmonth='.GETPOSTINT('datestart_dtendmonth');
}
if (GETPOSTINT('datestart_dtendyear')) {
  $param .= '&datestart_dtendyear='.GETPOSTINT('datestart_dtendyear');
}
if (GETPOSTINT('dateend_dtstartday')) {
  $param .= '&dateend_dtstartday='.GETPOSTINT('dateend_dtstartday');
}
if (GETPOSTINT('dateend_dtstartmonth')) {
  $param .= '&dateend_dtstartmonth='.GETPOSTINT('dateend_dtstartmonth');
}
if (GETPOSTINT('dateend_dtstartyear')) {
  $param .= '&dateend_dtstartyear='.GETPOSTINT('dateend_dtstartyear');
}
if (GETPOSTINT('dateend_dtendday')) {
  $param .= '&dateend_dtendday='.GETPOSTINT('dateend_dtendday');
}
if (GETPOSTINT('dateend_dtendmonth')) {
  $param .= '&dateend_dtendmonth='.GETPOSTINT('dateend_dtendmonth');
}
if (GETPOSTINT('dateend_dtendyear')) {
  $param .= '&dateend_dtendyear='.GETPOSTINT('dateend_dtendyear');
}
if ($optioncss != '') {
  $param .= '&optioncss='.urlencode($optioncss);
}
if ($search_categ_cus != 0) {
  $param .= '&search_categ_cus='.urlencode((string) ($search_categ_cus));
}
 
// Add $param from extra fields
include DOL_DOCUMENT_ROOT.'/core/tpl/extrafields_list_search_param.tpl.php';
 
$paramnoactionodate = $param;
 
// List of mass actions available
$arrayofmassactions = array(
  'set_all_events_to_todo' => img_picto('', 'circle', 'class="pictofixedwidth font-status1"').$langs->trans("SetAllEventsToTodo"),
  'set_all_events_to_in_progress' => img_picto('', 'stop-circle', 'class="pictofixedwidth font-status2"').$langs->trans("SetAllEventsToInProgress"),
  'set_all_events_to_finished' => img_picto('', 'stop-circle', 'class="pictofixedwidth badge-status5"').$langs->trans("SetAllEventsToFinished"),
);
if ($user->hasRight('agenda', 'allactions', 'delete')) {
  $arrayofmassactions['predelete'] = img_picto('', 'delete', 'class="pictofixedwidth"').$langs->trans("Delete");
}
if (isModEnabled('category') && $user->hasRight('agenda', 'myactions', 'create')) {
  $arrayofmassactions['preaffecttag'] = img_picto('', 'category', 'class="pictofixedwidth"').$langs->trans("AffectTag");
}
if (GETPOSTINT('nomassaction') || in_array($massaction, array('presend', 'predelete','preaffecttag'))) {
  $arrayofmassactions = array();
}
$massactionbutton = $form->selectMassAction('', $arrayofmassactions);
 
$sql = "SELECT";
$sql .= " a.datep as dp, a.id, a.code, a.label, a.note, a.datep2 as dp2, a.fulldayevent, a.location, a.entity,";
$sql .= " a.fk_user_author, a.fk_user_action,";
$sql .= " a.fk_contact, a.note, a.percent as percent,";
$sql .= " a.fk_element, a.elementtype, a.datec, a.tms as datem,";
$sql .= " a.recurid, a.recurrule, a.recurdateend, a.import_key,";
$sql .= " c.code as type_code, c.libelle as type_label, c.color as type_color, c.type as type_type, c.picto as type_picto,";
$sql .= " s.nom as societe, s.rowid as socid, s.client, s.email as socemail";
//$sql .= " sp.lastname, sp.firstname, sp.email, sp.phone, sp.address, sp.phone as phone_pro, sp.phone_mobile, sp.phone_perso, sp.fk_pays as country_id";
 
// Add fields from extrafields
if (!empty($extrafields->attributes[$object->table_element]['label'])) {
  foreach ($extrafields->attributes[$object->table_element]['label'] as $key => $val) {
    $sql .= ($extrafields->attributes[$object->table_element]['type'][$key] != 'separate' ? ", ef.".$key." as options_".$key : '');
  }
}
 
// Add fields from hooks
$parameters = array();
$reshook = $hookmanager->executeHooks('printFieldListSelect', $parameters, $object, $action); // Note that $action and $object may have been modified by hook
$sql .= $hookmanager->resPrint;
 
$sqlfields = $sql; // $sql fields to remove for count total
 
$sql .= " FROM ".MAIN_DB_PREFIX."actioncomm as a";
$sql .= " LEFT JOIN ".MAIN_DB_PREFIX."actioncomm_extrafields as ef ON a.id = ef.fk_object";
$sql .= " LEFT JOIN ".MAIN_DB_PREFIX."societe as s ON a.fk_soc = s.rowid";
$sql .= " INNER JOIN ".MAIN_DB_PREFIX."c_actioncomm as c ON c.id = a.fk_action";
// We must filter on resource table
if ($resourceid > 0) {
  $sql .= " INNER JOIN ".MAIN_DB_PREFIX."element_resources as r ON r.element_type = 'action' AND r.element_id = a.id";
}
// Add table from hooks
$parameters = array();
$reshook = $hookmanager->executeHooks('printFieldListFrom', $parameters, $object, $action); // Note that $action and $object may have been modified by hook
$sql .= $hookmanager->resPrint;
 
$sql .= " WHERE a.entity IN (".getEntity('agenda').")"; // bookcal is a "virtual view" of agenda
// Condition on actioncode
if (!empty($actioncode)) {
  if (!getDolGlobalString('AGENDA_USE_EVENT_TYPE')) {
    if ((is_array($actioncode) && in_array('AC_NON_AUTO', $actioncode)) || $actioncode == 'AC_NON_AUTO') {
      $sql .= " AND c.type != 'systemauto'";
    } elseif ((is_array($actioncode) && in_array('AC_ALL_AUTO', $actioncode)) || $actioncode == 'AC_ALL_AUTO') {
      $sql .= " AND c.type = 'systemauto'";
    } else {
      if ((is_array($actioncode) && in_array('AC_OTH', $actioncode)) || $actioncode == 'AC_OTH') {
        $sql .= " AND c.type != 'systemauto'";
      }
      if ((is_array($actioncode) && in_array('AC_OTH_AUTO', $actioncode)) || $actioncode == 'AC_OTH_AUTO') {
        $sql .= " AND c.type = 'systemauto'";
      }
    }
  } else {
    if ((is_array($actioncode) && in_array('AC_NON_AUTO', $actioncode)) || $actioncode === 'AC_NON_AUTO') {
      $sql .= " AND c.type != 'systemauto'";
    } elseif ((is_array($actioncode) && in_array('AC_ALL_AUTO', $actioncode)) || $actioncode === 'AC_ALL_AUTO') {
      $sql .= " AND c.type = 'systemauto'";
    } else {
      if (is_array($actioncode)) {
        // Remove all -1 values
        $actioncode = array_filter(
          $actioncode,
          function ($value) {
            return ((string) $value !== '-1');
          }
        );
        if (count($actioncode)) {
          $sql .= " AND c.code IN (".$db->sanitize("'".implode("','", $actioncode)."'", 1).")";
        }
      } elseif ($actioncode !== '-1') {
        $sql .= " AND c.code IN (".$db->sanitize("'".implode("','", explode(',', $actioncode))."'", 1).")";
      }
    }
  }
}
if ($resourceid > 0) {
  $sql .= " AND r.resource_id = ".((int) $resourceid);
}
if ($pid) {
  $sql .= " AND a.fk_project=".((int) $pid);
}
 
// If the internal user must only see his customers, force searching by him
$search_sale = 0;
if (isModEnabled("societe") && !$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)."))";
  }
}
// Search on socid
if ($socid > 0) {
  $sql .= " AND a.fk_soc = ".((int) $socid);
}
if ($type) {
  $sql .= " AND c.id = ".((int) $type);
}
if ($search_status == '0') {
  // To do (not started)
  $sql .= " AND a.percent = 0";
}
if ($search_status == 'na') {
  // Not applicable
  $sql .= " AND a.percent = -1";
}
if ($search_status == '50') {
  // Running already started
  $sql .= " AND (a.percent > 0 AND a.percent < 100)";
}
if ($search_status == 'done' || $search_status == '100') {
  $sql .= " AND (a.percent = 100)";
}
if ($search_status == 'todo') {
  $sql .= " AND (a.percent >= 0 AND a.percent < 100)";
}
if ($search_import_key) {
  $sql .= natural_search("a.import_key", $search_import_key);
}
if ($search_id) {
  $sql .= natural_search("a.id", $search_id, 1);
}
if ($search_title) {
  $sql .= natural_search("a.label", $search_title);
}
if ($search_note) {
  $sql .= natural_search('a.note', $search_note);
}
 
// The second or of next test is to take event with no end date (we suppose duration is 1 hour in such case)
if ($dateselect > 0) {
  $sql .= " AND ((a.datep2 >= '".$db->idate($dateselect)."' AND a.datep <= '".$db->idate($dateselect + 3600 * 24 - 1)."') OR (a.datep2 IS NULL AND a.datep > '".$db->idate($dateselect - 3600)."' AND a.datep <= '".$db->idate($dateselect + 3600 * 24 - 1)."'))";
}
if ($datestart_dtstart > 0) {
  $sql .= " AND a.datep >= '".$db->idate($datestart_dtstart)."'";
}
if ($datestart_dtend > 0) {
  $sql .= " AND a.datep <= '".$db->idate($datestart_dtend)."'";
}
if ($dateend_dtstart > 0) {
  $sql .= " AND a.datep2 >= '".$db->idate($dateend_dtstart)."'";
}
if ($dateend_dtend > 0) {
  $sql .= " AND a.datep2 <= '".$db->idate($dateend_dtend)."'";
}
 
// Search in categories, -1 is all and -2 is no categories
if ($search_categ_cus != -1) {
  if ($search_categ_cus == -2) {
    $sql .= " AND NOT EXISTS (SELECT ca.fk_actioncomm FROM ".MAIN_DB_PREFIX."categorie_actioncomm as ca WHERE ca.fk_actioncomm = a.id)";
  } elseif ($search_categ_cus > 0) {
    $sql .= " AND EXISTS (SELECT ca.fk_actioncomm FROM ".MAIN_DB_PREFIX."categorie_actioncomm as ca WHERE ca.fk_actioncomm = a.id AND ca.fk_categorie IN (".$db->sanitize($search_categ_cus)."))";
  }
}
 
// Add where from extra fields
include DOL_DOCUMENT_ROOT.'/core/tpl/extrafields_list_search_sql.tpl.php';
 
// Add where from hooks
$parameters = array();
$reshook = $hookmanager->executeHooks('printFieldListWhere', $parameters, $object, $action); // Note that $action and $object may have been modified by hook
$sql .= $hookmanager->resPrint;
 
$sql1 = $sql2 = '';
 
// We must filter on assignment table
if (($filtert != '-1' && $filtert != '-2') || $usergroup > 0) {
  if ($filtert != '' && $filtert != '-1' && $filtert != '-2'  && $filtert != '-3') {
    $where1 = "a.fk_user_action = ".((int) $filtert);   // For old data compatibility (where owner was not assigned as contact)
    $where2 = "a.fk_user_action <> ".((int) $filtert)." AND EXISTS (SELECT ar.rowid FROM ".MAIN_DB_PREFIX."actioncomm_resources as ar WHERE ar.fk_actioncomm = a.id AND ar.element_type = 'user' AND ar.fk_element IN (".$db->sanitize($filtert)."))";
    $sql1 = $sql . " AND " . $where1;
    $sql2 = $sql . " AND " . $where2;
    $sql .= " AND ((" . $where1 . ") OR (" . $where2."))";
  } elseif ($filtert == '-3') {
    // TODO If a.fk_user_action is in my hierarchy ?
    $sql .= " AND EXISTS (SELECT ar.rowid FROM ".MAIN_DB_PREFIX."actioncomm_resources as ar WHERE ar.fk_actioncomm = a.id AND ar.element_type = 'user' AND ar.fk_element IN (".$db->sanitize(implode(',', $user->getAllChildIds(1)))."))";
  } elseif ($usergroup > 0) {   // Filter on my hierarchy
    // TODO If a.fk_user_action is in group ?
    $sql .= " AND EXISTS (SELECT ar.rowid FROM ".MAIN_DB_PREFIX."actioncomm_resources as ar WHERE ar.fk_actioncomm = a.id AND ar.element_type = 'user' AND ar.fk_element IN (SELECT ugu.fk_user FROM ".MAIN_DB_PREFIX."usergroup_user as ugu WHERE ugu.fk_usergroup = ".((int) $usergroup)."))";
  }
}
//print $sql."<br>".$sql1."<br>".$sql2;
 
// Count total nb of records
$nbtotalofrecords = '';
if (!getDolGlobalInt('MAIN_DISABLE_FULL_SCANLIST')) {
  /* The fast and low memory method to get and count full list converts the sql into a sql count */
  if (empty($sql1) && empty($sql2)) {
    $sqlforcount = preg_replace('/^'.preg_quote($sqlfields, '/').'/', 'SELECT COUNT(*) as nbtotalofrecords', $sql);
    $sqlforcount = preg_replace('/GROUP BY .*$/', '', $sqlforcount);
    // TODO Add a method $sqlforcount = sqlOptimizeCount($sqlforcount, array('actioncomm_extrafields', 'societe', 'c_actioncomm')) to
    // remove all LEFT JOIN and INNER JOIN from the $sqlforcount if there is no fields into the WHERE.
 
    $resql = $db->query($sqlforcount);
    if ($resql) {
      $objforcount = $db->fetch_object($resql);
      $nbtotalofrecords = (int) $objforcount->nbtotalofrecords;
    } else {
      dol_print_error($db);
    }
 
    $db->free($resql);
  } else {
    $sqlforcount1 = preg_replace('/^'.preg_quote($sqlfields, '/').'/', 'SELECT COUNT(*) as nbtotalofrecords', $sql1);
    $sqlforcount2 = preg_replace('/^'.preg_quote($sqlfields, '/').'/', 'SELECT COUNT(*) as nbtotalofrecords', $sql2);
 
    $resql1 = $db->query($sqlforcount1);
    $resql2 = $db->query($sqlforcount2);
    if ($resql1 && $resql2) {
      $objforcount1 = $db->fetch_object($resql1);
      $objforcount2 = $db->fetch_object($resql2);
      $nbtotalofrecords = (int) $objforcount1->nbtotalofrecords + (int) $objforcount2->nbtotalofrecords;
    } else {
      dol_print_error($db);
    }
 
    $db->free($resql1);
    $db->free($resql2);
  }
 
  if (($page * $limit) > (int) $nbtotalofrecords) { // if total resultset is smaller then paging size (filtering), goto and load page 0
    $page = 0;
    $offset = 0;
  }
}
 
// Complete request and execute it with limit
$sql .= $db->order($sortfield, $sortorder);
if ($limit) {
  $sql .= $db->plimit($limit + 1, $offset);
}
 
$resql = $db->query($sql);
if (!$resql) {
  dol_print_error($db);
  exit;
}
 
$num = $db->num_rows($resql);
 
$arrayofselected = is_array($toselect) ? $toselect : array();
 
// Local calendar
$newtitle = '<div class="nowrap clear inline-block minheight30 hideonsmartphone">';
$newtitle .= '<input type="checkbox" id="check_mytasks" name="check_mytasks" checked disabled><label class="labelcalendar"><span class="check_local_text small"> '.$langs->trans("LocalAgenda").'</span></label> &nbsp; ';
$newtitle .= '</div>';
//$newtitle=$langs->trans($title);
 
$tabactive = 'cardlist';
 
$head = calendars_prepare_head($param);
 
print '<form method="POST" id="searchFormList" class="listactionsfilter" action="'.$_SERVER["PHP_SELF"].'">'."\n";
 
if ($optioncss != '') {
  print '<input type="hidden" name="optioncss" value="'.$optioncss.'">';
}
print '<input type="hidden" name="token" value="'.newToken().'">';
print '<input type="hidden" name="formfilteraction" id="formfilteraction" value="list">';
print '<input type="hidden" name="sortfield" value="'.$sortfield.'">';
print '<input type="hidden" name="sortorder" value="'.$sortorder.'">';
print '<input type="hidden" name="type" value="'.$type.'">';
$nav = '';
 
if ($filter) {
  $nav .= '<input type="hidden" name="search_filter" value="'.$filter.'">';
}
if ($showbirthday) {
  $nav .= '<input type="hidden" name="search_showbirthday" value="1">';
}
print $nav;
 
 
$s = $newtitle;
 
// Calendars from hooks
$parameters = array();
$reshook = $hookmanager->executeHooks('addCalendarChoice', $parameters, $object, $action);
if (empty($reshook)) {
  $s .= $hookmanager->resPrint;
} elseif ($reshook > 1) {
  $s = $hookmanager->resPrint;
}
 
$viewyear = is_object($object) ? dol_print_date($object->datep, '%Y') : '';
$viewmonth = is_object($object) ? dol_print_date($object->datep, '%m') : '';
$viewday = is_object($object) ? dol_print_date($object->datep, '%d') : '';
 
$viewmode = '<div class="navmode inline-block">';
 
$viewmode .= '<a class="btnTitle'.(($mode == 'list' || $mode == 'show_list') ? ' btnTitleSelected' : '').' btnTitleSelected reposition" href="'.DOL_URL_ROOT.'/comm/action/list.php?mode=show_list&restore_lastsearch_values=1'.$paramnoactionodate.'">';
//$viewmode .= '<span class="fa paddingleft imgforviewmode valignmiddle btnTitle-icon">';
$viewmode .= img_picto($langs->trans("List"), 'object_calendarlist', 'class="imgforviewmode pictoactionview block"');
//$viewmode .= '</span>';
$viewmode .= '<span class="valignmiddle text-plus-circle btnTitle-label hideonsmartphone inline-block width75 divoverflow">'.$langs->trans("ViewList").'</span></a>';
 
$viewmode .= '<a class="btnTitle'.($mode == 'show_month' ? ' btnTitleSelected' : '').' reposition" href="'.DOL_URL_ROOT.'/comm/action/index.php?mode=show_month&year='.$viewyear.'&month='.$viewmonth.'&day='.$viewday.$paramnoactionodate.'">';
//$viewmode .= '<span class="fa paddingleft imgforviewmode valignmiddle btnTitle-icon">';
$viewmode .= img_picto($langs->trans("ViewCal"), 'object_calendarmonth', 'class="pictoactionview block"');
//$viewmode .= '</span>';
$viewmode .= '<span class="valignmiddle text-plus-circle btnTitle-label hideonsmartphone inline-block width75 divoverflow">'.$langs->trans("ViewCal").'</span></a>';
 
$viewmode .= '<a class="btnTitle'.($mode == 'show_week' ? ' btnTitleSelected' : '').' reposition" href="'.DOL_URL_ROOT.'/comm/action/index.php?mode=show_week&year='.$viewyear.'&month='.$viewmonth.'&day='.$viewday.$paramnoactionodate.'">';
//$viewmode .= '<span class="fa paddingleft imgforviewmode valignmiddle btnTitle-icon">';
$viewmode .= img_picto($langs->trans("ViewWeek"), 'object_calendarweek', 'class="pictoactionview block"');
//$viewmode .= '</span>';
$viewmode .= '<span class="valignmiddle text-plus-circle btnTitle-label hideonsmartphone inline-block width75 divoverflow">'.$langs->trans("ViewWeek").'</span></a>';
 
$viewmode .= '<a class="btnTitle'.($mode == 'show_day' ? ' btnTitleSelected' : '').' reposition" href="'.DOL_URL_ROOT.'/comm/action/index.php?mode=show_day&year='.$viewyear.'&month='.$viewmonth.'&day='.$viewday.$paramnoactionodate.'">';
//$viewmode .= '<span class="fa paddingleft imgforviewmode valignmiddle btnTitle-icon">';
$viewmode .= img_picto($langs->trans("ViewDay"), 'object_calendarday', 'class="pictoactionview block"');
//$viewmode .= '</span>';
$viewmode .= '<span class="valignmiddle text-plus-circle btnTitle-label hideonsmartphone inline-block width75 divoverflow">'.$langs->trans("ViewDay").'</span></a>';
 
$viewmode .= '<a class="btnTitle'.($mode == 'show_peruser' ? ' btnTitleSelected' : '').' reposition marginrightonly" href="'.DOL_URL_ROOT.'/comm/action/peruser.php?mode=show_peruser&year='.$viewyear.'&month='.$viewmonth.'&day='.$viewday.$paramnoactionodate.'">';
//$viewmode .= '<span class="fa paddingleft imgforviewmode valignmiddle btnTitle-icon">';
$viewmode .= img_picto($langs->trans("ViewPerUser"), 'object_calendarperuser', 'class="pictoactionview block"');
//$viewmode .= '</span>';
$viewmode .= '<span class="valignmiddle text-plus-circle btnTitle-label hideonsmartphone inline-block width75 divoverflow" title="'.dolPrintHTML($langs->trans("ViewPerUser")).'">'.$langs->trans("ViewPerUser").'</span></a>';
 
// Add more views from hooks
$parameters = array();
$reshook = $hookmanager->executeHooks('addCalendarView', $parameters, $object, $action);
if (empty($reshook)) {
  $viewmode .= $hookmanager->resPrint;
} elseif ($reshook > 1) {
  $viewmode = $hookmanager->resPrint;
}
 
$viewmode .= '</div>';
 
$viewmode .= '<span class="marginrightonly"></span>';
 
$tmpforcreatebutton = dol_getdate(dol_now('tzuserrel'), true);
 
$newparam = '?month='.str_pad((string) $month, 2, "0", STR_PAD_LEFT).'&year='.$tmpforcreatebutton['year'];
 
$url = DOL_URL_ROOT.'/comm/action/card.php?action=create';
$url .= '&apyear='.$tmpforcreatebutton['year'].'&apmonth='.$tmpforcreatebutton['mon'].'&apday='.$tmpforcreatebutton['mday'];
$url .= '&aphour='.$tmpforcreatebutton['hours'].'&apmin='.$tmpforcreatebutton['minutes'];
$url .= '&backtopage='.urlencode($_SERVER["PHP_SELF"].$newparam);
 
$newcardbutton = dolGetButtonTitle($langs->trans('AddAction'), '', 'fa fa-plus-circle', $url, '', (int) ($user->hasRight('agenda', 'myactions', 'create') || $user->hasRight('agenda', 'allactions', 'create')));
 
$param .= '&mode='.urlencode($mode);
 
// @phan-suppress-next-line PhanPluginSuspiciousParamOrder
print_barre_liste($langs->trans("Agenda"), $page, $_SERVER["PHP_SELF"], $param, $sortfield, $sortorder, $massactionbutton, $num, $nbtotalofrecords, 'object_action', 0, $nav.$newcardbutton, '', $limit, 0, 0, 1, $viewmode);
 
print $s;
 
$objecttmp = new ActionComm($db);
include DOL_DOCUMENT_ROOT.'/core/tpl/massactions_pre.tpl.php';
 
$moreforfilter = '';
 
$varpage = empty($contextpage) ? $_SERVER["PHP_SELF"] : $contextpage;
$selectedfields = $form->multiSelectArrayWithCheckbox('selectedfields', $arrayfields, $varpage, $conf->main_checkbox_left_column); // This also change content of $arrayfields
if ($massactionbutton) {
  $selectedfields .= $form->showCheckAddButtons('checkforselect', 1);
}
$i = 0;
 
print '<div class="liste_titre liste_titre_bydiv centpercent">';
print_actions_filter($form, $canedit, $search_status, $year, $month, $day, $showbirthday, '', $filtert, '', $pid, $socid, $action, -1, $actioncode, $usergroup, '', $resourceid, $search_categ_cus, $search_import_key);
print '</div>';
 
$moreforfilter = 1;
 
print '<div class="div-table-responsive">';
print '<table class="tagtable liste'.($moreforfilter ? " listwithfilterbefore" : "").'">'."\n";
 
print '<tr class="liste_titre_filter">';
// Action column
if ($conf->main_checkbox_left_column) {
  print '<td class="liste_titre" align="middle">';
  $searchpicto = $form->showFilterButtons('left');
  print $searchpicto;
  print '</td>';
}
if (!empty($arrayfields['a.id']['checked'])) {
  print '<td class="liste_titre"><input type="text" class="maxwidth50" name="search_id" value="'.$search_id.'"></td>';
}
if (!empty($arrayfields['a.datep']['checked'])) {
  print '<td class="liste_titre nowraponall center">';
  print '<div class="nowrap">';
  print $form->selectDate($datestart_dtstart, 'datestart_dtstart', 0, 0, 1, '', 1, 0, 0, '', '', '', '', 1, '', $langs->trans('From'), 'tzuserrel');
  print '</div>';
  print '<div class="nowrap">';
  print $form->selectDate($datestart_dtend, 'datestart_dtend', 0, 0, 1, '', 1, 0, 0, '', '', '', '', 1, '', $langs->trans('To'), 'tzuserrel');
  print '</div>';
  print '</td>';
}
if (!empty($arrayfields['a.datep2']['checked'])) {
  print '<td class="liste_titre nowraponall center">';
  print '<div class="nowrap">';
  print $form->selectDate($dateend_dtstart, 'dateend_dtstart', 0, 0, 1, '', 1, 0, 0, '', '', '', '', 1, '', $langs->trans('From'), 'tzuserrel');
  print '</div>';
  print '<div class="nowrap">';
  print $form->selectDate($dateend_dtend, 'dateend_dtend', 0, 0, 1, '', 1, 0, 0, '', '', '', '', 1, '', $langs->trans('To'), 'tzuserrel');
  print '</div>';
  print '</td>';
}
if (!empty($arrayfields['owner']['checked'])) {
  print '<td class="liste_titre"></td>';
}
if (!empty($arrayfields['c.libelle']['checked'])) {
  print '<td class="liste_titre"></td>';
}
if (!empty($arrayfields['a.label']['checked'])) {
  print '<td class="liste_titre"><input type="text" class="maxwidth125" name="search_title" value="'.$search_title.'"></td>';
}
if (!empty($arrayfields['a.note']['checked'])) {
  print '<td class="liste_titre"><input type="text" class="maxwidth75" name="search_note" value="'.$search_note.'"></td>';
}
if (!empty($arrayfields['s.nom']['checked'])) {
  print '<td class="liste_titre"></td>';
}
if (!empty($arrayfields['a.fk_contact']['checked'])) {
  print '<td class="liste_titre"></td>';
}
if (!empty($arrayfields['a.fk_element']['checked'])) {
  print '<td class="liste_titre"></td>';
}
 
// Extra fields
include DOL_DOCUMENT_ROOT.'/core/tpl/extrafields_list_search_input.tpl.php';
 
// Fields from hook
$parameters = array('arrayfields' => $arrayfields);
$reshook = $hookmanager->executeHooks('printFieldListOption', $parameters); // Note that $action and $object may have been modified by hook
print $hookmanager->resPrint;
 
if (!empty($arrayfields['a.datec']['checked'])) {
  print '<td class="liste_titre"></td>';
}
if (!empty($arrayfields['a.tms']['checked'])) {
  print '<td class="liste_titre"></td>';
}
if (!empty($arrayfields['a.import_key']['checked'])) {
  print '<td class="liste_titre center"><input type="text" class="maxwidth75" name="search_import_key" value="'.$search_import_key.'"></td>';
  print '</td>';
}
if (!empty($arrayfields['a.percent']['checked'])) {
  print '<td class="liste_titre center parentonrightofpage">';
  $formactions->form_select_status_action('formaction', $search_status, 1, 'search_status', 1, 2, 'search_status width100 onrightofpage');
  print '</td>';
}
// Action column
if (!$conf->main_checkbox_left_column) {
  print '<td class="liste_titre center">';
  $searchpicto = $form->showFilterButtons();
  print $searchpicto;
  print '</td>';
}
print '</tr>'."\n";
 
$totalarray = array();
$totalarray['nbfield'] = 0;
 
// Fields title label
// --------------------------------------------------------------------
print '<tr class="liste_titre">';
if ($conf->main_checkbox_left_column) {
  print_liste_field_titre($selectedfields, $_SERVER["PHP_SELF"], "", '', '', 'align="center"', $sortfield, $sortorder, 'maxwidthsearch ');
  $totalarray['nbfield']++;
}
if (!empty($arrayfields['a.id']['checked'])) {
  // @phan-suppress-next-line PhanTypeInvalidDimOffset
  print_liste_field_titre($arrayfields['a.id']['label'], $_SERVER["PHP_SELF"], "a.id", "", $param, "", $sortfield, $sortorder);
  $totalarray['nbfield']++;
}
if (!empty($arrayfields['a.datep']['checked'])) {
  print_liste_field_titre($arrayfields['a.datep']['label'], $_SERVER["PHP_SELF"], "a.datep,a.id", "", $param, '', $sortfield, $sortorder, 'center ');
  $totalarray['nbfield']++;
}
if (!empty($arrayfields['a.datep2']['checked'])) {
  print_liste_field_titre($arrayfields['a.datep2']['label'], $_SERVER["PHP_SELF"], "a.datep2", "", $param, '', $sortfield, $sortorder, 'center ');
  $totalarray['nbfield']++;
}
if (!empty($arrayfields['owner']['checked'])) {
  print_liste_field_titre($arrayfields['owner']['label'], $_SERVER["PHP_SELF"], "", "", $param, "", $sortfield, $sortorder);
  $totalarray['nbfield']++;
}
if (!empty($arrayfields['c.libelle']['checked'])) {
  print_liste_field_titre($arrayfields['c.libelle']['label'], $_SERVER["PHP_SELF"], "c.libelle", "", $param, "", $sortfield, $sortorder);
  $totalarray['nbfield']++;
}
if (!empty($arrayfields['a.label']['checked'])) {
  print_liste_field_titre($arrayfields['a.label']['label'], $_SERVER["PHP_SELF"], "a.label", "", $param, "", $sortfield, $sortorder);
  $totalarray['nbfield']++;
}
if (!empty($arrayfields['a.note']['checked'])) {
  print_liste_field_titre($arrayfields['a.note']['label'], $_SERVER["PHP_SELF"], "a.note", "", $param, "", $sortfield, $sortorder);
  $totalarray['nbfield']++;
}
if (!empty($arrayfields['s.nom']['checked'])) {
  print_liste_field_titre($arrayfields['s.nom']['label'], $_SERVER["PHP_SELF"], "s.nom", "", $param, "", $sortfield, $sortorder);
  $totalarray['nbfield']++;
}
if (!empty($arrayfields['a.fk_contact']['checked'])) {
  print_liste_field_titre($arrayfields['a.fk_contact']['label'], $_SERVER["PHP_SELF"], "", "", $param, "", $sortfield, $sortorder);
  $totalarray['nbfield']++;
}
if (!empty($arrayfields['a.fk_element']['checked'])) {
  print_liste_field_titre($arrayfields['a.fk_element']['label'], $_SERVER["PHP_SELF"], "", "", $param, "", $sortfield, $sortorder);
  $totalarray['nbfield']++;
}
// Extra fields
include DOL_DOCUMENT_ROOT.'/core/tpl/extrafields_list_search_title.tpl.php';
// Hook fields
$parameters = array('arrayfields' => $arrayfields, 'param' => $param, 'sortfield' => $sortfield, 'sortorder' => $sortorder);
$reshook = $hookmanager->executeHooks('printFieldListTitle', $parameters); // Note that $action and $object may have been modified by hook
print $hookmanager->resPrint;
 
if (!empty($arrayfields['a.datec']['checked'])) {
  print_liste_field_titre($arrayfields['a.datec']['label'], $_SERVER["PHP_SELF"], "a.datec,a.id", "", $param, '', $sortfield, $sortorder, 'center ');
  $totalarray['nbfield']++;
}
if (!empty($arrayfields['a.tms']['checked'])) {
  print_liste_field_titre($arrayfields['a.tms']['label'], $_SERVER["PHP_SELF"], "a.tms,a.id", "", $param, '', $sortfield, $sortorder, 'center ');
  $totalarray['nbfield']++;
}
// Import ID
if (!empty($arrayfields['a.import_key']['checked'])) {
  print_liste_field_titre("ImportId", $_SERVER["PHP_SELF"], "a.import_key", "", $param, '', $sortfield, $sortorder, 'center ');
  $totalarray['nbfield']++;
}
// Status
if (!empty($arrayfields['a.percent']['checked'])) {
  print_liste_field_titre("Status", $_SERVER["PHP_SELF"], "a.percent", "", $param, '', $sortfield, $sortorder, 'center ');
  $totalarray['nbfield']++;
}
if (!$conf->main_checkbox_left_column) {
  print_liste_field_titre($selectedfields, $_SERVER["PHP_SELF"], "", '', '', '', $sortfield, $sortorder, 'maxwidthsearch center ');
  $totalarray['nbfield']++;
}
print "</tr>\n";
 
$now = dol_now();
$delay_warning = getDolGlobalInt('MAIN_DELAY_ACTIONS_TODO') * 24 * 60 * 60;
$today_start_time = dol_mktime(0, 0, 0, (int) date('m', $now), (int) date('d', $now), (int) date('Y', $now));
 
require_once DOL_DOCUMENT_ROOT.'/comm/action/class/cactioncomm.class.php';
$caction = new CActionComm($db);
$arraylist = $caction->liste_array(1, 'code', '', (!getDolGlobalString('AGENDA_USE_EVENT_TYPE') ? 1 : 0), '', 1);
$contactListCache = array();
$elementlinkcache = array();
 
// Loop on record
// --------------------------------------------------------------------
$i = 0;
//$savnbfield = $totalarray['nbfield'];
//$totalarray['nbfield'] = 0;
$imaxinloop = ($limit ? min($num, $limit) : $num);
$cache_user_list = array();
while ($i < $imaxinloop) {
  $obj = $db->fetch_object($resql);
  if (empty($obj)) {
    break; // Should not happen
  }
 
  // Store properties in $object
  $object->setVarsFromFetchObj($obj);
 
  // Discard auto action if option is on
  if (getDolGlobalString('AGENDA_ALWAYS_HIDE_AUTO') && $obj->type_code == 'AC_OTH_AUTO') {
    $i++;
    continue;
  }
 
  $actionstatic->id = $obj->id;
  $actionstatic->ref = $obj->id;
  $actionstatic->code = $obj->code;
  $actionstatic->label = $obj->label;
  $actionstatic->location = $obj->location;
  $actionstatic->note_private = dol_htmlentitiesbr($obj->note);
  $actionstatic->datep = $db->jdate($obj->dp);
  $actionstatic->percentage = $obj->percent;
  $actionstatic->authorid = $obj->fk_user_author;
  $actionstatic->userownerid = $obj->fk_user_action;
  $actionstatic->recurid = $obj->recurid;
  $actionstatic->recurrule = $obj->recurrule;
  $actionstatic->recurdateend = $db->jdate($obj->recurdateend);
  // From type of action table
  $actionstatic->type = $obj->type_type;
  $actionstatic->type_code = $obj->type_code;
  $actionstatic->type_label = $obj->type_label;
  $actionstatic->type_picto = $obj->type_picto;
  $actionstatic->type_color = $obj->type_color;
 
 
  // Initialize $this->userassigned && this->socpeopleassigned array && this->userownerid
  // but only if we need it
  if (!empty($arrayfields['a.fk_contact']['checked'])) {
    $actionstatic->fetchResources();
  }
 
  // cache of user list (owners)
  if ($obj->fk_user_action > 0 && !isset($cache_user_list[$obj->fk_user_action])) {
    $userstatic = new User($db);
    $res = $userstatic->fetch($obj->fk_user_action);
    if ($res > 0) {
      $cache_user_list[$obj->fk_user_action] = $userstatic;
    }
  }
 
  // get event style for user owner
  $event_owner_style = '';
  // We decide to choose color of owner of event (event->userownerid is user id of owner, event->userassigned contains all users assigned to event)
  if ($obj->fk_user_action > 0 && $cache_user_list[$obj->fk_user_action]->color != '') {
    $event_owner_style .= 'border-left: #' . $cache_user_list[$obj->fk_user_action]->color . ' 5px solid;';
  }
 
  // get event style for start and end date
  $event_more_class = '';
  $event_start_date_css = '';
  $event_end_date_css = '';
  $event_start_date_time = $actionstatic->datep;
  if ($event_start_date_time > $now) {
    // future event
    $event_more_class = 'event-future';
    $event_start_date_css = $event_end_date_css = $event_more_class;
  } else {
    if ($obj->fulldayevent == 1) {
      $today_start_date_time = $today_start_time;
    } else {
      $today_start_date_time = $now;
    }
 
    // check event end date
    $event_end_date_time = $db->jdate($obj->dp2);
    if ($event_end_date_time != null && $event_end_date_time < $today_start_date_time) {
      // past event
      $event_more_class = 'event-past';
    } elseif ($event_end_date_time == null && $event_start_date_time < $today_start_date_time) {
      // past event
      $event_more_class = 'event-past';
    } else {
      // current event
      $event_more_class = 'event-current';
    }
    $event_start_date_css = $event_end_date_css = $event_more_class;
  }
  $event_start_date_css = $event_end_date_css = $event_more_class;
 
  print '<tr class="oddeven row-with-select ' . ($event_more_class != '' ? ' '.$event_more_class : '') . '">';
 
  // Action column
  if ($conf->main_checkbox_left_column) {
    print '<td class="nowrap center">';
    if ($massactionbutton || $massaction) {   // If we are in select mode (massactionbutton defined) or if we have already selected and sent an action ($massaction) defined
      $selected = 0;
      if (in_array($obj->id, $arrayofselected)) {
        $selected = 1;
      }
      print '<input id="cb'.$obj->id.'" class="flat checkforselect" type="checkbox" name="toselect[]" value="'.$obj->id.'"'.($selected ? ' checked="checked"' : '').'>';
    }
    print '</td>';
  }
  // Ref
  if (!empty($arrayfields['a.id']['checked'])) {
    print '<td class="nowraponall">';
    print $actionstatic->getNomUrl(1, -1);
    print '</td>';
  }
 
  // Start date
  if (!empty($arrayfields['a.datep']['checked'])) {
    print '<td class="center nowraponall'.($event_start_date_css ? ' '.$event_start_date_css.'x' : '').'"><span>';
    if (empty($obj->fulldayevent)) {
      print '<div class="center inline-block lineheightsmall">';
      print dol_print_date($db->jdate($obj->dp), 'dayreduceformat', 'tzuserrel');
      print '<br><span class="opacitymedium hourspan">';
      print dol_print_date($db->jdate($obj->dp), 'hourreduceformat', 'tzuserrel');
      print '</span>';
      print '</div>';
    } else {
      $tzforfullday = getDolGlobalString('MAIN_STORE_FULL_EVENT_IN_GMT');
      print '<div class="center inline-block lineheightsmall">';
      print dol_print_date($db->jdate($obj->dp), 'day', ($tzforfullday ? $tzforfullday : 'tzuserrel'));
      print '<br><span class="opacitymedium hourspan">';
      print dol_print_date(0, 'hourreduceformat', 'gmt');
      print '</span>';
      print '</div>';
    }
    print '</span>';
    $late = 0;
    if ($actionstatic->hasDelay() && $actionstatic->percentage >= 0 && $actionstatic->percentage < 100) {
      $late = 1;
    }
    if ($late) {
      print img_warning($langs->trans("Late")).' ';
    }
    print '</td>';
  }
 
  // End date
  if (!empty($arrayfields['a.datep2']['checked'])) {
    print '<td class="center nowraponall'.($event_end_date_css ? ' '.$event_end_date_css.'x' : '').'"><span>';
    if (empty($obj->fulldayevent)) {
      print '<div class="center inline-block lineheightsmall">';
      print dol_print_date($db->jdate($obj->dp2), 'dayreduceformat', 'tzuserrel');
      print '<br><span class="opacitymedium hourspan">';
      print dol_print_date($db->jdate($obj->dp2), 'hourreduceformat', 'tzuserrel');
      print '</span>';
      print '</div>';
    } else {
      $tzforfullday = getDolGlobalString('MAIN_STORE_FULL_EVENT_IN_GMT');
      print '<div class="center inline-block lineheightsmall">';
      print dol_print_date($db->jdate($obj->dp2), 'day', ($tzforfullday ? $tzforfullday : 'tzuserrel'));
      print '<br><span class="opacitymedium hourspan">';
      print dol_print_date(23*60*60+59*60+59, 'hourreduceformat', 'gmt');
      print '</span>';
      print '</div>';
    }
    print '</span>';
    print '</td>';
  }
 
  // User owner
  if (!empty($arrayfields['owner']['checked'])) {
    print '<td class="tdoverflowmax125">';
    if ($obj->fk_user_action > 0 && !isset($cache_user_list[$obj->fk_user_action])) {
      $userstatic = new User($db);
      $res = $userstatic->fetch($obj->fk_user_action);
      if ($res > 0) {
        $cache_user_list[$obj->fk_user_action] = $userstatic;
      }
    }
    if (isset($cache_user_list[$obj->fk_user_action])) {
      print $cache_user_list[$obj->fk_user_action]->getNomUrl(-1, '', 0, 0, 16, 0, 'firstelselast', '');
    }
    print '</td>';
  }
 
  // Type
  if (!empty($arrayfields['c.libelle']['checked'])) {
    print '<td class="tdoverflowmax125 nowraponall">';
    // Example $actionstatic->code = AC_COMPANY_MODIFY and $actionstatic->type_code = AC_OTH_AUTO
    print $actionstatic->getTypePicto();
    $labeltype = $obj->type_code;
    if (!getDolGlobalString('AGENDA_USE_EVENT_TYPE') && empty($arraylist[$labeltype])) {
      $labeltype = 'AC_OTH';
    }
    if (!empty($actionstatic->code) && preg_match('/^TICKET_MSG/', $actionstatic->code)) {
      $labeltype = $langs->trans("Message");
    } else {
      if (!empty($arraylist[$labeltype])) {
        $labeltype = $arraylist[$labeltype];
      }
      if ($obj->type_code == 'AC_OTH_AUTO' && ($obj->type_code != $obj->code) && $labeltype && !empty($arraylist[$obj->code])) {
        $labeltype .= ' - '.$arraylist[$obj->code]; // Use code in priority on type_code
      }
    }
    print dol_trunc($labeltype, 28);
    print '</td>';
  }
 
  // Label
  if (!empty($arrayfields['a.label']['checked'])) {
    print '<td class="tdoverflowmax300" title="'.dolPrintHTMLForAttribute($actionstatic->label).'">';
    print dolPrintHTML($actionstatic->label);
    print '</td>';
  }
 
  // Description
  if (!empty($arrayfields['a.note']['checked'])) {
    $text = dolGetFirstLineOfText(dol_string_nohtmltag($actionstatic->note_private, 1));
    print '<td class="minwidth150">';
    print '<div class="small twolinesmax lineheightsmall minwidth150 maxwidth250 classfortooltip" title="'.dolPrintHTMLForAttribute($actionstatic->note_private).'">';
    //print $form->textwithtooltip(dol_trunc($text, 48), $actionstatic->note_private);
    print dolPrintHTML($text);
    print '</div>';
    print '</td>';
  }
 
  // Third party
  if (!empty($arrayfields['s.nom']['checked'])) {
    print '<td class="tdoverflowmax150">';
    if ($obj->socid > 0) {
      $societestatic->id = $obj->socid;
      $societestatic->client = (int) $obj->client;
      $societestatic->name = (string) $obj->societe;
      $societestatic->email = $obj->socemail;
 
      print $societestatic->getNomUrl(1, '', 28);
    }
    print '</td>';
  }
 
  // Contact
  if (!empty($arrayfields['a.fk_contact']['checked'])) {
    print '<td class="tdoverflowmax100">';
    if (!empty($actionstatic->socpeopleassigned)) {   // $actionstatic->socpeopleassigned is loaded by $actionstatic->fetchResources() if property contact visible
      $contactList = array();
      foreach ($actionstatic->socpeopleassigned as $socpeopleassigned) {
        if (!isset($contactListCache[$socpeopleassigned['id']])) {
          // if no cache found we fetch it
          $contact = new Contact($db);
          if ($contact->fetch($socpeopleassigned['id']) > 0) {
            $contactListCache[$socpeopleassigned['id']] = $contact->getNomUrl(1, '', 0);
            $contactList[] = $contact->getNomUrl(1, '', 0);
          }
        } else {
          // use cache
          $contactList[] = $contactListCache[$socpeopleassigned['id']];
        }
      }
      if (!empty($contactList)) {
        print implode(', ', $contactList);
      }
    } elseif ($obj->fk_contact > 0) { // keep for retrocompatibility with faraway events (no more used)
      $tmpcontact = new Contact($db);     // TODO Add a cache
      $tmpcontact->fetch($obj->fk_contact);
 
      print $contactstatic->getNomUrl(1, '', 0);
    }
    print '</td>';
  }
 
  // Linked object
  if (!empty($arrayfields['a.fk_element']['checked'])) {
    print '<td class="tdoverflowmax150 nowraponall">';
    if (isset($obj->elementtype) && !empty($obj->fk_element)) {
      if (isset($elementlinkcache[$obj->elementtype]) && isset($elementlinkcache[$obj->elementtype][$obj->fk_element])) {
        $link = $elementlinkcache[$obj->elementtype][$obj->fk_element];
      } else {
        if (!isset($elementlinkcache[$obj->elementtype])) {
          $elementlinkcache[$obj->elementtype] = array();
        }
        $link = dolGetElementUrl((int) $obj->fk_element, $obj->elementtype, 1);
        $elementlinkcache[$obj->elementtype][$obj->fk_element] = $link;
      }
      print $link;
    }
    print '</td>';
  }
 
  // Extra fields
  include DOL_DOCUMENT_ROOT.'/core/tpl/extrafields_list_print_fields.tpl.php';
  // Fields from hook
  $parameters = array('arrayfields' => $arrayfields, 'obj' => $obj, 'i' => $i, 'totalarray' => &$totalarray);
  $reshook = $hookmanager->executeHooks('printFieldListValue', $parameters); // Note that $action and $object may have been modified by hook
  print $hookmanager->resPrint;
 
  // Date creation
  if (!empty($arrayfields['a.datec']['checked'])) {
    // Status/Percent
    print '<td class="center nowrap">'.dol_print_date($db->jdate($obj->datec), 'dayhour', 'tzuserrel').'</td>';
  }
  // Date update
  if (!empty($arrayfields['a.tms']['checked'])) {
    print '<td class="center nowrap">'.dol_print_date($db->jdate($obj->datem), 'dayhour', 'tzuserrel').'</td>';
  }
  // Import key
  if (!empty($arrayfields['a.import_key']['checked'])) {
    print '<td class="center nowrap">'.dolPrintHTML($obj->import_key).'</td>';
  }
  // Status/Percent
  if (!empty($arrayfields['a.percent']['checked'])) {
    $datep = $db->jdate($obj->dp);
    print '<td class="center nowrap">'.$actionstatic->LibStatut($obj->percent, 5, 0, $datep).'</td>';
  }
  // Action column
  if (!$conf->main_checkbox_left_column) {
    print '<td class="nowrap center">';
    if ($massactionbutton || $massaction) {   // If we are in select mode (massactionbutton defined) or if we have already selected and sent an action ($massaction) defined
      $selected = 0;
      if (in_array($obj->id, $arrayofselected)) {
        $selected = 1;
      }
      print '<input id="cb'.$obj->id.'" class="flat checkforselect" type="checkbox" name="toselect[]" value="'.$obj->id.'"'.($selected ? ' checked="checked"' : '').'>';
    }
    print '</td>';
  }
 
  print '</tr>'."\n";
 
  $i++;
}
// If no record found
if ($num == 0) {
  print '<tr><td colspan="'.$totalarray['nbfield'].'"><span class="opacitymedium">'.$langs->trans("NoRecordFound").'</span></td></tr>';
}
 
 
print '</table>'."\n";
print '</div>'."\n";
 
print '</form>'."\n";
 
$db->free($resql);
 
// End of page
llxFooter();
$db->close();