card.php

Go to the documentation of this file.

<?php
/* Copyright (C) 2001-2005 Rodolphe Quiedeville <rodolphe@quiedeville.org>
 * Copyright (C) 2004-2016 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/class/doleditor.class.php';
require_once DOL_DOCUMENT_ROOT.'/core/class/html.formprojet.class.php';
require_once DOL_DOCUMENT_ROOT.'/core/class/html.formfile.class.php';
require_once DOL_DOCUMENT_ROOT.'/core/modules/project/modules_project.php';
require_once DOL_DOCUMENT_ROOT.'/core/class/extrafields.class.php';
require_once DOL_DOCUMENT_ROOT.'/categories/class/categorie.class.php';
 
// Load translation files required by the page
$langsLoad=array('projects', 'companies');
if (!empty($conf->eventorganization->enabled)) {
  $langsLoad[]='eventorganization';
}
 
$langs->loadLangs($langsLoad);
 
$id = GETPOST('id', 'int');
$ref = GETPOST('ref', 'alpha');
$action = GETPOST('action', 'aZ09');
$backtopage = GETPOST('backtopage', 'alpha');
$backtopageforcancel = GETPOST('backtopageforcancel', 'alpha');
$backtopagejsfields = GETPOST('backtopagejsfields', 'alpha');
$cancel = GETPOST('cancel', 'alpha');
$confirm = GETPOST('confirm', 'aZ09');
$dol_openinpopup = GETPOST('dol_openinpopup', 'aZ09');
 
$status = GETPOST('status', 'int');
$opp_status = GETPOST('opp_status', 'int');
$opp_percent = price2num(GETPOST('opp_percent', 'alpha'));
$objcanvas = GETPOST("objcanvas", "alpha");
$comefromclone = GETPOST("comefromclone", "alpha");
 
if ($id == '' && $ref == '' && ($action != "create" && $action != "add" && $action != "update" && !GETPOST("cancel"))) {
  accessforbidden();
}
 
$mine = GETPOST('mode') == 'mine' ? 1 : 0;
//if (! $user->rights->projet->all->lire) $mine=1;  // Special for projects
 
// Initialize technical object to manage hooks of page. Note that conf->hooks_modules contains array of hook context
$hookmanager->initHooks(array('projectcard', 'globalcard'));
 
$object = new Project($db);
$extrafields = new ExtraFields($db);
 
// Load object
//include DOL_DOCUMENT_ROOT.'/core/actions_fetchobject.inc.php';  // Can't use generic include because when creating a project, ref is defined and we dont want error if fetch fails from ref.
if ($id > 0 || !empty($ref)) {
  $ret = $object->fetch($id, $ref); // If we create project, ref may be defined into POST but record does not yet exists into database
  if ($ret > 0) {
    $object->fetch_thirdparty();
    if (!empty($conf->global->PROJECT_ALLOW_COMMENT_ON_PROJECT) && method_exists($object, 'fetchComments') && empty($object->comments)) {
      $object->fetchComments();
    }
    $id = $object->id;
  }
}
 
// fetch optionals attributes and labels
$extrafields->fetch_name_optionals_label($object->table_element);
 
$date_start = dol_mktime(0, 0, 0, GETPOST('projectstartmonth', 'int'), GETPOST('projectstartday', 'int'), GETPOST('projectstartyear', 'int'));
$date_end = dol_mktime(0, 0, 0, GETPOST('projectendmonth', 'int'), GETPOST('projectendday', 'int'), GETPOST('projectendyear', 'int'));
 
// Security check
$socid = GETPOST('socid', 'int');
//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.
restrictedArea($user, 'projet', $object->id, 'projet&project');
 
$permissiondellink = $user->rights->projet->creer;  // Used by the include of actions_dellink.inc.php
 
 
/*
 * Actions
 */
 
