card.php

Go to the documentation of this file.

<?php
/* Copyright (C) 2002-2007  Rodolphe Quiedeville    <rodolphe@quiedeville.org>
 * Copyright (C) 2004-2016  Laurent Destailleur     <eldy@users.sourceforge.net>
 * Copyright (C) 2005-2018  Regis Houssin       <regis.houssin@inodbox.com>
 * Copyright (C) 2011-2020  Juanjo Menent       <jmenent@2byte.es>
 * Copyright (C) 2013   Florian Henry       <florian.henry@open-concept.pro>
 * Copyright (C) 2014-2018  Ferran Marcet       <fmarcet@2byte.es>
 * Copyright (C) 2014-2026  Charlene Benke        <charlene@patas-monkey.com>
 * Copyright (C) 2015-2016  Abbes Bahfir        <bafbes@gmail.com>
 * Copyright (C) 2018-2022  Philippe Grand        <philippe.grand@atoo-net.com>
 * Copyright (C) 2020-2026  Frédéric France       <frederic.france@free.fr>
 * Copyright (C) 2023       Benjamin Grembi       <benjamin@oarces.fr>
 * Copyright (C) 2023-2024  William Mead        <william.mead@manchenumerique.fr>
 * Copyright (C) 2024-2026  MDW             <mdeweerd@users.noreply.github.com>
 * Copyright (C) 2024-2026  Alexandre Spangaro      <alexandre@inovea-conseil.com>
 * Copyright (C) 2025   Pierre Ardoin       <developpeur@lesmetiersdubatiment.fr>
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 3 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program. If not, see <https://www.gnu.org/licenses/>.
 */
 
// Load Dolibarr environment
require '../main.inc.php';
require_once DOL_DOCUMENT_ROOT.'/core/class/html.formfile.class.php';
require_once DOL_DOCUMENT_ROOT.'/fichinter/class/fichinter.class.php';
require_once DOL_DOCUMENT_ROOT.'/core/modules/fichinter/modules_fichinter.php';
require_once DOL_DOCUMENT_ROOT.'/core/lib/fichinter.lib.php';
require_once DOL_DOCUMENT_ROOT.'/core/lib/date.lib.php';
if (isModEnabled('project')) {
  require_once DOL_DOCUMENT_ROOT.'/projet/class/project.class.php';
  require_once DOL_DOCUMENT_ROOT.'/core/class/html.formprojet.class.php';
}
if (isModEnabled('contract')) {
  require_once DOL_DOCUMENT_ROOT."/core/class/html.formcontract.class.php";
  require_once DOL_DOCUMENT_ROOT."/contrat/class/contrat.class.php";
}
if (getDolGlobalString('FICHEINTER_ADDON') && is_readable(DOL_DOCUMENT_ROOT."/core/modules/fichinter/mod_" . getDolGlobalString('FICHEINTER_ADDON').".php")) {
  require_once DOL_DOCUMENT_ROOT."/core/modules/fichinter/mod_" . getDolGlobalString('FICHEINTER_ADDON').'.php';
}
if (isModEnabled('category')) {
  require_once DOL_DOCUMENT_ROOT.'/categories/class/categorie.class.php';
}
require_once DOL_DOCUMENT_ROOT.'/core/class/doleditor.class.php';
 
// Load translation files required by the page
$langs->loadLangs(array('bills', 'companies', 'interventions', 'stocks'));
 
$id = GETPOSTINT('id');
$ref = GETPOST('ref', 'alpha');
$ref_client = GETPOST('ref_client', 'alpha');
$socid = GETPOSTINT('socid');
$contratid = GETPOSTINT('contratid');
$action = GETPOST('action', 'alpha');
$cancel = GETPOST('cancel', 'alpha');
$confirm = GETPOST('confirm', 'alpha');
$backtopage = GETPOST('backtopage', 'alpha');
 
$mesg = GETPOST('msg', 'alpha');
$origin = GETPOST('origin', 'alpha');
$originid = (GETPOSTINT('originid') ? GETPOSTINT('originid') : GETPOSTINT('origin_id')); // For backward compatibility
$note_public = GETPOST('note_public', 'restricthtml');
$note_private = GETPOST('note_private', 'restricthtml');
$lineid = GETPOSTINT('line_id');
 
$error = 0;
 
// PDF
$hidedetails = (GETPOSTINT('hidedetails') ? GETPOSTINT('hidedetails') : (getDolGlobalString('MAIN_GENERATE_DOCUMENTS_HIDE_DETAILS') ? 1 : 0));
$hidedesc = (GETPOSTINT('hidedesc') ? GETPOSTINT('hidedesc') : (getDolGlobalString('MAIN_GENERATE_DOCUMENTS_HIDE_DESC') ? 1 : 0));
$hideref = (GETPOSTINT('hideref') ? GETPOSTINT('hideref') : (getDolGlobalString('MAIN_GENERATE_DOCUMENTS_HIDE_REF') ? 1 : 0));
 
// Initialize a technical object to manage hooks of page. Note that conf->hooks_modules contains an array of hook context
$hookmanager->initHooks(array('fichintercard', 'interventioncard', 'globalcard'));
 
$object = new Fichinter($db);
 
$objectsrc = null;
 
$extrafields->fetch_name_optionals_label($object->table_element);
 
// Load object
if ($id > 0 || !empty($ref)) {
  $ret = $object->fetch($id, $ref);
  if ($ret > 0) {
    $ret = $object->fetch_thirdparty();
  }
  if ($ret < 0) {
    dol_print_error(null, $object->error);
  }
}
 
// Security check
if ($user->isExternalUser()) {
  $socid = $user->isExternalUser();
}
$result = restrictedArea($user, 'ficheinter', $id, 'fichinter');
 
$permissionnote = $user->hasRight('ficheinter', 'creer'); // Used by the include of actions_setnotes.inc.php
$permissiondellink = $user->hasRight('ficheinter', 'creer'); // Used by the include of actions_dellink.inc.php
$permissiontodelete = (($object->status == Fichinter::STATUS_DRAFT && $user->hasRight('ficheinter', 'creer')) || $user->hasRight('ficheinter', 'supprimer'));
$permissiontoadd = $user->hasRight('ficheinter', 'creer');
$permissiontoeditextra = $permissiontoadd;
if (GETPOST('attribute', 'aZ09') && isset($extrafields->attributes[$object->table_element]['perms'][GETPOST('attribute', 'aZ09')])) {
  // For action 'update_extras', is there a specific permission set for the attribute to update
  $permissiontoeditextra = dol_eval((string) $extrafields->attributes[$object->table_element]['perms'][GETPOST('attribute', 'aZ09')]);
}
 
 
$classname = '';
 
/*
 * Actions
 */
 
$parameters = array('socid' => $socid);
$reshook = $hookmanager->executeHooks('doActions', $parameters, $object, $action); // Note that $action and $object may have been modified by some hooks
if ($reshook < 0) {
  setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
}
 
