contact.php

Go to the documentation of this file.

<?php
/* Copyright (C) 2005   Patrick Rouillon      <patrick@rouillon.net>
 * Copyright (C) 2005-2009  Destailleur Laurent     <eldy@users.sourceforge.net>
 * Copyright (C) 2005-2012  Regis Houssin       <regis.houssin@inodbox.com>
 * Copyright (C) 2017   Ferran Marcet       <fmarcet@2byte.es>
 * Copyright (C) 2023       Christian Foellmann     <christian@foellmann.de>
 * Copyright (C) 2024   Alexandre Spangaro      <alexandre@inovea-conseil.com>
 * Copyright (C) 2024-2026  Frédéric France       <frederic.france@free.fr>
 * Copyright (C) 2025   MDW             <mdeweerd@users.noreply.github.com>
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 3 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program. If not, see <https://www.gnu.org/licenses/>.
 */
 
// Load Dolibarr environment
require '../main.inc.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.'/contact/class/contact.class.php';
require_once DOL_DOCUMENT_ROOT.'/core/class/html.formcompany.class.php';
if (isModEnabled('project')) {
  require_once DOL_DOCUMENT_ROOT.'/projet/class/project.class.php';
}
 
// Load translation files required by the page
$langs->loadLangs(array('contracts', 'companies'));
 
$action = GETPOST('action', 'aZ09');
$confirm = GETPOST('confirm', 'alpha');
$socid = GETPOSTINT('socid');
$id = GETPOSTINT('id');
$ref = GETPOST('ref', 'alpha');
 
// Security check
if ($user->socid) {
  $socid = $user->socid;
}
 
$object = new Contrat($db);
 
// Initialize a technical object to manage hooks of page. Note that conf->hooks_modules contains an array of hook context
$hookmanager->initHooks(array('contractcontactcard', 'globalcard'));
 
$permissiontoadd   = $user->hasRight('contrat', 'creer');     //  Used by the include of actions_addupdatedelete.inc.php and actions_lineupdown.inc.php
 
$result = restrictedArea($user, 'contrat', $object->id);
 
 
/*
 * Actions
 */
 
$parameters = array('id' => $id);
$reshook = $hookmanager->executeHooks('doActions', $parameters, $object, $action);
if ($reshook < 0) {
  setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
}
 
if (empty($reshook)) {
  // Add new contact
  if ($action == 'addcontact' && $user->hasRight('contrat', 'creer')) {
    $result = $object->fetch($id);
 
    if ($result > 0 && $id > 0) {
      $contactid = (GETPOST('userid') ? GETPOSTINT('userid') : GETPOSTINT('contactid'));
      $typeid    = (GETPOST('typecontact') ? GETPOST('typecontact') : GETPOST('type'));
      $result    = $object->add_contact($contactid, $typeid, GETPOST("source", 'aZ09'));
    }
 
    if ($result >= 0) {
      header("Location: ".$_SERVER['PHP_SELF']."?id=".$object->id);
      exit;
    } else {
      if ($object->error == 'DB_ERROR_RECORD_ALREADY_EXISTS') {
        $langs->load("errors");
        $mesg = $langs->trans("ErrorThisContactIsAlreadyDefinedAsThisType");
      } else {
        $mesg = $object->error;
      }
 
      setEventMessages($mesg, null, 'errors');
    }
  }
 
  // Toggle the status of a contact
  if ($action == 'swapstatut' && $user->hasRight('contrat', 'creer')) {
    if ($object->fetch($id)) {
      $result = $object->swapContactStatus(GETPOSTINT('ligne'));
    } else {
      dol_print_error($db, $object->error);
    }
  }
 
  // Delete contact
  if ($action == 'deletecontact' && $user->hasRight('contrat', 'creer')) {
    $object->fetch($id);
    $result = $object->delete_contact(GETPOSTINT("lineid"));
 
    if ($result >= 0) {
      header("Location: ".$_SERVER['PHP_SELF']."?id=".$object->id);
      exit;
    }
  }
}
 
/*
 * View
 */
 
$title = $langs->trans("Contract");
$help_url = 'EN:Module_Contracts|FR:Module_Contrat|ES:Contratos_de_servicio';
 
llxHeader('', $title, $help_url, '', 0, 0, '', '', '', 'mod-contrat page-card_contact');
 
$form = new Form($db);
$formcompany = new FormCompany($db);
$contactstatic = new Contact($db);
$userstatic = new User($db);
 
/* *************************************************************************** */
/*                                                                             */
/* Card view and edit mode                                                     */
/*                                                                             */
/* *************************************************************************** */
 