$parameters = array('id'=>$socid, 'objcanvas'=>$objcanvas);
$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)) {
  $backurlforlist = DOL_URL_ROOT.'/projet/list.php';
 
  // Cancel
  if ($cancel) {
    if (GETPOST("comefromclone") == 1) {
      $result = $object->delete($user);
      if ($result > 0) {
        header("Location: index.php");
        exit;
      } else {
        dol_syslog($object->error, LOG_DEBUG);
        setEventMessages($langs->trans("CantRemoveProject", $langs->transnoentitiesnoconv("ProjectOverview")), null, 'errors');
      }
    }
  }
 
  if (empty($backtopage) || ($cancel && empty($id))) {
    if (empty($backtopage) || ($cancel && strpos($backtopage, '__ID__'))) {
      if (empty($id) && (($action != 'add' && $action != 'create') || $cancel)) {
        $backtopage = $backurlforlist;
      } else {
        $backtopage = DOL_URL_ROOT.'/projet/card.php?id='.((!empty($id) && $id > 0) ? $id : '__ID__');
      }
    }
  }
 
  if ($cancel) {
    if (!empty($backtopageforcancel)) {
      header("Location: ".$backtopageforcancel);
      exit;
    } elseif (!empty($backtopage)) {
      header("Location: ".$backtopage);
      exit;
    }
    $action = '';
  }
 
  include DOL_DOCUMENT_ROOT.'/core/actions_dellink.inc.php';    // Must be include, not include_once
 
  if ($action == 'add' && $user->rights->projet->creer) {
    $error = 0;
    if (!GETPOST('ref')) {
      setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentities("Ref")), null, 'errors');
      $error++;
    }
    if (!GETPOST('title')) {
      setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentities("ProjectLabel")), null, 'errors');
      $error++;
    }
 
    if (!empty($conf->global->PROJECT_USE_OPPORTUNITIES)) {
      if (GETPOST('opp_amount') != '' && !(GETPOST('opp_status') > 0)) {
        $error++;
        setEventMessages($langs->trans("ErrorOppStatusRequiredIfAmount"), null, 'errors');
      }
    }
 
    // Create with status validated immediatly
    if (!empty($conf->global->PROJECT_CREATE_NO_DRAFT)) {
      $status = Project::STATUS_VALIDATED;
    }
 
    if (!$error) {
      $error = 0;
 
      $db->begin();
 
      $object->ref             = GETPOST('ref', 'alphanohtml');
      $object->title           = GETPOST('title', 'alphanohtml');
      $object->socid           = GETPOST('socid', 'int');
      $object->description     = GETPOST('description', 'restricthtml'); // Do not use 'alpha' here, we want field as it is
      $object->public          = GETPOST('public', 'alphanohtml');
      $object->opp_amount      = price2num(GETPOST('opp_amount', 'alphanohtml'));
      $object->budget_amount   = price2num(GETPOST('budget_amount', 'alphanohtml'));
      $object->date_c = dol_now();
      $object->date_start      = $date_start;
      $object->date_end        = $date_end;
      $object->statut          = $status;
      $object->opp_status      = $opp_status;
      $object->opp_percent     = $opp_percent;
      $object->usage_opportunity    = (GETPOST('usage_opportunity', 'alpha') == 'on' ? 1 : 0);
      $object->usage_task           = (GETPOST('usage_task', 'alpha') == 'on' ? 1 : 0);
      $object->usage_bill_time      = (GETPOST('usage_bill_time', 'alpha') == 'on' ? 1 : 0);
      $object->usage_organize_event = (GETPOST('usage_organize_event', 'alpha') == 'on' ? 1 : 0);
 
      // Fill array 'array_options' with data from add form
      $ret = $extrafields->setOptionalsFromPost(null, $object);
      if ($ret < 0) {
        $error++;
      }
 
      $result = $object->create($user);
      if (!$error && $result > 0) {
        // Add myself as project leader
        $typeofcontact = 'PROJECTLEADER';
        $result = $object->add_contact($user->id, $typeofcontact, 'internal');
 
        // -3 means type not found (PROJECTLEADER renamed, de-activated or deleted), so don't prevent creation if it has been the case
        if ($result == -3) {
          setEventMessage('ErrorPROJECTLEADERRoleMissingRestoreIt', 'errors');
          $error++;
        } elseif ($result < 0) {
          $langs->load("errors");
          setEventMessages($object->error, $object->errors, 'errors');
          $error++;
        }
      } else {
        $langs->load("errors");
        setEventMessages($object->error, $object->errors, 'errors');
        $error++;
      }
      if (!$error && !empty($object->id) > 0) {
        // Category association
        $categories = GETPOST('categories', 'array');
        $result = $object->setCategories($categories);
        if ($result < 0) {
          $langs->load("errors");
          setEventMessages($object->error, $object->errors, 'errors');
          $error++;
        }
      }
 
      if (!$error) {
        $db->commit();
 
        if (!empty($backtopage)) {
          $backtopage = preg_replace('/--IDFORBACKTOPAGE--|__ID__/', $object->id, $backtopage); // New method to autoselect project after a New on another form object creation
          $backtopage = $backtopage.'&projectid='.$object->id; // Old method
          header("Location: ".$backtopage);
          exit;
        } else {
          header("Location:card.php?id=".$object->id);
          exit;
        }
      } else {
        $db->rollback();
        unset($_POST["ref"]);
        $action = 'create';
      }
    } else {
      $action = 'create';
    }
  }
 
  if ($action == 'update' && empty(GETPOST('cancel')) && $user->rights->projet->creer) {
    $error = 0;
 
    if (empty($ref)) {
      $error++;
      setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentities("Ref")), null, 'errors');
    }
    if (!GETPOST("title")) {
      $error++;
      setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentities("ProjectLabel")), null, 'errors');
    }
 
    $db->begin();
 
    if (!$error) {
      $object->oldcopy = clone $object;
 
      $old_start_date = $object->date_start;
 
      $object->ref          = GETPOST('ref', 'alpha');
      $object->title        = GETPOST('title', 'alphanohtml'); // Do not use 'alpha' here, we want field as it is
      $object->statut       = GETPOST('status', 'int');
      $object->socid        = GETPOST('socid', 'int');
      $object->description  = GETPOST('description', 'restricthtml'); // Do not use 'alpha' here, we want field as it is
      $object->public       = GETPOST('public', 'alpha');
      $object->date_start   = (!GETPOST('projectstart')) ? '' : $date_start;
      $object->date_end     = (!GETPOST('projectend')) ? '' : $date_end;
      if (GETPOSTISSET('opp_amount')) {
        $object->opp_amount   = price2num(GETPOST('opp_amount', 'alpha'));
      }
      if (GETPOSTISSET('budget_amount')) {
        $object->budget_amount = price2num(GETPOST('budget_amount', 'alpha'));
      }
      if (GETPOSTISSET('opp_status')) {
        $object->opp_status   = $opp_status;
      }
      if (GETPOSTISSET('opp_percent')) {
        $object->opp_percent  = $opp_percent;
      }
      $object->usage_opportunity    = (GETPOST('usage_opportunity', 'alpha') == 'on' ? 1 : 0);
      $object->usage_task           = (GETPOST('usage_task', 'alpha') == 'on' ? 1 : 0);
      $object->usage_bill_time      = (GETPOST('usage_bill_time', 'alpha') == 'on' ? 1 : 0);
      $object->usage_organize_event = (GETPOST('usage_organize_event', 'alpha') == 'on' ? 1 : 0);
 
      // Fill array 'array_options' with data from add form
      $ret = $extrafields->setOptionalsFromPost(null, $object, '@GETPOSTISSET');
      if ($ret < 0) {
        $error++;
      }
    }
 
    if (!empty($conf->global->PROJECT_USE_OPPORTUNITIES)) {
      if ($object->opp_amount && ($object->opp_status <= 0)) {
        $error++;
        setEventMessages($langs->trans("ErrorOppStatusRequiredIfAmount"), null, 'errors');
      }
    }
 
    if (!$error) {
      $result = $object->update($user);
      if ($result < 0) {
        $error++;
        if ($result == -4) {
          setEventMessages($langs->trans("ErrorRefAlreadyExists"), null, 'errors');
        } else {
          setEventMessages($object->error, $object->errors, 'errors');
        }
      } else {
        // Category association
        $categories = GETPOST('categories', 'array');
        $result = $object->setCategories($categories);
        if ($result < 0) {
          $error++;
          setEventMessages($object->error, $object->errors, 'errors');
        }
      }
    }
 
    if (!$error) {
      if (GETPOST("reportdate") && ($object->date_start != $old_start_date)) {
        $result = $object->shiftTaskDate($old_start_date);
        if ($result < 0) {
          $error++;
          setEventMessages($langs->trans("ErrorShiftTaskDate").':'.$object->error, $object->errors, 'errors');
        }
      }
    }
 
    // Check if we must change status
    if (GETPOST('closeproject')) {
      $resclose = $object->setClose($user);
      if ($resclose < 0) {
        $error++;
        setEventMessages($langs->trans("FailedToCloseProject").':'.$object->error, $object->errors, 'errors');
      }
    }
 
 
    if ($error) {
      $db->rollback();
      $action = 'edit';
    } else {
      $db->commit();
 
      if (GETPOST('socid', 'int') > 0) {
        $object->fetch_thirdparty(GETPOST('socid', 'int'));
      } else {
        unset($object->thirdparty);
      }
    }
  }
 
  // Build doc
  if ($action == 'builddoc' && $user->rights->projet->creer) {
    // Save last template used to generate document
    if (GETPOST('model')) {
      $object->setDocModel($user, GETPOST('model', 'alpha'));
    }
 
    $outputlangs = $langs;
    if (GETPOST('lang_id', 'aZ09')) {
      $outputlangs = new Translate("", $conf);
      $outputlangs->setDefaultLang(GETPOST('lang_id', 'aZ09'));
    }
    $result = $object->generateDocument($object->model_pdf, $outputlangs);
    if ($result <= 0) {
      setEventMessages($object->error, $object->errors, 'errors');
      $action = '';
    }
  }
 
  // Delete file in doc form
  if ($action == 'remove_file' && $user->rights->projet->creer) {
    if ($object->id > 0) {
      require_once DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php';
 
      $langs->load("other");
      $upload_dir = $conf->project->multidir_output[$object->entity];
      $file = $upload_dir.'/'.GETPOST('file');
      $ret = dol_delete_file($file, 0, 0, 0, $object);
      if ($ret) {
        setEventMessages($langs->trans("FileWasRemoved", GETPOST('file')), null, 'mesgs');
      } else {
        setEventMessages($langs->trans("ErrorFailToDeleteFile", GETPOST('file')), null, 'errors');
      }
      $action = '';
    }
  }
 
 
  if ($action == 'confirm_validate' && $confirm == 'yes') {
    $result = $object->setValid($user);
    if ($result <= 0) {
      setEventMessages($object->error, $object->errors, 'errors');
    }
  }
 
  if ($action == 'confirm_close' && $confirm == 'yes') {
    $result = $object->setClose($user);
    if ($result <= 0) {
      setEventMessages($object->error, $object->errors, 'errors');
    }
  }
 
  if ($action == 'confirm_reopen' && $confirm == 'yes') {
    $result = $object->setValid($user);
    if ($result <= 0) {
      setEventMessages($object->error, $object->errors, 'errors');
    }
  }
 
  if ($action == 'confirm_delete' && GETPOST("confirm") == "yes" && $user->rights->projet->supprimer) {
    $object->fetch($id);
    $result = $object->delete($user);
    if ($result > 0) {
      setEventMessages($langs->trans("RecordDeleted"), null, 'mesgs');
      header("Location: list.php?restore_lastsearch_values=1");
      exit;
    } else {
      dol_syslog($object->error, LOG_DEBUG);
      setEventMessages($object->error, $object->errors, 'errors');
    }
  }
 
  if ($action == 'confirm_clone' && $user->rights->projet->creer && $confirm == 'yes') {
    $clone_contacts = GETPOST('clone_contacts') ? 1 : 0;
    $clone_tasks = GETPOST('clone_tasks') ? 1 : 0;
    $clone_project_files = GETPOST('clone_project_files') ? 1 : 0;
    $clone_task_files = GETPOST('clone_task_files') ? 1 : 0;
    $clone_notes = GETPOST('clone_notes') ? 1 : 0;
    $move_date = GETPOST('move_date') ? 1 : 0;
    $clone_thirdparty = GETPOST('socid', 'int') ?GETPOST('socid', 'int') : 0;
 
    $result = $object->createFromClone($user, $object->id, $clone_contacts, $clone_tasks, $clone_project_files, $clone_task_files, $clone_notes, $move_date, 0, $clone_thirdparty);
    if ($result <= 0) {
      setEventMessages($object->error, $object->errors, 'errors');
    } else {
      // Load new object
      $newobject = new Project($db);
      $newobject->fetch($result);
      $newobject->fetch_optionals();
      $newobject->fetch_thirdparty(); // Load new object
      $object = $newobject;
      $action = 'edit';
      $comefromclone = true;
    }
  }
 
  // Actions to send emails
  $triggersendname = 'PROJECT_SENTBYMAIL';
  $paramname = 'id';
  $autocopy = 'MAIN_MAIL_AUTOCOPY_PROJECT_TO'; // used to know the automatic BCC to add
  $trackid = 'proj'.$object->id;
  include DOL_DOCUMENT_ROOT.'/core/actions_sendmails.inc.php';
}
 
 
/*
 *  View
 */
 
