* Copyright (C) 2006-2015 Laurent Destailleur * Copyright (C) 2010 Regis Houssin * Copyright (C) 2019 Nicolas ZABOURI * Copyright (C) 2023 Gauthier VERDOL * * 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 . */ /** * \file htdocs/projet/activity/index.php * \ingroup projet * \brief Page on activity of projects */ require "../../main.inc.php"; require_once DOL_DOCUMENT_ROOT.'/projet/class/project.class.php'; require_once DOL_DOCUMENT_ROOT.'/projet/class/task.class.php'; require_once DOL_DOCUMENT_ROOT.'/core/lib/project.lib.php'; require_once DOL_DOCUMENT_ROOT.'/core/lib/date.lib.php'; // Load translation files required by the page $langs->loadLangs(array('projects', 'companies')); $hookmanager = new HookManager($db); // Initialize a technical object to manage hooks. Note that conf->hooks_modules contains array $hookmanager->initHooks(array('activityindex')); $action = GETPOST('action', 'aZ09'); $search_project_user = GETPOST('search_project_user'); $mine = (GETPOST('mode', 'aZ09') == 'mine' || $search_project_user == $user->id) ? 1 : 0; if ($mine == 0 && $search_project_user === '') { $search_project_user = getDolGlobalString('MAIN_SEARCH_PROJECT_USER_PROJECTSINDEX'); } if ($search_project_user == $user->id) { $mine = 1; } // Security check $socid = 0; if ($user->socid > 0) { $socid = $user->socid; } //$result = restrictedArea($user, 'projet', $projectid); if (!$user->hasRight('projet', 'lire')) { accessforbidden(); } /* * Actions */ $parameters = array(); $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'); } if (empty($reshook)) { if ($action == 'refresh_search_project_user') { $search_project_user = GETPOSTINT('search_project_user'); $tabparam = array("MAIN_SEARCH_PROJECT_USER_PROJECTSINDEX" => $search_project_user); include_once DOL_DOCUMENT_ROOT.'/core/lib/functions2.lib.php'; $result = dol_set_user_param($db, $conf, $user, $tabparam); } } /* * View */ $now = dol_now(); $tmp = dol_getdate($now); $day = $tmp['mday']; $month = $tmp['mon']; $year = $tmp['year']; $form = new Form($db); $projectstatic = new Project($db); $projectsListId = $projectstatic->getProjectsAuthorizedForUser($user, 0, 1); // Return all projects I have permission on because I want my tasks and some of my task may be on a public projet that is not my project $taskstatic = new Task($db); $tasktmp = new Task($db); $title = $langs->trans("Activities"); //if ($mine) $title=$langs->trans("MyActivities"); llxHeader("", $title, '', '', 0, 0, '', '', '', 'mod-project project-activity page-dashboard'); // Title for combo list see all projects $titleall = $langs->trans("AllAllowedProjects"); if ($user->hasRight('projet', 'all', 'lire') && !$socid) { $titleall = $langs->trans("AllProjects"); } else { $titleall = $langs->trans("AllAllowedProjects").'