if ($id > 0 || !empty($ref)) {
  if ($object->fetch($id, $ref) > 0) {
    $object->fetch_thirdparty();
 
    $head = contract_prepare_head($object);
 
    $hselected = '1';
 
    print dol_get_fiche_head($head, $hselected, $langs->trans("Contract"), -1, 'contract');
 
    // 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,0,'string','',0,3);
      $morehtmlref.=$form->editfieldval("",'ref',$object->ref,0,'string','',0,2);
    }*/
 
    $morehtmlref .= '<div class="refidno">';
    // Ref customer
    $morehtmlref .= $form->editfieldkey("RefCustomer", 'ref_customer', $object->ref_customer, $object, 0, 'string', '', 0, 1);
    $morehtmlref .= $form->editfieldval("RefCustomer", 'ref_customer', $object->ref_customer, $object, 0, 'string', '', null, null, '', 1, 'getFormatedCustomerRef');
    // Ref supplier
    $morehtmlref .= '<br>';
    $morehtmlref .= $form->editfieldkey("RefSupplier", 'ref_supplier', $object->ref_supplier, $object, 0, 'string', '', 0, 1);
    $morehtmlref .= $form->editfieldval("RefSupplier", 'ref_supplier', $object->ref_supplier, $object, 0, 'string', '', null, null, '', 1, 'getFormatedSupplierRef');
    // Thirdparty
    $morehtmlref .= '<br>'.$object->thirdparty->getNomUrl(1);
    if (!getDolGlobalString('MAIN_DISABLE_OTHER_LINK') && $object->thirdparty->id > 0) {
      $morehtmlref .= ' <span class="otherlink valignmiddle">(<a href="'.DOL_URL_ROOT.'/contrat/list.php?socid='.$object->thirdparty->id.'&search_name='.urlencode($object->thirdparty->name).'">'.$langs->trans("OtherContracts").'</a>)</span>';
    }
    // Project
    if (isModEnabled('project')) {
      $langs->load("projects");
      $morehtmlref .= '<br>';
      if (0) {  // @phpstan-ignore-line
        $morehtmlref .= img_picto($langs->trans("Project"), 'project', 'class="pictofixedwidth"');
        if ($action != 'classify') {
          $morehtmlref .= '<a class="editfielda" href="'.dolBuildUrl($_SERVER['PHP_SELF'], ['action' => 'classify', 'id' => $object->id], true).'">'.img_edit($langs->transnoentitiesnoconv('SetProject')).'</a> ';
        }
        $morehtmlref .= $form->form_project($_SERVER['PHP_SELF'].'?id='.$object->id, $object->socid, (string) $object->fk_project, ($action == 'classify' ? 'projectid' : 'none'), 0, 0, 0, 1, '', 'maxwidth300');
      } else {
        if (!empty($object->fk_project)) {
          $proj = new Project($db);
          $proj->fetch($object->fk_project);
          $morehtmlref .= $proj->getNomUrl(1);
          if ($proj->title) {
            $morehtmlref .= '<span class="opacitymedium"> - '.dol_escape_htmltag($proj->title).'</span>';
          }
        }
      }
    }
    $morehtmlref .= '</div>';
 
 
    dol_banner_tab($object, 'ref', $linkback, 1, 'ref', 'none', $morehtmlref);
 
 
    print '<div class="fichecenter">';
    print '<div class="underbanner clearboth"></div>';
 
    print '<table class="border tableforfield" width="100%">';
 
 
    // Third-party discount info
    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 '<span class="hideonsmartphone opacitymedium">'.$langs->trans("CompanyHasNoRelativeDiscount").'</span>';
    }
    $absolute_discount = $object->thirdparty->getAvailableDiscounts();
    print '. ';
    if ($absolute_discount) {
      print $langs->trans("CompanyHasAbsoluteDiscount", price($absolute_discount), $langs->trans("Currency".$conf->currency));
    } else {
      print '<span class="hideonsmartphone opacitymedium">'.$langs->trans("CompanyHasNoAbsoluteDiscount").'</span>';
    }
    print '</td></tr>';
 
    // Date
    print '<tr>';
    print '<td class="titlefield">';
    print $form->editfieldkey("Date", 'date_contrat', $object->date_contrat, $object, 0);
    print '</td><td>';
    print $form->editfieldval("Date", 'date_contrat', $object->date_contrat, $object, 0, 'datehourpicker');
    print '</td>';
    print '</tr>';
 
    print "</table>";
 
    print '</div>';
 
    print dol_get_fiche_end();
 
    print '<br>';
 
    // Contacts lines
    include DOL_DOCUMENT_ROOT.'/core/tpl/contacts.tpl.php';
  } else {
    recordNotFound('', 0);
  }
}
 
 
llxFooter();
$db->close();