ganttview.php

Go to the documentation of this file.

<?php
/* Copyright (C) 2005      Rodolphe Quiedeville <rodolphe@quiedeville.org>
 * Copyright (C) 2004-2017 Laurent Destailleur  <eldy@users.sourceforge.net>
 * Copyright (C) 2005-2012 Regis Houssin        <regis.houssin@inodbox.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/>.
 */
 
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';
require_once DOL_DOCUMENT_ROOT.'/societe/class/societe.class.php';
require_once DOL_DOCUMENT_ROOT.'/contact/class/contact.class.php';
require_once DOL_DOCUMENT_ROOT.'/categories/class/categorie.class.php';
require_once DOL_DOCUMENT_ROOT.'/core/class/html.formother.class.php';
 
$id = GETPOST('id', 'intcomma');
$ref = GETPOST('ref', 'alpha');
 
$mode = GETPOST('mode', 'alpha');
$mine = ($mode == 'mine' ? 1 : 0);
//if (! $user->rights->projet->all->lire) $mine=1;  // Special for projects
 
$object = new Project($db);
 
include DOL_DOCUMENT_ROOT.'/core/actions_fetchobject.inc.php'; // Must be include, not include_once
if (!empty($conf->global->PROJECT_ALLOW_COMMENT_ON_PROJECT) && method_exists($object, 'fetchComments') && empty($object->comments)) {
  $object->fetchComments();
}
 
// Security check
$socid = 0;
//if ($user->socid > 0) $socid = $user->socid;    // For external user, no check is done on company because readability is managed by public status of project and assignement.
$result = restrictedArea($user, 'projet', $id, 'projet&project');
 
// Load translation files required by the page
$langs->loadlangs(array('users', 'projects'));
 
 
/*
 * Actions
 */
 
// None
 
 
/*
 * View
 */
 
$form = new Form($db);
$formother = new FormOther($db);
$userstatic = new User($db);
$companystatic = new Societe($db);
$contactstatic = new Contact($db);
$task = new Task($db);
 
$arrayofcss = array('/includes/jsgantt/jsgantt.css');
 
if (!empty($conf->use_javascript_ajax)) {
  $arrayofjs = array(
  '/includes/jsgantt/jsgantt.js',
  '/projet/jsgantt_language.js.php?lang='.$langs->defaultlang
  );
}
 
//$title=$langs->trans("Gantt").($object->ref?' - '.$object->ref.' '.$object->name:'');
$title = $langs->trans("Gantt");
if (!empty($conf->global->MAIN_HTML_TITLE) && preg_match('/projectnameonly/', $conf->global->MAIN_HTML_TITLE) && $object->name) {
  $title = ($object->ref ? $object->ref.' '.$object->name.' - ' : '').$langs->trans("Gantt");
}
$help_url = "EN:Module_Projects|FR:Module_Projets|ES:M&oacute;dulo_Proyectos";
 
llxHeader("", $title, $help_url, '', 0, 0, $arrayofjs, $arrayofcss);
 
