card.php

Go to the documentation of this file.

<?php
/* Copyright (C) 2003   Rodolphe Quiedeville <rodolphe@quiedeville.org>
 * Copyright (C) 2004-2012  Laurent Destailleur  <eldy@users.sourceforge.net>
 * Copyright (C) 2005-2012  Regis Houssin        <regis.houssin@inodbox.com>
 * Copyright (C) 2012   Juanjo Menent        <jmenent@2byte.es>
 * Copyright (C) 2013       Florian Henry           <florian.henry@open-concept.pro>
 * Copyright (C) 2018-2024  Frédéric France         <frederic.france@free.fr>
 * Copyright (C) 2024   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/trip.lib.php';
require_once DOL_DOCUMENT_ROOT.'/compta/deplacement/class/deplacement.class.php';
require_once DOL_DOCUMENT_ROOT.'/core/class/html.formfile.class.php';
if (isModEnabled('project')) {
  require_once DOL_DOCUMENT_ROOT.'/projet/class/project.class.php';
}
 
// Load translation files required by the page
$langs->load("trips");
 
 
// Security check
$id = GETPOSTINT('id');
if ($user->socid) {
  $socid = $user->socid;
}
 
// Initialize a technical object to manage hooks of page. Note that conf->hooks_modules contains an array of hook context
$hookmanager->initHooks(array('tripsandexpensescard', 'globalcard'));
 
$result = restrictedArea($user, 'deplacement', $id, '');
 
$action = GETPOST('action', 'aZ09');
$confirm = GETPOST('confirm', 'alpha');
 
$object = new Deplacement($db);
 
$permissionnote = $user->hasRight('deplacement', 'creer'); // Used by the include of actions_setnotes.inc.php
 
 
/*
 * Actions
 */
 
include DOL_DOCUMENT_ROOT.'/core/actions_setnotes.inc.php'; // Must be include, not includ_once
 