if (empty($reshook)) {
  $backurlforlist = DOL_URL_ROOT.'/fichinter/list.php';
 
  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.'/fichinter/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_setnotes.inc.php'; // Must be 'include', not 'include_once'
 
  include DOL_DOCUMENT_ROOT.'/core/actions_dellink.inc.php'; // Must be 'include', not 'include_once'
 
  // Action clone object
  if ($action == 'confirm_clone' && $confirm == 'yes' && $permissiontoadd) {
    if (false && !GETPOST('clone_content') && !GETPOST('clone_receivers')) {
      setEventMessages($langs->trans("NoCloneOptionsSpecified"), null, 'errors');
    } else {
      if ($object->id > 0) {
        // Because createFromClone modifies the object, we must clone it so that we can restore it later
        $orig = clone $object;
        $clone_notes = false;
        if (GETPOSTISSET('clone_notes') && GETPOST('clone_notes') === 'on') {
          $clone_notes = true;
        }
        $clone_contacts = false;
        if (GETPOSTISSET('clone_contacts') && GETPOST('clone_contacts') === 'on') {
          $clone_contacts = true;
        }
 
        $result = $object->createFromClone($user, $socid, $clone_contacts, $clone_notes);
        if ($result > 0) {
          header("Location: ".$_SERVER['PHP_SELF'].'?id='.$result);
          exit;
        } else {
          setEventMessages($object->error, $object->errors, 'errors');
          $object = $orig;
          $action = '';
        }
      }
    }
  }
 
  if ($action == 'confirm_validate' && $confirm == 'yes' && $permissiontoadd) {
    $result = $object->setValid($user);
 
    if ($result >= 0) {
      if (!getDolGlobalString('MAIN_DISABLE_PDF_AUTOUPDATE')) {
        // Define output language
        $outputlangs = $langs;
        $newlang = '';
        if (getDolGlobalInt('MAIN_MULTILANGS') /* && empty($newlang) */ && GETPOST('lang_id', 'aZ09')) {
          $newlang = GETPOST('lang_id', 'aZ09');
        }
        if (getDolGlobalInt('MAIN_MULTILANGS') && empty($newlang)) {
          $newlang = $object->thirdparty->default_lang;
        }
        if (!empty($newlang)) {
          $outputlangs = new Translate("", $conf);
          $outputlangs->setDefaultLang($newlang);
        }
        $result = fichinter_create($db, $object, (!GETPOST('model', 'alpha')) ? $object->model_pdf : GETPOST('model', 'alpha'), $outputlangs);
      }
 
      header('Location: '.$_SERVER["PHP_SELF"].'?id='.$object->id);
      exit;
    } else {
      $mesg = $object->error;
    }
  } elseif ($action == 'confirm_sign' && $confirm == 'yes' && $permissiontoadd) {
    $result = $object->setSignedStatus($user, GETPOSTINT('signed_status'), 0, 'FICHINTER_MODIFY');
    if ($result >= 0) {
      if (!getDolGlobalString('MAIN_DISABLE_PDF_AUTOUPDATE')) {
        // Define output language
        $outputlangs = $langs;
        $newlang = '';
        if (getDolGlobalInt('MAIN_MULTILANGS') /* && empty($newlang) */ && GETPOST('lang_id', 'aZ09')) {
          $newlang = GETPOST('lang_id', 'aZ09');
        }
        if (getDolGlobalInt('MAIN_MULTILANGS') && empty($newlang)) {
          $newlang = $object->thirdparty->default_lang;
        }
        if (!empty($newlang)) {
          $outputlangs = new Translate("", $conf);
          $outputlangs->setDefaultLang($newlang);
        }
        $result = fichinter_create($db, $object, (!GETPOST('model', 'alpha')) ? $object->model_pdf : GETPOST('model', 'alpha'), $outputlangs);
      }
 
      header('Location: ' . $_SERVER["PHP_SELF"] . '?id=' . $object->id);
      exit;
    } else {
      $mesg = $object->error;
    }
  } elseif ($action == 'confirm_unsign' && $confirm == 'yes' && $permissiontoadd) {
    $result = $object->setSignedStatus($user, Fichinter::$SIGNED_STATUSES['STATUS_NO_SIGNATURE'], 0, 'FICHINTER_MODIFY');
    if ($result >= 0) {
      if (!getDolGlobalString('MAIN_DISABLE_PDF_AUTOUPDATE')) {
        // Define output language
        $outputlangs = $langs;
        $newlang = '';
        if (getDolGlobalInt('MAIN_MULTILANGS') /* && empty($newlang) */ && GETPOST('lang_id', 'aZ09')) {
          $newlang = GETPOST('lang_id', 'aZ09');
        }
        if (getDolGlobalInt('MAIN_MULTILANGS') && empty($newlang)) {
          $newlang = $object->thirdparty->default_lang;
        }
        if (!empty($newlang)) {
          $outputlangs = new Translate("", $conf);
          $outputlangs->setDefaultLang($newlang);
        }
        $result = fichinter_create($db, $object, (!GETPOST('model', 'alpha')) ? $object->model_pdf : GETPOST('model', 'alpha'), $outputlangs);
      }
 
      header('Location: ' . $_SERVER["PHP_SELF"] . '?id=' . $object->id);
      exit;
    } else {
      $mesg = $object->error;
    }
  } elseif ($action == 'confirm_modify' && $confirm == 'yes' && $permissiontoadd) {
    $result = $object->setDraft($user);
    if ($result >= 0) {
      if (!getDolGlobalString('MAIN_DISABLE_PDF_AUTOUPDATE')) {
        // Define output language
        $outputlangs = $langs;
        $newlang = '';
        if (getDolGlobalInt('MAIN_MULTILANGS') /* && empty($newlang) */ && GETPOST('lang_id', 'aZ09')) {
          $newlang = GETPOST('lang_id', 'aZ09');
        }
        if (getDolGlobalInt('MAIN_MULTILANGS') && empty($newlang)) {
          $newlang = $object->thirdparty->default_lang;
        }
        if (!empty($newlang)) {
          $outputlangs = new Translate("", $conf);
          $outputlangs->setDefaultLang($newlang);
        }
        $result = fichinter_create($db, $object, (!GETPOST('model', 'alpha')) ? $object->model_pdf : GETPOST('model', 'alpha'), $outputlangs);
      }
 
      header('Location: ' . $_SERVER["PHP_SELF"] . '?id=' . $object->id);
      exit;
    } else {
      $mesg = $object->error;
    }
  } elseif ($action == 'confirm_done' && $confirm == 'yes' && $permissiontoadd) {
    $result = $object->setClose($user);
 
    if ($result >= 0) {
      if (!getDolGlobalString('MAIN_DISABLE_PDF_AUTOUPDATE')) {
        // Define output language
        $outputlangs = $langs;
        $newlang = '';
        if (getDolGlobalInt('MAIN_MULTILANGS') /* && empty($newlang) */ && GETPOST('lang_id', 'aZ09')) {
          $newlang = GETPOST('lang_id', 'aZ09');
        }
        if (getDolGlobalInt('MAIN_MULTILANGS') && empty($newlang)) {
          $newlang = $object->thirdparty->default_lang;
        }
        if (!empty($newlang)) {
          $outputlangs = new Translate("", $conf);
          $outputlangs->setDefaultLang($newlang);
        }
        $result = fichinter_create($db, $object, (!GETPOST('model', 'alpha')) ? $object->model_pdf : GETPOST('model', 'alpha'), $outputlangs);
      }
 
      header('Location: '.$_SERVER["PHP_SELF"].'?id='.$object->id);
      exit;
    } else {
      $mesg = $object->error;
    }
  } elseif ($action == 'add' && $permissiontoadd) {
    $selectedLines = GETPOST('toselect', 'array:int');
    $object->socid = $socid;
    $object->duration = GETPOSTINT('duration');
    $object->fk_project = GETPOSTINT('projectid');
    $object->fk_contrat = GETPOSTINT('contratid');
    $object->user_author_id = $user->id;
    $object->description = GETPOST('description', 'restricthtml');
    $object->ref = $ref;
    $object->ref_client = $ref_client;
    $object->model_pdf = GETPOST('model', 'alpha');
    $object->note_private = GETPOST('note_private', 'restricthtml');
    $object->note_public = GETPOST('note_public', 'restricthtml');
 
    if ($object->socid > 0) {
      // If creation from another object of another module (Example: origin=propal, originid=1)
      if (!empty($origin) && !empty($originid)) {
        // Parse element/subelement (ex: project_task)
        $regs = array();
        $element = $subelement = GETPOST('origin', 'alphanohtml');
        if (preg_match('/^([^_]+)_([^_]+)/i', GETPOST('origin', 'alphanohtml'), $regs)) {
          $element = $regs[1];
          $subelement = $regs[2];
        }
 
        // For compatibility
        if ($element == 'order') {
          $element = $subelement = 'commande';
        }
        if ($element == 'propal') {
          $element = 'comm/propal';
          $subelement = 'propal';
        }
        if ($element == 'contract') {
          $element = $subelement = 'contrat';
        }
 
        $object->origin    = $origin;
        $object->origin_id = $originid;
 
        // Possibility to add external linked objects with hooks
        $object->linked_objects[$object->origin] = $object->origin_id;
        if (GETPOSTISARRAY('other_linked_objects')) {
          $object->linked_objects = array_merge($object->linked_objects, GETPOST('other_linked_objects', 'array:int'));
        }
 
        // Extrafields
 
        // Fill array 'array_options' with data from add form
        $ret = $extrafields->setOptionalsFromPost(null, $object);
        if ($ret < 0) {
          $error++;
          $action = 'create';
        }
        //$array_options = $extrafields->getOptionalsFromPost($object->table_element);
 
        //$object->array_options = $array_options;
 
        $id = $object->create($user);
 
        if ($id > 0) {
          dol_include_once('/'.$element.'/class/'.$subelement.'.class.php');
 
          $classname = ucfirst($subelement);
          $srcobject = new $classname($db);
          '@phan-var-force Commande|Propal|Contrat $srcobject';  // Can be other class, but CommonObject is too generic
          dol_syslog("Try to find source object origin=".$object->origin." originid=".$object->origin_id." to add lines");
          $result = $srcobject->fetch($object->origin_id);
          if ($result > 0) {
            $srcobject->fetch_thirdparty();
            $lines = $srcobject->lines;
            if (empty($lines) && method_exists($srcobject, 'fetch_lines')) {
              $srcobject->fetch_lines();
              $lines = $srcobject->lines;
            }
 
            if (is_array($lines)) {
              $num = count($lines);
 
              for ($i = 0; $i < $num; $i++) {
                if (!in_array($lines[$i]->id, $selectedLines)) {
                  continue; // Skip unselected lines
                }
 
                $product_type = ($lines[$i]->product_type ? $lines[$i]->product_type : Product::TYPE_PRODUCT);
 
                if ($product_type == Product::TYPE_SERVICE || getDolGlobalString('FICHINTER_PRINT_PRODUCTS')) { //only services except if config includes products
                  $duration = 3600; // Default to one hour
                  $desc = '';
                  // Predefined products & services
                  if ($lines[$i]->fk_product > 0) {
                    $prod = new Product($db);
                    $prod->id = $lines[$i]->fk_product;
 
                    // Define output language
                    if (getDolGlobalInt('MAIN_MULTILANGS') && getDolGlobalString('PRODUIT_TEXTS_IN_THIRDPARTY_LANGUAGE')) {
                      $prod->getMultiLangs();
                      // We show if duration is present on service (so we get it)
                      $prod->fetch($lines[$i]->fk_product);
                      $outputlangs = $langs;
                      $newlang = '';
                      if (/* empty($newlang) && */ GETPOST('lang_id', 'aZ09')) {
                        $newlang = GETPOST('lang_id', 'aZ09');
                      }
                      if (empty($newlang)) {
                        $newlang = $srcobject->thirdparty->default_lang;
                      }
                      if (!empty($newlang)) {
                        $outputlangs = new Translate("", $conf);
                        $outputlangs->setDefaultLang($newlang);
                      }
                      $label = (!empty($prod->multilangs[$outputlangs->defaultlang]["libelle"])) ? $prod->multilangs[$outputlangs->defaultlang]["libelle"] : $lines[$i]->product_label;
                    } else {
                      $prod->fetch($lines[$i]->fk_product);
                      $label = $lines[$i]->product_label;
                    }
 
                    if ($prod->duration_value && getDolGlobalString('FICHINTER_USE_SERVICE_DURATION')) {
                      switch ($prod->duration_unit) {
                        default:
                        case 'h':
                          $mult = 3600;
                          break;
                        case 'd':
                          $mult = 3600 * 24;
                          break;
                        case 'w':
                          $mult = 3600 * 24 * 7;
                          break;
                        case 'm':
                          $mult = (int) (3600 * 24 * (365 / 12)); // Average month duration
                          break;
                        case 'y':
                          $mult = 3600 * 24 * 365;
                          break;
                      }
                      $duration = (int) $prod->duration_value * $mult * $lines[$i]->qty;
                    }
 
                    $desc = $lines[$i]->product_ref;
                    $desc .= ' - ';
                    $desc .= $label;
                    $desc .= '<br>';
                  }
                  // Common part (predefined or free line)
                  $desc .= dol_htmlentitiesbr($lines[$i]->desc);
                  $desc .= '<br>';
                  $desc .= ' ('.$langs->trans('Quantity').': '.$lines[$i]->qty.')';
 
                  $timearray = dol_getdate(dol_now());
                  $date_intervention = dol_mktime(0, 0, 0, $timearray['mon'], $timearray['mday'], $timearray['year']);
 
                  if ($product_type == Product::TYPE_PRODUCT) {
                    $duration = 0;
                  }
 
                  $predef = '';
 
                  // Extrafields
                  $extrafields->fetch_name_optionals_label($object->table_element_line);
                  $array_options = $extrafields->getOptionalsFromPost($object->table_element_line, $predef);
 
                  $result = $object->addline(
                    $user,
                    $id,
                    $desc,
                    $date_intervention,
                    $duration,
                    $array_options
                  );
 
                  if ($result < 0) {
                    $error++;
                    break;
                  }
                }
              }
            }
          } else {
            $langs->load("errors");
            setEventMessages($srcobject->error, $srcobject->errors, 'errors');
            $action = 'create';
            $error++;
          }
        } else {
          $langs->load("errors");
          setEventMessages($object->error, $object->errors, 'errors');
          $action = 'create';
          $error++;
        }
      } else {
        // Fill array 'array_options' with data from add form
        $ret = $extrafields->setOptionalsFromPost(null, $object);
        if ($ret < 0) {
          $error++;
          $action = 'create';
        }
 
        if (!$error) {
          // Extrafields
          $array_options = $extrafields->getOptionalsFromPost($object->table_element);
 
          $object->array_options = $array_options;
 
          $result = $object->create($user);
 
          if ($result > 0) {
            $id = $result; // Force refresh on a newly created record
 
            // Category association
            $categories = GETPOST('categories', 'array');
            $object->setCategories($categories);
          } else {
            $langs->load("errors");
            setEventMessages($object->error, $object->errors, 'errors');
            $action = 'create';
            $error++;
          }
        }
      }
    } else {
      $mesg = $langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("ThirdParty"));
      $action = 'create';
      $error++;
    }
  } elseif ($action == 'update' && $permissiontoadd) {
    $object->socid = $socid;
    $object->fk_project = GETPOSTINT('projectid');
    $object->fk_contrat = GETPOSTINT('contratid');
    $object->user_author_id = $user->id;
    $object->description = GETPOST('description', 'restricthtml');
    $object->ref = $ref;
    $object->ref_client = $ref_client;
 
    $result = $object->update($user);
    if ($result < 0) {
      setEventMessages($object->error, $object->errors, 'errors');
    }
  } elseif ($action == 'classin' && $permissiontoadd) {
    // Set into a project
    $result = $object->setProject(GETPOSTINT('projectid'));
    if ($result < 0) {
      dol_print_error($db, $object->error);
    }
  } elseif ($action == 'setcontract' && $permissiontoadd) {
    // Set into a contract
    $result = $object->set_contrat($user, GETPOSTINT('contratid'));
    if ($result < 0) {
      dol_print_error($db, $object->error);
    }
  } elseif ($action == 'settags' && isModEnabled('category') && $permissiontoadd) {
    // Set tags
    $result = $object->setCategories(GETPOST('categories', 'array'));
    if ($result < 0) {
      setEventMessages($object->error, $object->errors, 'errors');
    }
  } elseif ($action == 'setref_client' && $permissiontoadd) {
    // Set customer reference
    $result = $object->setRefClient($user, GETPOST('ref_client', 'alpha'));
    if ($result < 0) {
      setEventMessages($object->error, $object->errors, 'errors');
    }
  } elseif ($action == 'confirm_delete' && $confirm == 'yes' && $permissiontodelete) {
    $result = $object->delete($user);
    if ($result < 0) {
      setEventMessages($object->error, $object->errors, 'errors');
    }
 
    header('Location: '.DOL_URL_ROOT.'/fichinter/list.php?leftmenu=ficheinter&restore_lastsearch_values=1');
    exit;
  } elseif ($action == 'setdescription' && $permissiontoadd) {
    $result = $object->set_description($user, GETPOST('description'));
    if ($result < 0) {
      dol_print_error($db, $object->error);
    }
  } elseif ($action == "addline" && $permissiontoadd) {
    // Add line
    if (!GETPOST('np_desc', 'restricthtml') && !getDolGlobalString('FICHINTER_EMPTY_LINE_DESC')) {
      $mesg = $langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("Description"));
      $error++;
    }
    if (!getDolGlobalString('FICHINTER_WITHOUT_DURATION') && !GETPOSTINT('durationhour') && !GETPOSTINT('durationmin')) {
      $mesg = $langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("Duration"));
      $error++;
    }
    if (!getDolGlobalString('FICHINTER_WITHOUT_DURATION') && GETPOSTINT('durationhour') >= 24 && GETPOSTINT('durationmin') > 0) {
      $mesg = $langs->trans("ErrorValueTooHigh");
      $error++;
    }
    if (!$error) {
      $db->begin();
 
      $desc = GETPOST('np_desc', 'restricthtml');
      $date_intervention = dol_mktime(GETPOSTINT('dihour'), GETPOSTINT('dimin'), 0, GETPOSTINT('dimonth'), GETPOSTINT('diday'), GETPOSTINT('diyear'));
      $duration = !getDolGlobalString('FICHINTER_WITHOUT_DURATION') ? convertTime2Seconds(GETPOSTINT('durationhour'), GETPOSTINT('durationmin')) : 0;
 
      // Extrafields
      $extrafields->fetch_name_optionals_label($object->table_element_line);
      $array_options = $extrafields->getOptionalsFromPost($object->table_element_line);
 
      $result = $object->addline(
        $user,
        $id,
        $desc,
        $date_intervention,
        $duration,
        $array_options
      );
 
      // Define output language
      $outputlangs = $langs;
      $newlang = '';
      if (getDolGlobalInt('MAIN_MULTILANGS') /* && empty($newlang) */ && GETPOST('lang_id', 'aZ09')) {
        $newlang = GETPOST('lang_id', 'aZ09');
      }
      if (getDolGlobalInt('MAIN_MULTILANGS') && empty($newlang)) {
        $newlang = $object->thirdparty->default_lang;
      }
      if (!empty($newlang)) {
        $outputlangs = new Translate("", $conf);
        $outputlangs->setDefaultLang($newlang);
      }
 
      if ($result >= 0) {
        $db->commit();
 
        if (!getDolGlobalString('MAIN_DISABLE_PDF_AUTOUPDATE')) {
          fichinter_create($db, $object, $object->model_pdf, $outputlangs);
        }
        header('Location: '.$_SERVER["PHP_SELF"].'?id='.$object->id);
        exit;
      } else {
        $mesg = $object->error;
        $db->rollback();
      }
    }
  } elseif ($action == 'confirm_addtitleline' && $permissiontoadd) {
    // Handling adding a new title line for subtotals module
 
    $langs->load('subtotals');
 
    $desc = GETPOST('subtotallinedesc', 'alphanohtml');
    $depth = GETPOSTINT('subtotallinelevel') ?? 1;
 
    $subtotal_options = array();
 
    foreach (Fichinter::$TITLE_OPTIONS as $option) {
      $value = GETPOST($option, 'alphanohtml');
      if ($value) {
        $subtotal_options[$option] = $value == 'on' ? 1 : $value;
      }
    }
 
    // Insert line
    $result = $object->addSubtotalLine($langs, $desc, (int) $depth, $subtotal_options);
 
    if ($result >= 0) {
      if ($result == 0) {
        setEventMessages($object->error, $object->errors, 'warnings');
      }
      $ret = $object->fetch($object->id); // Reload to get new records
      $object->fetch_thirdparty();
 
      if (!getDolGlobalString('MAIN_DISABLE_PDF_AUTOUPDATE')) {
        // Define output language
        $outputlangs = $langs;
        $newlang = GETPOST('lang_id', 'alpha');
        if (getDolGlobalInt('MAIN_MULTILANGS') && empty($newlang)) {
          $newlang = $object->thirdparty->default_lang;
        }
        if (!empty($newlang)) {
          $outputlangs = new Translate("", $conf);
          $outputlangs->setDefaultLang($newlang);
        }
 
        $object->generateDocument($object->model_pdf, $outputlangs, $hidedetails, $hidedesc, $hideref);
      }
    } else {
      setEventMessages($object->error, $object->errors, 'errors');
    }
    header('Location: '.$_SERVER["PHP_SELF"].'?id='.$id);
    exit();
  } elseif ($action == 'classifybilled' && $permissiontoadd) {
    // Classify Billed
    $result = $object->setStatut(Fichinter::STATUS_BILLED);
    if ($result > 0) {
      header('Location: '.$_SERVER["PHP_SELF"].'?id='.$object->id);
      exit;
    } else {
      setEventMessages($object->error, $object->errors, 'errors');
    }
  } elseif ($action == 'classifyunbilled' && $permissiontoadd) {
    // Classify unbilled
    $result = $object->setStatut(Fichinter::STATUS_VALIDATED);
    if ($result > 0) {
      header('Location: '.$_SERVER["PHP_SELF"].'?id='.$object->id);
      exit;
    } else {
      $mesg = $object->error;
    }
  } elseif ($action == 'confirm_reopen' && $permissiontoadd) {
    // Reopen
    $result = $object->setStatut(Fichinter::STATUS_VALIDATED);
    if ($result > 0) {
      header('Location: '.$_SERVER["PHP_SELF"].'?id='.$object->id);
      exit;
    } else {
      $mesg = $object->error;
    }
  } elseif ($action == 'updateline' && $permissiontoadd && GETPOST('save', 'alpha')) {
    // Update an intervention line
    $objectline = new FichinterLigne($db);
    if ($objectline->fetch($lineid) <= 0) {
      dol_print_error($db);
      exit;
    }
 
    if ($object->fetch($objectline->fk_fichinter) <= 0) {
      dol_print_error($db);
      exit;
    }
    $object->fetch_thirdparty();
 
    $desc = GETPOST('np_desc', 'restricthtml');
    $date_inter = dol_mktime(GETPOSTINT('dihour'), GETPOSTINT('dimin'), 0, GETPOSTINT('dimonth'), GETPOSTINT('diday'), GETPOSTINT('diyear'));
    $duration = convertTime2Seconds(GETPOSTINT('durationhour'), GETPOSTINT('durationmin'));
 
    $objectline->date = $date_inter;
    $objectline->desc = $desc;
    $objectline->duration = $duration;
 
    // Extrafields
    $extrafields->fetch_name_optionals_label($object->table_element_line);
    $array_options = $extrafields->getOptionalsFromPost($object->table_element_line);
    if (is_array($array_options)) {
      $objectline->array_options = array_merge($objectline->array_options, $array_options);
    }
 
    $result = $objectline->update($user);
    if ($result < 0) {
      // Surface validation errors (e.g. mandatory extrafield left empty) as an
      // event message on the same page instead of breaking with a full Dolibarr
      // error screen that loses the user's edit context.
      setEventMessages($objectline->error, $objectline->errors, 'errors');
    }
 
    // Define output language
    $outputlangs = $langs;
    $newlang = '';
    if (getDolGlobalInt('MAIN_MULTILANGS') /* && empty($newlang) */ && GETPOST('lang_id', 'aZ09')) {
      $newlang = GETPOST('lang_id', 'aZ09');
    }
    if (getDolGlobalInt('MAIN_MULTILANGS') && empty($newlang)) {
      $newlang = $object->thirdparty->default_lang;
    }
    if (!empty($newlang)) {
      $outputlangs = new Translate("", $conf);
      $outputlangs->setDefaultLang($newlang);
    }
    if (!getDolGlobalString('MAIN_DISABLE_PDF_AUTOUPDATE')) {
      fichinter_create($db, $object, $object->model_pdf, $outputlangs);
    }
 
    header('Location: '.$_SERVER["PHP_SELF"].'?id='.$object->id);
    exit;
  } elseif ($action == 'confirm_deleteline' && $confirm == 'yes' && $permissiontoadd) {
    // Delete an intervention line WITH confirmation
    $objectline = new FichinterLigne($db);
    if ($objectline->fetch($lineid) <= 0) {
      dol_print_error($db);
      exit;
    }
    $result = $objectline->deleteLine($user);
 
    if ($object->fetch($objectline->fk_fichinter) <= 0) {
      dol_print_error($db);
      exit;
    }
 
    // Define output language
    $outputlangs = $langs;
    $newlang = '';
    if (getDolGlobalInt('MAIN_MULTILANGS') /* && empty($newlang) */ && GETPOST('lang_id', 'aZ09')) {
      $newlang = GETPOST('lang_id', 'aZ09');
    }
    if (getDolGlobalInt('MAIN_MULTILANGS') && empty($newlang)) {
      $newlang = $object->thirdparty->default_lang;
    }
    if (!empty($newlang)) {
      $outputlangs = new Translate("", $conf);
      $outputlangs->setDefaultLang($newlang);
    }
    if (!getDolGlobalString('MAIN_DISABLE_PDF_AUTOUPDATE')) {
      fichinter_create($db, $object, $object->model_pdf, $outputlangs);
    }
  } elseif ($action == 'up' && $permissiontoadd) {
    // Set position of lines
    $object->line_up($lineid);
 
    // Define output language
    $outputlangs = $langs;
    $newlang = '';
    if (getDolGlobalInt('MAIN_MULTILANGS') /* && empty($newlang) */ && GETPOST('lang_id', 'aZ09')) {
      $newlang = GETPOST('lang_id', 'aZ09');
    }
    if (getDolGlobalInt('MAIN_MULTILANGS') && empty($newlang)) {
      $newlang = $object->thirdparty->default_lang;
    }
    if (!empty($newlang)) {
      $outputlangs = new Translate("", $conf);
      $outputlangs->setDefaultLang($newlang);
    }
    if (!getDolGlobalString('MAIN_DISABLE_PDF_AUTOUPDATE')) {
      fichinter_create($db, $object, $object->model_pdf, $outputlangs);
    }
 
    header('Location: '.$_SERVER["PHP_SELF"].'?id='.$object->id.'#'.$lineid);
    exit;
  } elseif ($action == 'down' && $permissiontoadd) {
    $object->line_down($lineid);
 
    // Define output language
    $outputlangs = $langs;
    $newlang = '';
    if (getDolGlobalInt('MAIN_MULTILANGS') /* && empty($newlang) */ && GETPOST('lang_id', 'aZ09')) {
      $newlang = GETPOST('lang_id', 'aZ09');
    }
    if (getDolGlobalInt('MAIN_MULTILANGS') && empty($newlang)) {
      $newlang = $object->thirdparty->default_lang;
    }
    if (!empty($newlang)) {
      $outputlangs = new Translate("", $conf);
      $outputlangs->setDefaultLang($newlang);
    }
    if (!getDolGlobalString('MAIN_DISABLE_PDF_AUTOUPDATE')) {
      fichinter_create($db, $object, $object->model_pdf, $outputlangs);
    }
 
    header('Location: '.$_SERVER["PHP_SELF"].'?id='.$object->id.'#'.$lineid);
    exit;
  }
 
  // Actions when printing a doc from card
  include DOL_DOCUMENT_ROOT.'/core/actions_printing.inc.php';
 
  // Actions to send emails
  $triggersendname = 'FICHINTER_SENTBYMAIL';
  $autocopy = 'MAIN_MAIL_AUTOCOPY_FICHINTER_TO';
  $trackid = 'int'.$object->id;
  include DOL_DOCUMENT_ROOT.'/core/actions_sendmails.inc.php';
 
  // Actions to build doc
  $upload_dir = $conf->ficheinter->dir_output;
  include DOL_DOCUMENT_ROOT.'/core/actions_builddoc.inc.php';
 
  if ($action == 'update_extras' && $permissiontoeditextra) {
    $object->oldcopy = dol_clone($object, 2);  // @phan-suppress-current-line PhanTypeMismatchProperty
 
    $attribute_name = GETPOST('attribute', 'aZ09');
 
    // Fill array 'array_options' with data from update form
    $ret = $extrafields->setOptionalsFromPost(null, $object, $attribute_name);
    if ($ret < 0) {
      $error++;
    }
 
    if (!$error) {
      // Actions on extra fields
      $result = $object->updateExtraField($attribute_name, 'INTERVENTION_MODIFY');
      if ($result < 0) {
        setEventMessages($object->error, $object->errors, 'errors');
        $error++;
      }
    }
 
    if ($error) {
      $action = 'edit_extras';
    }
  }
 
  if (getDolGlobalString('MAIN_DISABLE_CONTACTS_TAB')) {
    if ($action == 'addcontact' && $permissiontoadd) {
      if ($result > 0 && $id > 0) {
        $contactid = (GETPOSTINT('userid') ? GETPOSTINT('userid') : GETPOSTINT('contactid'));
        $typeid = (GETPOST('typecontact') ? GETPOST('typecontact') : GETPOST('type'));
        $result = $object->add_contact($contactid, $typeid, GETPOST("source", 'aZ09'));
      }
 
      if ($result >= 0) {
        header("Location: ".$_SERVER['PHP_SELF']."?id=".$object->id);
        exit;
      } else {
        if ($object->error == 'DB_ERROR_RECORD_ALREADY_EXISTS') {
          $langs->load("errors");
          $mesg = $langs->trans("ErrorThisContactIsAlreadyDefinedAsThisType");
        } else {
          $mesg = $object->error;
        }
      }
    } elseif ($action == 'swapstatut' && $permissiontoadd) {
      // Toggle the status of a contact
      $result = $object->swapContactStatus(GETPOSTINT('ligne'));
    } elseif ($action == 'deletecontact' && $permissiontoadd) {
      // Delete a contact
      $result = $object->delete_contact(GETPOSTINT('lineid'));
 
      if ($result >= 0) {
        header("Location: ".$_SERVER['PHP_SELF']."?id=".$object->id);
        exit;
      } else {
        dol_print_error($db);
      }
    }
  }
}
 
 
/*
 * View
 */
 