'; } $morehtml = ''; $morehtml .= '
'; $morehtml .= ''; $morehtml .= ''; $morehtml .= ''; $morehtml .= ajax_combobox("search_project_user", array(), 0, 0, 'resolve', '-1', 'small'); $morehtml .= ''; if ($mine) { $tooltiphelp = $langs->trans("MyTasksDesc"); } else { if ($user->hasRight('projet', 'all', 'lire') && !$socid) { $tooltiphelp = $langs->trans("TasksDesc"); } else { $tooltiphelp = $langs->trans("TasksPublicDesc"); } } print_barre_liste($form->textwithpicto($title, $tooltiphelp), 0, $_SERVER["PHP_SELF"], '', '', '', '', 0, -1, 'projecttask', 0, $morehtml); print '
'; /* Show list of project today */ print '
'; print ''; print ''; print ''; print ''; print "\n"; $sql = "SELECT p.rowid, p.ref, p.title, p.public, SUM(tt.element_duration) as nb"; $sql .= " FROM ".MAIN_DB_PREFIX."projet as p"; $sql .= ", ".MAIN_DB_PREFIX."projet_task as t"; $sql .= ", ".MAIN_DB_PREFIX."element_time as tt"; $sql .= " WHERE t.fk_projet = p.rowid"; $sql .= " AND p.entity = ".((int) $conf->entity); $sql .= " AND tt.fk_element = t.rowid"; $sql .= " AND tt.elementtype = 'task'"; $sql .= " AND tt.fk_user = ".((int) $user->id); $sql .= " AND element_date BETWEEN '".$db->idate(dol_mktime(0, 0, 0, $month, $day, $year))."' AND '".$db->idate(dol_mktime(23, 59, 59, $month, $day, $year))."'"; $sql .= " AND p.rowid in (".$db->sanitize($projectsListId).")"; $sql .= " GROUP BY p.rowid, p.ref, p.title, p.public"; $resql = $db->query($sql); if ($resql) { $total = 0; while ($row = $db->fetch_object($resql)) { print ''; print ''; print ''; print "\n"; $total += $row->nb; } $db->free($resql); } else { dol_print_error($db); } print ''; print ''; print ''; print "\n"; print "
'.$langs->trans('ActivityOnProjectToday').''.$langs->trans("Time").'
'; $projectstatic->id = $row->rowid; $projectstatic->ref = $row->ref; $projectstatic->title = $row->title; $projectstatic->public = $row->public; print $projectstatic->getNomUrl(1, '', 1); print ''.convertSecondToTime($row->nb, 'allhourmin').'
'.$langs->trans('Total').''.convertSecondToTime($total, 'allhourmin').'
"; print '
'; print '
'; /* Show list of yesterday's projects */ print '
'; print ''; print ''; print ''; print ''; print "\n"; $sql = "SELECT p.rowid, p.ref, p.title, p.public, SUM(tt.element_duration) as nb"; $sql .= " FROM ".MAIN_DB_PREFIX."projet as p"; $sql .= ", ".MAIN_DB_PREFIX."projet_task as t"; $sql .= ", ".MAIN_DB_PREFIX."element_time as tt"; $sql .= " WHERE t.fk_projet = p.rowid"; $sql .= " AND p.entity = ".((int) $conf->entity); $sql .= " AND tt.fk_element = t.rowid"; $sql .= " AND tt.elementtype = 'task'"; $sql .= " AND tt.fk_user = ".((int) $user->id); $sql .= " AND element_date BETWEEN '".$db->idate(dol_time_plus_duree(dol_mktime(0, 0, 0, $month, $day, $year), -1, 'd'))."' AND '".$db->idate(dol_time_plus_duree(dol_mktime(23, 59, 59, $month, $day, $year), -1, 'd'))."'"; $sql .= " AND p.rowid in (".$db->sanitize($projectsListId).")"; $sql .= " GROUP BY p.rowid, p.ref, p.title, p.public"; $resql = $db->query($sql); if ($resql) { $total = 0; while ($row = $db->fetch_object($resql)) { print ''; print ''; print ''; print "\n"; $total += $row->nb; } $db->free($resql); } else { dol_print_error($db); } print ''; print ''; print ''; print "\n"; print "
'.$langs->trans('ActivityOnProjectYesterday').''.$langs->trans("Time").'
'; $projectstatic->id = $row->rowid; $projectstatic->ref = $row->ref; $projectstatic->title = $row->title; $projectstatic->public = $row->public; print $projectstatic->getNomUrl(1, '', 1); print ''.convertSecondToTime($row->nb, 'allhourmin').'
'.$langs->trans('Total').''.convertSecondToTime($total, 'allhourmin').'
"; print '
'; /* if ($db->type != 'pgsql') { print '
'; // Show list of projects active this week print '
'; print ''; print ''; print ''; print ''; print "\n"; $sql = "SELECT p.rowid, p.ref, p.title, p.public, SUM(tt.task_duration) as nb"; $sql.= " FROM ".MAIN_DB_PREFIX."projet as p"; $sql.= " , ".MAIN_DB_PREFIX."projet_task as t"; $sql.= " , ".MAIN_DB_PREFIX."element_time as tt"; $sql.= " WHERE t.fk_projet = p.rowid"; $sql.= " AND p.entity = ".((int) $conf->entity); $sql.= " AND tt.fk_task = t.rowid"; $sql.= " AND tt.fk_user = ".((int) $user->id); $sql.= " AND task_date >= '".$db->idate(dol_get_first_day($year, $month)).'" AND ..."; $sql.= " AND p.rowid in (".$db->sanitize($projectsListId).")"; $sql.= " GROUP BY p.rowid, p.ref, p.title"; $resql = $db->query($sql); if ( $resql ) { $total = 0; while ($row = $db->fetch_object($resql)) { print ''; print ''; print ''; print "\n"; $total += $row->nb; } $db->free($resql); } else { dol_print_error($db); } print ''; print ''; print ''; print "\n"; print "
'.$langs->trans("ActivityOnProjectThisWeek").''.$langs->trans("Time").'
'; $projectstatic->id=$row->rowid; $projectstatic->ref=$row->ref; $projectstatic->title=$row->title; $projectstatic->public=$row->public; print $projectstatic->getNomUrl(1, '', 1); print ''.convertSecondToTime($row->nb, 'allhourmin').'
'.$langs->trans('Total').''.convertSecondToTime($total, 'allhourmin').'