if ($action == 'validate' && $user->hasRight('deplacement', 'creer')) {
  $object->fetch($id);
  if ($object->statut == Deplacement::STATUS_DRAFT) {
    $result = $object->setStatut(1);
    if ($result > 0) {
      header("Location: ".$_SERVER["PHP_SELF"]."?id=".$id);
      exit;
    } else {
      setEventMessages($object->error, $object->errors, 'errors');
    }
  }
} elseif ($action == 'classifyrefunded' && $user->hasRight('deplacement', 'creer')) {
  $object->fetch($id);
  if ($object->statut == Deplacement::STATUS_VALIDATED) {
    $result = $object->setStatut(Deplacement::STATUS_REFUNDED);
    if ($result > 0) {
      header("Location: ".$_SERVER["PHP_SELF"]."?id=".$id);
      exit;
    } else {
      setEventMessages($object->error, $object->errors, 'errors');
    }
  }
} elseif ($action == 'confirm_delete' && $confirm == "yes" && $user->hasRight('deplacement', 'supprimer')) {
  $result = $object->delete($user);
  if ($result >= 0) {
    header("Location: index.php");
    exit;
  } else {
    setEventMessages($object->error, $object->errors, 'errors');
  }
} elseif ($action == 'add' && $user->hasRight('deplacement', 'creer')) {
  if (!GETPOST('cancel', 'alpha')) {
    $error = 0;
 
    $object->date = dol_mktime(12, 0, 0, GETPOSTINT('remonth'), GETPOSTINT('reday'), GETPOSTINT('reyear'));
    $object->km = (float) price2num(GETPOST('km', 'alpha'), 'MU'); // Not 'int', it may be a formatted amount
    $object->type = GETPOST('type', 'alpha');
    $object->socid = GETPOSTINT('socid');
    $object->fk_user = GETPOSTINT('fk_user');
    $object->note_private = GETPOST('note_private', 'alpha');
    $object->note_public = GETPOST('note_public', 'alpha');
    $object->statut = Deplacement::STATUS_DRAFT;
 
    if (!$object->date) {
      setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("Date")), null, 'errors');
      $error++;
    }
    if ($object->type == '-1') {
      setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("Type")), null, 'errors');
      $error++;
    }
    if (!($object->fk_user > 0)) {
      setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("Person")), null, 'errors');
      $error++;
    }
 
    if (!$error) {
      $id = $object->create($user);
 
      if ($id > 0) {
        header("Location: ".$_SERVER["PHP_SELF"]."?id=".$id);
        exit;
      } else {
        setEventMessages($object->error, $object->errors, 'errors');
        $action = 'create';
      }
    } else {
      $action = 'create';
    }
  } else {
    header("Location: index.php");
    exit;
  }
} elseif ($action == 'update' && $user->hasRight('deplacement', 'creer')) {
  // Update record
  if (!GETPOST('cancel', 'alpha')) {
    $result = $object->fetch($id);
 
    $object->date = dol_mktime(12, 0, 0, GETPOSTINT('remonth'), GETPOSTINT('reday'), GETPOSTINT('reyear'));
    $object->km = (float) price2num(GETPOST('km', 'alpha'), 'MU'); // Not 'int', it may be a formatted amount
    $object->type = GETPOST('type', 'alpha');
    $object->socid = GETPOSTINT('socid');
    $object->fk_user = GETPOSTINT('fk_user');
    $object->note_private = GETPOST('note_private', 'alpha');
    $object->note_public = GETPOST('note_public', 'alpha');
 
    $result = $object->update($user);
 
    if ($result > 0) {
      header("Location: ".$_SERVER["PHP_SELF"]."?id=".$id);
      exit;
    } else {
      setEventMessages($object->error, $object->errors, 'errors');
    }
  } else {
    header("Location: ".$_SERVER["PHP_SELF"]."?id=".$id);
    exit;
  }
} elseif ($action == 'classin' && $user->hasRight('deplacement', 'creer')) {
  // Set into a project
  $object->fetch($id);
  $result = $object->setProject(GETPOSTINT('projectid'));
  if ($result < 0) {
    dol_print_error($db, $object->error);
  }
} elseif ($action == 'setdated' && $user->hasRight('deplacement', 'creer')) {
  // Set fields
  $dated = dol_mktime(GETPOSTINT('datedhour'), GETPOSTINT('datedmin'), GETPOSTINT('datedsec'), GETPOSTINT('datedmonth'), GETPOSTINT('datedday'), GETPOSTINT('datedyear'));
  $object->fetch($id);
  $result = $object->setValueFrom('dated', $dated, '', null, 'date', '', $user, 'DEPLACEMENT_MODIFY');
  if ($result < 0) {
    dol_print_error($db, $object->error);
  }
} elseif ($action == 'setkm' && $user->hasRight('deplacement', 'creer')) {
  $object->fetch($id);
  $result = $object->setValueFrom('km', GETPOSTINT('km'), '', null, 'text', '', $user, 'DEPLACEMENT_MODIFY');
  if ($result < 0) {
    dol_print_error($db, $object->error);
  }
}
 
 
/*
 * View
 */
 
llxHeader();
 
$form = new Form($db);
 
