card.php

Go to the documentation of this file.

<?php
/* Copyright (C) 2003-2004  Rodolphe Quiedeville  <rodolphe@quiedeville.org>
 * Copyright (C) 2004-2019  Laurent Destailleur   <eldy@users.sourceforge.net>
 * Copyright (C) 2005-2014  Regis Houssin     <regis.houssin@inodbox.com>
 * Copyright (C) 2006       Andre Cianfarani    <acianfa@free.fr>
 * Copyright (C) 2010-2017  Juanjo Menent     <jmenent@2byte.es>
 * Copyright (C) 2013       Christophe Battarel     <christophe.battarel@altairis.fr>
 * Copyright (C) 2013-2014  Florian Henry       <florian.henry@open-concept.pro>
 * Copyright (C) 2014-2020  Ferran Marcet       <fmarcet@2byte.es>
 * Copyright (C) 2014-2016  Marcos García           <marcosgdf@gmail.com>
 * Copyright (C) 2015       Jean-François Ferry     <jfefe@aternatik.fr>
 * Copyright (C) 2018-2020  Frédéric France         <frederic.france@netlogic.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/>.
 */

require "../main.inc.php";
require_once DOL_DOCUMENT_ROOT.'/core/lib/date.lib.php';
require_once DOL_DOCUMENT_ROOT.'/core/lib/price.lib.php';
require_once DOL_DOCUMENT_ROOT.'/core/lib/contract.lib.php';
require_once DOL_DOCUMENT_ROOT.'/contrat/class/contrat.class.php';
require_once DOL_DOCUMENT_ROOT.'/core/modules/contract/modules_contract.php';
require_once DOL_DOCUMENT_ROOT.'/core/class/doleditor.class.php';
require_once DOL_DOCUMENT_ROOT.'/core/class/html.formfile.class.php';
require_once DOL_DOCUMENT_ROOT.'/product/class/product.class.php';
if (!empty($conf->propal->enabled))  require_once DOL_DOCUMENT_ROOT.'/comm/propal/class/propal.class.php';
if (!empty($conf->projet->enabled)) {
  require_once DOL_DOCUMENT_ROOT.'/projet/class/project.class.php';
  require_once DOL_DOCUMENT_ROOT.'/core/class/html.formprojet.class.php';
}
require_once DOL_DOCUMENT_ROOT.'/core/class/extrafields.class.php';

// Load translation files required by the page
$langs->loadLangs(array("contracts", "orders", "companies", "bills", "products", 'compta'));

$action = GETPOST('action', 'aZ09');
$confirm = GETPOST('confirm', 'alpha');
$socid = GETPOST('socid', 'int');
$id = GETPOST('id', 'int');
$ref = GETPOST('ref', 'alpha');
$origin = GETPOST('origin', 'alpha');
$originid = GETPOST('originid', 'int');

$datecontrat = '';
$usehm = (!empty($conf->global->MAIN_USE_HOURMIN_IN_DATE_RANGE) ? $conf->global->MAIN_USE_HOURMIN_IN_DATE_RANGE : 0);

// Security check
if ($user->socid) $socid = $user->socid;
$result = restrictedArea($user, 'contrat', $id);

// Initialize technical object to manage hooks of page. Note that conf->hooks_modules contains array of hook context
$hookmanager->initHooks(array('contractcard', 'globalcard'));

$object = new Contrat($db);
$extrafields = new ExtraFields($db);

// Load object
if ($id > 0 || !empty($ref) && $action != 'add') {
  $ret = $object->fetch($id, $ref);
  if ($ret > 0)
    $ret = $object->fetch_thirdparty();
  if ($ret < 0)
    dol_print_error('', $object->error);
}

// fetch optionals attributes and labels
$extrafields->fetch_name_optionals_label($object->table_element);

// fetch optionals attributes lines and labels
$extralabelslines = $extrafields->fetch_name_optionals_label($object->table_element_line);

$permissionnote = $user->rights->contrat->creer; // Used by the include of actions_setnotes.inc.php
$permissiondellink = $user->rights->contrat->creer; // Used by the include of actions_dellink.inc.php

$error = 0;


