* Copyright (C) 2006-2015 Laurent Destailleur * Copyright (C) 2010 Regis Houssin * * 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 activite perso du module projet */ 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'; $mine = $_REQUEST['mode']=='mine' ? 1 : 0; // Security check $socid=0; if ($user->societe_id > 0) $socid=$user->societe_id; //$result = restrictedArea($user, 'projet', $projectid); if (!$user->rights->projet->lire) accessforbidden(); $langs->load("projects"); /* * View */ $now = dol_now(); $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 $tasktmp=new Task($db); $title=$langs->trans("Activities"); if ($mine) $title=$langs->trans("MyActivities"); llxHeader("",$title); print_fiche_titre($title, '', 'title_project'); if ($mine) print $langs->trans("MyTasksDesc").'

'; else { if ($user->rights->projet->all->lire && ! $socid) print $langs->trans("TasksDesc").'

'; else print $langs->trans("TasksPublicDesc").'

'; } print '
'; // Search task if (! empty($conf->projet->enabled) && $user->rights->projet->lire) { $var=false; print '
'; print ''; print ''; print ''; // All status print ''; print ''; print ''; print ''; print ''; //print ''; print ''; print ''; print "
'.$langs->trans("SearchATask").'
:
:
:
\n"; print "
\n"; } /* Affichage de la liste des projets d'aujourd'hui */ print '
'; print ''; print ''; print ''; print "\n"; $sql = "SELECT p.rowid, p.ref, p.title, 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."projet_task_time as tt"; $sql.= " WHERE t.fk_projet = p.rowid"; $sql.= " AND p.entity = ".$conf->entity; $sql.= " AND tt.fk_task = t.rowid"; $sql.= " AND tt.fk_user = ".$user->id; $sql.= " AND date_format(task_date,'%y-%m-%d') = '".strftime("%y-%m-%d",$now)."'"; $sql.= " AND p.rowid in (".$projectsListId.")"; $sql.= " GROUP BY p.rowid, p.ref, p.title"; $resql = $db->query($sql); if ( $resql ) { $var=true; $total=0; while ($row = $db->fetch_object($resql)) { $var=!$var; 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; print $projectstatic->getNomUrl(1, '', 1); print ''.convertSecondToTime($row->nb).'
'.$langs->trans('Total').''.convertSecondToTime($total).'
"; // TODO Do not use date_add function to be compatible with all database if ($db->type != 'pgsql') { /* Affichage de la liste des projets d'hier */ print '
'; print ''; print ''; print ''; print "\n"; $sql = "SELECT p.rowid, p.ref, p.title, 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."projet_task_time as tt"; $sql.= " WHERE t.fk_projet = p.rowid"; $sql.= " AND p.entity = ".$conf->entity; $sql.= " AND tt.fk_task = t.rowid"; $sql.= " AND tt.fk_user = ".$user->id; $sql.= " AND date_format(date_add(task_date, INTERVAL 1 DAY),'%y-%m-%d') = '".strftime("%y-%m-%d",$now)."'"; $sql.= " AND p.rowid in (".$projectsListId.")"; $sql.= " GROUP BY p.rowid, p.ref, p.title"; $resql = $db->query($sql); if ( $resql ) { $var=true; $total=0; while ($row = $db->fetch_object($resql)) { $var=!$var; 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; print $projectstatic->getNomUrl(1, '', 1); print ''.convertSecondToTime($row->nb).'
'.$langs->trans('Total').''.convertSecondToTime($total).'
"; } // TODO Do not use week function to be compatible with all database if ($db->type != 'pgsql') { print '
'; /* Affichage de la liste des projets de la semaine */ print ''; print ''; print ''; print ''; print "\n"; $sql = "SELECT p.rowid, p.ref, p.title, 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."projet_task_time as tt"; $sql.= " WHERE t.fk_projet = p.rowid"; $sql.= " AND p.entity = ".$conf->entity; $sql.= " AND tt.fk_task = t.rowid"; $sql.= " AND tt.fk_user = ".$user->id; $sql.= " AND week(task_date) = '".strftime("%W",time())."'"; $sql.= " AND p.rowid in (".$projectsListId.")"; $sql.= " GROUP BY p.rowid, p.ref, p.title"; $resql = $db->query($sql); if ( $resql ) { $total = 0; $var=true; while ($row = $db->fetch_object($resql)) { $var=!$var; 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; print $projectstatic->getNomUrl(1, '', 1); print ''.convertSecondToTime($row->nb).'
'.$langs->trans('Total').''.convertSecondToTime($total).'