$form = new Form($db);
$formfile = new FormFile($db);
$formproject = new FormProjets($db);
$userstatic = new User($db);
 
$title = $langs->trans("Project").' - '.$object->ref.(!empty($object->thirdparty->name) ? ' - '.$object->thirdparty->name : '').(!empty($object->title) ? ' - '.$object->title : '');
if (!empty($conf->global->MAIN_HTML_TITLE) && preg_match('/projectnameonly/', $conf->global->MAIN_HTML_TITLE)) {
  $title = $object->ref.(!empty($object->thirdparty->name) ? ' - '.$object->thirdparty->name : '').(!empty($object->title) ? ' - '.$object->title : '');
}
$help_url = "EN:Module_Projects|FR:Module_Projets|ES:M&oacute;dulo_Proyectos|DE:Modul_Projekte";
 
llxHeader("", $title, $help_url);
 
$titleboth = $langs->trans("LeadsOrProjects");
$titlenew = $langs->trans("NewLeadOrProject"); // Leads and opportunities by default
if (!getDolGlobalInt('PROJECT_USE_OPPORTUNITIES')) {
  $titleboth = $langs->trans("Projects");
  $titlenew = $langs->trans("NewProject");
}
if (getDolGlobalInt('PROJECT_USE_OPPORTUNITIES') == 2) { // 2 = leads only
  $titleboth = $langs->trans("Leads");
  $titlenew = $langs->trans("NewLead");
}
 