/*
 * 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))
{
  include DOL_DOCUMENT_ROOT.'/core/actions_setnotes.inc.php'; // Must be include, not includ_once

  include DOL_DOCUMENT_ROOT.'/core/actions_dellink.inc.php'; // Must be include, not include_once

  if ($action == 'confirm_active' && $confirm == 'yes' && $user->rights->contrat->activer)
  {
    $result = $object->active_line($user, GETPOST('ligne'), GETPOST('date'), GETPOST('dateend'), GETPOST('comment'));

    if ($result > 0)
    {
      header("Location: ".$_SERVER['PHP_SELF']."?id=".$object->id);
      exit;
    } else {
      setEventMessages($object->error, $object->errors, 'errors');
    }
  } elseif ($action == 'confirm_closeline' && $confirm == 'yes' && $user->rights->contrat->activer)
  {
    if (!GETPOST('dateend'))
    {
      $error++;
      setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("DateEnd")), null, 'errors');
    }
    if (!$error)
    {
      $result = $object->close_line($user, GETPOST('ligne'), GETPOST('dateend'), urldecode(GETPOST('comment')));
      if ($result > 0)
      {
        header("Location: ".$_SERVER['PHP_SELF']."?id=".$object->id);
        exit;
      } else {
        setEventMessages($object->error, $object->errors, 'errors');
      }
    }
  }

  // Si ajout champ produit predefini
  if (GETPOST('mode') == 'predefined')
  {
    $date_start = '';
    $date_end = '';
    if (GETPOST('date_startmonth') && GETPOST('date_startday') && GETPOST('date_startyear'))
    {
      $date_start = dol_mktime(GETPOST('date_starthour'), GETPOST('date_startmin'), 0, GETPOST('date_startmonth'), GETPOST('date_startday'), GETPOST('date_startyear'));
    }
    if (GETPOST('date_endmonth') && GETPOST('date_endday') && GETPOST('date_endyear'))
    {
      $date_end = dol_mktime(GETPOST('date_endhour'), GETPOST('date_endmin'), 0, GETPOST('date_endmonth'), GETPOST('date_endday'), GETPOST('date_endyear'));
    }
  }

  // Param dates
  $date_start_update = '';
  $date_end_update = '';
  $date_start_real_update = '';
  $date_end_real_update = '';
  if (GETPOST('date_start_updatemonth') && GETPOST('date_start_updateday') && GETPOST('date_start_updateyear'))
  {
    $date_start_update = dol_mktime(GETPOST('date_start_updatehour'), GETPOST('date_start_updatemin'), 0, GETPOST('date_start_updatemonth'), GETPOST('date_start_updateday'), GETPOST('date_start_updateyear'));
  }
  if (GETPOST('date_end_updatemonth') && GETPOST('date_end_updateday') && GETPOST('date_end_updateyear'))
  {
    $date_end_update = dol_mktime(GETPOST('date_end_updatehour'), GETPOST('date_end_updatemin'), 0, GETPOST('date_end_updatemonth'), GETPOST('date_end_updateday'), GETPOST('date_end_updateyear'));
  }
  if (GETPOST('date_start_real_updatemonth') && GETPOST('date_start_real_updateday') && GETPOST('date_start_real_updateyear'))
  {
    $date_start_real_update = dol_mktime(GETPOST('date_start_real_updatehour'), GETPOST('date_start_real_updatemin'), 0, GETPOST('date_start_real_updatemonth'), GETPOST('date_start_real_updateday'), GETPOST('date_start_real_updateyear'));
  }
  if (GETPOST('date_end_real_updatemonth') && GETPOST('date_end_real_updateday') && GETPOST('date_end_real_updateyear'))
  {
    $date_end_real_update = dol_mktime(GETPOST('date_end_real_updatehour'), GETPOST('date_end_real_updatemin'), 0, GETPOST('date_end_real_updatemonth'), GETPOST('date_end_real_updateday'), GETPOST('date_end_real_updateyear'));
  }
  if (GETPOST('remonth') && GETPOST('reday') && GETPOST('reyear'))
  {
    $datecontrat = dol_mktime(GETPOST('rehour'), GETPOST('remin'), 0, GETPOST('remonth'), GETPOST('reday'), GETPOST('reyear'));
  }

  // Add contract
  if ($action == 'add' && $user->rights->contrat->creer)
  {
    // Check
    if (empty($datecontrat))
    {
      $error++;
      setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("Date")), null, 'errors');
      $action = 'create';
    }

    if ($socid < 1)
    {
      setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("ThirdParty")), null, 'errors');
      $action = 'create';
      $error++;
    }

    // Fill array 'array_options' with data from add form
    $ret = $extrafields->setOptionalsFromPost(null, $object);
    if ($ret < 0) {
      $error++;
      $action = 'create';
    }

    if (!$error)
    {
      $object->socid = $socid;
      $object->date_contrat = $datecontrat;

      $object->commercial_suivi_id = GETPOST('commercial_suivi_id', 'int');
      $object->commercial_signature_id = GETPOST('commercial_signature_id', 'int');

      $object->note_private = GETPOST('note_private', 'alpha');
      $object->note_public        = GETPOST('note_public', 'alpha');
      $object->fk_project         = GETPOST('projectid', 'int');
      $object->remise_percent = GETPOST('remise_percent', 'alpha');
      $object->ref = GETPOST('ref', 'alpha');
      $object->ref_customer       = GETPOST('ref_customer', 'alpha');
      $object->ref_supplier       = GETPOST('ref_supplier', 'alpha');

      // If creation from another object of another module (Example: origin=propal, originid=1)
      if (!empty($origin) && !empty($originid))
      {
        // Parse element/subelement (ex: project_task)
        $element = $subelement = $origin;
        if (preg_match('/^([^_]+)_([^_]+)/i', $origin, $regs))
        {
          $element = $regs[1];
          $subelement = $regs[2];
        }

        // For compatibility
        if ($element == 'order') { $element = $subelement = 'commande'; }
        if ($element == 'propal') { $element = 'comm/propal'; $subelement = 'propal'; }

        $object->origin    = $origin;
        $object->origin_id = $originid;

        // Possibility to add external linked objects with hooks
        $object->linked_objects[$object->origin] = $object->origin_id;
        if (is_array($_POST['other_linked_objects']) && !empty($_POST['other_linked_objects']))
        {
          $object->linked_objects = array_merge($object->linked_objects, $_POST['other_linked_objects']);
        }

        $id = $object->create($user);
        if ($id < 0) {
          setEventMessages($object->error, $object->errors, 'errors');
        }

        if ($id > 0)
        {
          dol_include_once('/'.$element.'/class/'.$subelement.'.class.php');

          $classname = ucfirst($subelement);
          $srcobject = new $classname($db);

          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;
            }

            $fk_parent_line = 0;
            $num = count($lines);

            for ($i = 0; $i < $num; $i++)
            {
              $product_type = ($lines[$i]->product_type ? $lines[$i]->product_type : 0);

              if ($product_type == 1 || (!empty($conf->global->CONTRACT_SUPPORT_PRODUCTS) && in_array($product_type, array(0, 1)))) {   // TODO Exclude also deee
                // service prédéfini
                if ($lines[$i]->fk_product > 0)
                {
                  $product_static = new Product($db);

                  // Define output language
                  if (!empty($conf->global->MAIN_MULTILANGS) && !empty($conf->global->PRODUIT_TEXTS_IN_THIRDPARTY_LANGUAGE))
                  {
                    $prod = new Product($db);
                    $prod->id = $lines[$i]->fk_product;
                    $prod->getMultiLangs();

                    $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 {
                    $label = $lines[$i]->product_label;
                  }
                  $desc = ($lines[$i]->desc && $lines[$i]->desc != $lines[$i]->libelle) ?dol_htmlentitiesbr($lines[$i]->desc) : '';
                } else {
                  $desc = dol_htmlentitiesbr($lines[$i]->desc);
                }

                // Extrafields
                $array_options = array();
                // For avoid conflicts if trigger used
                if (method_exists($lines[$i], 'fetch_optionals')) {
                  $lines[$i]->fetch_optionals();
                  $array_options = $lines[$i]->array_options;
                }

                $txtva = $lines[$i]->vat_src_code ? $lines[$i]->tva_tx.' ('.$lines[$i]->vat_src_code.')' : $lines[$i]->tva_tx;

                // View third's localtaxes for now
                $localtax1_tx = get_localtax($txtva, 1, $object->thirdparty);
                $localtax2_tx = get_localtax($txtva, 2, $object->thirdparty);

                $result = $object->addline(
                  $desc,
                  $lines[$i]->subprice,
                  $lines[$i]->qty,
                  $txtva,
                  $localtax1_tx,
                  $localtax2_tx,
                  $lines[$i]->fk_product,
                  $lines[$i]->remise_percent,
                  $lines[$i]->date_start,
                  $lines[$i]->date_end,
                  'HT',
                  0,
                  $lines[$i]->info_bits,
                  $lines[$i]->fk_fournprice,
                  $lines[$i]->pa_ht,
                  $array_options,
                  $lines[$i]->fk_unit
                );

                if ($result < 0)
                {
                  $error++;
                  break;
                }
              }
            }
          } else {
            setEventMessages($srcobject->error, $srcobject->errors, 'errors');
            $error++;
          }

          // Hooks
          $parameters = array('objFrom' => $srcobject);
          $reshook = $hookmanager->executeHooks('createFrom', $parameters, $object, $action); // Note that $action and $object may have been
          // modified by hook
          if ($reshook < 0)
            $error++;
        } else {
          setEventMessages($object->error, $object->errors, 'errors');
          $error++;
        }
      } else {
        $result = $object->create($user);
        if ($result > 0)
        {
          header("Location: ".$_SERVER['PHP_SELF']."?id=".$object->id);
          exit;
        } else {
          setEventMessages($object->error, $object->errors, 'errors');
        }
        $action = 'create';
      }
    }
  } elseif ($action == 'classin' && $user->rights->contrat->creer) {
    $object->setProject(GETPOST('projectid'));
  }

  // Add a new line
  elseif ($action == 'addline' && $user->rights->contrat->creer)
  {
    // Set if we used free entry or predefined product
    $predef = '';
    $product_desc = (GETPOSTISSET('dp_desc') ? GETPOST('dp_desc', 'restricthtml') : '');
    $price_ht = price2num(GETPOST('price_ht'), 'MU', 2);
    $price_ht_devise = price2num(GETPOST('multicurrency_price_ht'), 'CU', 2);
    if (GETPOST('prod_entry_mode', 'alpha') == 'free')
    {
      $idprod = 0;
      $tva_tx = (GETPOST('tva_tx', 'alpha') ? GETPOST('tva_tx', 'alpha') : 0);
    } else {
      $idprod = GETPOST('idprod', 'int');
      $tva_tx = '';
    }

    $qty = price2num(GETPOST('qty'.$predef, 'alpha'), 'MS');
    $remise_percent = ((GETPOST('remise_percent'.$predef) != '') ? GETPOST('remise_percent'.$predef) : 0);

    if ($qty == '')
    {
      setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("Qty")), null, 'errors');
      $error++;
    }
    if (GETPOST('prod_entry_mode', 'alpha') == 'free' && empty($idprod) && empty($product_desc))
    {
      setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("Description")), null, 'errors');
      $error++;
    }

    $date_start = dol_mktime(GETPOST('date_start'.$predef.'hour'), GETPOST('date_start'.$predef.'min'), GETPOST('date_start'.$predef.'sec'), GETPOST('date_start'.$predef.'month'), GETPOST('date_start'.$predef.'day'), GETPOST('date_start'.$predef.'year'));
    $date_end = dol_mktime(GETPOST('date_end'.$predef.'hour'), GETPOST('date_end'.$predef.'min'), GETPOST('date_end'.$predef.'sec'), GETPOST('date_end'.$predef.'month'), GETPOST('date_end'.$predef.'day'), GETPOST('date_end'.$predef.'year'));
    if (!empty($date_start) && !empty($date_end) && $date_start > $date_end)
    {
      setEventMessages($langs->trans("Error").': '.$langs->trans("DateStartPlanned").' > '.$langs->trans("DateEndPlanned"), null, 'errors');
      $error++;
    }

    // Extrafields
    $extralabelsline = $extrafields->fetch_name_optionals_label($object->table_element_line);
    $array_options = $extrafields->getOptionalsFromPost($object->table_element_line, $predef);
    // Unset extrafield
    if (is_array($extralabelsline)) {
      // Get extra fields
      foreach ($extralabelsline as $key => $value) {
        unset($_POST["options_".$key]);
      }
    }

    if (!$error)
    {
      // Clean parameters
      $date_start = dol_mktime(GETPOST('date_start'.$predef.'hour'), GETPOST('date_start'.$predef.'min'), GETPOST('date_start'.$predef.'sec'), GETPOST('date_start'.$predef.'month'), GETPOST('date_start'.$predef.'day'), GETPOST('date_start'.$predef.'year'));
      $date_end = dol_mktime(GETPOST('date_end'.$predef.'hour'), GETPOST('date_end'.$predef.'min'), GETPOST('date_end'.$predef.'sec'), GETPOST('date_end'.$predef.'month'), GETPOST('date_end'.$predef.'day'), GETPOST('date_end'.$predef.'year'));
      $price_base_type = (GETPOST('price_base_type', 'alpha') ?GETPOST('price_base_type', 'alpha') : 'HT');

      // Ecrase $pu par celui du produit
      // Ecrase $desc par celui du produit
      // Ecrase $tva_tx par celui du produit
      // Ecrase $base_price_type par celui du produit
      if ($idprod > 0)
      {
        $prod = new Product($db);
        $prod->fetch($idprod);

        // Update if prices fields are defined
        $tva_tx = get_default_tva($mysoc, $object->thirdparty, $prod->id);
        $tva_npr = get_default_npr($mysoc, $object->thirdparty, $prod->id);
        if (empty($tva_tx)) $tva_npr = 0;

        $pu_ht = $prod->price;
        $pu_ttc = $prod->price_ttc;
        $price_min = $prod->price_min;
        $price_base_type = $prod->price_base_type;

        // On defini prix unitaire
        if ($conf->global->PRODUIT_MULTIPRICES && $object->thirdparty->price_level)
        {
          $pu_ht = $prod->multiprices[$object->thirdparty->price_level];
          $pu_ttc = $prod->multiprices_ttc[$object->thirdparty->price_level];
          $price_min = $prod->multiprices_min[$object->thirdparty->price_level];
          $price_base_type = $prod->multiprices_base_type[$object->thirdparty->price_level];
        } elseif (!empty($conf->global->PRODUIT_CUSTOMER_PRICES))
        {
          require_once DOL_DOCUMENT_ROOT.'/product/class/productcustomerprice.class.php';

          $prodcustprice = new Productcustomerprice($db);

          $filter = array('t.fk_product' => $prod->id, 't.fk_soc' => $object->thirdparty->id);

          $result = $prodcustprice->fetch_all('', '', 0, 0, $filter);
          if ($result) {
            if (count($prodcustprice->lines) > 0) {
              $pu_ht = price($prodcustprice->lines [0]->price);
              $pu_ttc = price($prodcustprice->lines [0]->price_ttc);
              $price_base_type = $prodcustprice->lines [0]->price_base_type;
              $tva_tx = $prodcustprice->lines [0]->tva_tx;
              if ($prodcustprice->lines[0]->default_vat_code && !preg_match('/\(.*\)/', $tva_tx)) $tva_tx .= ' ('.$prodcustprice->lines[0]->default_vat_code.')';
              $tva_npr = $prodcustprice->lines[0]->recuperableonly;
              if (empty($tva_tx)) $tva_npr = 0;
            }
          }
        }

        $tmpvat = price2num(preg_replace('/\s*\(.*\)/', '', $tva_tx));
        $tmpprodvat = price2num(preg_replace('/\s*\(.*\)/', '', $prod->tva_tx));

        // On reevalue prix selon taux tva car taux tva transaction peut etre different
        // de ceux du produit par defaut (par exemple si pays different entre vendeur et acheteur).
        if ($tmpvat != $tmpprodvat)
        {
          if ($price_base_type != 'HT')
          {
            $pu_ht = price2num($pu_ttc / (1 + ($tmpvat / 100)), 'MU');
          } else {
            $pu_ttc = price2num($pu_ht * (1 + ($tmpvat / 100)), 'MU');
          }
        }

          $desc = $prod->description;
          if (!empty($product_desc) && !empty($conf->global->MAIN_NO_CONCAT_DESCRIPTION)) $desc = $product_desc;
        else $desc = dol_concatdesc($desc, $product_desc, '', !empty($conf->global->MAIN_CHANGE_ORDER_CONCAT_DESCRIPTION));

        $fk_unit = $prod->fk_unit;
      } else {
        $pu_ht = GETPOST('price_ht');
        $price_base_type = 'HT';
        $tva_tx = GETPOST('tva_tx') ?str_replace('*', '', GETPOST('tva_tx')) : 0; // tva_tx field may be disabled, so we use vat rate 0
        $tva_npr = preg_match('/\*/', GETPOST('tva_tx')) ? 1 : 0;
        $desc = $product_desc;
        $fk_unit = GETPOST('units', 'alpha');
      }

      $localtax1_tx = get_localtax($tva_tx, 1, $object->thirdparty, $mysoc, $tva_npr);
      $localtax2_tx = get_localtax($tva_tx, 2, $object->thirdparty, $mysoc, $tva_npr);

      // ajout prix achat
      $fk_fournprice = $_POST['fournprice'];
      if (!empty($_POST['buying_price']))
        $pa_ht = $_POST['buying_price'];
      else $pa_ht = null;

      $info_bits = 0;
      if ($tva_npr) $info_bits |= 0x01;

      if (((!empty($conf->global->MAIN_USE_ADVANCED_PERMS) && empty($user->rights->produit->ignore_price_min_advance))
        || empty($conf->global->MAIN_USE_ADVANCED_PERMS)) && ($price_min && (price2num($pu_ht) * (1 - price2num($remise_percent) / 100) < price2num($price_min))))
      {
        $object->error = $langs->trans("CantBeLessThanMinPrice", price(price2num($price_min, 'MU'), 0, $langs, 0, 0, -1, $conf->currency));
        $result = -1;
      } else {
        // Insert line
        $result = $object->addline(
          $desc,
          $pu_ht,
          $qty,
          $tva_tx,
          $localtax1_tx,
          $localtax2_tx,
          $idprod,
          $remise_percent,
          $date_start,
          $date_end,
          $price_base_type,
          $pu_ttc,
          $info_bits,
            $fk_fournprice,
            $pa_ht,
          $array_options,
          $fk_unit
        );
      }

      if ($result > 0)
      {
        // Define output language
        if (empty($conf->global->MAIN_DISABLE_PDF_AUTOUPDATE) && !empty($conf->global->CONTRACT_ADDON_PDF))    // No generation if default type not defined
        {
          $outputlangs = $langs;
          $newlang = '';
          if ($conf->global->MAIN_MULTILANGS && empty($newlang) && GETPOST('lang_id', 'aZ09')) $newlang = GETPOST('lang_id', 'aZ09');
          if ($conf->global->MAIN_MULTILANGS && empty($newlang))  $newlang = $object->thirdparty->default_lang;
          if (!empty($newlang)) {
            $outputlangs = new Translate("", $conf);
            $outputlangs->setDefaultLang($newlang);
          }

          $ret = $object->fetch($id); // Reload to get new records

          $object->generateDocument($object->model_pdf, $outputlangs, $hidedetails, $hidedesc, $hideref);
        }

        unset($_POST['prod_entry_mode']);

        unset($_POST['qty']);
        unset($_POST['type']);
        unset($_POST['remise_percent']);
        unset($_POST['price_ht']);
        unset($_POST['multicurrency_price_ht']);
        unset($_POST['price_ttc']);
        unset($_POST['tva_tx']);
        unset($_POST['product_ref']);
        unset($_POST['product_label']);
        unset($_POST['product_desc']);
        unset($_POST['fournprice']);
        unset($_POST['buying_price']);
        unset($_POST['np_marginRate']);
        unset($_POST['np_markRate']);
        unset($_POST['dp_desc']);
        unset($_POST['idprod']);

        unset($_POST['date_starthour']);
        unset($_POST['date_startmin']);
        unset($_POST['date_startsec']);
        unset($_POST['date_startday']);
        unset($_POST['date_startmonth']);
        unset($_POST['date_startyear']);
        unset($_POST['date_endhour']);
        unset($_POST['date_endmin']);
        unset($_POST['date_endsec']);
        unset($_POST['date_endday']);
        unset($_POST['date_endmonth']);
        unset($_POST['date_endyear']);
      } else {
        setEventMessages($object->error, $object->errors, 'errors');
      }
    }
  } elseif ($action == 'updateline' && $user->rights->contrat->creer && !GETPOST('cancel', 'alpha')) {
    $error = 0;

    if (!empty($date_start_update) && !empty($date_end_update) && $date_start_update > $date_end_update)
    {
      setEventMessages($langs->trans("Error").': '.$langs->trans("DateStartPlanned").' > '.$langs->trans("DateEndPlanned"), null, 'errors');
      $action = 'editline';
      $_GET['rowid'] = GETPOST('elrowid');
      $error++;
    }

    if (!$error)
    {
      $objectline = new ContratLigne($db);
      if ($objectline->fetch(GETPOST('elrowid', 'int')) < 0)
      {
        setEventMessages($objectline->error, $objectline->errors, 'errors');
        $error++;
      }
      $objectline->fetch_optionals();
    }

    $db->begin();

    if (!$error)
    {
      if ($date_start_real_update == '') $date_start_real_update = $objectline->date_ouverture;
      if ($date_end_real_update == '')   $date_end_real_update = $objectline->date_cloture;

      $vat_rate = GETPOST('eltva_tx');
      // Define info_bits
      $info_bits = 0;
      if (preg_match('/\*/', $vat_rate)) {
          $info_bits |= 0x01;
      }

      // Define vat_rate
      $vat_rate = str_replace('*', '', $vat_rate);
      $localtax1_tx = get_localtax($vat_rate, 1, $object->thirdparty, $mysoc);
      $localtax2_tx = get_localtax($vat_rate, 2, $object->thirdparty, $mysoc);

      $txtva = $vat_rate;

      // Clean vat code
      $reg = array();
      $vat_src_code = '';
      if (preg_match('/\((.*)\)/', $txtva, $reg))
      {
          $vat_src_code = $reg[1];
          $txtva = preg_replace('/\s*\(.*\)/', '', $txtva); // Remove code into vatrate.
      }

      // ajout prix d'achat
      $fk_fournprice = GETPOST('fournprice');
      if (GETPOST('buying_price')) {
        $pa_ht = price2num(GETPOST('buying_price'), '', 2);
      } else {
        $pa_ht = null;
      }

      $fk_unit = GETPOST('unit', 'alpha');

      $objectline->fk_product = GETPOST('idprod', 'int');
      $objectline->description = GETPOST('product_desc', 'restricthtml');
      $objectline->price_ht = GETPOST('elprice');
      $objectline->subprice = GETPOST('elprice');
      $objectline->qty = GETPOST('elqty');
      $objectline->remise_percent = GETPOST('elremise_percent');
      $objectline->tva_tx = ($txtva ? $txtva : 0); // Field may be disabled, so we use vat rate 0
      $objectline->vat_src_code = $vat_src_code;
      $objectline->localtax1_tx = is_numeric($localtax1_tx) ? $localtax1_tx : 0;
      $objectline->localtax2_tx = is_numeric($localtax2_tx) ? $localtax2_tx : 0;
      $objectline->date_ouverture_prevue = $date_start_update;
      $objectline->date_ouverture = $date_start_real_update;
      $objectline->date_fin_validite = $date_end_update;
      $objectline->date_cloture = $date_end_real_update;
      $objectline->fk_user_cloture = $user->id;
      $objectline->fk_fournprice = $fk_fournprice;
      $objectline->pa_ht = $pa_ht;

      if ($fk_unit > 0) {
        $objectline->fk_unit = GETPOST('unit');
      } else {
        $objectline->fk_unit = null;
      }

      // Extrafields
      $extralabelsline = $extrafields->fetch_name_optionals_label($objectline->table_element);
      $array_options = $extrafields->getOptionalsFromPost($object->table_element_line, $predef);

      if (is_array($array_options) && count($array_options) > 0) {
        // We replace values in this->line->array_options only for entries defined into $array_options
        foreach ($array_options as $key => $value) {
          $objectline->array_options[$key] = $array_options[$key];
        }
      }

      // TODO verifier price_min si fk_product et multiprix

      $result = $objectline->update($user);
      if ($result < 0)
      {
        $error++;
        setEventMessages($objectline->error, $objectline->errors, 'errors');
      }
    }

    if (!$error)
    {
      $db->commit();
    } else {
      $db->rollback();
    }
  } elseif ($action == 'confirm_deleteline' && $confirm == 'yes' && $user->rights->contrat->creer)
  {
    $result = $object->deleteline(GETPOST('lineid'), $user);

    if ($result >= 0)
    {
      header("Location: ".$_SERVER['PHP_SELF']."?id=".$object->id);
      exit;
    } else {
      setEventMessages($object->error, $object->errors, 'errors');
    }
  } elseif ($action == 'confirm_valid' && $confirm == 'yes' && $user->rights->contrat->creer)
  {
    $result = $object->validate($user);

    if ($result > 0)
    {
      // Define output language
      if (empty($conf->global->MAIN_DISABLE_PDF_AUTOUPDATE))
      {
        $outputlangs = $langs;
        $newlang = '';
        if ($conf->global->MAIN_MULTILANGS && empty($newlang) && GETPOST('lang_id', 'aZ09')) $newlang = GETPOST('lang_id', 'aZ09');
        if ($conf->global->MAIN_MULTILANGS && empty($newlang))  $newlang = $object->thirdparty->default_lang;
        if (!empty($newlang)) {
          $outputlangs = new Translate("", $conf);
          $outputlangs->setDefaultLang($newlang);
        }
        $model = $object->model_pdf;
        $ret = $object->fetch($id); // Reload to get new records

        $object->generateDocument($model, $outputlangs, $hidedetails, $hidedesc, $hideref);
      }
    } else {
      setEventMessages($object->error, $object->errors, 'errors');
    }
  } elseif ($action == 'reopen' && $user->rights->contrat->creer)
  {
    $result = $object->reopen($user);
    if ($result < 0)
    {
      setEventMessages($object->error, $object->errors, 'errors');
    }
  }

  // Close all lines
  elseif ($action == 'confirm_close' && $confirm == 'yes' && $user->rights->contrat->creer)
  {
    $result = $object->closeAll($user);
    if ($result < 0)
    {
      setEventMessages($object->error, $object->errors, 'errors');
    }
  }

  // Close all lines
  elseif ($action == 'confirm_activate' && $confirm == 'yes' && $user->rights->contrat->creer)
  {
    $result = $object->activateAll($user);
    if ($result < 0)
    {
      setEventMessages($object->error, $object->errors, 'errors');
    }
  } elseif ($action == 'confirm_delete' && $confirm == 'yes' && $user->rights->contrat->supprimer)
  {
    $result = $object->delete($user);
    if ($result >= 0)
    {
      header("Location: list.php?restore_lastsearch_values=1");
      return;
    } else {
      setEventMessages($object->error, $object->errors, 'errors');
    }
  } elseif ($action == 'confirm_move' && $confirm == 'yes' && $user->rights->contrat->creer)
  {
    if (GETPOST('newcid') > 0)
    {
      $contractline = new ContratLigne($db);
      $result = $contractline->fetch(GETPOST('lineid'));
      $contractline->fk_contrat = GETPOST('newcid');
      $result = $contractline->update($user, 1);
      if ($result >= 0)
      {
        header("Location: ".$_SERVER['PHP_SELF']."?id=".$id);
        return;
      } else {
        setEventMessages($object->error, $object->errors, 'errors');
      }
    } else {
      setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentities("RefNewContract")), null, 'errors');
    }
  } elseif ($action == 'update_extras')
  {
    $object->oldcopy = dol_clone($object);

    // Fill array 'array_options' with data from update form
    $ret = $extrafields->setOptionalsFromPost(null, $object, GETPOST('attribute', 'restricthtml'));
    if ($ret < 0) $error++;

    if (!$error) {
      $result = $object->insertExtraFields('CONTRACT_MODIFY');
      if ($result < 0)
      {
        setEventMessages($object->error, $object->errors, 'errors');
        $error++;
      }
    }

    if ($error) {
      $action = 'edit_extras';
    }
  } elseif ($action == 'setref_supplier')
  {
    $cancelbutton = GETPOST('cancel', 'alpha');
    if (!$cancelbutton) {
      $object->oldcopy = dol_clone($object);

      $result = $object->setValueFrom('ref_supplier', GETPOST('ref_supplier', 'alpha'), '', null, 'text', '', $user, 'CONTRACT_MODIFY');
      if ($result < 0) {
        setEventMessages($object->error, $object->errors, 'errors');
        $action = 'editref_supplier';
      } else {
        header("Location: ".$_SERVER['PHP_SELF']."?id=".$object->id);
        exit;
      }
    } else {
      header("Location: ".$_SERVER['PHP_SELF']."?id=".$id);
      exit;
    }
  } elseif ($action == 'setref_customer')
  {
    $cancelbutton = GETPOST('cancel', 'alpha');

    if (!$cancelbutton)
    {
      $object->oldcopy = dol_clone($object);

      $result = $object->setValueFrom('ref_customer', GETPOST('ref_customer', 'alpha'), '', null, 'text', '', $user, 'CONTRACT_MODIFY');
      if ($result < 0) {
        setEventMessages($object->error, $object->errors, 'errors');
        $action = 'editref_customer';
      } else {
        header("Location: ".$_SERVER['PHP_SELF']."?id=".$object->id);
        exit;
      }
    } else {
      header("Location: ".$_SERVER['PHP_SELF']."?id=".$id);
      exit;
    }
  } elseif ($action == 'setref')
  {
    $cancelbutton = GETPOST('cancel', 'alpha');

    if (!$cancelbutton) {
      $result = $object->fetch($id);
      if ($result < 0) {
        setEventMessages($object->error, $object->errors, 'errors');
      }

      $old_ref = $object->ref;

      $result = $object->setValueFrom('ref', GETPOST('ref', 'alpha'), '', null, 'text', '', $user, 'CONTRACT_MODIFY');
      if ($result < 0) {
        setEventMessages($object->error, $object->errors, 'errors');
        $action = 'editref';
      } else {
        require_once DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php';
        $old_filedir = $conf->contrat->multidir_output[$object->entity].'/'.dol_sanitizeFileName($old_ref);
        $new_filedir = $conf->contrat->multidir_output[$object->entity].'/'.dol_sanitizeFileName($object->ref);

        $files = dol_dir_list($old_filedir);
        if (!empty($files))
        {
          if (!is_dir($new_filedir)) dol_mkdir($new_filedir);
          foreach ($files as $file)
          {
            dol_move($file['fullname'], $new_filedir.'/'.$file['name']);
          }
        }

        header("Location: ".$_SERVER['PHP_SELF']."?id=".$object->id);
        exit;
      }
    } else {
      header("Location: ".$_SERVER['PHP_SELF']."?id=".$id);
      exit;
    }
  } elseif ($action == 'setdate_contrat')
  {
    $cancelbutton = GETPOST('cancel', 'alpha');

    if (!$cancelbutton) {
      $result = $object->fetch($id);
      if ($result < 0) {
        setEventMessages($object->error, $object->errors, 'errors');
      }
      $datacontrat = dol_mktime(GETPOST('date_contrathour'), GETPOST('date_contratmin'), 0, GETPOST('date_contratmonth'), GETPOST('date_contratday'), GETPOST('date_contratyear'));
      $result = $object->setValueFrom('date_contrat', $datacontrat, '', null, 'date', '', $user, 'CONTRACT_MODIFY');
      if ($result < 0) {
        setEventMessages($object->error, $object->errors, 'errors');
        $action = 'editdate_contrat';
      } else {
        header("Location: ".$_SERVER['PHP_SELF']."?id=".$object->id);
        exit;
      }
    } else {
      header("Location: ".$_SERVER['PHP_SELF']."?id=".$id);
      exit;
    }
  }


  // Actions to build doc
  $upload_dir = $conf->contrat->multidir_output[$object->entity];
  $permissiontoadd = $user->rights->contrat->creer;
  include DOL_DOCUMENT_ROOT.'/core/actions_builddoc.inc.php';

  // Actions to send emails
  $triggersendname = 'CONTRACT_SENTBYMAIL';
  $paramname = 'id';
  $mode = 'emailfromcontract';
  $trackid = 'con'.$object->id;
  include DOL_DOCUMENT_ROOT.'/core/actions_sendmails.inc.php';


  if (!empty($conf->global->MAIN_DISABLE_CONTACTS_TAB) && $user->rights->contrat->creer)
  {
    if ($action == 'addcontact')
    {
      $contactid = (GETPOST('userid') ? GETPOST('userid') : GETPOST('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");
          setEventMessages($langs->trans("ErrorThisContactIsAlreadyDefinedAsThisType"), null, 'errors');
        } else {
          setEventMessages($object->error, $object->errors, 'errors');
        }
      }
    }

    // bascule du statut d'un contact
    elseif ($action == 'swapstatut')
    {
      $result = $object->swapContactStatus(GETPOST('ligne'));
    }

    // Efface un contact
    elseif ($action == 'deletecontact')
    {
      $result = $object->delete_contact(GETPOST('lineid'));

      if ($result >= 0)
      {
        header("Location: ".$_SERVER['PHP_SELF']."?id=".$object->id);
        exit;
      } else {
        setEventMessages($object->error, $object->errors, 'errors');
      }
    }
  }

  // Action clone object
  if ($action == 'confirm_clone' && $confirm == 'yes')
  {
    if (!GETPOST('socid', 3))
    {
      setEventMessages($langs->trans("NoCloneOptionsSpecified"), null, 'errors');
    } else {
      if ($object->id > 0) {
        $result = $object->createFromClone($user, $socid);
        if ($result > 0) {
          header("Location: ".$_SERVER['PHP_SELF'].'?id='.$result);
          exit();
        } else {
          if (count($object->errors) > 0) setEventMessages($object->error, $object->errors, 'errors');
          $action = '';
        }
      }
    }
  }
}