if (($id > 0 && is_numeric($id)) || !empty($ref)) {
  // To verify role of users
  //$userAccess = $object->restrictedProjectArea($user,'read');
  $userWrite = $object->restrictedProjectArea($user, 'write');
  //$userDelete = $object->restrictedProjectArea($user,'delete');
  //print "userAccess=".$userAccess." userWrite=".$userWrite." userDelete=".$userDelete;
 
  $tab = 'tasks';
 
  $head = project_prepare_head($object);
  print dol_get_fiche_head($head, $tab, $langs->trans("Project"), -1, ($object->public ? 'projectpub' : 'project'));
 
  $param = ($mode == 'mine' ? '&mode=mine' : '');
 
 
 
  // Project card
 
  $linkback = '<a href="'.DOL_URL_ROOT.'/projet/list.php?restore_lastsearch_values=1">'.$langs->trans("BackToList").'</a>';
 
  $morehtmlref = '<div class="refidno">';
  // Title
  $morehtmlref .= $object->title;
  // Thirdparty
  if (!empty($object->thirdparty->id) && $object->thirdparty->id > 0) {
    $morehtmlref .= '<br>'.$langs->trans('ThirdParty').' : '.$object->thirdparty->getNomUrl(1, 'project');
  }
  $morehtmlref .= '</div>';
 
  // Define a complementary filter for search of next/prev ref.
  if (empty($user->rights->projet->all->lire)) {
    $objectsListId = $object->getProjectsAuthorizedForUser($user, 0, 0);
    $object->next_prev_filter = " rowid IN (".$db->sanitize(count($objectsListId) ?join(',', array_keys($objectsListId)) : '0').")";
  }
 
  dol_banner_tab($object, 'ref', $linkback, 1, 'ref', 'ref', $morehtmlref);
 
 
  print '<div class="fichecenter">';
  print '<div class="fichehalfleft">';
  print '<div class="underbanner clearboth"></div>';
 
  print '<table class="border tableforfield centpercent">';
 
  // Usage
  if (!empty($conf->global->PROJECT_USE_OPPORTUNITIES) || empty($conf->global->PROJECT_HIDE_TASKS) || !empty($conf->eventorganization->enabled)) {
    print '<tr><td class="tdtop">';
    print $langs->trans("Usage");
    print '</td>';
    print '<td>';
    if (!empty($conf->global->PROJECT_USE_OPPORTUNITIES)) {
      print '<input type="checkbox" disabled name="usage_opportunity"'.(GETPOSTISSET('usage_opportunity') ? (GETPOST('usage_opportunity', 'alpha') != '' ? ' checked="checked"' : '') : ($object->usage_opportunity ? ' checked="checked"' : '')).'"> ';
      $htmltext = $langs->trans("ProjectFollowOpportunity");
      print $form->textwithpicto($langs->trans("ProjectFollowOpportunity"), $htmltext);
      print '<br>';
    }
    if (empty($conf->global->PROJECT_HIDE_TASKS)) {
      print '<input type="checkbox" disabled name="usage_task"'.(GETPOSTISSET('usage_task') ? (GETPOST('usage_task', 'alpha') != '' ? ' checked="checked"' : '') : ($object->usage_task ? ' checked="checked"' : '')).'"> ';
      $htmltext = $langs->trans("ProjectFollowTasks");
      print $form->textwithpicto($langs->trans("ProjectFollowTasks"), $htmltext);
      print '<br>';
    }
    if (empty($conf->global->PROJECT_HIDE_TASKS) && !empty($conf->global->PROJECT_BILL_TIME_SPENT)) {
      print '<input type="checkbox" disabled name="usage_bill_time"'.(GETPOSTISSET('usage_bill_time') ? (GETPOST('usage_bill_time', 'alpha') != '' ? ' checked="checked"' : '') : ($object->usage_bill_time ? ' checked="checked"' : '')).'"> ';
      $htmltext = $langs->trans("ProjectBillTimeDescription");
      print $form->textwithpicto($langs->trans("BillTime"), $htmltext);
      print '<br>';
    }
    if (!empty($conf->eventorganization->enabled)) {
      print '<input type="checkbox" disabled name="usage_organize_event"'.(GETPOSTISSET('usage_organize_event') ? (GETPOST('usage_organize_event', 'alpha') != '' ? ' checked="checked"' : '') : ($object->usage_organize_event ? ' checked="checked"' : '')).'"> ';
      $htmltext = $langs->trans("EventOrganizationDescriptionLong");
      print $form->textwithpicto($langs->trans("ManageOrganizeEvent"), $htmltext);
    }
    print '</td></tr>';
  }
 
  // Visibility
  print '<tr><td class="titlefield">'.$langs->trans("Visibility").'</td><td>';
  if ($object->public) {
    print img_picto($langs->trans('SharedProject'), 'world', 'class="paddingrightonly"');
    print $langs->trans('SharedProject');
  } else {
    print img_picto($langs->trans('PrivateProject'), 'private', 'class="paddingrightonly"');
    print $langs->trans('PrivateProject');
  }
  print '</td></tr>';
 
  // Date start - end
  print '<tr><td>'.$langs->trans("DateStart").' - '.$langs->trans("DateEnd").'</td><td>';
  $start = dol_print_date($object->date_start, 'day');
  print ($start ? $start : '?');
  $end = dol_print_date($object->date_end, 'day');
  print ' - ';
  print ($end ? $end : '?');
  if ($object->hasDelay()) {
    print img_warning("Late");
  }
  print '</td></tr>';
 
  // Budget
  print '<tr><td>'.$langs->trans("Budget").'</td><td>';
  if (strcmp($object->budget_amount, '')) {
    print price($object->budget_amount, '', $langs, 1, 0, 0, $conf->currency);
  }
  print '</td></tr>';
 
  // Other attributes
  $cols = 2;
  include DOL_DOCUMENT_ROOT.'/core/tpl/extrafields_view.tpl.php';
 
  print '</table>';
 
  print '</div>';
  print '<div class="fichehalfright">';
  print '<div class="underbanner clearboth"></div>';
 
  print '<table class="border tableforfield centpercent">';
 
  // Description
  print '<td class="titlefield tdtop">'.$langs->trans("Description").'</td><td>';
  print nl2br($object->description);
  print '</td></tr>';
 
  // Categories
  if (isModEnabled('categorie')) {
    print '<tr><td class="valignmiddle">'.$langs->trans("Categories").'</td><td>';
    print $form->showCategories($object->id, Categorie::TYPE_PROJECT, 1);
    print "</td></tr>";
  }
 
  print '</table>';
 
  print '</div>';
  print '</div>';
 
  print '<div class="clearboth"></div>';
 
  print dol_get_fiche_end();
 
  print '<br>';
}
 
