25require 
"../main.inc.php";
 
   26require_once DOL_DOCUMENT_ROOT.
'/core/lib/company.lib.php';
 
   27require_once DOL_DOCUMENT_ROOT.
'/core/lib/functions2.lib.php';
 
   28require_once DOL_DOCUMENT_ROOT.
'/core/lib/contract.lib.php';
 
   29require_once DOL_DOCUMENT_ROOT.
'/core/class/html.formfile.class.php';
 
   30require_once DOL_DOCUMENT_ROOT.
'/contrat/class/contrat.class.php';
 
   31if (isModEnabled(
'project')) {
 
   32  require_once DOL_DOCUMENT_ROOT.
'/projet/class/project.class.php';
 
   33  require_once DOL_DOCUMENT_ROOT.
'/core/class/html.formprojet.class.php';
 
   37$langs->loadLangs(array(
"companies", 
"contracts"));
 
   39if (
GETPOST(
'actioncode', 
'array')) {
 
   40  $actioncode = 
GETPOST(
'actioncode', 
'array', 3);
 
   41  if (!count($actioncode)) {
 
   48$search_rowid = 
GETPOST(
'search_rowid');
 
   49$search_agenda_label = 
GETPOST(
'search_agenda_label');
 
   51$action   = 
GETPOST(
'action', 
'alpha');
 
   52$confirm  = 
GETPOST(
'confirm', 
'alpha');
 
   58  $socid = $user->socid;
 
   62$fieldvalue = (!empty($id) ? $id : (!empty($ref) ? $ref : 
''));
 
   63$fieldtype = (!empty($id) ? 
'rowid' : 
'ref');
 
   64$result = 
restrictedArea($user, 
'contrat', $fieldvalue, 
'', 
'', 
'', $fieldtype);
 
   66$limit = 
GETPOST(
'limit', 
'int') ?
GETPOST(
'limit', 
'int') : $conf->liste_limit;
 
   67$sortfield = 
GETPOST(
'sortfield', 
'aZ09comma');
 
   68$sortorder = 
GETPOST(
'sortorder', 
'aZ09comma');
 
   69$page = GETPOSTISSET(
'pageplusone') ? (
GETPOST(
'pageplusone') - 1) : 
GETPOST(
"page", 
'int');
 
   70if (empty($page) || $page == -1) {
 
   73$offset = $limit * $page;
 
   77  $sortfield = 
'a.datep,a.id';
 
   80  $sortorder = 
'DESC,DESC';
 
   86if ($id > 0 || !empty($ref)) {
 
   87  $result = $object->fetch($id, $ref);
 
   91$hookmanager->initHooks(array(
'agendacontract', 
'globalcard'));
 
   93$permissiontoadd = $user->hasRight(
'contrat', 
'creer');     
 
  100$parameters = array(
'id' => $id, 
'ref' => $ref);
 
  101$reshook = $hookmanager->executeHooks(
'doActions', $parameters, $object, $action); 
 
  106if (empty($reshook)) {
 
  108  if (
GETPOST(
'cancel', 
'alpha') && !empty($backtopage)) {
 
  109    header(
"Location: ".$backtopage);
 
  114  if (
GETPOST(
'button_removefilter_x', 
'alpha') || 
GETPOST(
'button_removefilter.x', 
'alpha') || 
GETPOST(
'button_removefilter', 
'alpha')) { 
 
  116    $search_agenda_label = 
'';
 
  125$form = 
new Form($db);
 
  127if (isModEnabled(
'project')) {
 
  131if ($object->id > 0) {
 
  133  $module = (!empty($conf->global->CONTRACT_ADDON) ? $conf->global->CONTRACT_ADDON : 
'mod_contract_serpis');
 
  134  if (substr($module, 0, 13) == 
'mod_contract_' && substr($module, -3) == 
'php') {
 
  135    $module = substr($module, 0, 
dol_strlen($module) - 4);
 
  139    $modCodeContract = 
new $module();
 
  142  require_once DOL_DOCUMENT_ROOT.
'/core/lib/company.lib.php';
 
  143  require_once DOL_DOCUMENT_ROOT.
'/contrat/class/contrat.class.php';
 
  145  $object->fetch_thirdparty();
 
  147  $title = $langs->trans(
"Agenda");
 
  148  if (!empty($conf->global->MAIN_HTML_TITLE) && preg_match(
'/contractrefonly/', $conf->global->MAIN_HTML_TITLE) && $object->ref) {
 
  149    $title = $object->ref.
" - ".$title;
 
  153  if (isModEnabled(
'notification')) {
 
  154    $langs->load(
"mails");
 
  160  $linkback = 
'<a href="'.DOL_URL_ROOT.
'/societe/list.php?restore_lastsearch_values=1">'.$langs->trans(
"BackToList").
'</a>';
 
  163  if (!empty($modCodeContract->code_auto)) {
 
  164    $morehtmlref .= $object->ref;
 
  166    $morehtmlref .= $form->editfieldkey(
"", 
'ref', $object->ref, $object, $user->rights->contrat->creer, 
'string', 
'', 0, 3);
 
  167    $morehtmlref .= $form->editfieldval(
"", 
'ref', $object->ref, $object, $user->rights->contrat->creer, 
'string', 
'', 0, 2);
 
  172  $morehtmlref .= 
'<div class="refidno">';
 
  174  $morehtmlref .= $form->editfieldkey(
"RefCustomer", 
'ref_customer', $object->ref_customer, $object, $permtoedit, 
'string', 
'', 0, 1);
 
  175  $morehtmlref .= $form->editfieldval(
"RefCustomer", 
'ref_customer', $object->ref_customer, $object, $permtoedit, 
'string', 
'', 
null, 
null, 
'', 1, 
'getFormatedCustomerRef');
 
  177  $morehtmlref .= 
'<br>';
 
  178  $morehtmlref .= $form->editfieldkey(
"RefSupplier", 
'ref_supplier', $object->ref_supplier, $object, $permtoedit, 
'string', 
'', 0, 1);
 
  179  $morehtmlref .= $form->editfieldval(
"RefSupplier", 
'ref_supplier', $object->ref_supplier, $object, $permtoedit, 
'string', 
'', 
null, 
null, 
'', 1, 
'getFormatedSupplierRef');
 
  181  $morehtmlref .= 
'<br>'.$object->thirdparty->getNomUrl(1);
 
  182  if (empty($conf->global->MAIN_DISABLE_OTHER_LINK) && $object->thirdparty->id > 0) {
 
  183    $morehtmlref .= 
' (<a href="'.DOL_URL_ROOT.
'/contrat/list.php?socid='.$object->thirdparty->id.
'&search_name='.urlencode($object->thirdparty->name).
'">'.$langs->trans(
"OtherContracts").
'</a>)';
 
  186  if (isModEnabled(
'project')) {
 
  187    $langs->load(
"projects");
 
  188    $morehtmlref .= 
'<br>';
 
  190      $morehtmlref .= 
img_picto($langs->trans(
"Project"), 
'project', 
'class="pictofixedwidth"');
 
  191      if ($action != 
'classify') {
 
  192        $morehtmlref .= 
'<a class="editfielda" href="'.$_SERVER[
'PHP_SELF'].
'?action=classify&token='.newToken().
'&id='.$object->id.
'">'.
img_edit($langs->transnoentitiesnoconv(
'SetProject')).
'</a> ';
 
  194      $morehtmlref .= $form->form_project($_SERVER[
'PHP_SELF'].
'?id='.$object->id, $object->socid, $object->fk_project, ($action == 
'classify' ? 
'projectid' : 
'none'), 0, 0, 0, 1, 
'', 
'maxwidth300');
 
  196      if (!empty($object->fk_project)) {
 
  198        $proj->fetch($object->fk_project);
 
  199        $morehtmlref .= $proj->getNomUrl(1);
 
  201          $morehtmlref .= 
'<span class="opacitymedium"> - '.dol_escape_htmltag($proj->title).
'</span>';
 
  206  $morehtmlref .= 
'</div>';
 
  208  dol_banner_tab($object, 
'ref', $linkback, 1, 
'ref', 
'none', $morehtmlref);
 
  210  print 
'<div class="fichecenter">';
 
  212  print 
'<div class="underbanner clearboth"></div>';
 
  214  $object->info($object->id);
 
  246  if (isModEnabled(
'agenda')) {
 
  247    if ($user->hasRight(
'agenda', 
'myactions', 
'create') || $user->hasRight(
'agenda', 
'allactions', 
'create')) {
 
  248      $backtopage = $_SERVER[
'PHP_SELF'].
'?id='.$object->id;
 
  249      $out = 
'&origin='.$object->element.
'&originid='.$object->id.
'&backtopage='.urlencode($backtopage);
 
  250      $newcardbutton .= 
dolGetButtonTitle($langs->trans(
'AddAction'), 
'', 
'fa fa-plus-circle', DOL_URL_ROOT.
'/comm/action/card.php?action=create'.$out);
 
  254  if (isModEnabled(
'agenda') && ($user->hasRight(
'agenda', 
'myactions', 
'read') || $user->hasRight(
'agenda', 
'allactions', 
'read'))) {
 
  257    $param = 
'&id='.$object->id;
 
  258    if (!empty($contextpage) && $contextpage != $_SERVER[
"PHP_SELF"]) {
 
  259      $param .= 
'&contextpage='.$contextpage;
 
  261    if ($limit > 0 && $limit != $conf->liste_limit) {
 
  262      $param .= 
'&limit='.$limit;
 
  266    require_once DOL_DOCUMENT_ROOT.
'/core/lib/memory.lib.php';
 
  267    $cachekey = 
'count_events_thirdparty_'.$object->id;
 
  270    print 
load_fiche_titre($langs->trans(
"ActionsOnContract").(is_numeric($nbEvent) ? 
'<span class="opacitymedium colorblack paddingleft">('.$nbEvent.
')</span>': 
''), $newcardbutton, 
'');
 
  275    $filters[
'search_agenda_label'] = $search_agenda_label;
 
  276    $filters[
'search_rowid'] = $search_rowid;
 
  279    show_actions_done($conf, $langs, $db, $object, 
null, 0, $actioncode, 
'', $filters, $sortfield, $sortorder);
 
if(!defined('NOREQUIRESOC')) if(!defined( 'NOREQUIRETRAN')) if(!defined('NOTOKENRENEWAL')) if(!defined( 'NOREQUIREMENU')) if(!defined('NOREQUIREHTML')) if(!defined( 'NOREQUIREAJAX')) llxHeader()
Empty header.
 
Class to manage contracts.
 
Class to manage projects.
 
show_actions_done($conf, $langs, $db, $filterobj, $objcon='', $noprint=0, $actioncode='', $donetodo='done', $filters=array(), $sortfield='a.datep, a.id', $sortorder='DESC', $module='')
Show html area with actions (done or not, ignore the name of function).
 
contract_prepare_head(Contrat $object)
Prepare array with list of tabs.
 
dol_print_object_info($object, $usetable=0)
Show informations on an object TODO Move this into html.formother.
 
dol_banner_tab($object, $paramid, $morehtml='', $shownav=1, $fieldid='rowid', $fieldref='ref', $morehtmlref='', $moreparam='', $nodbprefix=0, $morehtmlleft='', $morehtmlstatus='', $onlybanner=0, $morehtmlright='')
Show tab footer of a card.
 
load_fiche_titre($titre, $morehtmlright='', $picto='generic', $pictoisfullpath=0, $id='', $morecssontable='', $morehtmlcenter='')
Load a title with picto.
 
dol_get_fiche_head($links=array(), $active='', $title='', $notab=0, $picto='', $pictoisfullpath=0, $morehtmlright='', $morecss='', $limittoshow=0, $moretabssuffix='', $dragdropfile=0)
Show tabs of a record.
 
dolGetButtonTitle($label, $helpText='', $iconClass='fa fa-file', $url='', $id='', $status=1, $params=array())
Function dolGetButtonTitle : this kind of buttons are used in title in list.
 
dol_get_fiche_end($notab=0)
Return tab footer of a card.
 
dol_strlen($string, $stringencoding='UTF-8')
Make a strlen call.
 
img_picto($titlealt, $picto, $moreatt='', $pictoisfullpath=false, $srconly=0, $notitle=0, $alt='', $morecss='', $marginleftonlyshort=2)
Show picto whatever it's its name (generic function)
 
if(!function_exists( 'dol_getprefix')) dol_include_once($relpath, $classname='')
Make an include_once using default root and alternate root if it fails.
 
GETPOST($paramname, $check='alphanohtml', $method=0, $filter=null, $options=null, $noreplace=0)
Return value of a param into GET or POST supervariable.
 
setEventMessages($mesg, $mesgs, $style='mesgs', $messagekey='', $noduplicate=0)
Set event messages in dol_events session object.
 
getDolGlobalString($key, $default='')
Return dolibarr global constant string value.
 
img_edit($titlealt='default', $float=0, $other='')
Show logo editer/modifier fiche.
 
dol_getcache($memoryid)
Read a memory area shared by all users, all sessions on server.
 
restrictedArea(User $user, $features, $object=0, $tableandshare='', $feature2='', $dbt_keyfield='fk_soc', $dbt_select='rowid', $isdraft=0, $mode=0)
Check permissions of a user to show a page and an object.