/*
 * Action create
*/
if ($action == 'create') {
  //WYSIWYG Editor
  require_once DOL_DOCUMENT_ROOT.'/core/class/doleditor.class.php';
 
  print load_fiche_titre($langs->trans("NewTrip"));
 
  $datec = dol_mktime(12, 0, 0, GETPOSTINT('remonth'), GETPOSTINT('reday'), GETPOSTINT('reyear'));
 
  print '<form name="add" action="'.$_SERVER["PHP_SELF"].'" method="POST">'."\n";
  print '<input type="hidden" name="token" value="'.newToken().'">';
  print '<input type="hidden" name="action" value="add">';
 
  print '<table class="border centpercent">';
 
  print "<tr>";
  print '<td class="fieldrequired">'.$langs->trans("Type").'</td><td>';
  $form->select_type_fees(GETPOSTINT('type'), 'type', 1);
  print '</td></tr>';
 
  print "<tr>";
  print '<td class="fieldrequired">'.$langs->trans("Person").'</td><td>';
  print $form->select_dolusers(GETPOSTINT('fk_user'), 'fk_user', 1, '', 0, '', '', 0, 0, 0, '', 0, '', 'maxwidth300');
  print '</td></tr>';
 
  print "<tr>";
  print '<td class="fieldrequired">'.$langs->trans("Date").'</td><td>';
  print $form->selectDate($datec ? $datec : -1, '', 0, 0, 0, 'add', 1, 1);
  print '</td></tr>';
 
  // Km
  print '<tr><td class="fieldrequired">'.$langs->trans("FeesKilometersOrAmout").'</td><td><input name="km" size="10" value="'.GETPOST("km").'"></td></tr>';
 
  // Company
  print "<tr>";
  print '<td>'.$langs->trans("CompanyVisited").'</td><td>';
  print $form->select_company(GETPOSTINT('socid'), 'socid', '', 1);
  print '</td></tr>';
 
  // Public note
  print '<tr>';
  print '<td class="tdtop">'.$langs->trans('NotePublic').'</td>';
  print '<td>';
 
  $doleditor = new DolEditor('note_public', GETPOST('note_public', 'restricthtml'), '', 200, 'dolibarr_notes', 'In', false, true, !getDolGlobalString('FCKEDITOR_ENABLE_NOTE_PUBLIC') ? 0 : 1, ROWS_8, '90%');
  print $doleditor->Create(1);
 
  print '</td></tr>';
 
  // Private note
  if (empty($user->socid)) {
    print '<tr>';
    print '<td class="tdtop">'.$langs->trans('NotePrivate').'</td>';
    print '<td>';
 
    $doleditor = new DolEditor('note_private', GETPOST('note_private', 'restricthtml'), '', 200, 'dolibarr_notes', 'In', false, true, !getDolGlobalString('FCKEDITOR_ENABLE_NOTE_PRIVATE') ? 0 : 1, ROWS_8, '90%');
    print $doleditor->Create(1);
 
    print '</td></tr>';
  }
 
  // Other attributes
  $parameters = array();
  $reshook = $hookmanager->executeHooks('formObjectOptions', $parameters, $object, $action); // Note that $action and $object may have been modified by hook
  print $hookmanager->resPrint;
 
  print '</table>';
 
  print '<br><div class="center">';
  print '<input class="button button-save" type="submit" value="'.$langs->trans("Save").'">';
  print '&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;';
  print '<input class="button button-cancel" type="submit" name="cancel" value="'.$langs->trans("Cancel").'">';
  print '</div>';
 
  print '</form>';
} elseif ($id) {
  $result = $object->fetch($id);
  if ($result > 0) {
    $head = trip_prepare_head($object);
 
    print dol_get_fiche_head($head, 'card', $langs->trans("TripCard"), 0, 'trip');
 
    if ($action == 'edit' && $user->hasRight('deplacement', 'creer')) {
      //WYSIWYG Editor
      require_once DOL_DOCUMENT_ROOT.'/core/class/doleditor.class.php';
 
      $soc = new Societe($db);
      if ($object->socid) {
        $soc->fetch($object->socid);
      }
 
      print '<form name="update" action="'.$_SERVER["PHP_SELF"].'" method="POST">'."\n";
      print '<input type="hidden" name="token" value="'.newToken().'">';
      print '<input type="hidden" name="action" value="update">';
      print '<input type="hidden" name="id" value="'.$id.'">';
 
      print '<table class="border centpercent">';
 
      // Ref
      print "<tr>";
      print '<td class="titlefield">'.$langs->trans("Ref").'</td><td>';
      print $object->ref;
      print '</td></tr>';
 
      // Type
      print "<tr>";
      print '<td class="fieldrequired">'.$langs->trans("Type").'</td><td>';
      $form->select_type_fees(GETPOSTINT('type') ? GETPOSTINT('type') : $object->type, 'type', 0);
      print '</td></tr>';
 
      // Who
      print "<tr>";
      print '<td class="fieldrequired">'.$langs->trans("Person").'</td><td>';
      print $form->select_dolusers(GETPOSTINT('fk_user') ? GETPOSTINT('fk_user') : $object->fk_user, 'fk_user', 0, '', 0, '', '', 0, 0, 0, '', 0, '', 'maxwidth300');
      print '</td></tr>';
 
      // Date
      print '<tr><td class="fieldrequired">'.$langs->trans("Date").'</td><td>';
      print $form->selectDate($object->date, '', 0, 0, 0, 'update', 1, 0);
      print '</td></tr>';
 
      // Km
      print '<tr><td class="fieldrequired">'.$langs->trans("FeesKilometersOrAmout").'</td><td>';
      print '<input name="km" class="flat" size="10" value="'.$object->km.'">';
      print '</td></tr>';
 
      // Where
      print "<tr>";
      print '<td>'.$langs->trans("CompanyVisited").'</td><td>';
      print $form->select_company($soc->id, 'socid', '', 1);
      print '</td></tr>';
 
      // Public note
      print '<tr><td class="tdtop">'.$langs->trans("NotePublic").'</td>';
      print '<td>';
 
      $doleditor = new DolEditor('note_public', $object->note_public, '', 200, 'dolibarr_notes', 'In', false, true, !getDolGlobalString('FCKEDITOR_ENABLE_NOTE_PUBLIC') ? 0 : 1, ROWS_8, '90%');
      print $doleditor->Create(1);
 
      print "</td></tr>";
 
      // Private note
      if (empty($user->socid)) {
        print '<tr><td class="tdtop">'.$langs->trans("NotePrivate").'</td>';
        print '<td>';
 
        $doleditor = new DolEditor('note_private', $object->note_private, '', 200, 'dolibarr_notes', 'In', false, true, !getDolGlobalString('FCKEDITOR_ENABLE_NOTE_PRIVATE') ? 0 : 1, ROWS_8, '90%');
        print $doleditor->Create(1);
 
        print "</td></tr>";
      }
 
      // Other attributes
      $parameters = array();
      $reshook = $hookmanager->executeHooks('formObjectOptions', $parameters, $object, $action); // Note that $action and $object may have been modified by hook
      print $hookmanager->resPrint;
 
      print '</table>';
 
      print '<br><div class="center">';
      print '<input type="submit" class="button button-save" value="'.$langs->trans("Save").'">';
      print '&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;';
      print '<input type="submit" name="cancel" class="button button-cancel" value="'.$langs->trans("Cancel").'">';
      print '</div>';
 
      print '</form>';
 
      print '</div>';
    } else {
      /*
       * Confirm delete trip
       */
      if ($action == 'delete') {
        print $form->formconfirm($_SERVER["PHP_SELF"]."?id=".urlencode((string) ($id)), $langs->trans("DeleteTrip"), $langs->trans("ConfirmDeleteTrip"), "confirm_delete");
      }
 
      $soc = new Societe($db);
      if ($object->socid) {
        $soc->fetch($object->socid);
      }
 
      print '<table class="border centpercent">';
 
      $linkback = '<a href="'.DOL_URL_ROOT.'/compta/deplacement/list.php'.(!empty($socid) ? '?socid='.$socid : '').'">'.$langs->trans("BackToList").'</a>';
 
      // Ref
      print '<tr><td width="25%">'.$langs->trans("Ref").'</td><td>';
      print $form->showrefnav($object, 'id', $linkback, 1, 'rowid', 'ref', '');
      print '</td></tr>';
 
      $form->load_cache_types_fees();
 
      // Type
      print '<tr><td>';
      print $form->editfieldkey("Type", 'type', $langs->trans($object->type), $object, $user->hasRight('deplacement', 'creer'), 'select:types_fees');
      print '</td><td>';
      print $form->editfieldval("Type", 'type', $form->cache_types_fees[$object->type], $object, $user->hasRight('deplacement', 'creer'), 'select:types_fees');
      print '</td></tr>';
 
      // Who
      print '<tr><td>'.$langs->trans("Person").'</td><td>';
      $userfee = new User($db);
      $userfee->fetch($object->fk_user);
      print $userfee->getNomUrl(1);
      print '</td></tr>';
 
      // Date
      print '<tr><td>';
      print $form->editfieldkey("Date", 'dated', $object->date, $object, $user->hasRight('deplacement', 'creer'), 'datepicker');
      print '</td><td>';
      print $form->editfieldval("Date", 'dated', $object->date, $object, $user->hasRight('deplacement', 'creer'), 'datepicker');
      print '</td></tr>';
 
      // Km/Price
      print '<tr><td class="tdtop">';
      print $form->editfieldkey("FeesKilometersOrAmout", 'km', $object->km, $object, $user->hasRight('deplacement', 'creer'), 'numeric:6');
      print '</td><td>';
      print $form->editfieldval("FeesKilometersOrAmout", 'km', $object->km, $object, $user->hasRight('deplacement', 'creer'), 'numeric:6');
      print "</td></tr>";
 
      // Where
      print '<tr><td>'.$langs->trans("CompanyVisited").'</td>';
      print '<td>';
      if ($soc->id) {
        print $soc->getNomUrl(1);
      }
      print '</td></tr>';
 
      // Project
      if (isModEnabled('project')) {
        $langs->load('projects');
        print '<tr>';
        print '<td>';
 
        print '<table class="nobordernopadding" width="100%"><tr><td>';
        print $langs->trans('Project');
        print '</td>';
        if ($action != 'classify' && $user->hasRight('deplacement', 'creer')) {
          print '<td class="right"><a href="'.$_SERVER["PHP_SELF"].'?action=classify&token='.newToken().'&id='.$object->id.'">';
          print img_edit($langs->trans('SetProject'), 1);
          print '</a></td>';
        }
        print '</tr></table>';
        print '</td><td colspan="3">';
        if ($action == 'classify') {
          $form->form_project($_SERVER['PHP_SELF'].'?id='.$object->id, $object->socid, $object->fk_project, 'projectid', 0, 0, 1);
        } else {
          $form->form_project($_SERVER['PHP_SELF'].'?id='.$object->id, $object->socid, $object->fk_project, 'none', 0, 0);
        }
        print '</td>';
        print '</tr>';
      }
 
      // Statut
      print '<tr><td>'.$langs->trans("Status").'</td><td>'.$object->getLibStatut(4).'</td></tr>';
 
      // Other attributes
      $parameters = array('socid' => $object->id);
      include DOL_DOCUMENT_ROOT.'/core/tpl/extrafields_view.tpl.php';
 
      print "</table><br>";
 
      // Notes
      $blocname = 'notes';
      $title = $langs->trans('Notes');
      include DOL_DOCUMENT_ROOT.'/core/tpl/bloc_showhide.tpl.php';
 
      print '</div>';
 
      /*
       * Action bar
       */
      print '<div class="tabsAction">';
 
      if ($object->statut < Deplacement::STATUS_REFUNDED) {   // if not refunded
        if ($user->hasRight('deplacement', 'creer')) {
          print '<a class="butAction" href="'.$_SERVER["PHP_SELF"].'?action=edit&token='.newToken().'&id='.$id.'">'.$langs->trans('Modify').'</a>';
        } else {
          print '<a class="butActionRefused classfortooltip" href="#" title="'.dol_escape_htmltag($langs->trans("NotAllowed")).'">'.$langs->trans('Modify').'</a>';
        }
      }
 
      if ($object->statut == Deplacement::STATUS_DRAFT) {   // if draft
        if ($user->hasRight('deplacement', 'creer')) {
          print '<a class="butAction" href="'.$_SERVER["PHP_SELF"].'?action=validate&id='.$id.'">'.$langs->trans('Validate').'</a>';
        } else {
          print '<a class="butActionRefused classfortooltip" href="#" title="'.dol_escape_htmltag($langs->trans("NotAllowed")).'">'.$langs->trans('Validate').'</a>';
        }
      }
 
      if ($object->statut == Deplacement::STATUS_VALIDATED) {   // if validated
        if ($user->hasRight('deplacement', 'creer')) {
          print '<a class="butAction" href="'.$_SERVER["PHP_SELF"].'?action=classifyrefunded&token='.newToken().'&id='.$id.'">'.$langs->trans('ClassifyRefunded').'</a>';
        } else {
          print '<a class="butActionRefused classfortooltip" href="#" title="'.dol_escape_htmltag($langs->trans("NotAllowed")).'">'.$langs->trans('ClassifyRefunded').'</a>';
        }
      }
 
      $permissiontodelete = $user->hasRight('deplacement', 'supprimer');
      print dolGetButtonAction($langs->trans("Delete"), '', 'delete', $_SERVER["PHP_SELF"].'?id='.$object->id.'&action=delete&token='.newToken(), 'delete', $permissiontodelete);
 
      print '</div>';
    }
  } else {
    dol_print_error($db);
  }
}
 
// End of page
llxFooter();
$db->close();