// Link to create task
$linktocreatetaskParam = array();
$linktocreatetaskUserRight = false;
if ($user->rights->projet->all->creer || $user->rights->projet->creer) {
  if ($object->public || $userWrite > 0) {
    $linktocreatetaskUserRight = true;
  } else {
    $linktocreatetaskParam['attr']['title'] = $langs->trans("NotOwnerOfProject");
  }
}
 
$linktocreatetask = dolGetButtonTitle($langs->trans('AddTask'), '', 'fa fa-plus-circle', DOL_URL_ROOT.'/projet/tasks.php?id='.$object->id.'&action=create'.$param.'&backtopage='.urlencode($_SERVER['PHP_SELF'].'?id='.$object->id), '', $linktocreatetaskUserRight, $linktocreatetaskParam);
 
$linktotasks = dolGetButtonTitle($langs->trans('ViewList'), '', 'fa fa-bars paddingleft imgforviewmode', DOL_URL_ROOT.'/projet/tasks.php?id='.$object->id, '', 1, array('morecss'=>'reposition'));
$linktotasks .= dolGetButtonTitle($langs->trans('ViewGantt'), '', 'fa fa-stream paddingleft imgforviewmode', DOL_URL_ROOT.'/projet/ganttview.php?id='.$object->id.'&withproject=1', '', 1, array('morecss'=>'reposition marginleftonly btnTitleSelected'));
 