"; } /* Affichage de la liste des projets du mois */ print ''; print ''; print ''; print ''; print "\n"; $sql = "SELECT p.rowid, p.ref, p.title, 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."projet_task_time as tt"; $sql.= " WHERE t.fk_projet = p.rowid"; $sql.= " AND p.entity = ".$conf->entity; $sql.= " AND tt.fk_task = t.rowid"; $sql.= " AND tt.fk_user = ".$user->id; $sql.= " AND date_format(task_date,'%y-%m') = '".strftime("%y-%m",$now)."'"; $sql.= " AND p.rowid in (".$projectsListId.")"; $sql.= " GROUP BY p.rowid, p.ref, p.title"; $resql = $db->query($sql); if ( $resql ) { $var=false; while ($row = $db->fetch_object($resql)) { print ""; print ''; print ''; print "\n"; $var=!$var; } $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).'
'.$langs->trans('Total').''.convertSecondToTime($total).'
"; /* Affichage de la liste des projets de l'annee */ if (! empty($conf->global->PROJECT_TASK_TIME_YEAR)) { print '
'; print ''; print ''; print ''; print "\n"; $sql = "SELECT p.rowid, p.ref, p.title, 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."projet_task_time as tt"; $sql.= " WHERE t.fk_projet = p.rowid"; $sql.= " AND p.entity = ".$conf->entity; $sql.= " AND tt.fk_task = t.rowid"; $sql.= " AND tt.fk_user = ".$user->id; $sql.= " AND YEAR(task_date) = '".strftime("%Y",$now)."'"; $sql.= " AND p.rowid in (".$projectsListId.")"; $sql.= " GROUP BY p.rowid, p.ref, p.title"; $var=false; $resql = $db->query($sql); if ( $resql ) { while ($row = $db->fetch_object($resql)) { print ""; print ''; print ''; print "\n"; $var=!$var; } $db->free($resql); } else { dol_print_error($db); } print ''; print ''; print ''; print "\n"; print "
'.$langs->trans("ActivityOnProjectThisYear").': '.strftime("%Y", $now).''.$langs->trans("Time").'
'; $projectstatic->id=$row->rowid; $projectstatic->ref=$row->ref; $projectstatic->title=$row->title; print $projectstatic->getNomUrl(1, '', 1); print ''.convertSecondToTime($row->nb).'
'.$langs->trans('Total').''.convertSecondToTime($total).'
"; } print '
'; if (empty($conf->global->PROJECT_HIDE_TASKS)) { // Tasks for all resources of all opened projects and time spent for each task/resource $max = (empty($conf->global->PROJECT_LIMIT_TASK_PROJECT_AREA)?1000:$conf->global->PROJECT_LIMIT_TASK_PROJECT_AREA); $sql = "SELECT p.ref, p.title, p.rowid as projectid, p.fk_statut as status, p.fk_opp_status as opp_status, t.label, t.rowid as taskid, t.planned_workload, t.duration_effective, t.progress, t.dateo, t.datee, SUM(tasktime.task_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."projet_task_time as tasktime on tasktime.fk_task = t.rowid"; $sql.= " LEFT JOIN ".MAIN_DB_PREFIX."user as u on tasktime.fk_user = u.rowid"; $sql.= " WHERE p.entity = ".$conf->entity; if ($mine || empty($user->rights->projet->all->lire)) $sql.= " AND p.rowid IN (".$projectsListId.")"; if ($socid) $sql.= " AND (p.fk_soc IS NULL OR p.fk_soc = 0 OR p.fk_soc = ".$socid.")"; $sql.= " AND p.fk_statut=1"; $sql.= " GROUP BY p.ref, p.title, p.rowid, 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"; $sql.= $db->plimit($max+1); // We want more to know if we have more than limit $var=true; dol_syslog('projet:index.php: affectationpercent', LOG_DEBUG); $resql = $db->query($sql); if ( $resql ) { $num = $db->num_rows($resql); $i = 0; //print_fiche_titre($langs->trans("TasksOnOpenedProject"),'','').'
'; print ''; print ''; //print ''; print ''; if (! empty($conf->global->PROJECT_USE_OPPORTUNITIES)) print ''; print ''; print ''; print ''; print ''; print ''; print ''; while ($i < $num && $i < $max) { $obj = $db->fetch_object($resql); $var=!$var; $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 (! empty($conf->global->PROJECT_USE_OPPORTUNITIES)) { print ''; } print ''; print ''; print ''; print ''; print ''; print ''; print ''; print "\n"; $i++; } if ($num > $max) { $colspan=6; if (! empty($conf->global->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("ProgressDeclared").''; print ''.$langs->trans('TimeSpent').''.$langs->trans("ProgressCalculated").''; print '
'.$username.''; $projectstatic->id=$obj->projectid; $projectstatic->ref=$obj->ref; $projectstatic->title=$obj->title; print $projectstatic->getNomUrl(1,'',16,'','
'); //print ''.$obj->title.''; 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->dateo),'day').''.dol_print_date($db->jdate($obj->datee),'day').''; print convertSecondToTime($obj->planned_workload, 'all'); print ''; print ($obj->taskid>0)?$obj->progress.'%':''; print ''; print convertSecondToTime($obj->timespent, 'all'); 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 '
'.$langs->trans("WarningTooManyDataPleaseUseMoreFilters").'
"; $db->free($resql); } else { dol_print_error($db); } } print '
'; llxFooter(); $db->close();