if ($action == 'create' && $user->rights->projet->creer) {
  /*
   * Create
   */
 
  $thirdparty = new Societe($db);
  if ($socid > 0) {
    $thirdparty->fetch($socid);
  }
 
  print load_fiche_titre($titlenew, '', 'project');
 
  print '<form action="'.$_SERVER["PHP_SELF"].'" method="POST">';
  print '<input type="hidden" name="action" value="add">';
  print '<input type="hidden" name="token" value="'.newToken().'">';
  print '<input type="hidden" name="backtopage" value="'.$backtopage.'">';
  print '<input type="hidden" name="backtopageforcancel" value="'.$backtopageforcancel.'">';
  print '<input type="hidden" name="backtopagejsfields" value="'.$backtopagejsfields.'">';
 
  print dol_get_fiche_head();
 
  print '<table class="border centpercent tableforfieldcreate">';
 
  $defaultref = '';
  $modele = empty($conf->global->PROJECT_ADDON) ? 'mod_project_simple' : $conf->global->PROJECT_ADDON;
 
  // Search template files
  $file = ''; $classname = ''; $filefound = 0;
  $dirmodels = array_merge(array('/'), (array) $conf->modules_parts['models']);
  foreach ($dirmodels as $reldir) {
    $file = dol_buildpath($reldir."core/modules/project/".$modele.'.php', 0);
    if (file_exists($file)) {
      $filefound = 1;
      $classname = $modele;
      break;
    }
  }
 
  if ($filefound) {
    $result = dol_include_once($reldir."core/modules/project/".$modele.'.php');
    $modProject = new $classname;
 
    $defaultref = $modProject->getNextValue($thirdparty, $object);
  }
 
  if (is_numeric($defaultref) && $defaultref <= 0) {
    $defaultref = '';
  }
 
  // Ref
  $suggestedref = (GETPOST("ref") ? GETPOST("ref") : $defaultref);
  print '<tr><td class="titlefieldcreate"><span class="fieldrequired">'.$langs->trans("Ref").'</span></td><td class><input class="maxwidth150onsmartphone" type="text" name="ref" value="'.dol_escape_htmltag($suggestedref).'">';
  print ' '.$form->textwithpicto('', $langs->trans("YouCanCompleteRef", $suggestedref));
  print '</td></tr>';
 
  // Label
  print '<tr><td><span class="fieldrequired">'.$langs->trans("ProjectLabel").'</span></td><td><input class="width500 maxwidth150onsmartphone" type="text" name="title" value="'.dol_escape_htmltag(GETPOST("title", 'alphanohtml')).'" autofocus></td></tr>';
 
  // Usage (opp, task, bill time, ...)
  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" id="usage_opportunity" name="usage_opportunity"'.(GETPOSTISSET('usage_opportunity') ? (GETPOST('usage_opportunity', 'alpha') ? ' checked="checked"' : '') : ' checked="checked"').'"> ';
      $htmltext = $langs->trans("ProjectFollowOpportunity");
      print '<label for="usage_opportunity">'.$form->textwithpicto($langs->trans("ProjectFollowOpportunity"), $htmltext).'</label>';
      print '<script>';
      print '$( document ).ready(function() {
          jQuery("#usage_opportunity").change(function() {
            if (jQuery("#usage_opportunity").prop("checked")) {
              console.log("Show opportunities fields");
              jQuery(".classuseopportunity").show();
            } else {
              console.log("Hide opportunities fields "+jQuery("#usage_opportunity").prop("checked"));
              jQuery(".classuseopportunity").hide();
            }
          });
          ';
      if (GETPOSTISSET('usage_opportunity') && !GETPOST('usage_opportunity')) {
        print 'jQuery(".classuseopportunity").hide();';
      }
      print '});';
      print '</script>';
      print '<br>';
    }
    if (empty($conf->global->PROJECT_HIDE_TASKS)) {
      print '<input type="checkbox" id="usage_task" name="usage_task"'.(GETPOSTISSET('usage_task') ? (GETPOST('usage_task', 'alpha') ? ' checked="checked"' : '') : ' checked="checked"').'"> ';
      $htmltext = $langs->trans("ProjectFollowTasks");
      print '<label for="usage_task">'.$form->textwithpicto($langs->trans("ProjectFollowTasks"), $htmltext).'</label>';
      print '<br>';
    }
    if (empty($conf->global->PROJECT_HIDE_TASKS) && !empty($conf->global->PROJECT_BILL_TIME_SPENT)) {
      print '<input type="checkbox" id="usage_bill_time" name="usage_bill_time"'.(GETPOSTISSET('usage_bill_time') ? (GETPOST('usage_bill_time', 'alpha') ? ' checked="checked"' : '') : '').'"> ';
      $htmltext = $langs->trans("ProjectBillTimeDescription");
      print '<label for="usage_bill_time">'.$form->textwithpicto($langs->trans("BillTime"), $htmltext).'</label>';
      print '<br>';
    }
    if (!empty($conf->eventorganization->enabled)) {
      print '<input type="checkbox" id="usage_organize_event" name="usage_organize_event"'.(GETPOSTISSET('usage_organize_event') ? (GETPOST('usage_organize_event', 'alpha') ? ' checked="checked"' : '') :'').'"> ';
      $htmltext = $langs->trans("EventOrganizationDescriptionLong");
      print '<label for="usage_organize_event">'.$form->textwithpicto($langs->trans("ManageOrganizeEvent"), $htmltext).'</label>';
    }
    print '</td>';
    print '</tr>';
  }
 
  // Thirdparty
  if (isModEnabled('societe')) {
    print '<tr><td>';
    print (empty($conf->global->PROJECT_THIRDPARTY_REQUIRED) ? '' : '<span class="fieldrequired">');
    print $langs->trans("ThirdParty");
    print (empty($conf->global->PROJECT_THIRDPARTY_REQUIRED) ? '' : '</span>');
    print '</td><td class="maxwidthonsmartphone">';
    $filteronlist = '';
    if (!empty($conf->global->PROJECT_FILTER_FOR_THIRDPARTY_LIST)) {
      $filteronlist = $conf->global->PROJECT_FILTER_FOR_THIRDPARTY_LIST;
    }
    $text = img_picto('', 'company').$form->select_company(GETPOST('socid', 'int'), 'socid', $filteronlist, 'SelectThirdParty', 1, 0, array(), 0, 'minwidth300 widthcentpercentminusxx maxwidth500');
    if (empty($conf->global->PROJECT_CAN_ALWAYS_LINK_TO_ALL_SUPPLIERS) && empty($conf->dol_use_jmobile)) {
      $texthelp = $langs->trans("IfNeedToUseOtherObjectKeepEmpty");
      print $form->textwithtooltip($text.' '.img_help(), $texthelp, 1);
    } else {
      print $text;
    }
    if (!GETPOSTISSET('backtopage')) {
      $url = '/societe/card.php?action=create&client=3&fournisseur=0&backtopage='.urlencode($_SERVER["PHP_SELF"].'?action=create');
      $newbutton = '<span class="fa fa-plus-circle valignmiddle paddingleft" title="'.$langs->trans("AddThirdParty").'"></span>';
      // TODO @LDR Implement this
      if (getDolGlobalInt('MAIN_FEATURES_LEVEL') >= 2) {
        $tmpbacktopagejsfields = 'addthirdparty:socid,search_socid';
        print dolButtonToOpenUrlInDialogPopup('addthirdparty', $langs->transnoentitiesnoconv('AddThirdParty'), $newbutton, $url, '', '', $tmpbacktopagejsfields);
      } else {
        print ' <a href="'.DOL_URL_ROOT.$url.'">'.$newbutton.'</a>';
      }
    }
    print '</td></tr>';
  }
 
  // Status
  if ($status != '') {
    print '<tr><td>'.$langs->trans("Status").'</td><td>';
    print '<input type="hidden" name="status" value="'.$status.'">';
    print $object->LibStatut($status, 4);
    print '</td></tr>';
  }
 
  // Visibility
  print '<tr><td>'.$langs->trans("Visibility").'</td><td class="maxwidthonsmartphone">';
  $array = array();
  if (empty($conf->global->PROJECT_DISABLE_PRIVATE_PROJECT)) {
    $array[0] = $langs->trans("PrivateProject");
  }
  if (empty($conf->global->PROJECT_DISABLE_PUBLIC_PROJECT)) {
    $array[1] = $langs->trans("SharedProject");
  }
 
  if (count($array) > 0) {
    print $form->selectarray('public', $array, GETPOST('public'), 0, 0, 0, '', 0, 0, 0, '', '', 1);
  } else {
    print '<input type="hidden" name="public" id="public" value="'.GETPOST('public').'">';
 
    if (GETPOST('public') == 0) {
      print img_picto($langs->trans('PrivateProject'), 'private', 'class="paddingrightonly"');
      print $langs->trans("PrivateProject");
    } else {
      print img_picto($langs->trans('SharedProject'), 'world', 'class="paddingrightonly"');
      print $langs->trans("SharedProject");
    }
  }
  print '</td></tr>';
 
  // Date start
  print '<tr><td>'.$langs->trans("DateStart").'</td><td>';
  print $form->selectDate(($date_start ? $date_start : ''), 'projectstart', 0, 0, 0, '', 1, 0);
  print '</td></tr>';
 
  // Date end
  print '<tr><td>'.$langs->trans("DateEnd").'</td><td>';
  print $form->selectDate(($date_end ? $date_end : -1), 'projectend', 0, 0, 0, '', 1, 0);
  print '</td></tr>';
 
  if (!empty($conf->global->PROJECT_USE_OPPORTUNITIES)) {
    // Opportunity status
    print '<tr class="classuseopportunity"><td>'.$langs->trans("OpportunityStatus").'</td>';
    print '<td class="maxwidthonsmartphone">';
    print $formproject->selectOpportunityStatus('opp_status', GETPOSTISSET('opp_status') ? GETPOST('opp_status') : $object->opp_status, 1, 0, 0, 0, '', 0, 1);
    print '</tr>';
 
    // Opportunity probability
    print '<tr class="classuseopportunity"><td>'.$langs->trans("OpportunityProbability").'</td>';
    print '<td><input size="5" type="text" id="opp_percent" name="opp_percent" value="'.dol_escape_htmltag(GETPOSTISSET('opp_percent') ? GETPOST('opp_percent') : '').'"><span class="hideonsmartphone"> %</span>';
    print '<input type="hidden" name="opp_percent_not_set" id="opp_percent_not_set" value="'.dol_escape_htmltag(GETPOSTISSET('opp_percent') ? '0' : '1').'">';
    print '</td>';
    print '</tr>';
 
    // Opportunity amount
    print '<tr class="classuseopportunity"><td>'.$langs->trans("OpportunityAmount").'</td>';
    print '<td><input size="5" type="text" name="opp_amount" value="'.dol_escape_htmltag(GETPOSTISSET('opp_amount') ? GETPOST('opp_amount') : '').'"></td>';
    print '</tr>';
  }
 
  // Budget
  print '<tr><td>'.$langs->trans("Budget").'</td>';
  print '<td><input size="5" type="text" name="budget_amount" value="'.dol_escape_htmltag(GETPOSTISSET('budget_amount') ? GETPOST('budget_amount') : '').'"></td>';
  print '</tr>';
 
  // Description
  print '<tr><td class="tdtop">'.$langs->trans("Description").'</td>';
  print '<td>';
  $doleditor = new DolEditor('description', GETPOST("description", 'restricthtml'), '', 90, 'dolibarr_notes', '', false, true, getDolGlobalString('FCKEDITOR_ENABLE_SOCIETE'), ROWS_3, '90%');
  $doleditor->Create();
  print '</td></tr>';
 
  if (!empty($conf->categorie->enabled)) {
    // Categories
    print '<tr><td>'.$langs->trans("Categories").'</td><td colspan="3">';
    $cate_arbo = $form->select_all_categories(Categorie::TYPE_PROJECT, '', 'parent', 64, 0, 1);
    $arrayselected = GETPOST('categories', 'array');
    print img_picto('', 'category').$form->multiselectarray('categories', $cate_arbo, $arrayselected, '', 0, 'quatrevingtpercent widthcentpercentminusx', 0, 0);
    print "</td></tr>";
  }
 
  // Other options
  $parameters = array();
  $reshook = $hookmanager->executeHooks('formObjectOptions', $parameters, $object, $action); // Note that $action and $object may have been modified by hook
  print $hookmanager->resPrint;
  if (empty($reshook)) {
    print $object->showOptionals($extrafields, 'create');
  }
 
  print '</table>';
 
  print dol_get_fiche_end();
 
  print $form->buttonsSaveCancel('CreateDraft');
 
  print '</form>';
 
  // Change probability from status or role of project
  print '<script type="text/javascript">
        jQuery(document).ready(function() {
          function change_percent()
          {
                var element = jQuery("#opp_status option:selected");
                var defaultpercent = element.attr("defaultpercent");
                /*if (jQuery("#opp_percent_not_set").val() == "") */
                jQuery("#opp_percent").val(defaultpercent);
          }
 
      /*init_myfunc();*/
          jQuery("#opp_status").change(function() {
            change_percent();
          });
 
          jQuery("#usage_task").change(function() {
            console.log("We click on usage task "+jQuery("#usage_task").is(":checked"));
                if (! jQuery("#usage_task").is(":checked")) {
                    jQuery("#usage_bill_time").prop("checked", false);
                }
          });
 
          jQuery("#usage_bill_time").change(function() {
            console.log("We click on usage to bill time");
                if (jQuery("#usage_bill_time").is(":checked")) {
                    jQuery("#usage_task").prop("checked", true);
                }
          });
        });
        </script>';
} elseif ($object->id > 0) {
  /*
   * Show or edit
   */
 
  $res = $object->fetch_optionals();
 
  // 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;
 
 
  // Confirmation validation
  if ($action == 'validate') {
    print $form->formconfirm($_SERVER["PHP_SELF"].'?id='.$object->id, $langs->trans('ValidateProject'), $langs->trans('ConfirmValidateProject'), 'confirm_validate', '', 0, 1);
  }
  // Confirmation close
  if ($action == 'close') {
    print $form->formconfirm($_SERVER["PHP_SELF"]."?id=".$object->id, $langs->trans("CloseAProject"), $langs->trans("ConfirmCloseAProject"), "confirm_close", '', '', 1);
  }
  // Confirmation reopen
  if ($action == 'reopen') {
    print $form->formconfirm($_SERVER["PHP_SELF"]."?id=".$object->id, $langs->trans("ReOpenAProject"), $langs->trans("ConfirmReOpenAProject"), "confirm_reopen", '', '', 1);
  }
  // Confirmation delete
  if ($action == 'delete') {
    $text = $langs->trans("ConfirmDeleteAProject");
    $task = new Task($db);
    $taskarray = $task->getTasksArray(0, 0, $object->id, 0, 0);
    $nboftask = count($taskarray);
    if ($nboftask) {
      $text .= '<br>'.img_warning().' '.$langs->trans("ThisWillAlsoRemoveTasks", $nboftask);
    }
    print $form->formconfirm($_SERVER["PHP_SELF"]."?id=".$object->id, $langs->trans("DeleteAProject"), $text, "confirm_delete", '', '', 1);
  }
 
  // Clone confirmation
  if ($action == 'clone') {
    $formquestion = array(
      'text' => $langs->trans("ConfirmClone"),
      array('type' => 'other', 'name' => 'socid', 'label' => $langs->trans("SelectThirdParty"), 'value' => $form->select_company(GETPOST('socid', 'int') > 0 ?GETPOST('socid', 'int') : $object->socid, 'socid', '', "None", 0, 0, null, 0, 'minwidth200 maxwidth250')),
      array('type' => 'checkbox', 'name' => 'clone_contacts', 'label' => $langs->trans("CloneContacts"), 'value' => true),
      array('type' => 'checkbox', 'name' => 'clone_tasks', 'label' => $langs->trans("CloneTasks"), 'value' => true),
      array('type' => 'checkbox', 'name' => 'move_date', 'label' => $langs->trans("CloneMoveDate"), 'value' => true),
      array('type' => 'checkbox', 'name' => 'clone_notes', 'label' => $langs->trans("CloneNotes"), 'value' => true),
      array('type' => 'checkbox', 'name' => 'clone_project_files', 'label' => $langs->trans("CloneProjectFiles"), 'value' => false),
      array('type' => 'checkbox', 'name' => 'clone_task_files', 'label' => $langs->trans("CloneTaskFiles"), 'value' => false)
    );
 
    print $form->formconfirm($_SERVER["PHP_SELF"]."?id=".$object->id, $langs->trans("ToClone"), $langs->trans("ConfirmCloneProject"), "confirm_clone", $formquestion, '', 1, 400, 590);
  }
 
 
  print '<form action="'.$_SERVER["PHP_SELF"].'" method="POST">';
  print '<input type="hidden" name="token" value="'.newToken().'">';
  print '<input type="hidden" name="action" value="update">';
  print '<input type="hidden" name="id" value="'.$object->id.'">';
  print '<input type="hidden" name="comefromclone" value="'.$comefromclone.'">';
 
  $head = project_prepare_head($object);
 
  if ($action == 'edit' && $userWrite > 0) {
    print dol_get_fiche_head($head, 'project', $langs->trans("Project"), 0, ($object->public ? 'projectpub' : 'project'));
 
    print '<table class="border centpercent">';
 
    // Ref
    $suggestedref = $object->ref;
    print '<tr><td class="titlefield fieldrequired">'.$langs->trans("Ref").'</td>';
    print '<td><input size="25" name="ref" value="'.$suggestedref.'">';
    print ' '.$form->textwithpicto('', $langs->trans("YouCanCompleteRef", $suggestedref));
    print '</td></tr>';
 
    // Label
    print '<tr><td class="fieldrequired">'.$langs->trans("ProjectLabel").'</td>';
    print '<td><input class="quatrevingtpercent" name="title" value="'.dol_escape_htmltag($object->title).'"></td></tr>';
 
    // Status
    print '<tr><td class="fieldrequired">'.$langs->trans("Status").'</td><td>';
    print '<select class="flat" name="status">';
    foreach ($object->statuts_short as $key => $val) {
      print '<option value="'.$key.'"'.((GETPOSTISSET('status') ?GETPOST('status') : $object->statut) == $key ? ' selected="selected"' : '').'>'.$langs->trans($val).'</option>';
    }
    print '</select>';
    print '</td></tr>';
 
    // 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" id="usage_opportunity" name="usage_opportunity"'.(GETPOSTISSET('usage_opportunity') ? (GETPOST('usage_opportunity', 'alpha') != '' ? ' checked="checked"' : '') : ($object->usage_opportunity ? ' checked="checked"' : '')).'"> ';
        $htmltext = $langs->trans("ProjectFollowOpportunity");
        print '<label for="usage_opportunity">'.$form->textwithpicto($langs->trans("ProjectFollowOpportunity"), $htmltext).'</label>';
        print '<script>';
        print '$( document ).ready(function() {
        jQuery("#usage_opportunity").change(function() {
            if (jQuery("#usage_opportunity").prop("checked")) {
              console.log("Show opportunities fields");
              jQuery(".classuseopportunity").show();
            } else {
              console.log("Hide opportunities fields "+jQuery("#usage_opportunity").prop("checked"));
              jQuery(".classuseopportunity").hide();
            }
          });
        ';
        print '
        });';
        print '</script>';
        print '<br>';
      }
      if (empty($conf->global->PROJECT_HIDE_TASKS)) {
        print '<input type="checkbox" id="usage_task" name="usage_task"' . (GETPOSTISSET('usage_task') ? (GETPOST('usage_task', 'alpha') != '' ? ' checked="checked"' : '') : ($object->usage_task ? ' checked="checked"' : '')) . '"> ';
        $htmltext = $langs->trans("ProjectFollowTasks");
        print '<label for="usage_task">'.$form->textwithpicto($langs->trans("ProjectFollowTasks"), $htmltext).'</label>';
        print '<br>';
      }
      if (empty($conf->global->PROJECT_HIDE_TASKS) && !empty($conf->global->PROJECT_BILL_TIME_SPENT)) {
        print '<input type="checkbox" id="usage_bill_time" 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 '<label for="usage_bill_time">'.$form->textwithpicto($langs->trans("BillTime"), $htmltext).'</label>';
        print '<br>';
      }
      if (!empty($conf->eventorganization->enabled)) {
        print '<input type="checkbox" id="usage_organize_event" 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 '<label for="usage_organize_event">'.$form->textwithpicto($langs->trans("ManageOrganizeEvent"), $htmltext).'</label>';
      }
      print '</td></tr>';
    }
    print '</td></tr>';
 
    // Thirdparty
    if (isModEnabled('societe')) {
      print '<tr><td>';
      print (empty($conf->global->PROJECT_THIRDPARTY_REQUIRED) ? '' : '<span class="fieldrequired">');
      print $langs->trans("ThirdParty");
      print (empty($conf->global->PROJECT_THIRDPARTY_REQUIRED) ? '' : '</span>');
      print '</td><td>';
      $filteronlist = '';
      if (!empty($conf->global->PROJECT_FILTER_FOR_THIRDPARTY_LIST)) {
        $filteronlist = $conf->global->PROJECT_FILTER_FOR_THIRDPARTY_LIST;
      }
      $text = $form->select_company($object->thirdparty->id, 'socid', $filteronlist, 'None', 1, 0, array(), 0, 'minwidth300');
      if (empty($conf->global->PROJECT_CAN_ALWAYS_LINK_TO_ALL_SUPPLIERS) && empty($conf->dol_use_jmobile)) {
        $texthelp = $langs->trans("IfNeedToUseOtherObjectKeepEmpty");
        print $form->textwithtooltip($text.' '.img_help(), $texthelp, 1, 0, '', '', 2);
      } else {
        print $text;
      }
      print '</td></tr>';
    }
 
    // Visibility
    print '<tr><td>'.$langs->trans("Visibility").'</td><td>';
    $array = array();
    if (empty($conf->global->PROJECT_DISABLE_PRIVATE_PROJECT)) {
      $array[0] = $langs->trans("PrivateProject");
    }
    if (empty($conf->global->PROJECT_DISABLE_PUBLIC_PROJECT)) {
      $array[1] = $langs->trans("SharedProject");
    }
 
    if (count($array) > 0) {
      print $form->selectarray('public', $array, $object->public, 0, 0, 0, '', 0, 0, 0, '', '', 1);
    } else {
      print '<input type="hidden" id="public" name="public" value="'.$object->public.'">';
 
      if ($object->public == 0) {
        print img_picto($langs->trans('PrivateProject'), 'private', 'class="paddingrightonly"');
        print $langs->trans("PrivateProject");
      } else {
        print img_picto($langs->trans('SharedProject'), 'world', 'class="paddingrightonly"');
        print $langs->trans("SharedProject");
      }
    }
    print '</td></tr>';
 
    if (!empty($conf->global->PROJECT_USE_OPPORTUNITIES)) {
      $classfortr = ($object->usage_opportunity ? '' : ' hideobject');
      // Opportunity status
      print '<tr class="classuseopportunity'.$classfortr.'"><td>'.$langs->trans("OpportunityStatus").'</td>';
      print '<td>';
      print $formproject->selectOpportunityStatus('opp_status', $object->opp_status, 1, 0, 0, 0, 'inline-block valignmiddle', 0, 1);
      print '<div id="divtocloseproject" class="inline-block valign" style="display: none;"> &nbsp; &nbsp; ';
      print '<input type="checkbox" id="inputcloseproject" name="closeproject" />';
      print '<label for="inputcloseproject">'.$langs->trans("AlsoCloseAProject").'</label>';
      print '</div>';
      print '</td>';
      print '</tr>';
 
      // Opportunity probability
      print '<tr class="classuseopportunity'.$classfortr.'"><td>'.$langs->trans("OpportunityProbability").'</td>';
      print '<td><input size="5" type="text" id="opp_percent" name="opp_percent" value="'.(GETPOSTISSET('opp_percent') ? GETPOST('opp_percent') : (strcmp($object->opp_percent, '') ?vatrate($object->opp_percent) : '')).'"> %';
      print '<span id="oldopppercent"></span>';
      print '</td>';
      print '</tr>';
 
      // Opportunity amount
      print '<tr class="classuseopportunity'.$classfortr.'"><td>'.$langs->trans("OpportunityAmount").'</td>';
      print '<td><input size="5" type="text" name="opp_amount" value="'.(GETPOSTISSET('opp_amount') ? GETPOST('opp_amount') : (strcmp($object->opp_amount, '') ? price2num($object->opp_amount) : '')).'">';
      print $langs->getCurrencySymbol($conf->currency);
      print '</td>';
      print '</tr>';
    }
 
    // Date start
    print '<tr><td>'.$langs->trans("DateStart").'</td><td>';
    print $form->selectDate($object->date_start ? $object->date_start : -1, 'projectstart', 0, 0, 0, '', 1, 0);
    print ' &nbsp; &nbsp; <input type="checkbox" class="valignmiddle" id="reportdate" name="reportdate" value="yes" ';
    if ($comefromclone) {
      print ' checked ';
    }
    print '/><label for="reportdate" class="opacitymedium">'.$langs->trans("ProjectReportDate").'</label>';
    print '</td></tr>';
 
    // Date end
    print '<tr><td>'.$langs->trans("DateEnd").'</td><td>';
    print $form->selectDate($object->date_end ? $object->date_end : -1, 'projectend', 0, 0, 0, '', 1, 0);
    print '</td></tr>';
 
    // Budget
    print '<tr><td>'.$langs->trans("Budget").'</td>';
    print '<td><input size="5" type="text" name="budget_amount" value="'.(GETPOSTISSET('budget_amount') ? GETPOST('budget_amount') : (strcmp($object->budget_amount, '') ? price2num($object->budget_amount) : '')).'">';
    print $langs->getCurrencySymbol($conf->currency);
    print '</td>';
    print '</tr>';
 
    // Description
    print '<tr><td class="tdtop">'.$langs->trans("Description").'</td>';
    print '<td>';
    $doleditor = new DolEditor('description', $object->description, '', 90, 'dolibarr_notes', '', false, true, getDolGlobalInt('FCKEDITOR_ENABLE_SOCIETE'), ROWS_3, '90%');
    $doleditor->Create();
    print '</td></tr>';
 
    // Tags-Categories
    if (isModEnabled('categorie')) {
      print '<tr><td>'.$langs->trans("Categories").'</td><td>';
      $cate_arbo = $form->select_all_categories(Categorie::TYPE_PROJECT, '', 'parent', 64, 0, 1);
      $c = new Categorie($db);
      $cats = $c->containing($object->id, Categorie::TYPE_PROJECT);
      foreach ($cats as $cat) {
        $arrayselected[] = $cat->id;
      }
      print img_picto('', 'category').$form->multiselectarray('categories', $cate_arbo, $arrayselected, 0, 0, 'quatrevingtpercent widthcentpercentminusx', 0, '0');
      print "</td></tr>";
    }
 
    // Other options
    $parameters = array();
    $reshook = $hookmanager->executeHooks('formObjectOptions', $parameters, $object, $action); // Note that $action and $object may have been modified by hook
    print $hookmanager->resPrint;
    if (empty($reshook)) {
      print $object->showOptionals($extrafields, 'edit');
    }
 
    print '</table>';
  } else {
    print dol_get_fiche_head($head, 'project', $langs->trans("Project"), -1, ($object->public ? 'projectpub' : 'project'));
 
    // 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 .= dol_escape_htmltag($object->title);
    // Thirdparty
    $morehtmlref .= '<br>'.$langs->trans('ThirdParty').' : ';
    if (!empty($object->thirdparty->id) && $object->thirdparty->id > 0) {
      $morehtmlref .= $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" width="100%">';
 
    // 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>';
 
    if (!empty($conf->global->PROJECT_USE_OPPORTUNITIES) && !empty($object->usage_opportunity)) {
      // Opportunity status
      print '<tr><td>'.$langs->trans("OpportunityStatus").'</td><td>';
      $code = dol_getIdFromCode($db, $object->opp_status, 'c_lead_status', 'rowid', 'code');
      if ($code) {
        print $langs->trans("OppStatus".$code);
      }
      print '</td></tr>';
 
      // Opportunity percent
      print '<tr><td>'.$langs->trans("OpportunityProbability").'</td><td>';
      if (strcmp($object->opp_percent, '')) {
        print price($object->opp_percent, 0, $langs, 1, 0).' %';
      }
      print '</td></tr>';
 
      // Opportunity Amount
      print '<tr><td>'.$langs->trans("OpportunityAmount").'</td><td>';
      if (strcmp($object->opp_amount, '')) {
        print '<span class="amount">'.price($object->opp_amount, 0, $langs, 1, 0, -1, $conf->currency).'</span>';
        if (strcmp($object->opp_percent, '')) {
          print ' &nbsp; &nbsp; &nbsp; <span title="'.dol_escape_htmltag($langs->trans('OpportunityWeightedAmount')).'"><span class="opacitymedium">'.$langs->trans("Weighted").'</span>: <span class="amount">'.price($object->opp_amount * $object->opp_percent / 100, 0, $langs, 1, 0, -1, $conf->currency).'</span></span>';
        }
      }
      print '</td></tr>';
 
      // Opportunity Weighted Amount
      /*
      print '<tr><td>'.$langs->trans('OpportunityWeightedAmount').'</td><td>';
      if (strcmp($object->opp_amount, '') && strcmp($object->opp_percent, '')) {
        print '<span class="amount">'.price($object->opp_amount * $object->opp_percent / 100, 0, $langs, 1, 0, -1, $conf->currency).'</span>';
      }
      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 '<span class="amount">'.price($object->budget_amount, 0, $langs, 1, 0, 0, $conf->currency).'</span>';
    }
    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 dol_htmlentitiesbr($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();
 
  if ($action == 'edit' && $userWrite > 0) {
    print $form->buttonsSaveCancel();
  }
 
  print '</form>';
 
  // Change probability from status
  if (!empty($conf->use_javascript_ajax) && !empty($conf->global->PROJECT_USE_OPPORTUNITIES)) {
    // Default value to close or not when we set opp to 'WON'.
    $defaultcheckedwhenoppclose = 1;
    if (empty($conf->global->PROJECT_HIDE_TASKS)) {
      $defaultcheckedwhenoppclose = 0;
    }
 
    print '<!-- Javascript to manage opportunity status change -->';
    print '<script type="text/javascript">
            jQuery(document).ready(function() {
              function change_percent()
              {
                    var element = jQuery("#opp_status option:selected");
                    var defaultpercent = element.attr("defaultpercent");
                    var defaultcloseproject = '.((int) $defaultcheckedwhenoppclose).';
                    var elemcode = element.attr("elemcode");
                    var oldpercent = \''.dol_escape_js($object->opp_percent).'\';
 
                    console.log("We select "+elemcode);
 
                    /* Define if checkbox to close is checked or not */
                    var closeproject = 0;
                    if (elemcode == \'LOST\') closeproject = 1;
                    if (elemcode == \'WON\') closeproject = defaultcloseproject;
                    if (closeproject) jQuery("#inputcloseproject").prop("checked", true);
                    else jQuery("#inputcloseproject").prop("checked", false);
 
                    /* Make the close project checkbox visible or not */
                    console.log("closeproject="+closeproject);
                    if (elemcode == \'WON\' || elemcode == \'LOST\')
                    {
                        jQuery("#divtocloseproject").show();
                    }
                    else
                    {
                        jQuery("#divtocloseproject").hide();
                    }
 
                    /* Change percent with default percent (defaultpercent) if new status (defaultpercent) is higher than current (jQuery("#opp_percent").val()) */
                    console.log("oldpercent="+oldpercent);
                    if (oldpercent != \'\' && (parseFloat(defaultpercent) < parseFloat(oldpercent)))
                    {
                        if (jQuery("#opp_percent").val() != \'\' && oldpercent != \'\') jQuery("#oldopppercent").text(\' - '.dol_escape_js($langs->transnoentities("PreviousValue")).': \'+oldpercent+\' %\');
                        if (parseFloat(oldpercent) != 100) { jQuery("#opp_percent").val(oldpercent); }
                        else { jQuery("#opp_percent").val(defaultpercent); }
                    }
                    else
                    {
                      if ((parseFloat(jQuery("#opp_percent").val()) < parseFloat(defaultpercent)));
                      {
                          if (jQuery("#opp_percent").val() != \'\' && oldpercent != \'\') jQuery("#oldopppercent").text(\' - '.dol_escape_js($langs->transnoentities("PreviousValue")).': \'+oldpercent+\' %\');
                          jQuery("#opp_percent").val(defaultpercent);
                      }
                    }
              }
 
              jQuery("#opp_status").change(function() {
                change_percent();
              });
        });
        </script>';
  }
 
  /*
   * Actions Buttons
   */
  print '<div class="tabsAction">';
  $parameters = array();
  $reshook = $hookmanager->executeHooks('addMoreActionsButtons', $parameters, $object, $action); // Note that $action and $object may have been
                                                // modified by hook
  if (empty($reshook)) {
    if ($action != "edit" && $action != 'presend') {
      // Create event
      /*if ($conf->agenda->enabled && ! empty($conf->global->MAIN_ADD_EVENT_ON_ELEMENT_CARD))         // Add hidden condition because this is not a
        // "workflow" action so should appears somewhere else on
        // page.
      {
        print '<a class="butAction" href="'.DOL_URL_ROOT.'/comm/action/card.php?action=create&amp;origin=' . $object->element . '&amp;originid=' . $object->id . '&amp;socid=' . $object->socid . '&amp;projectid=' . $object->id . '">' . $langs->trans("AddAction") . '</a>';
      }*/
 
      // Send
      if (empty($user->socid)) {
        if ($object->statut != Project::STATUS_CLOSED) {
          print dolGetButtonAction('', $langs->trans('SendMail'), 'default', $_SERVER["PHP_SELF"].'?action=presend&amp;token='.newToken().'&amp;id='.$object->id.'&amp;mode=init#formmailbeforetitle', '');
        }
      }
 
      // Modify
      if ($object->statut != Project::STATUS_CLOSED && $user->rights->projet->creer) {
        if ($userWrite > 0) {
          print dolGetButtonAction('', $langs->trans('Modify'), 'default', $_SERVER["PHP_SELF"].'?action=edit&amp;token='.newToken().'&amp;id='.$object->id, '');
        } else {
          print dolGetButtonAction($langs->trans('NotOwnerOfProject'), $langs->trans('Modify'), 'default', $_SERVER['PHP_SELF']. '#', '', false);
        }
      }
 
      // Validate
      if ($object->statut == Project::STATUS_DRAFT && $user->rights->projet->creer) {
        if ($userWrite > 0) {
          print dolGetButtonAction('', $langs->trans('Validate'), 'default', $_SERVER["PHP_SELF"].'?action=validate&amp;token='.newToken().'&amp;id='.$object->id, '');
        } else {
          print dolGetButtonAction($langs->trans('NotOwnerOfProject'), $langs->trans('Validate'), 'default', $_SERVER['PHP_SELF']. '#', '', false);
        }
      }
 
      // Close
      if ($object->statut == Project::STATUS_VALIDATED && $user->rights->projet->creer) {
        if ($userWrite > 0) {
          print dolGetButtonAction('', $langs->trans('Close'), 'default', $_SERVER["PHP_SELF"].'?action=close&amp;token='.newToken().'&amp;id='.$object->id, '');
        } else {
          print dolGetButtonAction($langs->trans('NotOwnerOfProject'), $langs->trans('Close'), 'default', $_SERVER['PHP_SELF']. '#', '', false);
        }
      }
 
      // Reopen
      if ($object->statut == Project::STATUS_CLOSED && $user->rights->projet->creer) {
        if ($userWrite > 0) {
          print dolGetButtonAction('', $langs->trans('ReOpen'), 'default', $_SERVER["PHP_SELF"].'?action=reopen&amp;token='.newToken().'&amp;id='.$object->id, '');
        } else {
          print dolGetButtonAction($langs->trans('NotOwnerOfProject'), $langs->trans('ReOpen'), 'default', $_SERVER['PHP_SELF']. '#', '', false);
        }
      }
 
      // Add button to create objects from project
      if (!empty($conf->global->PROJECT_SHOW_CREATE_OBJECT_BUTTON)) {
        if (!empty($conf->propal->enabled) && $user->rights->propal->creer) {
          $langs->load("propal");
          print dolGetButtonAction('', $langs->trans('AddProp'), 'default', DOL_URL_ROOT.'/comm/propal/card.php?action=create&amp;projectid='.$object->id.'&amp;socid='.$object->socid, '');
        }
        if (!empty($conf->commande->enabled) && $user->rights->commande->creer) {
          $langs->load("orders");
          print dolGetButtonAction('', $langs->trans('CreateOrder'), 'default', DOL_URL_ROOT.'/commande/card.php?action=create&amp;projectid='.$object->id.'&amp;socid='.$object->socid, '');
        }
        if (isModEnabled('facture') && $user->rights->facture->creer) {
          $langs->load("bills");
          print dolGetButtonAction('', $langs->trans('CreateBill'), 'default', DOL_URL_ROOT.'/compta/facture/card.php?action=create&amp;projectid='.$object->id.'&amp;socid='.$object->socid, '');
        }
        if (!empty($conf->supplier_proposal->enabled) && $user->rights->supplier_proposal->creer) {
          $langs->load("supplier_proposal");
          print dolGetButtonAction('', $langs->trans('AddSupplierProposal'), 'default', DOL_URL_ROOT.'/supplier_proposal/card.php?action=create&amp;projectid='.$object->id.'&amp;socid='.$object->socid, '');
        }
        if (!empty($conf->supplier_order->enabled) && ($user->rights->fournisseur->commande->creer || $user->rights->supplier_order->creer)) {
          $langs->load("suppliers");
          print dolGetButtonAction('', $langs->trans('AddSupplierOrder'), 'default', DOL_URL_ROOT.'/fourn/commande/card.php?action=create&amp;projectid='.$object->id.'&amp;socid='.$object->socid, '');
        }
        if (!empty($conf->supplier_invoice->enabled) && ($user->rights->fournisseur->facture->creer || $user->rights->supplier_invoice->creer)) {
          $langs->load("suppliers");
          print dolGetButtonAction('', $langs->trans('AddSupplierInvoice'), 'default', DOL_URL_ROOT.'/fourn/facture/card.php?action=create&amp;projectid='.$object->id.'&amp;socid='.$object->socid, '');
        }
        if (!empty($conf->ficheinter->enabled) && $user->rights->ficheinter->creer) {
          $langs->load("interventions");
          print dolGetButtonAction('', $langs->trans('AddIntervention'), 'default', DOL_URL_ROOT.'/fichinter/card.php?action=create&amp;projectid='.$object->id.'&amp;socid='.$object->socid, '');
        }
        if (!empty($conf->contrat->enabled) && $user->rights->contrat->creer) {
          $langs->load("contracts");
          print dolGetButtonAction('', $langs->trans('AddContract'), 'default', DOL_URL_ROOT.'/contrat/card.php?action=create&amp;projectid='.$object->id.'&amp;socid='.$object->socid, '');
        }
        if (!empty($conf->expensereport->enabled) && $user->rights->expensereport->creer) {
          $langs->load("trips");
          print dolGetButtonAction('', $langs->trans('AddTrip'), 'default', DOL_URL_ROOT.'/expensereport/card.php?action=create&amp;projectid='.$object->id.'&amp;socid='.$object->socid, '');
        }
        if (!empty($conf->don->enabled) && $user->rights->don->creer) {
          $langs->load("donations");
          print dolGetButtonAction('', $langs->trans('AddDonation'), 'default', DOL_URL_ROOT.'/don/card.php?action=create&amp;projectid='.$object->id.'&amp;socid='.$object->socid, '');
        }
      }
 
      // Clone
      if ($user->rights->projet->creer) {
        if ($userWrite > 0) {
          print dolGetButtonAction('', $langs->trans('ToClone'), 'default', $_SERVER["PHP_SELF"].'?action=clone&amp;token='.newToken().'&amp;id='.$object->id, '');
        } else {
          print dolGetButtonAction($langs->trans('NotOwnerOfProject'), $langs->trans('ToClone'), 'default', $_SERVER['PHP_SELF']. '#', '', false);
        }
      }
 
      // Delete
      if ($user->rights->projet->supprimer || ($object->statut == Project::STATUS_DRAFT && $user->rights->projet->creer)) {
        if ($userDelete > 0 || ($object->statut == Project::STATUS_DRAFT && $user->rights->projet->creer)) {
          print dolGetButtonAction('', $langs->trans('Delete'), 'delete', $_SERVER["PHP_SELF"].'?action=delete&amp;token='.newToken().'&amp;id='.$object->id, '');
        } else {
          print dolGetButtonAction($langs->trans('NotOwnerOfProject'), $langs->trans('Delete'), 'default', $_SERVER['PHP_SELF']. '#', '', false);
        }
      }
    }
  }
 
  print "</div>";
 
  if (GETPOST('modelselected')) {
    $action = 'presend';
  }
 
  if ($action != 'presend') {
    print '<div class="fichecenter"><div class="fichehalfleft">';
    print '<a name="builddoc"></a>'; // ancre
 
    /*
     * Generated documents
     */
    $filename = dol_sanitizeFileName($object->ref);
    $filedir = $conf->project->multidir_output[$object->entity]."/".dol_sanitizeFileName($object->ref);
    $urlsource = $_SERVER["PHP_SELF"]."?id=".$object->id;
    $genallowed = ($user->rights->projet->lire && $userAccess > 0);
    $delallowed = ($user->rights->projet->creer && $userWrite > 0);
 
    print $formfile->showdocuments('project', $filename, $filedir, $urlsource, $genallowed, $delallowed, $object->model_pdf, 1, 0, 0, 0, 0, '', '', '', '', '', $object);
 
    print '</div><div class="fichehalfright">';
 
    $MAXEVENT = 10;
 
    $morehtmlcenter = dolGetButtonTitle($langs->trans('SeeAll'), '', 'fa fa-bars imgforviewmode', DOL_URL_ROOT.'/projet/info.php?id='.$object->id);
 
    // List of actions on element
    include_once DOL_DOCUMENT_ROOT.'/core/class/html.formactions.class.php';
    $formactions = new FormActions($db);
    $somethingshown = $formactions->showactions($object, 'project', 0, 1, '', $MAXEVENT, '', $morehtmlcenter);
 
    print '</div></div>';
  }
 
  // Presend form
  $modelmail = 'project';
  $defaulttopic = 'SendProjectRef';
  $diroutput = $conf->project->multidir_output[$object->entity];
  $autocopy = 'MAIN_MAIL_AUTOCOPY_PROJECT_TO'; // used to know the automatic BCC to add
  $trackid = 'proj'.$object->id;
 
  include DOL_DOCUMENT_ROOT.'/core/tpl/card_presend.tpl.php';
 
  // Hook to add more things on page
  $parameters = array();
  $reshook = $hookmanager->executeHooks('mainCardTabAddMore', $parameters, $object, $action); // Note that $action and $object may have been modified by hook
} else {
  print $langs->trans("RecordNotFound");
}
 
// End of page
llxFooter();
$db->close();