//print_barre_liste($title, 0, $_SERVER["PHP_SELF"], '', $sortfield, $sortorder, $linktotasks, $num, $totalnboflines, 'generic', 0, '', '', 0, 1);
print load_fiche_titre($title, $linktotasks.' &nbsp; '.$linktocreatetask, 'projecttask');
 
 
// Get list of tasks in tasksarray and taskarrayfiltered
// We need all tasks (even not limited to a user because a task to user
// can have a parent that is not affected to him).
$tasksarray = $task->getTasksArray(0, 0, ($object->id ? $object->id : $id), $socid, 0);
// We load also tasks limited to a particular user
//$tasksrole=($_REQUEST["mode"]=='mine' ? $task->getUserRolesForProjectsOrTasks(0,$user,$object->id,0) : '');
//var_dump($tasksarray);
//var_dump($tasksrole);
 
 
if (count($tasksarray) > 0) {
  // Show Gant diagram from $taskarray using JSGantt
 
  $dateformat = $langs->trans("FormatDateShortJQuery"); // Used by include ganttchart.inc.php later
  $datehourformat = $langs->trans("FormatDateShortJQuery").' '.$langs->trans("FormatHourShortJQuery"); // Used by include ganttchart.inc.php later
  $array_contacts = array();
  $tasks = array();
  $task_dependencies = array();
  $taskcursor = 0;
  foreach ($tasksarray as $key => $val) { // Task array are sorted by "project, position, date"
    $task->fetch($val->id, '');
 
    $idparent = ($val->fk_parent ? $val->fk_parent : '-'.$val->fk_project); // If start with -, id is a project id
 
    $tasks[$taskcursor]['task_id'] = $val->id;
    $tasks[$taskcursor]['task_alternate_id'] = ($taskcursor + 1); // An id that has same order than position (required by ganttchart)
    $tasks[$taskcursor]['task_project_id'] = $val->fk_project;
    $tasks[$taskcursor]['task_parent'] = $idparent;
 
    $tasks[$taskcursor]['task_is_group'] = 0;
    $tasks[$taskcursor]['task_css'] = 'gtaskblue';
    $tasks[$taskcursor]['task_position'] = $val->rang;
    $tasks[$taskcursor]['task_planned_workload'] = $val->planned_workload;
 
    if ($val->fk_parent != 0 && $task->hasChildren() > 0) {
      $tasks[$taskcursor]['task_is_group'] = 1;
      $tasks[$taskcursor]['task_css'] = 'ggroupblack';
      //$tasks[$taskcursor]['task_css'] = 'gtaskblue';
    } elseif ($task->hasChildren() > 0) {
      $tasks[$taskcursor]['task_is_group'] = 1;
      //$tasks[$taskcursor]['task_is_group'] = 0;
      $tasks[$taskcursor]['task_css'] = 'ggroupblack';
      //$tasks[$taskcursor]['task_css'] = 'gtaskblue';
    }
    $tasks[$taskcursor]['task_milestone'] = '0';
    $tasks[$taskcursor]['task_percent_complete'] = $val->progress;
    //$tasks[$taskcursor]['task_name']=$task->getNomUrl(1);
    //print dol_print_date($val->date_start).dol_print_date($val->date_end).'<br>'."\n";
    $tasks[$taskcursor]['task_name'] = $val->ref.' - '.$val->label;
    $tasks[$taskcursor]['task_start_date'] = $val->date_start;
    $tasks[$taskcursor]['task_end_date'] = $val->date_end;
    $tasks[$taskcursor]['task_color'] = 'b4d1ea';
 
    $idofusers = $task->getListContactId('internal');
    $idofcontacts = $task->getListContactId('external');
    $s = '';
    if (count($idofusers) > 0) {
      $s .= $langs->trans("Internals").': ';
      $i = 0;
      foreach ($idofusers as $valid) {
        $userstatic->fetch($valid);
        if ($i) {
          $s .= ', ';
        }
        $s .= $userstatic->login;
        $i++;
      }
    }
    //if (count($idofusers)>0 && (count($idofcontacts)>0)) $s.=' - ';
    if (count($idofcontacts) > 0) {
      if ($s) {
        $s .= ' - ';
      }
      $s .= $langs->trans("Externals").': ';
      $i = 0;
      $contactidfound = array();
      foreach ($idofcontacts as $valid) {
        if (empty($contactidfound[$valid])) {
          $res = $contactstatic->fetch($valid);
          if ($res > 0) {
            if ($i) {
              $s .= ', ';
            }
            $s .= $contactstatic->getFullName($langs);
            $contactidfound[$valid] = 1;
            $i++;
          }
        }
      }
    }
 
    /* For JSGanttImproved */
    //if ($s) $tasks[$taskcursor]['task_resources']=implode(',',$idofusers);
    $tasks[$taskcursor]['task_resources'] = $s;
    if ($s) {
      $tasks[$taskcursor]['task_resources'] = '<a href="'.DOL_URL_ROOT.'/projet/tasks/contact.php?id='.$val->id.'&withproject=1" title="'.dol_escape_htmltag($s).'">'.$langs->trans("List").'</a>';
    }
    //print "xxx".$val->id.$tasks[$taskcursor]['task_resources'];
    $tasks[$taskcursor]['note'] = $task->note_public;
    $taskcursor++;
  }
 
  // Search parent to set task_parent_alternate_id (requird by ganttchart)
  foreach ($tasks as $tmpkey => $tmptask) {
    foreach ($tasks as $tmptask2) {
      if ($tmptask2['task_id'] == $tmptask['task_parent']) {
        $tasks[$tmpkey]['task_parent_alternate_id'] = $tmptask2['task_alternate_id'];
        break;
      }
    }
    if (empty($tasks[$tmpkey]['task_parent_alternate_id'])) {
      $tasks[$tmpkey]['task_parent_alternate_id'] = $tasks[$tmpkey]['task_parent'];
    }
  }
 
  print "\n";
 
  if (!empty($conf->use_javascript_ajax)) {
    //var_dump($_SESSION);
 
    // How the date for data are formated (format used bu jsgantt)
    $dateformatinput = 'yyyy-mm-dd';
    // How the date for data are formated (format used by dol_print_date)
    $dateformatinput2 = 'standard';
    //var_dump($dateformatinput);
    //var_dump($dateformatinput2);
 
    $moreforfilter = '<div class="liste_titre liste_titre_bydiv centpercent">';
 
    $moreforfilter .= '<div class="divsearchfield">';
    //$moreforfilter .= $langs->trans("TasksAssignedTo").': ';
    //$moreforfilter .= $form->select_dolusers($tmpuser->id > 0 ? $tmpuser->id : '', 'search_user_id', 1);
    $moreforfilter .= '&nbsp;';
    $moreforfilter .= '</div>';
 
    $moreforfilter .= '</div>';
 
    print $moreforfilter;
 
    print '<div class="div-table-responsive">';
 
    print '<div id="tabs" class="gantt" style="width: 80vw;">'."\n";
    include_once DOL_DOCUMENT_ROOT.'/projet/ganttchart.inc.php';
    print '</div>'."\n";
 
    print '</div>';
  } else {
    $langs->load("admin");
    print $langs->trans("AvailableOnlyIfJavascriptAndAjaxNotDisabled");
  }
} else {
  print '<div class="opacitymedium">'.$langs->trans("NoTasks").'</div>';
}
 
// End of page
llxFooter();
$db->close();