/*
 * View
 */

llxHeader('', $langs->trans("Contract"), "");

$form = new Form($db);
$formfile = new FormFile($db);
if (!empty($conf->projet->enabled)) $formproject = new FormProjets($db);

// Load object modContract
$module = (!empty($conf->global->CONTRACT_ADDON) ? $conf->global->CONTRACT_ADDON : 'mod_contract_serpis');
if (substr($module, 0, 13) == 'mod_contract_' && substr($module, -3) == 'php')
{
  $module = substr($module, 0, dol_strlen($module) - 4);
}
$result = dol_include_once('/core/modules/contract/'.$module.'.php');
if ($result > 0)
{
  $modCodeContract = new $module();
}

// Create
if ($action == 'create')
{
  print load_fiche_titre($langs->trans('AddContract'), '', 'contract');

  $soc = new Societe($db);
  if ($socid > 0) $soc->fetch($socid);

  if (GETPOST('origin') && GETPOST('originid'))
  {
    // Parse element/subelement (ex: project_task)
    $regs = array();
    $element = $subelement = GETPOST('origin');
    if (preg_match('/^([^_]+)_([^_]+)/i', GETPOST('origin'), $regs))
    {
      $element = $regs[1];
      $subelement = $regs[2];
    }

    if ($element == 'project')
    {
      $projectid = GETPOST('originid');
    } else {
      // For compatibility
      if ($element == 'order' || $element == 'commande') { $element = $subelement = 'commande'; }
      if ($element == 'propal') { $element = 'comm/propal'; $subelement = 'propal'; }

      dol_include_once('/'.$element.'/class/'.$subelement.'.class.php');

      $classname = ucfirst($subelement);
      $objectsrc = new $classname($db);
      $objectsrc->fetch($originid);
      if (empty($objectsrc->lines) && method_exists($objectsrc, 'fetch_lines'))  $objectsrc->fetch_lines();
      $objectsrc->fetch_thirdparty();

      // Replicate extrafields
      $objectsrc->fetch_optionals();
      $object->array_options = $objectsrc->array_options;

      $projectid = (!empty($objectsrc->fk_project) ? $objectsrc->fk_project : '');

      $soc = $objectsrc->thirdparty;

      $note_private = (!empty($objectsrc->note_private) ? $objectsrc->note_private : '');
      $note_public = (!empty($objectsrc->note_public) ? $objectsrc->note_public : '');

      // Object source contacts list
      $srccontactslist = $objectsrc->liste_contact(-1, 'external', 1);
    }
  } else {
    $projectid = GETPOST('projectid', 'int');
    $note_private = GETPOST("note_private");
    $note_public = GETPOST("note_public");
  }

  $object->date_contrat = dol_now();

  print '<form name="form_contract" action="'.$_SERVER["PHP_SELF"].'" method="post">';
  print '<input type="hidden" name="token" value="'.newToken().'">';

  print '<input type="hidden" name="action" value="add">';
  print '<input type="hidden" name="socid" value="'.$soc->id.'">'."\n";
  print '<input type="hidden" name="remise_percent" value="0">';

  print dol_get_fiche_head();

  print '<table class="border centpercent">';

  // Ref
  print '<tr><td class="titlefieldcreate fieldrequired">'.$langs->trans('Ref').'</td><td>';
  if (!empty($modCodeContract->code_auto)) {
    $tmpcode = $langs->trans("Draft");
  } else {
    $tmpcode = '<input name="ref" class="maxwidth100" maxlength="128" value="'.dol_escape_htmltag(GETPOST('ref') ?GETPOST('ref') : $tmpcode).'">';
  }
  print $tmpcode;
  print '</td></tr>';

  // Ref customer
  print '<tr><td>'.$langs->trans('RefCustomer').'</td>';
  print '<td><input type="text" class="maxwidth150" name="ref_customer" id="ref_customer" value="'.dol_escape_htmltag(GETPOST('ref_customer', 'alpha')).'"></td></tr>';

  // Ref supplier
  print '<tr><td>'.$langs->trans('RefSupplier').'</td>';
  print '<td><input type="text" class="maxwidth150" name="ref_supplier" id="ref_supplier" value="'.dol_escape_htmltag(GETPOST('ref_supplier', 'alpha')).'"></td></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 $form->select_company('', 'socid', '', 'SelectThirdParty', 1, 0, null, 0, 'minwidth300');
    print ' <a href="'.DOL_URL_ROOT.'/societe/card.php?action=create&backtopage='.urlencode($_SERVER["PHP_SELF"].'?action=create').'"><span class="fa fa-plus-circle valignmiddle paddingleft" title="'.$langs->trans("AddThirdParty").'"></span></a>';
    print '</td>';
  }
  print '</tr>'."\n";

  if ($socid > 0)
  {
    // Ligne info remises tiers
    print '<tr><td>'.$langs->trans('Discounts').'</td><td>';
    if ($soc->remise_percent) print $langs->trans("CompanyHasRelativeDiscount", $soc->remise_percent);
    else print $langs->trans("CompanyHasNoRelativeDiscount");
    print '. ';
    $absolute_discount = $soc->getAvailableDiscounts();
    if ($absolute_discount) print $langs->trans("CompanyHasAbsoluteDiscount", price($absolute_discount), $langs->trans("Currency".$conf->currency));
    else print $langs->trans("CompanyHasNoAbsoluteDiscount");
    print '.';
    print '</td></tr>';
  }

  // Commercial suivi
  print '<tr><td class="nowrap"><span class="fieldrequired">'.$langs->trans("TypeContact_contrat_internal_SALESREPFOLL").'</span></td><td>';
  print $form->select_dolusers(GETPOST("commercial_suivi_id") ?GETPOST("commercial_suivi_id") : $user->id, 'commercial_suivi_id', 1, '');
  print '</td></tr>';

  // Commercial signature
  print '<tr><td class="nowrap"><span class="fieldrequired">'.$langs->trans("TypeContact_contrat_internal_SALESREPSIGN").'</span></td><td>';
  print $form->select_dolusers(GETPOST("commercial_signature_id") ?GETPOST("commercial_signature_id") : $user->id, 'commercial_signature_id', 1, '');
  print '</td></tr>';

  print '<tr><td><span class="fieldrequired">'.$langs->trans("Date").'</span></td><td>';
  print $form->selectDate($datecontrat, '', 0, 0, '', "contrat");
  print "</td></tr>";

  // Project
  if (!empty($conf->projet->enabled))
  {
    $langs->load('projects');

    $formproject = new FormProjets($db);

    print '<tr><td>'.$langs->trans("Project").'</td><td>';
    $formproject->select_projects(($soc->id > 0 ? $soc->id : -1), $projectid, "projectid", 0, 0, 1, 1);
    print ' &nbsp; <a href="'.DOL_URL_ROOT.'/projet/card.php?socid='.$soc->id.'&action=create&status=1&backtopage='.urlencode($_SERVER["PHP_SELF"].'?action=create&socid='.$soc->id).'"><span class="fa fa-plus-circle valignmiddle" title="'.$langs->trans("AddProject").'"></span></a>';
    print "</td></tr>";
  }

  print '<tr><td>'.$langs->trans("NotePublic").'</td><td class="tdtop">';
  $doleditor = new DolEditor('note_public', $note_public, '', '100', 'dolibarr_notes', 'In', 1, true, true, ROWS_3, '90%');
  print $doleditor->Create(1);
  print '</td></tr>';

  if (empty($user->socid))
  {
    print '<tr><td>'.$langs->trans("NotePrivate").'</td><td class="tdtop">';
    $doleditor = new DolEditor('note_private', $note_private, '', '100', 'dolibarr_notes', 'In', 1, true, true, ROWS_3, '90%');
    print $doleditor->Create(1);
    print '</td></tr>';
  }

  // Other attributes
  $parameters = array('objectsrc' => $objectsrc, 'colspan' => ' colspan="3"', 'cols' => '3');
  $reshook = $hookmanager->executeHooks('formObjectOptions', $parameters, $object, $action); // Note that $action and $object may have been modified by hook
  print $hookmanager->resPrint;

  // Other attributes
  if (empty($reshook)) {
    print $object->showOptionals($extrafields, 'create', $parameters);
  }

  print "</table>\n";

  print dol_get_fiche_end();

  print '<div class="center">';
  print '<input type="submit" class="button" value="'.$langs->trans("Create").'">';
  print '&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;';
  print '<input type="button" class="button button-cancel" value="'.$langs->trans("Cancel").'" onClick="javascript:history.go(-1)">';
  print '</div>';

  if (is_object($objectsrc))
  {
    print '<input type="hidden" name="origin"         value="'.$objectsrc->element.'">';
    print '<input type="hidden" name="originid"       value="'.$objectsrc->id.'">';

    if (empty($conf->global->CONTRACT_SUPPORT_PRODUCTS))
    {
      print '<br>'.$langs->trans("Note").': '.$langs->trans("OnlyLinesWithTypeServiceAreUsed");
    }
  }

  print "</form>\n";
} else /* *************************************************************************** */
/*                                                                             */
/* Mode vue et edition                                                         */
/*                                                                             */
/* *************************************************************************** */
{
  $now = dol_now();

  if ($object->id > 0)
  {
    $object->fetch_thirdparty();

    $soc = $object->thirdparty; // $soc is used later

    $result = $object->fetch_lines(); // This also init $this->nbofserviceswait, $this->nbofservicesopened, $this->nbofservicesexpired=, $this->nbofservicesclosed
    if ($result < 0) {
      dol_print_error($db, $object->error);
    }

    $nbofservices = count($object->lines);

    $author = new User($db);
    $author->fetch($object->user_author_id);

    $commercial_signature = new User($db);
    $commercial_signature->fetch($object->commercial_signature_id);

    $commercial_suivi = new User($db);
    $commercial_suivi->fetch($object->commercial_suivi_id);

    $head = contract_prepare_head($object);

    $hselected = 0;
    $formconfirm = '';

    print dol_get_fiche_head($head, $hselected, $langs->trans("Contract"), -1, 'contract');


    if ($action == 'delete') {
      //Confirmation de la suppression du contrat
      $formconfirm = $form->formconfirm($_SERVER['PHP_SELF']."?id=".$object->id, $langs->trans("DeleteAContract"), $langs->trans("ConfirmDeleteAContract"), "confirm_delete", '', 0, 1);
    } elseif ($action == 'valid') {
      //Confirmation de la validation
      $ref = substr($object->ref, 1, 4);
      if ($ref == 'PROV' && !empty($modCodeContract->code_auto)) {
        $numref = $object->getNextNumRef($object->thirdparty);
      } else {
        $numref = $object->ref;
      }
      $text = $langs->trans('ConfirmValidateContract', $numref);
      $formconfirm = $form->formconfirm($_SERVER['PHP_SELF']."?id=".$object->id, $langs->trans("ValidateAContract"), $text, "confirm_valid", '', 0, 1);
    } elseif ($action == 'close') {
      // Confirmation de la fermeture
      $formconfirm = $form->formconfirm($_SERVER['PHP_SELF']."?id=".$object->id, $langs->trans("CloseAContract"), $langs->trans("ConfirmCloseContract"), "confirm_close", '', 0, 1);
    } elseif ($action == 'activate') {
      $formconfirm = $form->formconfirm($_SERVER['PHP_SELF']."?id=".$object->id, $langs->trans("ActivateAllOnContract"), $langs->trans("ConfirmActivateAllOnContract"), "confirm_activate", '', 0, 1);
    } elseif ($action == 'clone') {
      // Clone confirmation
      $formquestion = array(array('type' => 'other', 'name' => 'socid', 'label' => $langs->trans("SelectThirdParty"), 'value' => $form->select_company(GETPOST('socid', 'int'), 'socid', '(s.client=1 OR s.client=2 OR s.client=3)')));
      $formconfirm = $form->formconfirm($_SERVER["PHP_SELF"].'?id='.$object->id, $langs->trans('ToClone'), $langs->trans('ConfirmCloneContract', $object->ref), 'confirm_clone', $formquestion, 'yes', 1);
    }


    // Call Hook formConfirm
    $parameters = array(
      'formConfirm' => $formconfirm,
      'id' => $id,
      //'lineid' => $lineid,
    );
    // Note that $action and $object may have been modified by hook
    $reshook = $hookmanager->executeHooks('formConfirm', $parameters, $object, $action);
    if (empty($reshook)) {
      $formconfirm .= $hookmanager->resPrint;
    } elseif ($reshook > 0) {
      $formconfirm = $hookmanager->resPrint;
    }

    // Print form confirm
    print $formconfirm;

    /*
         *   Contrat
         */
    if (!empty($object->brouillon) && $user->rights->contrat->creer)
    {
      print '<form action="'.$_SERVER['PHP_SELF'].'?id='.$object->id.'" method="POST">';
      print '<input type="hidden" name="token" value="'.newToken().'">';
      print '<input type="hidden" name="action" value="setremise">';
    }

    // Contract card

    $linkback = '<a href="'.DOL_URL_ROOT.'/contrat/list.php?restore_lastsearch_values=1'.(!empty($socid) ? '&socid='.$socid : '').'">'.$langs->trans("BackToList").'</a>';


    $morehtmlref = '';
    if (!empty($modCodeContract->code_auto)) {
      $morehtmlref .= $object->ref;
    } else {
      $morehtmlref .= $form->editfieldkey("", 'ref', $object->ref, $object, $user->rights->contrat->creer, 'string', '', 0, 3);
      $morehtmlref .= $form->editfieldval("", 'ref', $object->ref, $object, $user->rights->contrat->creer, 'string', '', 0, 2);
    }

    $morehtmlref .= '<div class="refidno">';
    // Ref customer
    $morehtmlref .= $form->editfieldkey("RefCustomer", 'ref_customer', $object->ref_customer, $object, $user->rights->contrat->creer, 'string', '', 0, 1);
    $morehtmlref .= $form->editfieldval("RefCustomer", 'ref_customer', $object->ref_customer, $object, $user->rights->contrat->creer, 'string', '', null, null, '', 1, 'getFormatedCustomerRef');
    // Ref supplier
    $morehtmlref .= '<br>';
    $morehtmlref .= $form->editfieldkey("RefSupplier", 'ref_supplier', $object->ref_supplier, $object, $user->rights->contrat->creer, 'string', '', 0, 1);
    $morehtmlref .= $form->editfieldval("RefSupplier", 'ref_supplier', $object->ref_supplier, $object, $user->rights->contrat->creer, 'string', '', null, null, '', 1, 'getFormatedSupplierRef');
    // Thirdparty
    $morehtmlref .= '<br>'.$langs->trans('ThirdParty').' : '.$object->thirdparty->getNomUrl(1);
    if (empty($conf->global->MAIN_DISABLE_OTHER_LINK) && $object->thirdparty->id > 0) $morehtmlref .= ' (<a href="'.DOL_URL_ROOT.'/contrat/list.php?socid='.$object->thirdparty->id.'&search_name='.urlencode($object->thirdparty->name).'">'.$langs->trans("OtherContracts").'</a>)';
    // Project
    if (!empty($conf->projet->enabled))
    {
      $langs->load("projects");
      $morehtmlref .= '<br>'.$langs->trans('Project').' ';
      if ($user->rights->contrat->creer)
      {
        if ($action != 'classify') {
          $morehtmlref .= '<a class="editfielda" href="'.$_SERVER['PHP_SELF'].'?action=classify&amp;id='.$object->id.'">'.img_edit($langs->transnoentitiesnoconv('SetProject')).'</a> : ';
        }
        if ($action == 'classify') {
          //$morehtmlref.=$form->form_project($_SERVER['PHP_SELF'] . '?id=' . $object->id, $object->socid, $object->fk_project, 'projectid', 0, 0, 1, 1);
          $morehtmlref .= '<form method="post" action="'.$_SERVER['PHP_SELF'].'?id='.$object->id.'">';
          $morehtmlref .= '<input type="hidden" name="action" value="classin">';
          $morehtmlref .= '<input type="hidden" name="token" value="'.newToken().'">';
          $morehtmlref .= $formproject->select_projects($object->thirdparty->id, $object->fk_project, 'projectid', $maxlength, 0, 1, 0, 1, 0, 0, '', 1);
          $morehtmlref .= '<input type="submit" class="button valignmiddle" value="'.$langs->trans("Modify").'">';
          $morehtmlref .= '</form>';
        } else {
          $morehtmlref .= $form->form_project($_SERVER['PHP_SELF'].'?id='.$object->id, $object->thirdparty->id, $object->fk_project, 'none', 0, 0, 0, 1);
        }
      } else {
        if (!empty($object->fk_project)) {
          $proj = new Project($db);
          $proj->fetch($object->fk_project);
          $morehtmlref .= '<a href="'.DOL_URL_ROOT.'/projet/card.php?id='.$object->fk_project.'" title="'.$langs->trans('ShowProject').'">';
          $morehtmlref .= $proj->ref;
          $morehtmlref .= '</a>';
        } else {
          $morehtmlref .= '';
        }
      }
    }
    $morehtmlref .= '</div>';


    dol_banner_tab($object, 'ref', $linkback, 1, 'ref', 'none', $morehtmlref);


    print '<div class="fichecenter">';
    print '<div class="underbanner clearboth"></div>';


    print '<table class="border tableforfield" width="100%">';

    // Line info of thirdparty discounts
    print '<tr><td class="titlefield">'.$langs->trans('Discount').'</td><td colspan="3">';
    if ($object->thirdparty->remise_percent) print $langs->trans("CompanyHasRelativeDiscount", $object->thirdparty->remise_percent);
    else print $langs->trans("CompanyHasNoRelativeDiscount");
    $absolute_discount = $object->thirdparty->getAvailableDiscounts();
    print '. ';
    if ($absolute_discount) print $langs->trans("CompanyHasAbsoluteDiscount", price($absolute_discount), $langs->trans("Currency".$conf->currency));
    else print $langs->trans("CompanyHasNoAbsoluteDiscount");
    print '.';
    print '</td></tr>';

    // Date
    print '<tr>';
    print '<td class="titlefield">';
    print $form->editfieldkey("Date", 'date_contrat', $object->date_contrat, $object, $user->rights->contrat->creer);
    print '</td><td>';
    print $form->editfieldval("Date", 'date_contrat', $object->date_contrat, $object, $user->rights->contrat->creer, 'datehourpicker');
    print '</td>';
    print '</tr>';

    // Other attributes
    $cols = 3;
    include DOL_DOCUMENT_ROOT.'/core/tpl/extrafields_view.tpl.php';

    print "</table>";

    print '</div>';

    if (!empty($object->brouillon) && $user->rights->contrat->creer)
    {
      print '</form>';
    }

    echo '<br>';

    if (!empty($conf->global->MAIN_DISABLE_CONTACTS_TAB))
    {
      $blocname = 'contacts';
      $title = $langs->trans('ContactsAddresses');
      include DOL_DOCUMENT_ROOT.'/core/tpl/bloc_showhide.tpl.php';
    }

    if (!empty($conf->global->MAIN_DISABLE_NOTES_TAB))
    {
      $blocname = 'notes';
      $title = $langs->trans('Notes');
      include DOL_DOCUMENT_ROOT.'/core/tpl/bloc_showhide.tpl.php';
    }


    $arrayothercontracts = $object->getListOfContracts('others');

    /*
         * Lines of contracts
         */

    $productstatic = new Product($db);

    $usemargins = 0;
    if (!empty($conf->margin->enabled) && !empty($object->element) && in_array($object->element, array('facture', 'propal', 'commande'))) $usemargins = 1;

    // Title line for service
    $cursorline = 1;
    print '<div id="contrat-lines-container" data-contractid="'.$object->id.'"  data-element="'.$object->element.'" >';
    while ($cursorline <= $nbofservices)
    {
      print '<div id="contrat-line-container'.$object->lines[$cursorline - 1]->id.'" data-contratlineid = "'.$object->lines[$cursorline - 1]->id.'" data-element="'.$object->lines[$cursorline - 1]->element.'" >';
      print '<form name="update" action="'.$_SERVER['PHP_SELF'].'?id='.$object->id.'" method="post">';
      print '<input type="hidden" name="token" value="'.newToken().'">';
      print '<input type="hidden" name="action" value="updateline">';
      print '<input type="hidden" name="elrowid" value="'.$object->lines[$cursorline - 1]->id.'">';
      print '<input type="hidden" name="fournprice" value="'.(!empty($object->lines[$cursorline - 1]->fk_fournprice) ? $object->lines[$cursorline - 1]->fk_fournprice : 0).'">';

      // Area with common detail of line
      print '<div class="div-table-responsive-no-min">';
      print '<table class="notopnoleftnoright allwidth tableforservicepart1" width="100%">';

      $sql = "SELECT cd.rowid, cd.statut, cd.label as label_det, cd.fk_product, cd.product_type, cd.description, cd.price_ht, cd.qty,";
      $sql .= " cd.tva_tx, cd.vat_src_code, cd.remise_percent, cd.info_bits, cd.subprice, cd.multicurrency_subprice,";
      $sql .= " cd.date_ouverture_prevue as date_debut, cd.date_ouverture as date_debut_reelle,";
      $sql .= " cd.date_fin_validite as date_fin, cd.date_cloture as date_fin_reelle,";
      $sql .= " cd.commentaire as comment, cd.fk_product_fournisseur_price as fk_fournprice, cd.buy_price_ht as pa_ht,";
      $sql .= " cd.fk_unit,";
      $sql .= " p.rowid as pid, p.ref as pref, p.label as plabel, p.fk_product_type as ptype, p.entity as pentity, p.tosell, p.tobuy, p.tobatch";
      $sql .= " FROM ".MAIN_DB_PREFIX."contratdet as cd";
      $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."product as p ON cd.fk_product = p.rowid";
      $sql .= " WHERE cd.rowid = ".$object->lines[$cursorline - 1]->id;

      $result = $db->query($sql);
      if ($result)
      {
        $total = 0;

        print '<tr class="liste_titre'.($cursorline ? ' liste_titre_add' : '').'">';
        print '<td>'.$langs->trans("ServiceNb", $cursorline).'</td>';
        print '<td width="80" class="center">'.$langs->trans("VAT").'</td>';
        print '<td width="80" class="right">'.$langs->trans("PriceUHT").'</td>';
        //if (!empty($conf->multicurrency->enabled)) {
        //  print '<td width="80" class="right">'.$langs->trans("PriceUHTCurrency").'</td>';
        //}
        print '<td width="30" class="center">'.$langs->trans("Qty").'</td>';
        if (!empty($conf->global->PRODUCT_USE_UNITS)) print '<td width="30" class="left">'.$langs->trans("Unit").'</td>';
        print '<td width="50" class="right">'.$langs->trans("ReductionShort").'</td>';
        if (!empty($conf->margin->enabled) && !empty($conf->global->MARGIN_SHOW_ON_CONTRACT)) print '<td width="50" class="right">'.$langs->trans("BuyingPrice").'</td>';
        print '<td width="30">&nbsp;</td>';
        print "</tr>\n";

        $objp = $db->fetch_object($result);

        // Line in view mode
        if ($action != 'editline' || GETPOST('rowid') != $objp->rowid)
        {
          $moreparam = '';
          if (!empty($conf->global->CONTRACT_HIDE_CLOSED_SERVICES_BY_DEFAULT) && $objp->statut == ContratLigne::STATUS_CLOSED && $action != 'showclosedlines') $moreparam = 'style="display: none;"';
          print '<tr class="tdtop oddeven" '.$moreparam.'>';
          // Label
          if ($objp->fk_product > 0)
          {
            $productstatic->id = $objp->fk_product;
            $productstatic->type = $objp->ptype;
            $productstatic->ref = $objp->pref;
            $productstatic->entity = $objp->pentity;
            $productstatic->label = $objp->plabel;
            $productstatic->status = $objp->tosell;
            $productstatic->status_buy = $objp->tobuy;
            $productstatic->status_batch = $objp->tobatch;

            print '<td>';
            $text = $productstatic->getNomUrl(1, '', 32);
            if ($objp->plabel)
            {
              $text .= ' - ';
              $text .= $objp->plabel;
            }
            $description = $objp->description;

            // Add description in form
            if (!empty($conf->global->PRODUIT_DESC_IN_FORM))
            {
              $text .= (!empty($objp->description) && $objp->description != $objp->plabel) ? '<br>'.dol_htmlentitiesbr($objp->description) : '';
              $description = ''; // Already added into main visible desc
            }

            echo $form->textwithtooltip($text, $description, 3, '', '', $cursorline, 0, (!empty($line->fk_parent_line) ?img_picto('', 'rightarrow') : ''));

            print '</td>';
          } else {
            print '<td>'.img_object($langs->trans("ShowProductOrService"), ($objp->product_type ? 'service' : 'product')).' '.dol_htmlentitiesbr($objp->description)."</td>\n";
          }
          // VAT
          print '<td class="center">';
          print vatrate($objp->tva_tx.($objp->vat_src_code ? (' ('.$objp->vat_src_code.')') : ''), '%', $objp->info_bits);
          print '</td>';
          // Price
          print '<td class="right">'.($objp->subprice != '' ? price($objp->subprice) : '')."</td>\n";
          // Price multicurrency
          /*if (!empty($conf->multicurrency->enabled)) {
            print '<td class="linecoluht_currency nowrap right">'.price($objp->multicurrency_subprice).'</td>';
          }*/
          // Quantity
          print '<td class="center">'.$objp->qty.'</td>';
          // Unit
          if (!empty($conf->global->PRODUCT_USE_UNITS)) print '<td class="left">'.$langs->trans($object->lines[$cursorline - 1]->getLabelOfUnit()).'</td>';
          // Discount
          if ($objp->remise_percent > 0)
          {
            print '<td class="right">'.$objp->remise_percent."%</td>\n";
          } else {
            print '<td>&nbsp;</td>';
          }

          // Margin
          if (!empty($conf->margin->enabled) && !empty($conf->global->MARGIN_SHOW_ON_CONTRACT)) print '<td class="right nowrap">'.price($objp->pa_ht).'</td>';

          // Icon move, update et delete (statut contrat 0=brouillon,1=valide,2=ferme)
          print '<td class="nowrap right">';
          if ($user->rights->contrat->creer && count($arrayothercontracts) && ($object->statut >= 0))
          {
            print '<!-- link to move service line into another contract -->';
            print '<a class="reposition" style="padding-left: 5px;" href="'.$_SERVER['PHP_SELF'].'?id='.$object->id.'&amp;action=move&amp;rowid='.$objp->rowid.'">';
            print img_picto($langs->trans("MoveToAnotherContract"), 'uparrow');
            print '</a>';
          }
          if ($user->rights->contrat->creer && ($object->statut >= 0))
          {
            print '<a class="reposition marginrightonly editfielda" href="'.$_SERVER['PHP_SELF'].'?id='.$object->id.'&amp;action=editline&amp;rowid='.$objp->rowid.'">';
            print img_edit();
            print '</a>';
          }
          if ($user->rights->contrat->creer && ($object->statut >= 0))
          {
            print '<a class="reposition marginrightonly" href="'.$_SERVER['PHP_SELF'].'?id='.$object->id.'&amp;action=deleteline&amp;token='.newToken().'&amp;rowid='.$objp->rowid.'">';
            print img_delete();
            print '</a>';
          }
          print '</td>';

          print "</tr>\n";

          // Dates of service planed and real
          if ($objp->subprice >= 0)
          {
            $colspan = 6;

            if ($conf->margin->enabled && $conf->global->PRODUCT_USE_UNITS) {
              $colspan = 8;
            } elseif ($conf->margin->enabled || $conf->global->PRODUCT_USE_UNITS) {
              $colspan = 7;
            }

            print '<tr class="oddeven" '.$moreparam.'>';
            print '<td colspan="'.$colspan.'">';

            // Date planned
            print $langs->trans("DateStartPlanned").': ';
            if ($objp->date_debut)
            {
              print dol_print_date($db->jdate($objp->date_debut), 'day');
              // Warning si date prevu passee et pas en service
              if ($objp->statut == 0 && $db->jdate($objp->date_debut) < ($now - $conf->contrat->services->inactifs->warning_delay)) {
                $warning_delay = $conf->contrat->services->inactifs->warning_delay / 3600 / 24;
                $textlate = $langs->trans("Late").' = '.$langs->trans("DateReference").' > '.$langs->trans("DateToday").' '.(ceil($warning_delay) >= 0 ? '+' : '').ceil($warning_delay).' '.$langs->trans("days");
                print " ".img_warning($textlate);
              }
            } else print $langs->trans("Unknown");
            print ' &nbsp;-&nbsp; ';
            print $langs->trans("DateEndPlanned").': ';
            if ($objp->date_fin)
            {
              print dol_print_date($db->jdate($objp->date_fin), 'day');
              if ($objp->statut == 4 && $db->jdate($objp->date_fin) < ($now - $conf->contrat->services->expires->warning_delay)) {
                $warning_delay = $conf->contrat->services->expires->warning_delay / 3600 / 24;
                $textlate = $langs->trans("Late").' = '.$langs->trans("DateReference").' > '.$langs->trans("DateToday").' '.(ceil($warning_delay) >= 0 ? '+' : '').ceil($warning_delay).' '.$langs->trans("days");
                print " ".img_warning($textlate);
              }
            } else print $langs->trans("Unknown");

            print '</td>';
            print '</tr>';
          }

          // Display lines extrafields
          if (is_array($extralabelslines) && count($extralabelslines) > 0) {
            $line = new ContratLigne($db);
            $line->id = $objp->rowid;
            $line->fetch_optionals();
            print $line->showOptionals($extrafields, 'view', array('class'=>'oddeven', 'style'=>$moreparam, 'colspan'=>$colspan), '', '', 1);
          }
        }
        // Line in mode update
        else {
          // Ligne carac
          print '<tr class="oddeven">';
          print '<td>';
          if ($objp->fk_product > 0)
          {
            $canchangeproduct = 1;
            if (empty($canchangeproduct)) {
              $productstatic->id = $objp->fk_product;
              $productstatic->type = $objp->ptype;
              $productstatic->ref = $objp->pref;
              $productstatic->entity = $objp->pentity;
              print $productstatic->getNomUrl(1, '', 32);
              print $objp->label ? ' - '.dol_trunc($objp->label, 32) : '';
              print '<input type="hidden" name="idprod" value="'.(!empty($object->lines[$cursorline - 1]->fk_product) ? $object->lines[$cursorline - 1]->fk_product : 0).'">';
            } else {
              $senderissupplier = 0;
              if (empty($senderissupplier)) {
                print $form->select_produits((!empty($object->lines[$cursorline - 1]->fk_product) ? $object->lines[$cursorline - 1]->fk_product : 0), 'idprod');
              } else {
                print $form->select_produits_fournisseurs((!empty($object->lines[$cursorline - 1]->fk_product) ? $object->lines[$cursorline - 1]->fk_product : 0), 'idprod');
              }
            }
            print '<br>';
          } else {
            print $objp->label ? $objp->label.'<br>' : '';
            print '<input type="hidden" name="idprod" value="'.(!empty($object->lines[$cursorline - 1]->fk_product) ? $object->lines[$cursorline - 1]->fk_product : 0).'">';
          }

          // editeur wysiwyg
          require_once DOL_DOCUMENT_ROOT.'/core/class/doleditor.class.php';
          $nbrows = ROWS_2;
          if (!empty($conf->global->MAIN_INPUT_DESC_HEIGHT)) $nbrows = $conf->global->MAIN_INPUT_DESC_HEIGHT;
          $enable = (isset($conf->global->FCKEDITOR_ENABLE_DETAILS) ? $conf->global->FCKEDITOR_ENABLE_DETAILS : 0);
          $doleditor = new DolEditor('product_desc', $objp->description, '', 92, 'dolibarr_details', '', false, true, $enable, $nbrows, '90%');
          $doleditor->Create();

          print '</td>';

          // VAT
          print '<td class="right">';
          print $form->load_tva("eltva_tx", $objp->tva_tx.($objp->vat_src_code ? (' ('.$objp->vat_src_code.')') : ''), $mysoc, $object->thirdparty, $objp->fk_product, $objp->info_bits, $objp->product_type, 0, 1);
          print '</td>';

          // Price
          print '<td class="right"><input size="5" type="text" name="elprice" value="'.price($objp->subprice).'"></td>';

          // Price multicurrency
          /*if (!empty($conf->multicurrency->enabled)) {
           print '<td class="linecoluht_currency nowrap right">'.price($objp->multicurrency_subprice).'</td>';
           }*/

          // Quantity
          print '<td class="center"><input size="2" type="text" name="elqty" value="'.$objp->qty.'"></td>';

          // Unit
          if (!empty($conf->global->PRODUCT_USE_UNITS))
          {
            print '<td class="left">';
            print $form->selectUnits($objp->fk_unit, "unit");
            print '</td>';
          }

          // Discount
          print '<td class="nowrap right"><input size="1" type="text" name="elremise_percent" value="'.$objp->remise_percent.'">%</td>';

          if (!empty($usemargins))
          {
            print '<td class="right">';
            if ($objp->fk_product) print '<select id="fournprice" name="fournprice"></select>';
            print '<input id="buying_price" type="text" size="5" name="buying_price" value="'.price($objp->pa_ht, 0, '', 0).'"></td>';
          }
          print '<td class="center">';
          print '<input type="submit" class="button margintoponly marginbottomonly" name="save" value="'.$langs->trans("Modify").'">';
          print '<br><input type="submit" class="button margintoponly marginbottomonly button-cancel" name="cancel" value="'.$langs->trans("Cancel").'">';
          print '</td>';
          print '</tr>';

          $colspan = 6;
          if (!empty($conf->margin->enabled) && !empty($conf->global->MARGIN_SHOW_ON_CONTRACT)) $colspan++;
          if (!empty($conf->global->PRODUCT_USE_UNITS)) $colspan++;

          // Ligne dates prevues
          print '<tr class="oddeven">';
          print '<td colspan="'.$colspan.'">';
          print $langs->trans("DateStartPlanned").' ';
          print $form->selectDate($db->jdate($objp->date_debut), "date_start_update", $usehm, $usehm, ($db->jdate($objp->date_debut) > 0 ? 0 : 1), "update");
          print ' &nbsp;&nbsp;'.$langs->trans("DateEndPlanned").' ';
          print $form->selectDate($db->jdate($objp->date_fin), "date_end_update", $usehm, $usehm, ($db->jdate($objp->date_fin) > 0 ? 0 : 1), "update");
          print '</td>';
          print '</tr>';

          if (is_array($extralabelslines) && count($extralabelslines) > 0) {
            $line = new ContratLigne($db);
            $line->id = $objp->rowid;
            $line->fetch_optionals();
            print $line->showOptionals($extrafields, 'edit', array('style'=>'class="oddeven"', 'colspan'=>$colspan), '', '', 1);
          }
        }

        $db->free($result);
      } else {
        dol_print_error($db);
      }

      if ($object->statut > 0)
      {
        $moreparam = '';
        if (!empty($conf->global->CONTRACT_HIDE_CLOSED_SERVICES_BY_DEFAULT) && $object->lines[$cursorline - 1]->statut == ContratLigne::STATUS_CLOSED && $action != 'showclosedlines') $moreparam = 'style="display: none;"';
        print '<tr class="oddeven" '.$moreparam.'>';
        print '<td class="tdhrthin" colspan="'.($conf->margin->enabled ? 7 : 6).'"><hr class="opacitymedium tdhrthin"></td>';
        print "</tr>\n";
      }

      print "</table>";
      print '</div>';

      print "</form>\n";


      /*
             * Confirmation to delete service line of contract
             */
      if ($action == 'deleteline' && !$_REQUEST["cancel"] && $user->rights->contrat->creer && $object->lines[$cursorline - 1]->id == GETPOST('rowid'))
      {
        print $form->formconfirm($_SERVER["PHP_SELF"]."?id=".$object->id."&lineid=".GETPOST('rowid'), $langs->trans("DeleteContractLine"), $langs->trans("ConfirmDeleteContractLine"), "confirm_deleteline", '', 0, 1);
        if ($ret == 'html') print '<table class="notopnoleftnoright" width="100%"><tr class="oddeven" height="6"><td></td></tr></table>';
      }

      /*
             * Confirmation to move service toward another contract
             */
      if ($action == 'move' && !$_REQUEST["cancel"] && $user->rights->contrat->creer && $object->lines[$cursorline - 1]->id == GETPOST('rowid'))
      {
        $arraycontractid = array();
        foreach ($arrayothercontracts as $contractcursor)
        {
          $arraycontractid[$contractcursor->id] = $contractcursor->ref;
        }
        //var_dump($arraycontractid);
        // Cree un tableau formulaire
        $formquestion = array(
        'text' => $langs->trans("ConfirmMoveToAnotherContractQuestion"),
        array('type' => 'select', 'name' => 'newcid', 'values' => $arraycontractid));

        print $form->formconfirm($_SERVER["PHP_SELF"]."?id=".$object->id."&lineid=".GETPOST('rowid'), $langs->trans("MoveToAnotherContract"), $langs->trans("ConfirmMoveToAnotherContract"), "confirm_move", $formquestion);
        print '<table class="notopnoleftnoright" width="100%"><tr class="oddeven" height="6"><td></td></tr></table>';
      }

      /*
             * Confirmation de la validation activation
             */
      if ($action == 'active' && !$_REQUEST["cancel"] && $user->rights->contrat->activer && $object->lines[$cursorline - 1]->id == GETPOST('ligne'))
      {
        $dateactstart = dol_mktime(12, 0, 0, GETPOST('remonth'), GETPOST('reday'), GETPOST('reyear'));
        $dateactend   = dol_mktime(12, 0, 0, GETPOST('endmonth'), GETPOST('endday'), GETPOST('endyear'));
        $comment      = GETPOST('comment', 'alpha');
        print $form->formconfirm($_SERVER["PHP_SELF"]."?id=".$object->id."&ligne=".GETPOST('ligne')."&date=".$dateactstart."&dateend=".$dateactend."&comment=".urlencode($comment), $langs->trans("ActivateService"), $langs->trans("ConfirmActivateService", dol_print_date($dateactstart, "%A %d %B %Y")), "confirm_active", '', 0, 1);
        print '<table class="notopnoleftnoright" width="100%"><tr class="oddeven" height="6"><td></td></tr></table>';
      }

      /*
             * Confirmation de la validation fermeture
             */
      if ($action == 'closeline' && !$_REQUEST["cancel"] && $user->rights->contrat->activer && $object->lines[$cursorline - 1]->id == GETPOST('ligne'))
      {
        $dateactstart = dol_mktime(12, 0, 0, GETPOST('remonth'), GETPOST('reday'), GETPOST('reyear'));
        $dateactend   = dol_mktime(12, 0, 0, GETPOST('endmonth'), GETPOST('endday'), GETPOST('endyear'));
        $comment      = GETPOST('comment', 'alpha');

        if (empty($dateactend))
        {
          setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("DateEndReal")), null, 'errors');
        } else {
          print $form->formconfirm($_SERVER["PHP_SELF"]."?id=".$object->id."&ligne=".GETPOST('ligne', 'int')."&date=".$dateactstart."&dateend=".$dateactend."&comment=".urlencode($comment), $langs->trans("CloseService"), $langs->trans("ConfirmCloseService", dol_print_date($dateactend, "%A %d %B %Y")), "confirm_closeline", '', 0, 1);
        }
        print '<table class="notopnoleftnoright" width="100%"><tr class="oddeven" height="6"><td></td></tr></table>';
      }


      // Area with status and activation info of line
      if ($object->statut > 0)
      {
        print '<table class="notopnoleftnoright tableforservicepart2'.($cursorline < $nbofservices ? ' boxtablenobottom' : '').'" width="100%">';

        print '<tr class="oddeven" '.$moreparam.'>';
        print '<td>'.$langs->trans("ServiceStatus").': '.$object->lines[$cursorline - 1]->getLibStatut(4).'</td>';
        print '<td width="30" class="right">';
        if ($user->socid == 0)
        {
          if ($object->statut > 0 && $action != 'activateline' && $action != 'unactivateline')
          {
            $tmpaction = 'activateline';
            $tmpactionpicto = 'play';
            $tmpactiontext = $langs->trans("Activate");
            if ($objp->statut == 4)
            {
              $tmpaction = 'unactivateline';
              $tmpactionpicto = 'playstop';
              $tmpactiontext = $langs->trans("Disable");
            }
            if (($tmpaction == 'activateline' && $user->rights->contrat->activer) || ($tmpaction == 'unactivateline' && $user->rights->contrat->desactiver))
            {
              print '<a class="reposition" href="'.$_SERVER["PHP_SELF"].'?id='.$object->id.'&amp;ligne='.$object->lines[$cursorline - 1]->id.'&amp;action='.$tmpaction.'">';
              print img_picto($tmpactiontext, $tmpactionpicto);
              print '</a>';
            }
          }
        }
        print '</td>';
        print "</tr>\n";

        print '<tr class="oddeven" '.$moreparam.'>';

        print '<td>';
        // Si pas encore active
        if (!$objp->date_debut_reelle) {
          print $langs->trans("DateStartReal").': ';
          if ($objp->date_debut_reelle) print dol_print_date($db->jdate($objp->date_debut_reelle), 'day');
          else print $langs->trans("ContractStatusNotRunning");
        }
        // Si active et en cours
        if ($objp->date_debut_reelle && !$objp->date_fin_reelle) {
          print $langs->trans("DateStartReal").': ';
          print dol_print_date($db->jdate($objp->date_debut_reelle), 'day');
        }
        // Si desactive
        if ($objp->date_debut_reelle && $objp->date_fin_reelle) {
          print $langs->trans("DateStartReal").': ';
          print dol_print_date($db->jdate($objp->date_debut_reelle), 'day');
          print ' &nbsp;-&nbsp; ';
          print $langs->trans("DateEndReal").': ';
          print dol_print_date($db->jdate($objp->date_fin_reelle), 'day');
        }
        if (!empty($objp->comment)) print " &nbsp;-&nbsp; ".$objp->comment;
        print '</td>';

        print '<td class="center">&nbsp;</td>';

        print '</tr>';
        print '</table>';
      }

      // Form to activate line
      if ($user->rights->contrat->activer && $action == 'activateline' && $object->lines[$cursorline - 1]->id == GETPOST('ligne'))
      {
        print '<form name="active" action="'.$_SERVER["PHP_SELF"].'?id='.$object->id.'&amp;ligne='.GETPOST('ligne').'&amp;action=active" method="post">';
        print '<input type="hidden" name="token" value="'.newToken().'">';

        print '<table class="noborder tableforservicepart2'.($cursorline < $nbofservices ? ' boxtablenobottom' : '').'" width="100%">';

        // Definie date debut et fin par defaut
        $dateactstart = $objp->date_debut;
        if (GETPOST('remonth')) $dateactstart = dol_mktime(12, 0, 0, GETPOST('remonth'), GETPOST('reday'), GETPOST('reyear'));
        elseif (!$dateactstart) $dateactstart = time();

        $dateactend = $objp->date_fin;
        if (GETPOST('endmonth')) $dateactend = dol_mktime(12, 0, 0, GETPOST('endmonth'), GETPOST('endday'), GETPOST('endyear'));
        elseif (!$dateactend)
        {
          if ($objp->fk_product > 0)
          {
            $product = new Product($db);
            $product->fetch($objp->fk_product);
            $dateactend = dol_time_plus_duree(time(), $product->duration_value, $product->duration_unit);
          }
        }

        print '<tr class="oddeven">';
        print '<td class="nohover">'.$langs->trans("DateServiceActivate").'</td><td class="nohover">';
        print $form->selectDate($dateactstart, '', $usehm, $usehm, '', "active", 1, 0);
        print '</td>';
        print '<td class="nohover">'.$langs->trans("DateEndPlanned").'</td><td class="nohover">';
        print $form->selectDate($dateactend, "end", $usehm, $usehm, '', "active", 1, 0);
        print '</td>';
        print '<td class="center nohover">';
        print '</td>';

        print '</tr>';

        print '<tr class="oddeven">';
        print '<td class="nohover">'.$langs->trans("Comment").'</td><td colspan="3" class="nohover" colspan="'.($conf->margin->enabled ? 4 : 3).'"><input type="text" class="minwidth300" name="comment" value="'.dol_escape_htmltag(GETPOST("comment", 'alphanohtml')).'"></td>';
        print '<td class="nohover right">';
        print '<input type="submit" class="button" name="activate" value="'.$langs->trans("Activate").'"> &nbsp; ';
        print '<input type="submit" class="button button-cancel" name="cancel" value="'.$langs->trans("Cancel").'">';
        print '</td>';
        print '</tr>';

        print '</table>';

        print '</form>';
      }

      if ($user->rights->contrat->activer && $action == 'unactivateline' && $object->lines[$cursorline - 1]->id == GETPOST('ligne'))
      {
        print '<!-- Form to disabled a line -->'."\n";
        print '<form name="closeline" action="'.$_SERVER["PHP_SELF"].'?id='.$object->id.'&amp;ligne='.$object->lines[$cursorline - 1]->id.'" method="post">';

        print '<input type="hidden" name="token" value="'.newToken().'">';
        print '<input type="hidden" name="action" value="closeline">';

        print '<table class="noborder tableforservicepart2'.($cursorline < $nbofservices ? ' boxtablenobottom' : '').'" width="100%">';

        // Definie date debut et fin par defaut
        $dateactstart = $objp->date_debut_reelle;
        if (GETPOST('remonth')) $dateactstart = dol_mktime(12, 0, 0, GETPOST('remonth'), GETPOST('reday'), GETPOST('reyear'));
        elseif (!$dateactstart) $dateactstart = time();

        $dateactend = $objp->date_fin_reelle;
        if (GETPOST('endmonth')) $dateactend = dol_mktime(12, 0, 0, GETPOST('endmonth'), GETPOST('endday'), GETPOST('endyear'));
        elseif (!$dateactend)
        {
          if ($objp->fk_product > 0)
          {
            $product = new Product($db);
            $product->fetch($objp->fk_product);
            $dateactend = dol_time_plus_duree(time(), $product->duration_value, $product->duration_unit);
          }
        }
        $now = dol_now();
        if ($dateactend > $now) $dateactend = $now;

        print '<tr class="oddeven"><td colspan="2" class="nohover">';
        if ($objp->statut >= 4)
        {
          if ($objp->statut == 4)
          {
            print $langs->trans("DateEndReal").' ';
            print $form->selectDate($dateactend, "end", $usehm, $usehm, ($objp->date_fin_reelle > 0 ? 0 : 1), "closeline", 1, 1);
          }
        }
        print '</td>';
        print '<td class="center nohover">';
        print '</td></tr>';

        print '<tr class="oddeven">';
        print '<td class="nohover">'.$langs->trans("Comment").'</td><td class="nohover"><input size="70" type="text" class="flat" name="comment" value="'.dol_escape_htmltag(GETPOST('comment', 'alpha')).'"></td>';
        print '<td class="nohover right">';
        print '<input type="submit" class="button" name="close" value="'.$langs->trans("Disable").'"> &nbsp; ';
        print '<input type="submit" class="button button-cancel" name="cancel" value="'.$langs->trans("Cancel").'">';
        print '</td>';
        print '</tr>';

        print '</table>';

        print '</form>';
      }
      print '</div>';
      $cursorline++;
    }
    print '</div>';

    // Form to add new line
    if ($user->rights->contrat->creer && ($object->statut == 0))
    {
      $dateSelector = 1;

      print "\n";
      print ' <form name="addproduct" id="addproduct" action="'.$_SERVER["PHP_SELF"].'?id='.$object->id.(($action != 'editline') ? '#add' : '#line_'.GETPOST('lineid')).'" method="POST">
      <input type="hidden" name="token" value="'.newToken().'">
      <input type="hidden" name="action" value="'.(($action != 'editline') ? 'addline' : 'updateline').'">
      <input type="hidden" name="mode" value="">
      <input type="hidden" name="id" value="'.$object->id.'">
      ';

      print '<div class="div-table-responsive-no-min">';
      print '<table id="tablelines" class="noborder noshadow" width="100%">'; // Array with (n*2)+1 lines

      // Form to add new line
        if ($action != 'editline')
      {
        $forcetoshowtitlelines = 1;
        if (empty($object->multicurrency_code)) $object->multicurrency_code = $conf->currency; // TODO Remove this when multicurrency supported on contracts

        // Add free products/services
        $object->formAddObjectLine(1, $mysoc, $soc);

        $parameters = array();
        $reshook = $hookmanager->executeHooks('formAddObjectLine', $parameters, $object, $action); // Note that $action and $object may have been modified by hook
      }

      print '</table>';
      print '</div>';
      print '</form>';
    }

    print dol_get_fiche_end();


    /*
         * Buttons
         */

    if ($user->socid == 0)
    {
      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))
      {
        // Send
        if (empty($user->socid)) {
          if ($object->statut == 1) {
            if ((empty($conf->global->MAIN_USE_ADVANCED_PERMS) || $user->rights->contrat->creer)) {
              print '<div class="inline-block divButAction"><a class="butAction" href="'.$_SERVER["PHP_SELF"].'?id='.$object->id.'&action=presend&mode=init#formmailbeforetitle">'.$langs->trans('SendMail').'</a></div>';
            } else print '<div class="inline-block divButAction"><a class="butActionRefused classfortooltip" href="#">'.$langs->trans('SendMail').'</a></div>';
          }
        }

        if ($object->statut == 0 && $nbofservices)
        {
          if ($user->rights->contrat->creer) print '<div class="inline-block divButAction"><a class="butAction" href="'.$_SERVER["PHP_SELF"].'?id='.$object->id.'&amp;action=valid">'.$langs->trans("Validate").'</a></div>';
          else print '<div class="inline-block divButAction"><a class="butActionRefused classfortooltip" href="#" title="'.$langs->trans("NotEnoughPermissions").'">'.$langs->trans("Validate").'</a></div>';
        }
        if ($object->statut == 1)
        {
          if ($user->rights->contrat->creer) print '<div class="inline-block divButAction"><a class="butAction" href="'.$_SERVER["PHP_SELF"].'?id='.$object->id.'&amp;action=reopen">'.$langs->trans("Modify").'</a></div>';
          else print '<div class="inline-block divButAction"><a class="butActionRefused classfortooltip" href="#" title="'.$langs->trans("NotEnoughPermissions").'">'.$langs->trans("Modify").'</a></div>';
        }

        if (!empty($conf->commande->enabled) && $object->statut > 0 && $object->nbofservicesclosed < $nbofservices)
        {
          $langs->load("orders");
          if ($user->rights->commande->creer) print '<div class="inline-block divButAction"><a class="butAction" href="'.DOL_URL_ROOT.'/commande/card.php?action=create&amp;origin='.$object->element.'&amp;originid='.$object->id.'&amp;socid='.$object->thirdparty->id.'">'.$langs->trans("CreateOrder").'</a></div>';
          else print '<div class="inline-block divButAction"><a class="butActionRefused classfortooltip" href="#" title="'.$langs->trans("NotEnoughPermissions").'">'.$langs->trans("CreateOrder").'</a></div>';
        }

        if (!empty($conf->facture->enabled) && $object->statut > 0)
        {
          $langs->load("bills");
          if ($user->rights->facture->creer) print '<div class="inline-block divButAction"><a class="butAction" href="'.DOL_URL_ROOT.'/compta/facture/card.php?action=create&amp;origin='.$object->element.'&amp;originid='.$object->id.'&amp;socid='.$object->thirdparty->id.'">'.$langs->trans("CreateBill").'</a></div>';
          else print '<div class="inline-block divButAction"><a class="butActionRefused classfortooltip" href="#" title="'.$langs->trans("NotEnoughPermissions").'">'.$langs->trans("CreateBill").'</a></div>';
        }

        if ($object->nbofservicesclosed > 0 || $object->nbofserviceswait > 0)
        {
          if ($user->rights->contrat->activer)
          {
            print '<div class="inline-block divButAction"><a class="butAction" id="btnactivateall" href="'.$_SERVER["PHP_SELF"].'?id='.$object->id.'&amp;action=activate">'.$langs->trans("ActivateAllContracts").'</a></div>';
          } else {
            print '<div class="inline-block divButAction"><a class="butActionRefused classfortooltip" id="btnactivateall" href="#">'.$langs->trans("ActivateAllContracts").'</a></div>';
          }
        }
        if ($object->nbofservicesclosed < $nbofservices)
        {
          if ($user->rights->contrat->desactiver)
          {
            print '<div class="inline-block divButAction"><a class="butAction" id="btncloseall" href="'.$_SERVER["PHP_SELF"].'?id='.$object->id.'&amp;action=close">'.$langs->trans("CloseAllContracts").'</a></div>';
          } else {
            print '<div class="inline-block divButAction"><a class="butActionRefused classfortooltip" id="btncloseall" href="#">'.$langs->trans("CloseAllContracts").'</a></div>';
          }

          //if (! $numactive)
          //{
          //}
          //else
          //{
          //  print '<div class="inline-block divButAction"><a class="butActionRefused classfortooltip" href="#" title="'.$langs->trans("CloseRefusedBecauseOneServiceActive").'">'.$langs->trans("Close").'</a></div>';
          //}
        }

        if (!empty($conf->global->CONTRACT_HIDE_CLOSED_SERVICES_BY_DEFAULT) && $object->nbofservicesclosed > 0)
        {
          if ($action == 'showclosedlines') print '<div class="inline-block divButAction"><a class="butAction" id="btnhideclosedlines" href="'.$_SERVER["PHP_SELF"].'?id='.$object->id.'&amp;action=hideclosedlines">'.$langs->trans("HideClosedServices").'</a></div>';
          else print '<div class="inline-block divButAction"><a class="butAction" id="btnshowclosedlines" href="'.$_SERVER["PHP_SELF"].'?id='.$object->id.'&amp;action=showclosedlines">'.$langs->trans("ShowClosedServices").'</a></div>';
        }

        // Clone
        if ($user->rights->contrat->creer) {
          print '<div class="inline-block divButAction"><a class="butAction" href="'.$_SERVER['PHP_SELF'].'?id='.$object->id.'&amp;socid='.$object->socid.'&amp;action=clone&amp;object='.$object->element.'">'.$langs->trans("ToClone").'</a></div>';
        }

        // On peut supprimer entite si
        // - Droit de creer + mode brouillon (erreur creation)
        // - Droit de supprimer
        if (($user->rights->contrat->creer && $object->statut == $object::STATUS_DRAFT) || $user->rights->contrat->supprimer)
        {
          print '<div class="inline-block divButAction"><a class="butActionDelete" href="'.$_SERVER["PHP_SELF"].'?id='.$object->id.'&amp;action=delete&amp;token='.newToken().'">'.$langs->trans("Delete").'</a></div>';
        } else {
          print '<div class="inline-block divButAction"><a class="butActionRefused classfortooltip" href="#" title="'.dol_escape_htmltag($langs->trans("NotAllowed")).'">'.$langs->trans("Delete").'</a></div>';
        }
      }

      print "</div>";
    }

    // Select mail models is same action as presend
    if (GETPOST('modelselected')) {
      $action = 'presend';
    }

    if ($action != 'presend')
    {
      print '<div class="fichecenter"><div class="fichehalfleft">';

      /*
         * Documents generes
        */
      $filename = dol_sanitizeFileName($object->ref);
      $filedir = $conf->contrat->multidir_output[$object->entity]."/".dol_sanitizeFileName($object->ref);
      $urlsource = $_SERVER["PHP_SELF"]."?id=".$object->id;
      $genallowed = $user->rights->contrat->lire;
      $delallowed = $user->rights->contrat->creer;


      print $formfile->showdocuments('contract', $filename, $filedir, $urlsource, $genallowed, $delallowed, ($object->model_pdf ? $object->model_pdf : $conf->global->CONTRACT_ADDON_PDF), 1, 0, 0, 28, 0, '', 0, '', $soc->default_lang, '', $object);


      // Show links to link elements
      $linktoelem = $form->showLinkToObjectBlock($object, null, array('contrat'));
      $somethingshown = $form->showLinkedObjectBlock($object, $linktoelem);


      print '</div><div class="fichehalfright"><div class="ficheaddleft">';

      $MAXEVENT = 10;

      $morehtmlcenter = dolGetButtonTitle($langs->trans('SeeAll'), '', 'fa fa-list-alt imgforviewmode', DOL_URL_ROOT.'/contrat/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, 'contract', $socid, 1, 'listactions', $MAXEVENT, '', $morehtmlcenter);

      print '</div></div></div>';
    }

    // Presend form
    $modelmail = 'contract';
    $defaulttopic = 'SendContractRef';
    $diroutput = $conf->contrat->multidir_output[$object->entity];
    $trackid = 'con'.$object->id;

    include DOL_DOCUMENT_ROOT.'/core/tpl/card_presend.tpl.php';
  }
}