$form = new Form($db);
$formfile = new FormFile($db);
$formcontract = null;
$formproject = null;
if (isModEnabled('contract')) {
  $formcontract = new FormContract($db);
}
if (isModEnabled('project')) {
  $formproject = new FormProjets($db);
}
 
$title = $object->ref . " - " . $langs->trans('Card');
if ($action == 'create') {
  $title = $langs->trans("NewIntervention");
}
$help_url = 'EN:Module_Interventions|FR:Module_Fiches_d\'interventions';
 
llxHeader('', $title, $help_url, '', 0, 0, '', '', '', 'mod-fichinter page-card');
 
// Create new intervention
if ($action == 'create') {
  $soc = new Societe($db);
  if ($socid > 0) {
    $soc->fetch($socid);
  }
 
  print load_fiche_titre($langs->trans("NewIntervention"), '', 'intervention');
 
  if ($error > 0) {
    dol_htmloutput_errors($mesg);
  } else {
    dol_htmloutput_mesg($mesg);
  }
 
  if (GETPOST('origin', 'alphanohtml') && GETPOSTINT('originid')) {
    // Parse element/subelement (ex: project_task)
    $regs = array();
    $element = $subelement = GETPOST('origin', 'alphanohtml');
    if (preg_match('/^([^_]+)_([^_]+)/i', GETPOST('origin', 'alphanohtml'), $regs)) {
      $element = $regs[1];
      $subelement = $regs[2];
    }
 
    if ($element == 'project') {
      $projectid = GETPOSTINT('originid');
    } else {
      // For compatibility
      if ($element == 'order' || $element == 'commande') {
        $element = $subelement = 'commande';
      }
      if ($element == 'propal') {
        $element = 'comm/propal';
        $subelement = 'propal';
      }
      if ($element == 'contract') {
        $element = $subelement = 'contrat';
      }
 
      dol_include_once('/'.$element.'/class/'.$subelement.'.class.php');
 
      $classname = ucfirst($subelement);
      $objectsrc = new $classname($db);
      '@phan-var-force Commande|Propal|Contrat $objectsrc';
      $objectsrc->fetch(GETPOSTINT('originid'));
      if (empty($objectsrc->lines) && method_exists($objectsrc, 'fetch_lines')) {
        $objectsrc->fetch_lines();
        $lines = $objectsrc->lines;
      }
      $objectsrc->fetch_thirdparty();
 
      $projectid = (int) $objectsrc->fk_project;
 
      $soc = $objectsrc->thirdparty;
 
      $note_private = (!empty($objectsrc->note) ? $objectsrc->note : (!empty($objectsrc->note_private) ? $objectsrc->note_private : GETPOST('note_private', 'restricthtml')));
      $note_public = (!empty($objectsrc->note_public) ? $objectsrc->note_public : GETPOST('note_public', 'restricthtml'));
 
      // Replicate extrafields
      $objectsrc->fetch_optionals();
      $object->array_options = $objectsrc->array_options;
 
      // Object source contacts list
      $srccontactslist = $objectsrc->liste_contact(-1, 'external', 1);
    }
  } else {
    $projectid = GETPOSTINT('projectid');
    $note_private = GETPOST("note_private", "alpha");
    $note_public = GETPOST("note_public", "alpha");
  }
 
  if (!$conf->global->FICHEINTER_ADDON) {
    dol_print_error($db, $langs->trans("Error")." ".$langs->trans("Error_FICHEINTER_ADDON_NotDefined"));
    exit;
  }
 
  $object->datec = dol_now();
 
  $obj = getDolGlobalString('FICHEINTER_ADDON');
  $obj = "mod_".$obj;
 
  //$modFicheinter = new $obj;
  //$numpr = $modFicheinter->getNextValue($soc, $object);
 
  print '<form name="fichinter" action="'.$_SERVER['PHP_SELF'].'" method="POST">';
  print '<input type="hidden" name="token" value="'.newToken().'">';
  print '<input type="hidden" name="socid" value='.$soc->id.'>';
  print '<input type="hidden" name="action" value="add">';
  print '<input type="hidden" name="socid" value="'.$soc->id.'">'."\n";
  print '<input type="hidden" name="backtopage" value="'.$backtopage.'">';
 
  print dol_get_fiche_head([]);
 
  print '<table class="border centpercent">';
 
  // Ref
  print '<tr><td class="fieldrequired">'.$langs->trans('Ref').'</td><td>'.$langs->trans("Draft").'</td></tr>';
 
  // Ref customer
  print '<tr class="field_ref_client"><td class="titlefieldcreate">'.$langs->trans('RefCustomer').'</td><td class="valuefieldcreate">';
  print '<input type="text" name="ref_client" value="'.GETPOST('ref_client').'"></td>';
  print '</tr>';
 
  // Thirdparty
  print '<tr>';
  print '<td class="fieldrequired">'.$langs->trans('ThirdParty').'</td>';
  if ($socid > 0) {
    print '<td>';
    print $soc->getNomUrl(1);
    print '<input type="hidden" name="socid" value="'.$soc->id.'">';
    print '</td>';
  } else {
    print '<td>';
    print img_picto('', 'company', 'class="pictofixedwidth"');
    $filter = '(s.status:=:1)';
    print $form->select_company('', 'socid', $filter, 'SelectThirdParty', 1, 0, array(), 0, 'minwidth150 widthcentpercentminusxx maxwidth500');
    print ' <a href="'.dolBuildUrl(DOL_URL_ROOT . '/societe/card.php', ['action' => 'create', 'customer' => 3, 'backtopage' => dolBuildUrl($_SERVER["PHP_SELF"], ['action' => 'create'])]).'"><span class="fa fa-plus-circle valignmiddle paddingleft" title="'.$langs->trans("AddThirdParty").'"></span></a>';
    print '</td>';
  }
  print '</tr>'."\n";
 
  // Description (must be a textarea and not html must be allowed (used in list view)
  print '<tr><td class="tdtop">'.$langs->trans("Description").'</td>';
  print '<td>';
  print '<textarea name="description" class="quatrevingtpercent" rows="'.ROWS_3.'">'.GETPOST('description').'</textarea>';
  print '</td></tr>';
 
  // Project
  if (isModEnabled('project')) {
    $formproject = new FormProjets($db);
 
    $langs->load("project");
 
    print '<tr><td>'.$langs->trans("Project").'</td><td>';
    print img_picto('', 'project', 'class="pictofixedwidth"');
    /* Fix: If a project must be linked to any companies (suppliers or not), project must be not be set as limited to customer but must be not linked to any particular thirdparty
    if ($societe->fournisseur==1)
      $numprojet=select_projects(-1, GETPOST("projectid", 'int'), 'projectid');
    else
      $numprojet=select_projects($societe->id, GETPOST("projectid", 'int'), 'projectid');
    */
    $numprojet = $formproject->select_projects($soc->id, $projectid, 'projectid', 0, 0, 1, 0, 0, 0, 0, '', 0, 0, 'maxwidth500 widthcentpercentminusxx');
    if ($numprojet == 0) {
      print ' &nbsp; <a href="' . dolBuildUrl(DOL_URL_ROOT . '/projet/card.php', ['socid' => $soc->id, 'action' => 'create', 'status' => 1, 'backtopage' => dolBuildUrl($_SERVER["PHP_SELF"], ['action' => 'create', 'socid' => $soc->id])]) . '"><span class="fa fa-plus-circle valignmiddle paddingleft" title="'.$langs->trans("AddProject").'"></span></a>';
    }
    print '</td></tr>';
  }
 
  // Category
  if (isModEnabled('category')) {
    // Categories
    print '<tr><td>'.$langs->trans("Categories").'</td><td colspan="3">';
    print $form->selectCategories(Categorie::TYPE_FICHINTER, 'categories', $object);
    print "</td></tr>";
  }
 
  // Contract
  if (isModEnabled('contract') && is_object($formcontract)) {
    // This feature hang the application on large list of contracts, because the select component is not complete: it does not work like select of thirdparty or product to support large lists
    // So we add a hidden option to avoid to have it used and the application locked, until the select_contract is fixed.
    if (getDolGlobalString("CONTRACT_CAN_USE_THE_BUGGED_SELECT_COMPONENT")) {
      $langs->load("contracts");
      print '<tr><td>'.$langs->trans("Contract").'</td><td>';
      $numcontrat = $formcontract->select_contract($soc->id, GETPOSTINT('contratid'), 'contratid', 0, 1, 1);
      if ($numcontrat == 0) {
        print ' &nbsp; <a href="'.DOL_URL_ROOT.'/contrat/card.php?socid='.$soc->id.'&action=create"><span class="fa fa-plus-circle valignmiddle paddingleft" title="'.$langs->trans("AddContract").'"></span></a>';
      }
      print '</td></tr>';
    }
  }
 
  // Model
  $liste = ModelePDFFicheinter::liste_modeles($db);
  if (count($liste) > 0) {
    print '<tr>';
    print '<td>'.$langs->trans("DefaultModel").'</td>';
    print '<td>';
    print $form->selectarray('model', $liste, getDolGlobalString('FICHEINTER_ADDON_PDF'));
    print "</td></tr>";
  }
 
  // Public note
  print '<tr>';
  print '<td class="tdtop">'.$langs->trans('NotePublic').'</td>';
  print '<td>';
  $doleditor = new DolEditor('note_public', (string) $note_public, '', 80, 'dolibarr_notes', 'In', false, false, !getDolGlobalString('FCKEDITOR_ENABLE_NOTE_PUBLIC') ? 0 : 1, ROWS_3, '90%');
  print $doleditor->Create(1);
  //print '<textarea name="note_public" cols="80" rows="'.ROWS_3.'">'.$note_public.'</textarea>';
  print '</td></tr>';
 
  // Private note
  if (empty($user->socid)) {
    print '<tr>';
    print '<td class="tdtop">'.$langs->trans('NotePrivate').'</td>';
    print '<td>';
    $doleditor = new DolEditor('note_private', (string) $note_private, '', 80, 'dolibarr_notes', 'In', false, false, !getDolGlobalString('FCKEDITOR_ENABLE_NOTE_PRIVATE') ? 0 : 1, ROWS_3, '90%');
    print $doleditor->Create(1);
    //print '<textarea name="note_private" cols="80" rows="'.ROWS_3.'">'.$note_private.'</textarea>';
    print '</td></tr>';
  }
 
  // Other attributes
  $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');
  }
 
  // Show link to origin object
  if (!empty($origin) && !empty($originid) && is_object($objectsrc)) {
    $newclassname = $classname;
    if ($newclassname == 'Propal') {
      $langs->load('propal');
      $newclassname = 'CommercialProposal';
    }
    print '<tr><td>'.$langs->trans($newclassname).'</td><td colspan="2">'.$objectsrc->getNomUrl(1).'</td></tr>';
 
    // Amount
    /* Hide amount because we only copy services so amount may differ than source
    print '<tr><td>' . $langs->trans('AmountHT') . '</td><td>' . price($objectsrc->total_ht) . '</td></tr>';
    print '<tr><td>' . $langs->trans('AmountVAT') . '</td><td>' . price($objectsrc->total_tva) . "</td></tr>";
    if ($mysoc->localtax1_assuj == "1" || $objectsrc->total_localtax1 != 0)     // Localtax1 RE
    {
      print '<tr><td>' . $langs->transcountry("AmountLT1", $mysoc->country_code) . '</td><td>' . price($objectsrc->total_localtax1) . "</td></tr>";
    }
 
    if ($mysoc->localtax2_assuj == "1" || $objectsrc->total_localtax2 != 0)     // Localtax2 IRPF
    {
      print '<tr><td>' . $langs->transcountry("AmountLT2", $mysoc->country_code) . '</td><td>' . price($objectsrc->total_localtax2) . "</td></tr>";
    }
 
    print '<tr><td>' . $langs->trans('AmountTTC') . '</td><td>' . price($objectsrc->total_ttc) . "</td></tr>";
 
    if (isModEnabled("multicurrency"))
    {
      print '<tr><td>' . $langs->trans('MulticurrencyAmountHT') . '</td><td>' . price($objectsrc->multicurrency_total_ht) . '</td></tr>';
      print '<tr><td>' . $langs->trans('MulticurrencyAmountVAT') . '</td><td>' . price($objectsrc->multicurrency_total_tva) . "</td></tr>";
      print '<tr><td>' . $langs->trans('MulticurrencyAmountTTC') . '</td><td>' . price($objectsrc->multicurrency_total_ttc) . "</td></tr>";
    }
    */
  }
 
  print '</table>';
 
  if (is_object($objectsrc)) {
    print '<input type="hidden" name="origin"         value="'.$objectsrc->element.'">';
    print '<input type="hidden" name="originid"       value="'.$objectsrc->id.'">';
  } elseif ($origin == 'project' && !empty($projectid)) {
    print '<input type="hidden" name="projectid" value="'.$projectid.'">';
  }
 
  print dol_get_fiche_end();
 
  print $form->buttonsSaveCancel("CreateDraftIntervention");
 
  // Show origin lines
  if (!empty($origin) && !empty($originid) && is_object($objectsrc) && !getDolGlobalInt('FICHINTER_DISABLE_DETAILS')) {
    $title = $langs->trans('Services');
    print load_fiche_titre($title);
 
    print '<div class="div-table-responsive-no-min">';
    print '<table class="noborder centpercent">';
 
    $objectsrc->printOriginLinesList(!getDolGlobalString('FICHINTER_PRINT_PRODUCTS') ? 'services' : ''); // Show only service, except if option FICHINTER_PRINT_PRODUCTS is on
 
    print '</table>';
    print '</div>';
  }
 
  print '</form>';
} elseif ($id > 0 || !empty($ref)) {
  // View mode
 
  $object->fetch($id, $ref);
  $object->fetch_thirdparty();
 
  $soc = new Societe($db);
  $soc->fetch($object->socid);
 
  if ($error > 0) {
    dol_htmloutput_errors($mesg);
  } else {
    dol_htmloutput_mesg($mesg);
  }
 
  $head = fichinter_prepare_head($object);
 
  print dol_get_fiche_head($head, 'card', $langs->trans("InterventionCard"), -1, $object->picto, 0, '', '', 0, '', 1);
 
  $formconfirm = '';
 
  // Confirm deletion of intervention
  if ($action == 'delete') {
    $formconfirm = $form->formconfirm($_SERVER["PHP_SELF"].'?id='.$object->id, $langs->trans('DeleteIntervention'), $langs->trans('ConfirmDeleteIntervention'), 'confirm_delete', '', 0, 1);
  }
 
  // Confirm validation
  if ($action == 'validate') {
    // Verify if the object's number os temporary
    $ref = substr($object->ref, 1, 4);
    if ($ref == 'PROV') {
      $numref = $object->getNextNumRef($soc);
      if (empty($numref)) {
        $error++;
        setEventMessages($object->error, $object->errors, 'errors');
      }
    } else {
      $numref = (string) $object->ref;
    }
    $text = $langs->trans('ConfirmValidateIntervention', $numref);
    if (isModEnabled('notification')) {
      require_once DOL_DOCUMENT_ROOT.'/core/class/notify.class.php';
      $notify = new Notify($db);
      $text .= '<br>';
      $text .= $notify->confirmMessage('FICHINTER_VALIDATE', $object->socid, $object);
    }
 
    $formconfirm = $form->formconfirm($_SERVER["PHP_SELF"].'?id='.$object->id, $langs->trans('ValidateIntervention'), $text, 'confirm_validate', '', 1, 1);
  }
 
  // Confirm sign
  if ($action == 'sign') {
    $text = $langs->trans('ConfirmSignIntervention');
    if (isModEnabled('notification')) {
      require_once DOL_DOCUMENT_ROOT.'/core/class/notify.class.php';
      $notify = new Notify($db);
      $text .= '<br>';
      $text .= $notify->confirmMessage('FICHINTER_MODIFY', $object->socid, $object);
    }
    $formquestion = [];
    $formquestion[] = [
      'type'    => 'select',
      'name'    => 'signed_status',
      'select_show_empty' => 0,
      'label'   => '<span class="fieldrequired">'.$langs->trans('SignStatus').'</span>',
      'values'  => $object->getSignedStatusLocalisedArray()
    ];
    $formconfirm = $form->formconfirm($_SERVER["PHP_SELF"].'?id='.$object->id, $langs->trans('SignIntervention'), $text, 'confirm_sign', $formquestion, 0, 1);
  }
 
  // Confirm unsign
  if ($action == 'unsign') {
    $text = $langs->trans('ConfirmUnsignIntervention');
    if (isModEnabled('notification')) {
      require_once DOL_DOCUMENT_ROOT.'/core/class/notify.class.php';
      $notify = new Notify($db);
      $text .= '<br>';
      $text .= $notify->confirmMessage('FICHINTER_MODIFY', $object->socid, $object);
    }
    $formconfirm = $form->formconfirm($_SERVER["PHP_SELF"].'?id='.$object->id, $langs->trans('UnsignIntervention'), $text, 'confirm_unsign', '', 0, 1);
  }
 
  // Confirm done
  if ($action == 'classifydone') {
    $text = $langs->trans('ConfirmCloseIntervention');
    if (isModEnabled('notification')) {
      require_once DOL_DOCUMENT_ROOT.'/core/class/notify.class.php';
      $notify = new Notify($db);
      $text .= '<br>';
      $text .= $notify->confirmMessage('FICHINTER_CLOSE', $object->socid, $object);
    }
    $formconfirm = $form->formconfirm($_SERVER["PHP_SELF"].'?id='.$object->id, $langs->trans('CloseIntervention'), $text, 'confirm_done', '', 0, 1);
  }
 
  // Confirm back to draft
  if ($action == 'modify') {
    $formconfirm = $form->formconfirm($_SERVER["PHP_SELF"].'?id='.$object->id, $langs->trans('ModifyIntervention'), $langs->trans('ConfirmModifyIntervention'), 'confirm_modify', '', 0, 1);
  }
 
  // Confirm back to open
  if ($action == 'reopen') {
    $formconfirm = $form->formconfirm($_SERVER["PHP_SELF"].'?id='.$object->id, $langs->trans('ReOpen'), $langs->trans('ConfirmReopenIntervention', $object->ref), 'confirm_reopen', '', 0, 1);
  }
 
  // Confirm deletion of line
  if ($action == 'ask_deleteline') {
    $formconfirm = $form->formconfirm($_SERVER["PHP_SELF"].'?id='.$object->id.'&line_id='.$lineid, $langs->trans('DeleteInterventionLine'), $langs->trans('ConfirmDeleteInterventionLine'), 'confirm_deleteline', '', 0, 1);
  }
 
  // Clone confirmation
  if ($action == 'clone') {
    // Create an array for form
    $formquestion = array(
      // 'text' => $langs->trans("ConfirmClone"),
      // array('type' => 'checkbox', 'name' => 'update_prices', 'label' => $langs->trans("PuttingPricesUpToDate"), 'value' => 1),
      array(
        'type' => 'other',
        'name' => 'socid',
        'label' => $langs->trans("SelectThirdParty"),
        'value' => $form->select_company(GETPOSTINT('socid'), 'socid', '', '', 0, 0, array(), 0, 'minwidth200')
      ),
      array(
        'type' => 'checkbox',
        'name' => 'clone_contacts',
        'label' => $langs->trans("CloneContacts"),
        'value' => 1
      ),
      array(
        'type' => 'checkbox',
        'name' => 'clone_notes',
        'label' => $langs->trans("CloneNotes"),
        'value' => 1
      )
    );
 
    // Paiement incomplet. On demande si motif = escompte ou autre
    $formconfirm = $form->formconfirm($_SERVER["PHP_SELF"].'?id='.$object->id, $langs->trans('ToClone'), $langs->trans('ConfirmCloneIntervention', $object->ref), 'confirm_clone', $formquestion, 'yes', 1);
  }
 
  // Subtotal line form
  if ($action == 'add_title_line') {
    $langs->load('subtotals');
    $type = 'title';
    $depth_array = $object->getPossibleLevels($langs);
    require dol_buildpath('/core/tpl/subtotal_create.tpl.php');
  } elseif ($action == 'add_subtotal_line') {
    $langs->load('subtotals');
    $type = 'subtotal';
    $titles = $object->getPossibleTitles();
    require dol_buildpath('/core/tpl/subtotal_create.tpl.php');
  }
 
  if (!$formconfirm) {
    $parameters = array('formConfirm' => $formconfirm, 'lineid' => $lineid);
    $reshook = $hookmanager->executeHooks('formConfirm', $parameters, $object, $action); // Note that $action and $object may have been modified by hook
    if (empty($reshook)) {
      $formconfirm .= $hookmanager->resPrint;
    } elseif ($reshook > 0) {
      $formconfirm = $hookmanager->resPrint;
    }
  }
 
  // Print form confirm
  print $formconfirm;
 
 
  // Intervention card
  $linkback = '<a href="'.DOL_URL_ROOT.'/fichinter/list.php?restore_lastsearch_values=1'.(!empty($socid) ? '&socid='.$socid : '').'">'.$langs->trans("BackToList").'</a>';
 
 
  $morehtmlref = '<div class="refidno">';
  // Ref customer
  $morehtmlref .= $form->editfieldkey("RefCustomer", 'ref_client', $object->ref_client, $object, $permissiontoadd, 'string', '', 0, 1);
  $morehtmlref .= $form->editfieldval("RefCustomer", 'ref_client', $object->ref_client, $object, $permissiontoadd, 'string', '', null, null, '', 1);
  // Thirdparty
  $morehtmlref .= '<br>'.$object->thirdparty->getNomUrl(1, 'customer');
  // Project
  if (isModEnabled('project')) {
    $langs->load("projects");
    $morehtmlref .= '<br>';
    if ($permissiontoadd) {
      $morehtmlref .= img_picto($langs->trans("Project"), 'project', 'class="pictofixedwidth"');
      if ($action != 'classify') {
        $morehtmlref .= '<a class="editfielda" href="'.dolBuildUrl($_SERVER['PHP_SELF'], ['action' => 'classify', 'id' => $object->id], true).'">'.img_edit($langs->transnoentitiesnoconv('SetProject')).'</a> ';
      }
      $morehtmlref .= $form->form_project($_SERVER['PHP_SELF'].'?id='.$object->id, $object->socid, (string) $object->fk_project, ($action == 'classify' ? 'projectid' : 'none'), 0, 0, 0, 1, '', 'maxwidth300');
    } else {
      if (!empty($object->fk_project)) {
        $proj = new Project($db);
        $proj->fetch($object->fk_project);
        $morehtmlref .= $proj->getNomUrl(1);
        if ($proj->title) {
          $morehtmlref .= '<span class="opacitymedium"> - '.dol_escape_htmltag($proj->title).'</span>';
        }
      }
    }
  }
  $morehtmlref .= '</div>';
 
  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">';
 
  if (getDolGlobalString('FICHINTER_USE_PLANNED_AND_DONE_DATES')) {
    // Date Start
    print '<tr><td class="titlefield">'.$langs->trans("Dateo").'</td>';
    print '<td>';
    print $object->dateo ? dol_print_date($object->dateo, 'daytext') : '&nbsp;';
    print '</td>';
    print '</tr>';
 
    // Date End
    print '<tr><td>'.$langs->trans("Datee").'</td>';
    print '<td>';
    print $object->datee ? dol_print_date($object->datee, 'daytext') : '&nbsp;';
    print '</td>';
    print '</tr>';
 
    // Date Terminate/close
    print '<tr><td>'.$langs->trans("Datet").'</td>';
    print '<td>';
    print $object->datet ? dol_print_date($object->datet, 'daytext') : '&nbsp;';
    print '</td>';
    print '</tr>';
  }
 
  // Description (must be a textarea and not html must be allowed (used in list view)
  print '<tr><td class="titlefield">';
  print $form->editfieldkey("Description", 'description', $object->description, $object, $permissiontoadd, 'textarea');
  print '</td><td>';
  print $form->editfieldval("Description", 'description', $object->description, $object, $permissiontoadd, 'textarea:8');
  print '</td>';
  print '</tr>';
 
  // Categories
  if (isModEnabled('category')) {
    print '<tr><td>';
    print '<table class="nobordernopadding centpercent"><tr><td>';
    print $langs->trans("Categories");
    print '<td><td class="right">';
    if ($permissiontoadd) {
      print '<a class="editfielda" href="'.DOL_URL_ROOT.'/fichinter/card.php?id='.$object->id.'&action=edittags&token='.newToken().'">'.img_edit().'</a>';
    } else {
      print '&nbsp;';
    }
    print '</td></tr></table>';
    print '</td>';
    print '<td>';
    if ($action == 'edittags') {
      print '<form method="POST" action="'.$_SERVER['PHP_SELF'].'?id='.$object->id.'">';
      print '<input type="hidden" name="action" value="settags">';
      print '<input type="hidden" name="token" value="'.newToken().'">';
      print $form->selectCategories(Categorie::TYPE_FICHINTER, 'categories', $object);
      print '<input type="submit" class="button valignmiddle smallpaddingimp" value="'.$langs->trans("Modify").'">';
      print '</form>';
    } else {
      print $form->showCategories($object->id, Categorie::TYPE_FICHINTER, 1);
    }
    print "</td></tr>";
  }
 
  // Contract
  if (isModEnabled('contract')) {
    // This feature hang the application on large list of contracts, because the select component is not complete: it does not work like select of thirdparty or product to support large lists
    // So we add a hidden option to avoid to have it used and the application locked, until the select_contract is fixed.
    if (getDolGlobalString("CONTRACT_CAN_USE_THE_BUGGED_SELECT_COMPONENT")) {
      $langs->load('contracts');
      print '<tr>';
      print '<td>';
 
      print '<table class="nobordernopadding centpercent"><tr><td>';
      print $langs->trans('Contract');
      print '</td>';
      if ($action != 'editcontract') {
        print '<td class="right"><a class="editfielda" href="'.$_SERVER["PHP_SELF"].'?action=editcontract&id='.$object->id.'">';
        print img_edit($langs->trans('SetContract'), 1);
        print '</a></td>';
      }
      print '</tr></table>';
      print '</td><td>';
      if ($action == 'editcontract') {
        $formcontract = new FormContract($db);
        $formcontract->formSelectContract($_SERVER["PHP_SELF"].'?id='.$object->id, $object->socid, $object->fk_contrat, 'contratid', 0, 1, 1);
      } else {
        if ($object->fk_contrat) {
          $contratstatic = new Contrat($db);
          $contratstatic->fetch($object->fk_contrat);
          //print '<a href="'.DOL_URL_ROOT.'/projet/card.php?id='.$selected.'">'.$projet->title.'</a>';
          print $contratstatic->getNomUrl(0, 0, 1);
        } else {
          print "&nbsp;";
        }
      }
      print '</td>';
      print '</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">';
 
  if (!getDolGlobalString('FICHINTER_DISABLE_DETAILS') || getDolGlobalString('FICHINTER_DISABLE_DETAILS') == '2') {
    // Duration in time
    print '<tr><td class="titlefield">'.$langs->trans("TotalDuration").'</td>';
    print '<td>'.convertSecondToTime($object->duration, 'all', $conf->global->MAIN_DURATION_OF_WORKDAY).' ('.convertDurationtoHour($object->duration, "s").' '.$langs->trans("HourShort").')</td>';
    print '</tr>';
  }
 
  print "</table>";
 
  print '</div>';
  print '</div>';
 
  print '<div class="clearboth"></div><br>';
 
 
  if (getDolGlobalString('MAIN_DISABLE_CONTACTS_TAB')) {
    $blocname = 'contacts';
    $title = $langs->trans('ContactsAddresses');
    include DOL_DOCUMENT_ROOT.'/core/tpl/bloc_showhide.tpl.php';
  }
 
  if (getDolGlobalString('MAIN_DISABLE_NOTES_TAB')) {
    $blocname = 'notes';
    $title = $langs->trans('Notes');
    include DOL_DOCUMENT_ROOT.'/core/tpl/bloc_showhide.tpl.php';
  }
 
  // Line of interventions
  if (!getDolGlobalString('FICHINTER_DISABLE_DETAILS') || getDolGlobalString('FICHINTER_DISABLE_DETAILS') == '2') {
    print '<form action="'.$_SERVER["PHP_SELF"].'?id='.$object->id.'" name="addinter" method="post">';
    print '<input type="hidden" name="token" value="'.newToken().'">';
    print '<input type="hidden" name="id" value="'.$object->id.'">';
    if ($action == 'editline') {
      print '<input type="hidden" name="action" value="updateline">';
      print '<input type="hidden" name="line_id" value="'.GETPOSTINT('line_id').'">';
    } else {
      print '<input type="hidden" name="action" value="addline">';
    }
    print '<input type="hidden" name="backtopage" value="'.$backtopage.'">';
 
    // Intervention lines
    $sql = 'SELECT ft.rowid, ft.description, ft.fk_fichinter, ft.duree, ft.rang,';
    $sql .= ' ft.special_code, ft.product_type,';
    $sql .= ' ft.date as date_intervention';
    $sql .= ' FROM '.MAIN_DB_PREFIX.'fichinterdet as ft';
    $sql .= ' WHERE ft.fk_fichinter = '.((int) $object->id);
    if (getDolGlobalString('FICHINTER_HIDE_EMPTY_DURATION')) {
      $sql .= ' AND ft.duree <> 0';
    }
    $sql .= ' ORDER BY ft.rang ASC, ft.date ASC, ft.rowid';
 
    $resql = $db->query($sql);
    if ($resql) {
      $num = $db->num_rows($resql);
      $i = 0;
 
      if ($num) {
        print '<br>';
        print '<table class="noborder centpercent">';
        print '<tr class="liste_titre">';
 
        // No.
        if (getDolGlobalString('MAIN_VIEW_LINE_NUMBER')) {
          print '<td width="5" class="center linecolnum"></td>';
        }
 
        print '<td class="liste_titre">'.$langs->trans('Description').'</td>';
        print '<td class="liste_titre center">'.$langs->trans('Date').'</td>';
        print '<td class="liste_titre right">'.(!getDolGlobalString('FICHINTER_WITHOUT_DURATION') ? $langs->trans('Duration') : '').'</td>';
        print '<td class="liste_titre">&nbsp;</td>';
        print '<td class="liste_titre">&nbsp;</td>';
        print "</tr>\n";
      }
      while ($i < $num) {
        $objp = $db->fetch_object($resql);
 
        // Line in view mode
        if ($action != 'editline' || GETPOSTINT('line_id') != $objp->rowid) {
          print '<tr class="oddeven">';
 
          // No.
          if (getDolGlobalString('MAIN_VIEW_LINE_NUMBER')) {
            print '<td class="center linecolnum">'.($i + 1).'</td>';
          }
          if (!empty($objp->special_code) || $objp->product_type == 9) {
            $line_color = $object->getSubtotalColors($objp->duree);
            $line_options = json_decode($objp->extraparams, true);
            $line_options = is_array($line_options) ? $line_options['subtotal'] : array();
            print '<td colspan="3" ><strong>'.dol_htmlentitiesbr($objp->description).'</strong>';
            if (array_key_exists('titleshowuponpdf', $line_options)) {
              echo '&nbsp;' . img_picto($langs->trans("ShowUPOnPDF"), 'invoicing');
            }
            if (array_key_exists('titleshowtotalexludingvatonpdf', $line_options)) {
              echo '&nbsp; <span title="' . $langs->trans("ShowTotalExludingVATOnPDF") . '">%</span>';
            }
            if (array_key_exists('titleforcepagebreak', $line_options)) {
              echo '&nbsp;' . img_picto($langs->trans("ForcePageBreak"), 'file');
            }
            print "</td>";
          } else {
            print '<td>';
            print '<a name="'.$objp->rowid.'"></a>'; // Anchor to return to the line
            print dol_htmlentitiesbr($objp->description);
 
            $objectline = new FichinterLigne($db);
            $objectline->fetch($objp->rowid);
            $objectline->fetch_optionals();
 
            $extrafields->fetch_name_optionals_label($objectline->table_element);
 
            $temps = $objectline->showOptionals($extrafields, 'view', array(), '', '', '1', 'line');
            if (!empty($temps)) {
              print '<div style="padding-top: 10px" id="extrafield_lines_area_'.$objp->rowid.'" name="extrafield_lines_area_'.$objp->rowid.'">';
              print $temps;
              print '</div>';
            }
 
            print '</td>';
 
            // Date
            print '<td class="center" width="150">'.(!getDolGlobalString('FICHINTER_DATE_WITHOUT_HOUR') ? dol_print_date($db->jdate($objp->date_intervention), 'dayhour') : dol_print_date($db->jdate($objp->date_intervention), 'day')).'</td>';
 
            // Duration
            print '<td class="right" width="150">'.(!getDolGlobalString('FICHINTER_WITHOUT_DURATION') ? convertSecondToTime($objp->duree) : '').'</td>';
 
            print "</td>\n";
          }
          // Icon to edit and delete
          if ($object->status == 0 && $permissiontoadd) {
            print '<td class="center">';
            print '<a class="editfielda marginrightonly" href="'.$_SERVER["PHP_SELF"].'?id='.$object->id.'&action=editline&token='.newToken().'&line_id='.$objp->rowid.'#'.$objp->rowid.'">';
            print img_edit();
            print '</a>';
            print '<a class="marginleftonly" href="'.$_SERVER["PHP_SELF"].'?id='.$object->id.'&action=ask_deleteline&token='.newToken().'&line_id='.$objp->rowid.'">';
            print img_delete();
            print '</a></td>';
            print '<td class="center">';
            if ($num > 1) {
              if ($i > 0) {
                print '<a class="marginleftonly" href="'.$_SERVER["PHP_SELF"].'?id='.$object->id.'&action=up&token='.newToken().'&line_id='.$objp->rowid.'">';
                print img_up();
                print '</a>';
              }
              if ($i < $num - 1) {
                print '<a class="marginleftonly" href="'.$_SERVER["PHP_SELF"].'?id='.$object->id.'&action=down&token='.newToken().'&line_id='.$objp->rowid.'">';
                print img_down();
                print '</a>';
              }
            }
            print '</td>';
          } else {
            print '<td colspan="2">&nbsp;</td>';
          }
 
          print '</tr>';
        }
 
        // Line in update mode
        if ($object->status == 0 && $action == 'editline' && $permissiontoadd && GETPOSTINT('line_id') == $objp->rowid) {
          print '<tr class="oddeven nohover">';
 
          // No.
          if (getDolGlobalString('MAIN_VIEW_LINE_NUMBER')) {
            print '<td class="center linecolnum">'.($i + 1).'</td>';
          }
 
          print '<td>';
          print '<a name="'.$objp->rowid.'"></a>'; // Anchor to return to the line
 
          // Editeur wysiwyg
          require_once DOL_DOCUMENT_ROOT.'/core/class/doleditor.class.php';
          $doleditor = new DolEditor('np_desc', $objp->description, '', 164, 'dolibarr_details', '', false, true, getDolGlobalInt('FCKEDITOR_ENABLE_DETAILS'), ROWS_2, '90%');
          $doleditor->Create();
 
          $objectline = new FichinterLigne($db);
          $objectline->fetch($objp->rowid);
          $objectline->fetch_optionals();
 
          $extrafields->fetch_name_optionals_label($objectline->table_element);
 
          $temps = $objectline->showOptionals($extrafields, 'edit', array(), '', '', '1', 'line');
          if (!empty($temps)) {
            print '<div style="padding-top: 10px" id="extrafield_lines_area_'.$objectline->id.'" name="extrafield_lines_area_'.$objectline->id.'">';
            print $temps;
            print '</div>';
          }
 
          print '</td>';
 
          // Date d'intervention
          print '<td class="center nowrap">';
          if (getDolGlobalString('FICHINTER_DATE_WITHOUT_HOUR')) {
            print $form->selectDate($db->jdate($objp->date_intervention), 'di', 0, 0, 0, "date_intervention");
          } else {
            print $form->selectDate($db->jdate($objp->date_intervention), 'di', 1, 1, 0, "date_intervention");
          }
          print '</td>';
 
          // Duration
          print '<td class="right">';
          if (!getDolGlobalString('FICHINTER_WITHOUT_DURATION')) {
            $selectmode = 'select';
            if (getDolGlobalString('INTERVENTION_ADDLINE_FREEDUREATION')) {
              $selectmode = 'text';
            }
            $form->select_duration('duration', $objp->duree, 0, $selectmode);
          }
          print '</td>';
 
          print '<td class="center" colspan="5" valign="center">';
          print '<input type="submit" class="button buttongen marginbottomonly button-save" name="save" value="'.$langs->trans("Save").'">';
          print '<input type="submit" class="button buttongen marginbottomonly button-cancel" name="cancel" value="'.$langs->trans("Cancel").'"></td>';
          print '</tr>'."\n";
        }
 
        $i++;
      }
 
      $db->free($resql);
 
      // Add new line
      if ($object->status == 0 && $permissiontoadd && $action != 'editline' && (!getDolGlobalString('FICHINTER_DISABLE_DETAILS') || getDolGlobalString('FICHINTER_DISABLE_DETAILS') == '2')) {
        if (!$num) {
          print '<br>';
          print '<table class="noborder centpercent">';
          print '<tr class="liste_titre">';
 
          // No.
          if (getDolGlobalString('MAIN_VIEW_LINE_NUMBER')) {
            print '<td width="5" class="center linecolnum"></td>';
          }
 
          print '<td>';
          print '<a name="add"></a>'; // ancre
          print $langs->trans('Description').'</td>';
          print '<td class="center">'.$langs->trans('Date').'</td>';
          print '<td class="right">'.(!getDolGlobalString('FICHINTER_WITHOUT_DURATION') ? $langs->trans('Duration') : '').'</td>';
          print '<td colspan="3">&nbsp;</td>';
          print "</tr>\n";
        }
 
        print '<tr class="oddeven nohover">'."\n";
 
        // No.
        if (getDolGlobalString('MAIN_VIEW_LINE_NUMBER')) {
          print '<td class="center linecolnum">'.($i + 1).'</td>';
        }
 
        print '<td>';
        // editeur wysiwyg
        if (!getDolGlobalString('FICHINTER_EMPTY_LINE_DESC')) {
          require_once DOL_DOCUMENT_ROOT.'/core/class/doleditor.class.php';
          $doleditor = new DolEditor('np_desc', GETPOST('np_desc', 'restricthtml'), '', 100, 'dolibarr_details', '', false, true, getDolGlobalString('FCKEDITOR_ENABLE_DETAILS'), ROWS_2, '90%');
          $doleditor->Create();
        }
 
        $objectline = new FichinterLigne($db);
        $extrafields->fetch_name_optionals_label($objectline->table_element);
 
        if (is_object($objectline)) {
          $temps = $objectline->showOptionals($extrafields, 'create', array(), '', '', '1', 'line');
 
          if (!empty($temps)) {
            print '<div style="padding-top: 10px" id="extrafield_lines_area_create" name="extrafield_lines_area_create">';
            print $temps;
            print '</div>';
          }
        }
 
        print '</td>';
 
        // Date intervention
        print '<td class="center nowrap">';
        $now = dol_now();
        $timearray = dol_getdate($now);
        if (!GETPOSTINT('diday')) {
          if (getDolGlobalInt('FICHINTER_DATE_WITHOUT_HOUR')) {
            $timewithnohour = dol_mktime(0, 0, 0, $timearray['mon'], $timearray['mday'], $timearray['year']);
          } else {
            $timewithnohour = dol_mktime($timearray['hours'], $timearray['minutes'], 0, $timearray['mon'], $timearray['mday'], $timearray['year']);
          }
        } else {
          $timewithnohour = dol_mktime(GETPOSTINT('dihour'), GETPOSTINT('dimin'), 0, GETPOSTINT('dimonth'), GETPOSTINT('diday'), GETPOSTINT('diyear'));
        }
        if (getDolGlobalInt('FICHINTER_DATE_WITHOUT_HOUR')) {
          print $form->selectDate($timewithnohour, 'di', 0, 0, 0, "addinter");
        } else {
          print $form->selectDate($timewithnohour, 'di', 1, 1, 0, "addinter");
        }
        print '</td>';
 
        // Duration
        print '<td class="right">';
        if (!getDolGlobalString('FICHINTER_WITHOUT_DURATION')) {
          $selectmode = 'select';
          if (getDolGlobalString('INTERVENTION_ADDLINE_FREEDUREATION')) {
            $selectmode = 'text';
          }
          $form->select_duration('duration', (!GETPOSTINT('durationhour') && !GETPOSTINT('durationmin')) ? 3600 : (60 * 60 * GETPOSTINT('durationhour') + 60 * GETPOSTINT('durationmin')), 0, $selectmode);
        }
        print '</td>';
 
        print '<td class="center" valign="middle" colspan="3"><input type="submit" class="button button-add" value="'.$langs->trans('Add').'" name="addline"></td>';
        print '</tr>';
 
        if (!$num) {
          print '</table>';
        }
      }
 
      if ($num) {
        print '</table>';
      }
    } else {
      dol_print_error($db);
    }
 
    print '</form>'."\n";
  }
 
  print dol_get_fiche_end();
 
  print "\n";
 
 
  /*
   * 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)) {
    $params = array();
    if ($user->socid == 0) {
      if ($action != 'editdescription' && ($action != 'presend')) {
        // Subtotal
        if ($object->status == Fichinter::STATUS_DRAFT && isModEnabled('subtotals') && getDolGlobalString('SUBTOTAL_TITLE_'.strtoupper($object->element))) {
          $langs->load('subtotals');
 
          $url_button = array();
          $url_button[] = array(
            'lang' => 'subtotals',
            'enabled' => (isModEnabled('intervention') && $object->status == Fichinter::STATUS_DRAFT),
            'perm' => (bool) $permissiontoadd,
            'label' => $langs->trans('AddTitleLine'),
            'url' => '/fichinter/card.php?id='.$object->id.'&action=add_title_line&token='.newToken()
          );
 
          $url_button[] = array(
            'lang' => 'subtotals',
            'enabled' => (isModEnabled('intervention') && $object->status == Fichinter::STATUS_DRAFT),
            'perm' => (bool) $permissiontoadd,
            'label' => $langs->trans('AddSubtotalLine'),
            'url' => '/fichinter/card.php?id='.$object->id.'&action=add_subtotal_line&token='.newToken()
          );
          print dolGetButtonAction('', $langs->trans('Subtotal'), 'default', $url_button, '', true);
        }
 
        // Validate
        if ($object->status == Fichinter::STATUS_DRAFT && (count($object->lines) > 0 || getDolGlobalString('FICHINTER_DISABLE_DETAILS') == '1')) {
          if ((!getDolGlobalString('MAIN_USE_ADVANCED_PERMS') && $permissiontoadd) || (getDolGlobalString('MAIN_USE_ADVANCED_PERMS') && $user->hasRight('ficheinter', 'ficheinter_advance', 'validate'))) {
            print '<div class="inline-block divButAction"><a class="butAction" href="card.php?id='.$object->id.'&action=validate&token='.newToken().'">'.$langs->trans("Validate").'</a></div>';
          } else {
            print '<div class="inline-block divButActionRefused"><span class="butActionRefused" href="#" title="'.dol_escape_htmltag($langs->trans("NotEnoughPermissions")).'">'.$langs->trans("Validate").'</span></div>';
          }
        }
 
        // Modify
        if ($object->status == Fichinter::STATUS_VALIDATED && ((!getDolGlobalString('MAIN_USE_ADVANCED_PERMS') && $permissiontoadd) || (getDolGlobalString('MAIN_USE_ADVANCED_PERMS') && $user->hasRight('ficheinter', 'ficheinter_advance', 'unvalidate')))) {
          print '<div class="inline-block divButAction"><a class="butAction" href="card.php?id='.$object->id.'&action=modify&token='.newToken().'">';
          if (!getDolGlobalString('FICHINTER_DISABLE_DETAILS') || getDolGlobalString('FICHINTER_DISABLE_DETAILS') == '2') {
            print $langs->trans("Modify");
          } else {
            print $langs->trans("SetToDraft");
          }
          print '</a></div>';
        }
 
        // Reopen
        if ($object->status >= Fichinter::STATUS_CLOSED) {
          if ($permissiontoadd) {
            print '<div class="inline-block divButAction"><a class="butAction" href="'.$_SERVER["PHP_SELF"].'?id='.$object->id.'&action=reopen&token='.newToken().'">'.$langs->trans('ReOpen').'</a></div>';
          } else {
            print '<div class="inline-block divButAction"><a class="butActionRefused classfortooltip" href="#">'.$langs->trans('ReOpen').'</a></div>';
          }
        }
 
        // Send
        if (empty($user->socid)) {
          if ($object->status > Fichinter::STATUS_DRAFT) {
            if (!getDolGlobalString('MAIN_USE_ADVANCED_PERMS') || $user->hasRight('ficheinter', 'ficheinter_advance', 'send')) {
              print dolGetButtonAction('', $langs->trans('SendMail'), 'email', dolBuildUrl($_SERVER["PHP_SELF"], ['id' => $object->id, 'action' => 'presend', 'mode' => 'init'], true).'#formmailbeforetitle', '');
            } else {
              print dolGetButtonAction('', $langs->trans('SendMail'), 'email', '#', '', false);
            }
          }
        }
 
        // Create intervention model
        if ($object->status == Fichinter::STATUS_DRAFT && $permissiontoadd && (count($object->lines) > 0)) {
          print '<div class="inline-block divButAction">';
          print '<a class="butAction" href="'.DOL_URL_ROOT.'/fichinter/card-rec.php?id='.$object->id.'&action=create&backtopage='.urlencode($_SERVER['PHP_SELF'].'?id='.$object->id).'">'.$langs->trans("ChangeIntoRepeatableIntervention").'</a>';
          print '</div>';
        }
 
        $arrayofcreatebutton = array();
        // Proposal
        if (isModEnabled("service") && isModEnabled("propal") && $object->status > Fichinter::STATUS_DRAFT) {
          $langs->load("propal");
          if ($object->status < Fichinter::STATUS_BILLED) {
            $arrayofcreatebutton[] = array(
              'url' => '/comm/propal/card.php?action=create&amp;origin='.$object->element.'&amp;originid='.$object->id.'&amp;socid='.$object->socid,
              'label' => $langs->trans('AddProp'),
              'lang' => 'propal',
              'perm' => $user->hasRight('propal', 'creer'),
              'enabled' => true,
            );
          }
        }
 
        // Invoicing
        if (isModEnabled('invoice') && $object->status > Fichinter::STATUS_DRAFT) {
          $langs->load("bills");
          if ($object->status < Fichinter::STATUS_BILLED) {
            $arrayofcreatebutton[] = array(
              'url' => '/compta/facture/card.php?action=create&amp;origin='.$object->element.'&amp;originid='.$object->id.'&amp;socid='.$object->socid,
              'label' => $langs->trans('AddBill'),
              'lang' => 'bills',
              'perm' => $user->hasRight('facture', 'creer') ? true : false,
              'enabled' => true,
            );
          }
 
          if (getDolGlobalString('FICHINTER_CLASSIFY_BILLED')) {    // Option deprecated. In a future, billed must be managed with a dedicated field to 0 or 1
            if ($object->status != Fichinter::STATUS_BILLED) {
              print '<div class="inline-block divButAction"><a class="butAction" href="'.$_SERVER["PHP_SELF"].'?id='.$object->id.'&action=classifybilled&token='.newToken().'">'.$langs->trans("InterventionClassifyBilled").'</a></div>';
            } else {
              print '<div class="inline-block divButAction"><a class="butAction" href="'.$_SERVER["PHP_SELF"].'?id='.$object->id.'&action=classifyunbilled&token='.newToken().'">'.$langs->trans("InterventionClassifyUnBilled").'</a></div>';
            }
          }
        }
 
        if (count($arrayofcreatebutton)) {
          print dolGetButtonAction('', $langs->trans("Create"), 'default', $arrayofcreatebutton, '', true, $params);
        }
 
        // Sign
        if ($object->status > Fichinter::STATUS_DRAFT) {
          if ($object->signed_status != Fichinter::$SIGNED_STATUSES['STATUS_SIGNED_ALL']) {
            print '<div class="inline-block divButAction"><a class="butAction" href="' . $_SERVER["PHP_SELF"] . '?id=' . $object->id . '&action=sign&token=' . newToken() . '">' . $langs->trans("InterventionSign") . '</a></div>';
          } else {
            print '<div class="inline-block divButAction"><a class="butAction" href="' . $_SERVER["PHP_SELF"] . '?id=' . $object->id . '&action=unsign&token=' . newToken() . '">' . $langs->trans("InterventionUnsign") . '</a></div>';
          }
        }
 
        // Done
        if (!getDolGlobalString('FICHINTER_CLASSIFY_BILLED') && $object->status > Fichinter::STATUS_DRAFT && $object->status < Fichinter::STATUS_CLOSED) {
          print '<div class="inline-block divButAction"><a class="butAction" href="'.$_SERVER["PHP_SELF"].'?id='.$object->id.'&action=classifydone&token='.newToken().'">'.$langs->trans("InterventionClassifyDone").'</a></div>';
        }
 
        // Clone
        if ($permissiontoadd) {
          print '<div class="inline-block divButAction"><a class="butAction butActionClone" href="'.$_SERVER['PHP_SELF'].'?id='.$object->id.'&socid='.$object->socid.'&action=clone&token='.newToken().'&object=ficheinter">'.$langs->trans("ToClone").'</a></div>';
        }
 
        // Delete
        print '<div class="inline-block divButAction">';
        print dolGetButtonAction($langs->trans("Delete"), '', 'delete', $_SERVER["PHP_SELF"].'?id='.$object->id.'&action=delete&token='.newToken(), 'delete', $permissiontodelete);
        print '</div>';
      }
    }
  }
 
  print '</div>';
 
  if ($action != 'presend') {
    print '<div class="fichecenter"><div class="fichehalfleft">';
 
    /*
     * Built documents
     */
    $filename = dol_sanitizeFileName($object->ref);
    $filedir = $conf->ficheinter->dir_output."/".$filename;
    $urlsource = $_SERVER["PHP_SELF"]."?id=".$object->id;
    $genallowed = $user->hasRight('ficheinter', 'lire');
    $delallowed = $permissiontoadd;
    print $formfile->showdocuments('ficheinter', $filename, $filedir, $urlsource, $genallowed, $delallowed, $object->model_pdf, 1, 0, 0, 28, 0, '', '', '', $soc->default_lang);
 
    // Show links to link elements
    $tmparray = $form->showLinkToObjectBlock($object, array(), array('fichinter'), 1);
    $linktoelem = $tmparray['linktoelem'];
    $htmltoenteralink = $tmparray['htmltoenteralink'];
    print $htmltoenteralink;
 
    $somethingshown = $form->showLinkedObjectBlock($object, $linktoelem);
 
    // Show direct download link
    if ($object->status != Fichinter::STATUS_DRAFT && getDolGlobalString('FICHINTER_ALLOW_EXTERNAL_DOWNLOAD')) {
      print '<br><!-- Link to download main doc -->'."\n";
      print showDirectDownloadLink($object).'<br>';
    }
 
    // Show online signature link
    if ($object->status != Fichinter::STATUS_DRAFT && getDolGlobalString('FICHINTER_ALLOW_ONLINE_SIGN')) {
      print '<br><!-- Link to sign -->';
      require_once DOL_DOCUMENT_ROOT.'/core/lib/signature.lib.php';
 
      print showOnlineSignatureUrl('fichinter', $object->ref, $object).'<br>';
    }
 
    print '</div><div class="fichehalfright">';
 
    $MAXEVENT = 10;
 
    $morehtmlcenter = dolGetButtonTitle($langs->trans('SeeAll'), '', 'fa fa-bars imgforviewmode', DOL_URL_ROOT.'/fichinter/agenda.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, 'fichinter', $socid, 1, '', $MAXEVENT, '', $morehtmlcenter); // Show all action for thirdparty
 
    print '</div></div>';
  }
 
 
  // Select mail models is same action as presend
  if (GETPOST('modelselected')) {
    $action = 'presend';
  }
 
  // Presend form
  $modelmail = 'fichinter_send';
  $defaulttopic = 'SendInterventionRef';
  $diroutput = $conf->ficheinter->dir_output;
  $trackid = 'int'.$object->id;
 
  include DOL_DOCUMENT_ROOT.'/core/tpl/card_presend.tpl.php';
}
 
 
llxFooter();
 
$db->close();