"; } */ /* Show list of projects active this month */ if (getDolGlobalString('PROJECT_TASK_TIME_MONTH')) { print '
'; print ''; print ''; print ''; print ''; print "\n"; $sql = "SELECT p.rowid, p.ref, p.title, p.public, SUM(tt.element_duration) as nb"; $sql .= " FROM ".MAIN_DB_PREFIX."projet as p"; $sql .= ", ".MAIN_DB_PREFIX."projet_task as t"; $sql .= ", ".MAIN_DB_PREFIX."element_time as tt"; $sql .= " WHERE t.fk_projet = p.rowid"; $sql .= " AND p.entity = ".((int) $conf->entity); $sql .= " AND tt.fk_element = t.rowid"; $sql .= " AND tt.elementtype = 'task'"; $sql .= " AND tt.fk_user = ".((int) $user->id); $sql .= " AND element_date BETWEEN '".$db->idate(dol_get_first_day($year, $month))."' AND '".$db->idate(dol_get_last_day($year, $month))."'"; $sql .= " AND p.rowid in (".$db->sanitize($projectsListId).")"; $sql .= " GROUP BY p.rowid, p.ref, p.title, p.public"; $resql = $db->query($sql); if ($resql) { while ($row = $db->fetch_object($resql)) { print ''; print ''; print ''; print "\n"; } $db->free($resql); } else { dol_print_error($db); } print ''; print ''; print ''; print "\n"; print "
'.$langs->trans("ActivityOnProjectThisMonth").': '.dol_print_date($now, "%B %Y").''.$langs->trans("Time").'
'; $projectstatic->id = $row->rowid; $projectstatic->ref = $row->ref; $projectstatic->title = $row->title; print $projectstatic->getNomUrl(1, '', 1); print ''.convertSecondToTime($row->nb, 'allhourmin').'
'.$langs->trans('Total').''.convertSecondToTime($total, 'allhourmin').'
"; print '
'; } /* Show list of projects that were active this year */ if (getDolGlobalString('PROJECT_TASK_TIME_YEAR')) { print '
'; print '
'; print ''; print ''; print ''; print "\n"; $sql = "SELECT p.rowid, p.ref, p.title, p.public, SUM(tt.element_duration) as nb"; $sql .= " FROM ".MAIN_DB_PREFIX."projet as p"; $sql .= ", ".MAIN_DB_PREFIX."projet_task as t"; $sql .= ", ".MAIN_DB_PREFIX."element_time as tt"; $sql .= " WHERE t.fk_projet = p.rowid"; $sql .= " AND p.entity = ".((int) $conf->entity); $sql .= " AND tt.fk_element = t.rowid"; $sql .= " AND tt.elementtype = 'task'"; $sql .= " AND tt.fk_user = ".((int) $user->id); $sql .= " AND YEAR(element_date) = '".dol_print_date($now, "%Y")."'"; $sql .= " AND p.rowid in (".$db->sanitize($projectsListId).")"; $sql .= " GROUP BY p.rowid, p.ref, p.title, p.public"; $resql = $db->query($sql); if ($resql) { while ($row = $db->fetch_object($resql)) { print ''; print ''; print ''; print "\n"; } $db->free($resql); } else { dol_print_error($db); } print ''; print ''; print ''; print "\n"; print "
'.$langs->trans("ActivityOnProjectThisYear").': '.dol_print_date($now, "%Y").''.$langs->trans("Time").'
'; $projectstatic->id = $row->rowid; $projectstatic->ref = $row->ref; $projectstatic->title = $row->title; $projectstatic->public = $row->public; print $projectstatic->getNomUrl(1, '', 1); print ''.convertSecondToTime($row->nb, 'allhourmin').'
'.$langs->trans('Total').''.convertSecondToTime($total, 'allhourmin').'
"; print '
'; } if (!getDolGlobalString('PROJECT_HIDE_TASKS') && getDolGlobalString('PROJECT_SHOW_TASK_LIST_ON_PROJECT_AREA')) { // Get id of types of contacts for projects (This list never contains a lot of elements) $listofprojectcontacttype = array(); $sql = "SELECT ctc.rowid, ctc.code FROM ".MAIN_DB_PREFIX."c_type_contact as ctc"; $sql .= " WHERE ctc.element = '".$db->escape($projectstatic->element)."'"; $sql .= " AND ctc.source = 'internal'"; $resql = $db->query($sql); if ($resql) { while ($obj = $db->fetch_object($resql)) { $listofprojectcontacttype[$obj->rowid] = $obj->code; } } else { dol_print_error($db); } if (count($listofprojectcontacttype) == 0) { $listofprojectcontacttype[0] = '0'; // To avoid sql syntax error if not found } // Get id of types of contacts for tasks (This list never contains a lot of elements) $listoftaskcontacttype = array(); $sql = "SELECT ctc.rowid, ctc.code FROM ".MAIN_DB_PREFIX."c_type_contact as ctc"; $sql .= " WHERE ctc.element = '".$db->escape($taskstatic->element)."'"; $sql .= " AND ctc.source = 'internal'"; $resql = $db->query($sql); if ($resql) { while ($obj = $db->fetch_object($resql)) { $listoftaskcontacttype[$obj->rowid] = $obj->code; } } else { dol_print_error($db); } if (count($listoftaskcontacttype) == 0) { $listoftaskcontacttype[0] = '0'; // To avoid sql syntax error if not found } // Tasks for all resources of all opened projects and time spent for each task/resource // This list can be very long, so we don't show it by default on task area. We prefer to use the list page. // Add constant PROJECT_SHOW_TASK_LIST_ON_PROJECT_AREA to show this list $max = getDolGlobalInt('PROJECT_LIMIT_TASK_PROJECT_AREA', 1000); $sql = "SELECT p.ref, p.title, p.rowid as projectid, p.fk_statut as status, p.fk_opp_status as opp_status, p.public, p.dateo as projdate_start, p.datee as projdate_end,"; $sql .= " t.label, t.rowid as taskid, t.planned_workload, t.duration_effective, t.progress, t.dateo as date_start, t.datee as date_end, SUM(tasktime.element_duration) as timespent"; $sql .= " FROM ".MAIN_DB_PREFIX."projet as p"; $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."societe as s on p.fk_soc = s.rowid"; $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."projet_task as t on t.fk_projet = p.rowid"; $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."element_time as tasktime on (tasktime.fk_element = t.rowid AND tasktime.elementtype = 'task')"; $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."user as u on tasktime.fk_user = u.rowid"; if ($mine) { $sql .= ", ".MAIN_DB_PREFIX."element_contact as ect"; } $sql .= " WHERE p.entity IN (".getEntity('project').")"; if ($mine || !$user->hasRight('projet', 'all', 'lire')) { $sql .= " AND p.rowid IN (".$db->sanitize($projectsListId).")"; // project i have permission on } if ($mine) { // this may duplicate record if we are contact twice $sql .= " AND ect.fk_c_type_contact IN (".$db->sanitize(implode(',', array_keys($listoftaskcontacttype))).") AND ect.element_id = t.rowid AND ect.fk_socpeople = ".((int) $user->id); } if ($socid) { $sql .= " AND (p.fk_soc IS NULL OR p.fk_soc = 0 OR p.fk_soc = ".((int) $socid).")"; } $sql .= " AND p.fk_statut=1"; $sql .= " GROUP BY p.ref, p.title, p.rowid, p.fk_statut, p.fk_opp_status, p.public, p.dateo, p.datee, t.label, t.rowid, t.planned_workload, t.duration_effective, t.progress, t.dateo, t.datee"; $sql .= " ORDER BY t.dateo DESC, t.rowid DESC, t.datee DESC"; $sql .= $db->plimit($max + 1); // We want more to know if we have more than limit dol_syslog('projet:index.php: affectationpercent', LOG_DEBUG); $resql = $db->query($sql); if ($resql) { $num = $db->num_rows($resql); $i = 0; //print load_fiche_titre($langs->trans("TasksOnOpenedProject"),'','').'
'; print '
'; print ''; print ''; //print ''; print ''; if (getDolGlobalString('PROJECT_USE_OPPORTUNITIES')) { print ''; } print ''; print ''; print ''; print ''; print ''; print ''; while ($i < $num && $i < $max) { $obj = $db->fetch_object($resql); $projectstatic->id = $obj->projectid; $projectstatic->ref = $obj->ref; $projectstatic->title = $obj->title; $projectstatic->statut = $obj->status; $projectstatic->public = $obj->public; $projectstatic->date_start = $db->jdate($obj->projdate_start); $projectstatic->date_end = $db->jdate($obj->projdate_end); $taskstatic->projectstatus = $obj->projectstatus; $taskstatic->progress = $obj->progress; $taskstatic->fk_statut = $obj->status; $taskstatic->status = $obj->status; $taskstatic->date_start = $db->jdate($obj->date_start); $taskstatic->date_end = $db->jdate($obj->date_end); $taskstatic->dateo = $db->jdate($obj->date_start); $taskstatic->datee = $db->jdate($obj->date_end); $username = ''; if ($obj->userid && $userstatic->id != $obj->userid) { // We have a user and it is not last loaded user $result = $userstatic->fetch($obj->userid); if (!$result) { $userstatic->id = 0; } } if ($userstatic->id) { $username = $userstatic->getNomUrl(0, 0); } print ''; //print ''; print ''; if (getDolGlobalString('PROJECT_USE_OPPORTUNITIES')) { print ''; } print ''; print ''; print ''; print ''; print ''; print ''; print ''; print "\n"; $i++; } if ($num > $max) { $colspan = 6; if (getDolGlobalString('PROJECT_USE_OPPORTUNITIES')) { $colspan++; } print ''; } print "
'.$langs->trans('TaskRessourceLinks').''.$langs->trans('OpenedProjects').''.$langs->trans('OpportunityStatus').''.$langs->trans('Task').''.$langs->trans('DateStart').''.$langs->trans('DateEnd').''.$langs->trans('PlannedWorkload').''.$langs->trans('TimeSpent').''.$langs->trans("ProgressCalculated").''; print ''.$langs->trans("ProgressDeclared").''; print '
'.$username.''; print $projectstatic->getNomUrl(1, '', 0, '', '
'); print '		'; $code = dol_getIdFromCode($db, $obj->opp_status, 'c_lead_status', 'rowid', 'code'); if ($code) { print $langs->trans("OppStatus".$code); } print ''; if (!empty($obj->taskid)) { $tasktmp->id = $obj->taskid; $tasktmp->ref = $obj->ref; $tasktmp->label = $obj->label; print $tasktmp->getNomUrl(1, 'withproject', 'task', 1, '
'); } else { print $langs->trans("NoTasks"); } print '		'.dol_print_date($db->jdate($obj->date_start), 'day').''.dol_print_date($db->jdate($obj->date_end), 'day'); if ($taskstatic->hasDelay()) { print img_warning($langs->trans("Late")); } print ''; print convertSecondToTime($obj->planned_workload, 'allhourmin'); print ''; print convertSecondToTime($obj->timespent, 'allhourmin'); print ''; if (!empty($obj->taskid)) { if (empty($obj->planned_workload) > 0) { $percentcompletion = $langs->trans("WorkloadNotDefined"); } else { $percentcompletion = intval($obj->duration_effective * 100 / $obj->planned_workload).'%'; } } print $percentcompletion; print ''; print ($obj->taskid > 0) ? $obj->progress.'%' : ''; print '
'.$langs->trans("WarningTooManyDataPleaseUseMoreFilters").'
"; print '
'; $db->free($resql); } else { dol_print_error($db); } } print '
'; $parameters = array('user' => $user); $reshook = $hookmanager->executeHooks('dashboardActivities', $parameters, $object); // Note that $action and $object may have been modified by hook // End of page llxFooter(); $db->close();