llxFooter();

$db->close();
?>

<?php
if (!empty($conf->margin->enabled) && $action == 'editline')
{
    // TODO Why this ? To manage margin on contracts ?
  ?>
<script type="text/javascript">
$(document).ready(function() {
  var idprod = $("input[name='idprod']").val();
  var fournprice = $("input[name='fournprice']").val();
  var token = '<?php echo currentToken(); ?>';    // For AJAX Call we use old 'token' and not 'newtoken'
  if (idprod > 0) {
    $.post('<?php echo DOL_URL_ROOT; ?>/fourn/ajax/getSupplierPrices.php', {
      'idprod': idprod,
      'token': token
      }, function(data) {
      if (data.length > 0) {
        var options = '';
        var trouve=false;
        $(data).each(function() {
          options += '<option value="'+this.id+'" price="'+this.price+'"';
          if (fournprice > 0) {
            if (this.id == fournprice) {
              options += ' selected';
              $("#buying_price").val(this.price);
              trouve = true;
            }
          }
          options += '>'+this.label+'</option>';
        });
        options += '<option value=null'+(trouve?'':' selected')+'><?php echo $langs->trans("InputPrice"); ?></option>';
        $("#fournprice").html(options);
        if (trouve) {
          $("#buying_price").hide();
          $("#fournprice").show();
        }
        else {
          $("#buying_price").show();
        }
        $("#fournprice").change(function() {
          var selval = $(this).find('option:selected').attr("price");
          if (selval)
            $("#buying_price").val(selval).hide();
          else
            $('#buying_price').show();
        });
      }
      else {
        $("#fournprice").hide();
        $('#buying_price').show();
      }
    },
    'json');
  }
    else {
      $("#fournprice").hide();
      $('#buying_price').show();
    }
});
</script>
  <?php
}