ea54342891
* FIX Drag and drop of a file reports a wrong error, or none at all
The error handler of dragAndDropFileUpload() had three defects that all end on
the user believing the file was attached when it was not.
- The first assignment of the message was dead code, there was no return after
the test on the http code 403, so a refusal was reported as a generic error.
- The key ErrorUploadPermissionDenied it used exists in no language file, so
the raw key was shown.
- JSON.parse() was called with no try/catch on an answer that is not always a
json, a fatal error of the endpoint or a request over post_max_size for
example. The exception left the user on a page with no message at all.
- An empty list of files was treated as a success, while it means the endpoint
stored nothing.
The value of PHP_SELF is also escaped before it is written into the 6 generated
javascript strings. It holds the path info of the request on a server that
accepts it, so it is a user input. dol_escape_js() is called with the mode that
escapes a double quote by a double quote, the strings being delimited by double
quotes, and the sequence '</' is escaped too because the function does not do it
and the path info could otherwise close the script tag and open one of its own.
Adds the key ErrorOnAtLeastOneFileUpload to en_US, used when some files of a
batch failed and some did not.
* FIX getMultidirOutput returns a directory the Documents tab does not read
Four defects of the same function, all ending on a file stored where the user
will never see it, or written outside the documents directory.
- The ref of the project of a task was only passed through dol_sanitizePathName(),
which keeps a slash, a colon and the accented chars, while projet/tasks/document.php
sanitizes it with dol_sanitizeFileName(). A project ref holding a slash even
created an extra level of directory. Measured on real databases: 304 projects
over 330 hold a slash on one of them, carrying 701 tasks over 824.
- The same case calls $object->fetchProject() with no guard, while the signature
of the function accepts an object that is not a CommonObject, and even a null
when a module is given. Such a caller gets a fatal error where it expects the
error string. No core caller is in that case today, an external module or a
hook can be.
- The entity of the object may have no declared directory, an object shared by
another entity for example. The undefined index returned a relative path, so
the caller read or wrote under the web root. The current entity is used
instead, and the fallback is logged because the directory is then not the one
of the entity of the object, which matters for a caller that deletes files.
- When the current entity has no declared directory either, the fallback
returned the sub directory alone, again a relative path. The same error than
for a module that declares no directory at all is now returned.
Adds the sub directory of a partnership and of a stock transfer, which their own
document tabs already read.
* FIX getElementProperties answers wrong properties for 9 elements
A customer payment, a supplier payment, a various payment, a stock transfer and
the 4 objects of the hrm module had no properties at all, or wrong ones, so any
caller that resolves a class, a table or a document directory from an element
failed on them.
- payment, payment_supplier and payment_various had no branch. The branch of a
customer payment tests $elementType and not $element, because the rule on the
elements named myobject_mysubobject rewrites $element to 'payment' for
'payment_salary' too, which is stored somewhere else.
- job, position, skill and evaluation answered a wrong table (hrm_job_user for
a position, and so on) and no sub directory, while their document tabs read
one named after the element.
- stocktransfer answered an empty classname, because it is not the ucfirst() of
the element, so a caller doing new $classname($db) ended on a fatal error.
- The sub directory was concatenated even when the module is disabled and the
directory is empty, which answered a path at the root of the file system.
- A contact and a conference are stored into a sub directory their tab reads.
isModEnabled('invoice') is tested for a customer payment: there is no module
named 'compta', so testing it was always false, while $conf->compta->payment is
set unconditionally by Conf::setValues() and could not be used as a proxy.
* FIX Access refused to everyone on 11 objects of the core
restrictedArea() and checkUserAccessToObject() refuse the access to objects that
no permission and no rule can match, whatever the user, an administrator
included.
- The hrm module declares no permission at its first level, only 'all', and the
stocktransfer module only 'stocktransfer'. A check on the module itself
therefore tests a permission that does not exist. The mapping is the same one
as into User::hasRight().
- The module of an event organization declares no permission at all, its whole
permission block being commented out on purpose, and its cards check the
parent project instead. The feature is mapped onto that project, with the two
guards the card has: an external user is refused, and so is a conference with
no parent project, whose id of 0 would otherwise grant an access with no check
on the record at all.
- The default rule of checkUserAccessToObject() builds its sql on the columns
entity and fk_soc of the table. llx_asset, llx_paiement, llx_paiementfourn and
llx_workstation_workstation have no fk_soc, and llx_hrm_job, llx_hrm_job_user
and llx_hrm_skill have neither. The sql failed, so the access was refused to
every user this rule applies to. These tables are now checked on their entity
only, which is what the $check rule already does for the same class of tables,
and the 3 tables of hrm can be checked on nothing at all. The rule is selected
on the table and not on the element, because $object is an id and not an
object for most of the callers, the cards of an asset and of a workstation
included, which are broken today for any user without the permission to see
all third parties.
- An external user is refused explicitly on those tables: none of these objects
is linked to a third party, so the default rule refused him through a link
that does not exist, and the rules that replace it do not look at the third
party of the user at all.
Measured on a vanilla instance with 5 profiles, an administrator, an internal
user with every right, one without the permission to see all third parties, one
that is not a sales representative of the third party of the object, and an
external user: the 11 objects go from refused to granted for the internal users
and stay refused for the external one, and the 26 other elements answer exactly
the same for the 5 profiles.
* FIX A file dropped on a card is lost, or reported as refused when it was stored
FileUpload stores the file into a directory that the "Attached files" tab of the
object never reads, so the user attaches a file that no screen will ever show,
and nothing is indexed in database to find it back. Measured on real databases:
216487 thirdparties over 216887 and 157852 products over 280319 are in that case
on the cards that already enable the drag and drop.
- The directory of the object is now forged with get_exdir(), the way the tabs
do: it always uses the id for a thirdparty, whose ref is a company name and is
not unique, and it falls back on the id when the ref is empty. The sub
directory of the module is read with getMultidirOutput(), which knows the
elements that store their documents into one. That function does not return
an empty string when it fails but a string starting with 'error-', so only an
absolute path is accepted: writing into that string would create the files
under the web root.
- fetchObjectByElement() returns an object even when fetch() returned 0. The
object was then not loaded, and the file was stored at the root of the
directory of the module, out of any object. The constructor now throws, and
the endpoint answers the error with the same json contract than a successful
call so that the caller can show it, instead of a fatal error and an http 500.
- An attachment of the same name was silently overwritten, dol_move_uploaded_file()
being called with $allowoverwrite = 1 while the name was checked before the
ref of the object was added as a prefix. The check is done again on the final
name, and on the .noexe suffixed name too, which that function appends to an
executable file.
- An executable file was renamed with that .noexe suffix and then reported as an
error, while it was correctly stored.
- The endpoint called restrictedArea() with an empty feature when the element is
unknown, and the loop of that function then takes no branch at all and grants
the access with no check. It refuses before, with the same http code and the
same message than a refusal, so that a user cannot tell an object that exists
but is not allowed from an object that does not exist. The refusal of an
external user on an object of another third party answered a message of its
own, which allowed the same enumeration.
Comes with the tests of the path resolution, of the fallback of get_exdir(), of
the rejection of the error string of getMultidirOutput(), and of the file name
deduplication.
* FIX Remove the drop area from 13 cards where dropping a file is harmful
Two distinct groups, both of them removing a drop area that only produces a
result the user does not want.
7 pages have no "Attached files" tab at all, so a file dropped on them can be
reached by no screen: a fiscal year and its info page, an accounting model, a
webhook trigger history, an intracomm report, a bookcal calendar and its booking
list. Measured: 4 of them accepted the upload and wrote an orphan file, the
accounting model wrote it at the root of the directory of the module, out of any
object, and the 2 bookcal ones answered an http 500.
6 cards print their tabs inside their edit form, so the drop area covered that
form: a product, an expense report, a VAT payment, a social contribution, a loan
and a salary. Dropping a file there reloads the page, which discards what the
user is typing. A product and an expense report have a second call for the read
only view, so the drop area is only removed from the call of the edit branch;
the 4 others share a single call between both views, so the parameter is now
conditional.
* NEW Drag and drop a file on the 23 remaining cards
Every card of the core that owns an "Attached files" tab can now receive a file
by drag and drop, which was the case of 32 of them only. The 23 added here are
an asset, an event, a various payment, a customer payment, a contact, a donation,
a conference or booth, a shipment, a supplier payment, a leave request, an
evaluation, a job, a position, a skill, a knowledge record, a manufacturing
order, a partnership, a lot, a stock transfer, a task, a reception, a resource
and a workstation.
The tab bar of a leave request and of a resource is printed inside their edit
form, so the drop area is not enabled there: dropping a file reloads the page,
which would discard what the user is typing. The card of a supplier payment
prints its tab bar even when the object was not loaded, so the drop area is only
enabled when it is.
* FIX getMultidirOutput refuses an entity with no directory instead of falling back [skip-claudemd]
The previous revision of this PR fell back on the directory of the current
entity when the entity of the object had none, with a LOG_WARNING. On a
multicompany install that made a caller read, write and above all delete
files in the directory of another entity. Refuse instead: the function
already answers 'error-diroutput-not-defined-for-this-object' when the
module declares no directory at all, so the caller has one behaviour to
handle, not two.
The entity is cast to int, which is what the array index needs and what
silences the four PhanTypeMismatchDimFetchNullable this function reported.
---------
Co-authored-by: Laurent Destailleur <eldy@destailleur.fr>
3010 lines
114 KiB
PHP
3010 lines
114 KiB
PHP
<?php
|
|
/* Copyright (C) 2003 Rodolphe Quiedeville <rodolphe@quiedeville.org>
|
|
* Copyright (C) 2004-2020 Laurent Destailleur <eldy@users.sourceforge.net>
|
|
* Copyright (C) 2005-2009 Regis Houssin <regis.houssin@inodbox.com>
|
|
* Copyright (C) 2015-2023 Alexandre Spangaro <aspangaro@open-dsi.fr>
|
|
* Copyright (C) 2017 Ferran Marcet <fmarcet@2byte.es>
|
|
* Copyright (C) 2018-2026 Frédéric France <frederic.france@free.fr>
|
|
* Copyright (C) 2024-2025 MDW <mdeweerd@users.noreply.github.com>
|
|
* Copyright (C) 2025 Charlene Benke <charlene@patas-monkey.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/>.
|
|
*/
|
|
|
|
/**
|
|
* \file htdocs/expensereport/card.php
|
|
* \ingroup expensereport
|
|
* \brief Page for trip and expense report card
|
|
*/
|
|
|
|
// Load Dolibarr environment
|
|
require '../main.inc.php';
|
|
/**
|
|
* @var Conf $conf
|
|
* @var DoliDB $db
|
|
* @var ExtraFields $extrafields
|
|
* @var HookManager $hookmanager
|
|
* @var Societe $mysoc
|
|
* @var Translate $langs
|
|
* @var User $user
|
|
*
|
|
* @var string $dolibarr_main_url_root
|
|
*/
|
|
require_once DOL_DOCUMENT_ROOT.'/core/class/html.formexpensereport.class.php';
|
|
require_once DOL_DOCUMENT_ROOT.'/core/class/html.formfile.class.php';
|
|
require_once DOL_DOCUMENT_ROOT.'/core/class/html.formmail.class.php';
|
|
require_once DOL_DOCUMENT_ROOT.'/core/class/html.formprojet.class.php';
|
|
require_once DOL_DOCUMENT_ROOT.'/core/class/CMailFile.class.php';
|
|
require_once DOL_DOCUMENT_ROOT.'/projet/class/project.class.php';
|
|
require_once DOL_DOCUMENT_ROOT.'/ecm/class/ecmfiles.class.php';
|
|
require_once DOL_DOCUMENT_ROOT.'/compta/bank/class/account.class.php';
|
|
require_once DOL_DOCUMENT_ROOT.'/core/lib/expensereport.lib.php';
|
|
require_once DOL_DOCUMENT_ROOT.'/core/lib/price.lib.php';
|
|
require_once DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php';
|
|
require_once DOL_DOCUMENT_ROOT.'/core/lib/images.lib.php';
|
|
require_once DOL_DOCUMENT_ROOT.'/core/modules/expensereport/modules_expensereport.php';
|
|
require_once DOL_DOCUMENT_ROOT.'/expensereport/class/expensereport.class.php';
|
|
require_once DOL_DOCUMENT_ROOT.'/expensereport/class/paymentexpensereport.class.php';
|
|
require_once DOL_DOCUMENT_ROOT.'/core/class/doleditor.class.php';
|
|
if (isModEnabled('accounting')) {
|
|
require_once DOL_DOCUMENT_ROOT.'/accountancy/class/accountingjournal.class.php';
|
|
}
|
|
|
|
// Load translation files required by the page
|
|
$langs->loadLangs(array("trips", "bills", "mails"));
|
|
|
|
$action = GETPOST('action', 'aZ09');
|
|
$cancel = GETPOST('cancel', 'alpha');
|
|
$confirm = GETPOST('confirm', 'alpha');
|
|
$backtopage = GETPOST('backtopage', 'alpha');
|
|
|
|
$id = GETPOSTINT('id');
|
|
$date_start = dol_mktime(0, 0, 0, GETPOSTINT('date_debutmonth'), GETPOSTINT('date_debutday'), GETPOSTINT('date_debutyear'));
|
|
$date_end = dol_mktime(0, 0, 0, GETPOSTINT('date_finmonth'), GETPOSTINT('date_finday'), GETPOSTINT('date_finyear'));
|
|
$date = dol_mktime(0, 0, 0, GETPOSTINT('datemonth'), GETPOSTINT('dateday'), GETPOSTINT('dateyear'));
|
|
$fk_project = GETPOSTINT('fk_project');
|
|
$vatrate = GETPOST('vatrate', 'alpha');
|
|
$ref = GETPOST("ref", 'alpha');
|
|
$comments = GETPOST('comments', 'restricthtml');
|
|
$fk_c_type_fees = GETPOSTINT('fk_c_type_fees');
|
|
$socid = GETPOSTINT('socid') ? GETPOSTINT('socid') : GETPOSTINT('socid_id');
|
|
|
|
/** @var User $user */
|
|
$childids = $user->getAllChildIds(1);
|
|
|
|
if (getDolGlobalString('EXPENSEREPORT_PREFILL_DATES_WITH_CURRENT_MONTH')) {
|
|
if (empty($date_start)) {
|
|
$date_start = dol_mktime(0, 0, 0, (int) dol_print_date(dol_now(), '%m'), 1, (int) dol_print_date(dol_now(), '%Y'));
|
|
}
|
|
|
|
if (empty($date_end)) {
|
|
// date('t') => number of days in the month, so last day of the month too
|
|
$date_end = dol_mktime(0, 0, 0, (int) dol_print_date(dol_now(), '%m'), (int) date('t'), (int) dol_print_date(dol_now(), '%Y'));
|
|
}
|
|
}
|
|
|
|
// Hack to use expensereport dir
|
|
$rootfordata = DOL_DATA_ROOT;
|
|
$rootforuser = DOL_DATA_ROOT;
|
|
// If multicompany module is enabled, we redefine the root of data
|
|
if (isModEnabled('multicompany') && !empty($conf->entity) && $conf->entity > 1) {
|
|
$rootfordata .= '/'.$conf->entity;
|
|
}
|
|
$conf->expensereport->dir_output = $rootfordata.'/expensereport';
|
|
|
|
// Define $urlwithroot
|
|
$urlwithouturlroot = preg_replace('/'.preg_quote(DOL_URL_ROOT, '/').'$/i', '', trim($dolibarr_main_url_root));
|
|
$urlwithroot = $urlwithouturlroot.DOL_URL_ROOT; // This is to use external domain name found into config file
|
|
//$urlwithroot=DOL_MAIN_URL_ROOT; // This is to use same domain name than current
|
|
|
|
// PDF
|
|
$hidedetails = (GETPOSTINT('hidedetails') ? GETPOSTINT('hidedetails') : (getDolGlobalString('MAIN_GENERATE_DOCUMENTS_HIDE_DETAILS') ? 1 : 0));
|
|
$hidedesc = (GETPOSTINT('hidedesc') ? GETPOSTINT('hidedesc') : (getDolGlobalString('MAIN_GENERATE_DOCUMENTS_HIDE_DESC') ? 1 : 0));
|
|
$hideref = (GETPOSTINT('hideref') ? GETPOSTINT('hideref') : (getDolGlobalString('MAIN_GENERATE_DOCUMENTS_HIDE_REF') ? 1 : 0));
|
|
|
|
|
|
$object = new ExpenseReport($db);
|
|
|
|
// fetch optionals attributes and labels
|
|
$extrafields->fetch_name_optionals_label($object->table_element);
|
|
|
|
// Load object
|
|
include DOL_DOCUMENT_ROOT.'/core/actions_fetchobject.inc.php'; // Must be 'include', not 'include_once'
|
|
|
|
// Initialize a technical object to manage hooks of page. Note that conf->hooks_modules contains an array of hook context
|
|
$hookmanager->initHooks(array('expensereportcard', 'globalcard'));
|
|
|
|
$permissionnote = $user->hasRight('expensereport', 'creer'); // Used by the include of actions_setnotes.inc.php
|
|
$permissiondellink = $user->hasRight('expensereport', 'creer'); // Used by the include of actions_dellink.inc.php
|
|
$permissiontoadd = $user->hasRight('expensereport', 'creer'); // Used by the include of actions_addupdatedelete.inc.php and actions_lineupdown.inc.php
|
|
$permissiontoeditextra = $permissiontoadd;
|
|
if (GETPOST('attribute', 'aZ09') && isset($extrafields->attributes[$object->table_element]['perms'][GETPOST('attribute', 'aZ09')])) {
|
|
// For action 'update_extras', is there a specific permission set for the attribute to update
|
|
$permissiontoeditextra = dol_eval((string) $extrafields->attributes[$object->table_element]['perms'][GETPOST('attribute', 'aZ09')]);
|
|
}
|
|
|
|
$upload_dir = $conf->expensereport->dir_output.'/'.dol_sanitizeFileName($object->ref);
|
|
|
|
$projectRequired = isModEnabled('project') && getDolGlobalString('EXPENSEREPORT_PROJECT_IS_REQUIRED');
|
|
$fileRequired = getDolGlobalString('EXPENSEREPORT_FILE_IS_REQUIRED');
|
|
|
|
if ($object->id > 0) {
|
|
// Check current user can read this expense report
|
|
$canread = 0;
|
|
if ($user->hasRight('expensereport', 'readall')) {
|
|
$canread = 1;
|
|
}
|
|
if ($user->hasRight('expensereport', 'lire') && in_array($object->fk_user_author, $childids)) {
|
|
$canread = 1;
|
|
}
|
|
if (!$canread) {
|
|
accessforbidden();
|
|
}
|
|
}
|
|
|
|
$candelete = 0;
|
|
if ($user->hasRight('expensereport', 'supprimer')) {
|
|
$candelete = 1;
|
|
}
|
|
if ($object->status == ExpenseReport::STATUS_DRAFT && $user->hasRight('expensereport', 'write') && in_array($object->fk_user_author, $childids)) {
|
|
$candelete = 1;
|
|
}
|
|
|
|
// Security check
|
|
if ($user->socid) {
|
|
$socid = $user->socid;
|
|
}
|
|
$result = restrictedArea($user, 'expensereport', $object->id, 'expensereport');
|
|
|
|
$permissiontoadd = $user->hasRight('expensereport', 'creer'); // Used by the include of actions_dellink.inc.php
|
|
|
|
|
|
/*
|
|
* Actions
|
|
*/
|
|
|
|
$error = 0;
|
|
|
|
$value_unit_ht = price2num(GETPOST('value_unit_ht', 'alpha'), 'MU');
|
|
$value_unit = price2num(GETPOST('value_unit', 'alpha'), 'MU');
|
|
$qty = price2num(GETPOST('qty', 'alpha'));
|
|
|
|
$parameters = array('socid' => $socid);
|
|
$reshook = $hookmanager->executeHooks('doActions', $parameters, $object, $action); // Note that $action and $object may have been modified by some hooks
|
|
if ($reshook < 0) {
|
|
setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
|
|
}
|
|
|
|
if (empty($reshook)) {
|
|
$backurlforlist = DOL_URL_ROOT.'/expensereport/list.php';
|
|
|
|
if (empty($backtopage) || ($cancel && empty($id))) {
|
|
if (empty($backtopage) || ($cancel && strpos($backtopage, '__ID__'))) {
|
|
if (empty($id) && (($action != 'add' && $action != 'create') || $cancel)) {
|
|
$backtopage = $backurlforlist;
|
|
} else {
|
|
$backtopage = DOL_URL_ROOT.'/expensereport/card.php?id='.((!empty($id) && $id > 0) ? $id : '__ID__');
|
|
}
|
|
}
|
|
}
|
|
|
|
if ($cancel) {
|
|
if (!empty($backtopageforcancel)) {
|
|
header("Location: ".$backtopageforcancel);
|
|
exit;
|
|
} elseif (!empty($backtopage)) {
|
|
header("Location: ".$backtopage);
|
|
exit;
|
|
}
|
|
$action = '';
|
|
|
|
$fk_project = '';
|
|
$date_start = '';
|
|
$date_end = '';
|
|
$date = '';
|
|
$comments = '';
|
|
$vatrate = '';
|
|
$value_unit_ht = '';
|
|
$value_unit = '';
|
|
$qty = 1;
|
|
$fk_c_type_fees = -1;
|
|
}
|
|
|
|
include DOL_DOCUMENT_ROOT.'/core/actions_linkedfiles.inc.php';
|
|
|
|
if (!empty(GETPOST('sendit', 'alpha'))) { // If we just submit a file
|
|
if ($action == 'updateline') { // Test on permission not required here
|
|
$action = 'editline'; // To avoid to make the updateline now
|
|
} else {
|
|
$action = ''; // To avoid to make the addline now
|
|
}
|
|
}
|
|
|
|
include DOL_DOCUMENT_ROOT.'/core/actions_setnotes.inc.php'; // Must be 'include', not 'include_once'
|
|
|
|
include DOL_DOCUMENT_ROOT.'/core/actions_dellink.inc.php'; // Must be 'include', not 'include_once'
|
|
|
|
include DOL_DOCUMENT_ROOT.'/core/actions_lineupdown.inc.php'; // Must be 'include', not 'include_once'
|
|
|
|
// Action clone object
|
|
if ($action == 'confirm_clone' && $confirm == 'yes' && $permissiontoadd) {
|
|
if (GETPOSTINT('fk_user_author') <= 0) {
|
|
setEventMessages($langs->trans("NoCloneOptionsSpecified"), null, 'errors');
|
|
} else {
|
|
if ($object->id > 0) {
|
|
// Because createFromClone modifies the object, we must clone it so that we can restore it later if it fails
|
|
$orig = clone $object;
|
|
|
|
$result = $object->createFromClone($user, GETPOSTINT('fk_user_author'));
|
|
if ($result > 0) {
|
|
header("Location: ".$_SERVER['PHP_SELF'].'?id='.$result);
|
|
exit;
|
|
} else {
|
|
setEventMessages($object->error, $object->errors, 'errors');
|
|
$object = $orig;
|
|
$action = '';
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
if ($action == 'confirm_delete' && GETPOST("confirm", 'alpha') == "yes" && $id > 0 && $candelete) {
|
|
$object = new ExpenseReport($db);
|
|
$result = $object->fetch($id);
|
|
$result = $object->delete($user);
|
|
if ($result >= 0) {
|
|
header("Location: index.php");
|
|
exit;
|
|
} else {
|
|
setEventMessages($object->error, $object->errors, 'errors');
|
|
}
|
|
}
|
|
|
|
if ($action == 'add' && $permissiontoadd) {
|
|
$object = new ExpenseReport($db);
|
|
|
|
$object->date_debut = $date_start;
|
|
$object->date_fin = $date_end;
|
|
|
|
$object->fk_user_author = GETPOSTINT('fk_user_author');
|
|
if (!($object->fk_user_author > 0)) {
|
|
$object->fk_user_author = $user->id;
|
|
}
|
|
|
|
// Check that expense report is for a user inside the hierarchy, or that advanced permission for all is set
|
|
if ((!getDolGlobalString('MAIN_USE_ADVANCED_PERMS') && !$user->hasRight('expensereport', 'creer'))
|
|
|| (getDolGlobalString('MAIN_USE_ADVANCED_PERMS') && !$user->hasRight('expensereport', 'creer') && !$user->hasRight('expensereport', 'writeall_advance'))) {
|
|
$error++;
|
|
setEventMessages($langs->trans("NotEnoughPermissions"), null, 'errors');
|
|
}
|
|
if (!$error) {
|
|
if (!getDolGlobalString('MAIN_USE_ADVANCED_PERMS') || !$user->hasRight('expensereport', 'writeall_advance')) {
|
|
if (!in_array($object->fk_user_author, $childids)) {
|
|
$error++;
|
|
setEventMessages($langs->trans("UserNotInHierachy"), null, 'errors');
|
|
}
|
|
}
|
|
}
|
|
|
|
$fuser = new User($db);
|
|
$fuser->fetch($object->fk_user_author);
|
|
|
|
$object->status = 1;
|
|
$object->fk_c_paiement = GETPOSTINT('fk_c_paiement');
|
|
$object->fk_user_validator = GETPOSTINT('fk_user_validator');
|
|
$object->note_public = GETPOST('note_public', 'restricthtml');
|
|
$object->note_private = GETPOST('note_private', 'restricthtml');
|
|
// Fill array 'array_options' with data from add form
|
|
if (!$error) {
|
|
$ret = $extrafields->setOptionalsFromPost(null, $object);
|
|
if ($ret < 0) {
|
|
$error++;
|
|
}
|
|
}
|
|
|
|
if (!$error && !getDolGlobalString('EXPENSEREPORT_ALLOW_OVERLAPPING_PERIODS')) {
|
|
$overlappingExpenseReportID = $object->periodExists($fuser, $object->date_debut, $object->date_fin);
|
|
|
|
if ($overlappingExpenseReportID > 0) {
|
|
$error++;
|
|
setEventMessages($langs->trans("ErrorDoubleDeclaration").' <a href="'.$_SERVER['PHP_SELF'].'?id='.$overlappingExpenseReportID.'">'. $langs->trans('ShowTrip').'</a>', null, 'errors');
|
|
$action = 'create';
|
|
}
|
|
}
|
|
|
|
if (!$error) {
|
|
$db->begin();
|
|
|
|
$id = $object->create($user);
|
|
if ($id <= 0) {
|
|
$error++;
|
|
}
|
|
|
|
if (!$error) {
|
|
$db->commit();
|
|
header("Location: ".$_SERVER["PHP_SELF"]."?id=".$id);
|
|
exit;
|
|
} else {
|
|
setEventMessages($object->error, $object->errors, 'errors');
|
|
$db->rollback();
|
|
$action = 'create';
|
|
}
|
|
}
|
|
}
|
|
|
|
if (($action == 'update' || $action == 'updateFromRefuse') && $permissiontoadd) {
|
|
$object = new ExpenseReport($db);
|
|
$object->fetch($id);
|
|
|
|
$object->date_debut = $date_start;
|
|
$object->date_fin = $date_end;
|
|
|
|
if ($object->status < 3) {
|
|
$object->fk_user_validator = GETPOSTINT('fk_user_validator');
|
|
}
|
|
|
|
$object->fk_c_paiement = GETPOSTINT('fk_c_paiement');
|
|
$object->note_public = GETPOST('note_public', 'restricthtml');
|
|
$object->note_private = GETPOST('note_private', 'restricthtml');
|
|
$object->fk_user_modif = $user->id;
|
|
|
|
$result = $object->update($user);
|
|
if ($result > 0) {
|
|
header("Location: ".$_SERVER["PHP_SELF"]."?id=".GETPOSTINT('id'));
|
|
exit;
|
|
} else {
|
|
setEventMessages($object->error, $object->errors, 'errors');
|
|
}
|
|
}
|
|
|
|
if ($action == 'update_extras' && $permissiontoeditextra) {
|
|
$object->oldcopy = dol_clone($object, 2); // @phan-suppress-current-line PhanTypeMismatchProperty
|
|
|
|
$attribute_name = GETPOST('attribute', 'aZ09');
|
|
|
|
// Fill array 'array_options' with data from update form
|
|
$ret = $extrafields->setOptionalsFromPost(null, $object, $attribute_name);
|
|
if ($ret < 0) {
|
|
$error++;
|
|
}
|
|
|
|
if (!$error) {
|
|
$result = $object->updateExtraField($attribute_name, 'EXPENSEREPORT_MODIFY');
|
|
if ($result < 0) {
|
|
setEventMessages($object->error, $object->errors, 'errors');
|
|
$error++;
|
|
}
|
|
}
|
|
|
|
if ($error) {
|
|
$action = 'edit_extras';
|
|
}
|
|
}
|
|
|
|
if ($action == "confirm_validate" && GETPOST("confirm", 'alpha') == "yes" && $id > 0 && $permissiontoadd) {
|
|
$db->begin();
|
|
|
|
$object = new ExpenseReport($db);
|
|
$object->fetch($id);
|
|
|
|
$result = $object->setValidate($user);
|
|
|
|
if ($result >= 0) {
|
|
// Define output language
|
|
if (!getDolGlobalString('MAIN_DISABLE_PDF_AUTOUPDATE')) {
|
|
$outputlangs = $langs;
|
|
$newlang = '';
|
|
if (getDolGlobalInt('MAIN_MULTILANGS') /* && empty($newlang) */ && GETPOST('lang_id', 'aZ09')) {
|
|
$newlang = GETPOST('lang_id', 'aZ09');
|
|
}
|
|
if (getDolGlobalInt('MAIN_MULTILANGS') && empty($newlang)) {
|
|
$tmpuser = new User($db);
|
|
$tmpuser->fetch($object->fk_user_author);
|
|
$newlang = $tmpuser->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');
|
|
$error++;
|
|
}
|
|
|
|
if (!$error && $result > 0 && $object->fk_user_validator > 0) {
|
|
$langs->load("mails");
|
|
|
|
// TO
|
|
$destinataire = new User($db);
|
|
$destinataire->fetch($object->fk_user_validator);
|
|
$emailTo = $destinataire->email;
|
|
|
|
// FROM
|
|
$expediteur = new User($db);
|
|
$expediteur->fetch($object->fk_user_author);
|
|
$emailFrom = getDolGlobalString('MAIN_MAIL_EMAIL_FROM');
|
|
|
|
if ($emailTo && $emailFrom) {
|
|
$filename = array();
|
|
$filedir = array();
|
|
$mimetype = array();
|
|
|
|
// SUBJECT
|
|
$societeName = getDolGlobalString('MAIN_INFO_SOCIETE_NOM');
|
|
if (getDolGlobalString('MAIN_APPLICATION_TITLE')) {
|
|
$societeName = getDolGlobalString('MAIN_APPLICATION_TITLE');
|
|
}
|
|
|
|
$subject = $societeName." - ".$langs->transnoentities("ExpenseReportWaitingForApproval");
|
|
|
|
// CONTENT
|
|
$link = $urlwithroot.'/expensereport/card.php?id='.$object->id;
|
|
$link = '<a href="'.$link.'">'.$link.'</a>';
|
|
$message = $langs->transnoentities("ExpenseReportWaitingForApprovalMessage", $expediteur->getFullName($langs), get_date_range($object->date_debut, $object->date_fin, '', $langs), $link);
|
|
|
|
// Rebuild pdf
|
|
/*
|
|
$object->setDocModel($user,"");
|
|
$resultPDF = expensereport_pdf_create($db,$id,'',"",$langs);
|
|
|
|
if($resultPDF):
|
|
// ATTACHMENT
|
|
array_push($filename,dol_sanitizeFileName($object->ref).".pdf");
|
|
array_push($filedir,$conf->expensereport->dir_output . "/" . dol_sanitizeFileName($object->ref) . "/" . dol_sanitizeFileName($object->ref).".pdf");
|
|
array_push($mimetype,"application/pdf");
|
|
*/
|
|
|
|
// PREPARE SEND
|
|
$mailfile = new CMailFile($subject, $emailTo, $emailFrom, $message, $filedir, $mimetype, $filename, '', '', 0, -1);
|
|
|
|
if (empty($mailfile->error)) {
|
|
// SEND
|
|
$result = $mailfile->sendfile();
|
|
if ($result) {
|
|
$mesg = $langs->trans('MailSuccessfulySent', $mailfile->getValidAddress($emailFrom, 2), $mailfile->getValidAddress($emailTo, 2));
|
|
setEventMessages($mesg, null, 'mesgs');
|
|
} else {
|
|
$langs->load("other");
|
|
if (!empty($mailfile->error) || !empty($mailfile->errors)) {
|
|
$mesg = '';
|
|
$mesg .= $langs->transnoentities('ErrorFailedToSendMail', dol_escape_htmltag($emailFrom), dol_escape_htmltag($emailTo));
|
|
if (!empty($mailfile->error)) {
|
|
$mesg .= '<br>' . $mailfile->error;
|
|
}
|
|
if (!empty($mailfile->errors) && is_array($mailfile->errors)) {
|
|
$mesg .= '<br>' . implode('<br>', $mailfile->errors);
|
|
}
|
|
setEventMessages($mesg, null, 'errors');
|
|
} else {
|
|
setEventMessages('No mail sent. Feature is disabled by option MAIN_DISABLE_ALL_MAILS', null, 'warnings');
|
|
}
|
|
}
|
|
} else {
|
|
setEventMessages($mailfile->error, $mailfile->errors, 'errors');
|
|
$action = '';
|
|
}
|
|
} else {
|
|
setEventMessages($langs->trans("NoEmailSentBadSenderOrRecipientEmail"), null, 'warnings');
|
|
$action = '';
|
|
}
|
|
}
|
|
|
|
if (!$error) {
|
|
$db->commit();
|
|
header("Location: ".$_SERVER["PHP_SELF"]."?id=".$id);
|
|
exit;
|
|
} else {
|
|
$db->rollback();
|
|
}
|
|
}
|
|
|
|
if ($action == "confirm_save_from_refuse" && GETPOST("confirm", 'alpha') == "yes" && $id > 0 && $permissiontoadd) {
|
|
$object = new ExpenseReport($db);
|
|
$object->fetch($id);
|
|
$result = $object->set_save_from_refuse($user);
|
|
|
|
if ($result > 0) {
|
|
// Define output language
|
|
if (!getDolGlobalString('MAIN_DISABLE_PDF_AUTOUPDATE')) {
|
|
$outputlangs = $langs;
|
|
$newlang = '';
|
|
if (getDolGlobalInt('MAIN_MULTILANGS') /* && empty($newlang) */ && GETPOST('lang_id', 'aZ09')) {
|
|
$newlang = GETPOST('lang_id', 'aZ09');
|
|
}
|
|
if (getDolGlobalInt('MAIN_MULTILANGS') && empty($newlang)) {
|
|
$tmpuser = new User($db);
|
|
$tmpuser->fetch($object->fk_user_author);
|
|
$newlang = $tmpuser->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);
|
|
}
|
|
}
|
|
|
|
if ($result > 0) {
|
|
// Send mail
|
|
|
|
// TO
|
|
$destinataire = new User($db);
|
|
$destinataire->fetch($object->fk_user_validator);
|
|
$emailTo = $destinataire->email;
|
|
|
|
// FROM
|
|
$expediteur = new User($db);
|
|
$expediteur->fetch($object->fk_user_author);
|
|
$emailFrom = getDolGlobalString('MAIN_MAIL_EMAIL_FROM');
|
|
|
|
if ($emailFrom && $emailTo) {
|
|
$filename = array();
|
|
$filedir = array();
|
|
$mimetype = array();
|
|
|
|
// SUBJECT
|
|
$societeName = getDolGlobalString('MAIN_INFO_SOCIETE_NOM');
|
|
if (getDolGlobalString('MAIN_APPLICATION_TITLE')) {
|
|
$societeName = getDolGlobalString('MAIN_APPLICATION_TITLE');
|
|
}
|
|
|
|
$subject = $societeName." - ".$langs->transnoentities("ExpenseReportWaitingForReApproval");
|
|
|
|
// CONTENT
|
|
$link = $urlwithroot.'/expensereport/card.php?id='.$object->id;
|
|
$link = '<a href="'.$link.'">'.$link.'</a>';
|
|
$message = $langs->transnoentities("ExpenseReportWaitingForReApprovalMessage", dol_print_date($object->date_refuse, 'day'), $object->detail_refuse, $expediteur->getFullName($langs), get_date_range($object->date_debut, $object->date_fin, '', $langs));
|
|
$message .= '<br>'.$langs->transnoentities("ExpenseReportWaitingForReApprovalMessage2", $link);
|
|
|
|
// Rebuild pdf
|
|
/*
|
|
$object->setDocModel($user,"");
|
|
$resultPDF = expensereport_pdf_create($db,$object,'',"",$langs);
|
|
|
|
if($resultPDF)
|
|
{
|
|
// ATTACHMENT
|
|
$filename=array(); $filedir=array(); $mimetype=array();
|
|
array_push($filename,dol_sanitizeFileName($object->ref).".pdf");
|
|
array_push($filedir,$conf->expensereport->dir_output . "/" . dol_sanitizeFileName($object->ref) . "/" . dol_sanitizeFileName($object->ref_number).".pdf");
|
|
array_push($mimetype,"application/pdf");
|
|
}
|
|
*/
|
|
|
|
|
|
// PREPARE SEND
|
|
$mailfile = new CMailFile($subject, $emailTo, $emailFrom, $message, $filedir, $mimetype, $filename, '', '', 0, -1);
|
|
|
|
if (empty($mailfile->error)) {
|
|
// SEND
|
|
$result = $mailfile->sendfile();
|
|
if ($result) {
|
|
$mesg = $langs->trans('MailSuccessfulySent', $mailfile->getValidAddress($emailFrom, 2), $mailfile->getValidAddress($emailTo, 2));
|
|
setEventMessages($mesg, null, 'mesgs');
|
|
header("Location: ".$_SERVER["PHP_SELF"]."?id=".$id);
|
|
exit;
|
|
} else {
|
|
$langs->load("other");
|
|
if ($mailfile->error) {
|
|
$mesg = '';
|
|
$mesg .= $langs->trans('ErrorFailedToSendMail', $emailFrom, $emailTo);
|
|
$mesg .= '<br>'.$mailfile->error;
|
|
setEventMessages($mesg, null, 'errors');
|
|
} else {
|
|
setEventMessages('No mail sent. Feature is disabled by option MAIN_DISABLE_ALL_MAILS', null, 'warnings');
|
|
}
|
|
}
|
|
} else {
|
|
setEventMessages($mailfile->error, $mailfile->errors, 'errors');
|
|
$action = '';
|
|
}
|
|
} else {
|
|
setEventMessages($langs->trans("NoEmailSentBadSenderOrRecipientEmail"), null, 'warnings');
|
|
$action = '';
|
|
}
|
|
} else {
|
|
setEventMessages($object->error, $object->errors, 'errors');
|
|
}
|
|
}
|
|
|
|
// Approve
|
|
if ($action == "confirm_approve" && GETPOST("confirm", 'alpha') == "yes" && $id > 0 && $user->hasRight('expensereport', 'approve')) {
|
|
$object = new ExpenseReport($db);
|
|
$object->fetch($id);
|
|
|
|
$result = $object->setApproved($user);
|
|
|
|
if ($result > 0) {
|
|
// Define output language
|
|
if (!getDolGlobalString('MAIN_DISABLE_PDF_AUTOUPDATE')) {
|
|
$outputlangs = $langs;
|
|
$newlang = '';
|
|
if (getDolGlobalInt('MAIN_MULTILANGS') /* && empty($newlang) */ && GETPOST('lang_id', 'aZ09')) {
|
|
$newlang = GETPOST('lang_id', 'aZ09');
|
|
}
|
|
if (getDolGlobalInt('MAIN_MULTILANGS') && empty($newlang)) {
|
|
$tmpuser = new User($db);
|
|
$tmpuser->fetch($object->fk_user_author);
|
|
$newlang = $tmpuser->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);
|
|
}
|
|
}
|
|
|
|
if ($result > 0) {
|
|
// Send mail
|
|
|
|
// TO
|
|
$destinataire = new User($db);
|
|
$destinataire->fetch($object->fk_user_author);
|
|
$emailTo = $destinataire->email;
|
|
|
|
// CC
|
|
$emailCC = getDolGlobalString('NDF_CC_EMAILS');
|
|
if (empty($emailTo)) {
|
|
$emailTo = $emailCC;
|
|
}
|
|
|
|
// FROM
|
|
$expediteur = new User($db);
|
|
$expediteur->fetch($object->fk_user_approve > 0 ? $object->fk_user_approve : $object->fk_user_validator);
|
|
$emailFrom = getDolGlobalString('MAIN_MAIL_EMAIL_FROM');
|
|
|
|
if ($emailFrom && $emailTo) {
|
|
$filename = array();
|
|
$filedir = array();
|
|
$mimetype = array();
|
|
|
|
// SUBJECT
|
|
$societeName = getDolGlobalString('MAIN_INFO_SOCIETE_NOM');
|
|
if (getDolGlobalString('MAIN_APPLICATION_TITLE')) {
|
|
$societeName = getDolGlobalString('MAIN_APPLICATION_TITLE');
|
|
}
|
|
|
|
$subject = $societeName." - ".$langs->transnoentities("ExpenseReportApproved");
|
|
|
|
// CONTENT
|
|
$link = $urlwithroot.'/expensereport/card.php?id='.$object->id;
|
|
$link = '<a href="'.$link.'">'.$link.'</a>';
|
|
$message = $langs->transnoentities("ExpenseReportApprovedMessage", $object->ref, $destinataire->getFullName($langs), $expediteur->getFullName($langs), $link);
|
|
|
|
// Rebuilt pdf
|
|
/*
|
|
$object->setDocModel($user,"");
|
|
$resultPDF = expensereport_pdf_create($db,$object,'',"",$langs);
|
|
|
|
if($resultPDF
|
|
{
|
|
// ATTACHMENT
|
|
$filename=array(); $filedir=array(); $mimetype=array();
|
|
array_push($filename,dol_sanitizeFileName($object->ref).".pdf");
|
|
array_push($filedir, $conf->expensereport->dir_output."/".dol_sanitizeFileName($object->ref)."/".dol_sanitizeFileName($object->ref).".pdf");
|
|
array_push($mimetype,"application/pdf");
|
|
}
|
|
*/
|
|
|
|
$mailfile = new CMailFile($subject, $emailTo, $emailFrom, $message, $filedir, $mimetype, $filename, $emailCC, '', 0, -1);
|
|
|
|
if (empty($mailfile->error)) {
|
|
// SEND
|
|
$result = $mailfile->sendfile();
|
|
if ($result) {
|
|
$mesg = $langs->trans('MailSuccessfulySent', $mailfile->getValidAddress($emailFrom, 2), $mailfile->getValidAddress($emailTo, 2));
|
|
setEventMessages($mesg, null, 'mesgs');
|
|
header("Location: ".$_SERVER["PHP_SELF"]."?id=".$id);
|
|
exit;
|
|
} else {
|
|
$langs->load("other");
|
|
if ($mailfile->error) {
|
|
$mesg = '';
|
|
$mesg .= $langs->trans('ErrorFailedToSendMail', $emailFrom, $emailTo);
|
|
$mesg .= '<br>'.$mailfile->error;
|
|
setEventMessages($mesg, null, 'errors');
|
|
} else {
|
|
setEventMessages('No mail sent. Feature is disabled by option MAIN_DISABLE_ALL_MAILS', null, 'warnings');
|
|
}
|
|
}
|
|
} else {
|
|
setEventMessages($mailfile->error, $mailfile->errors, 'errors');
|
|
$action = '';
|
|
}
|
|
} else {
|
|
setEventMessages($langs->trans("NoEmailSentBadSenderOrRecipientEmail"), null, 'warnings');
|
|
$action = '';
|
|
}
|
|
} else {
|
|
setEventMessages($langs->trans("FailedtoSetToApprove"), null, 'warnings');
|
|
$action = '';
|
|
}
|
|
}
|
|
|
|
if ($action == "confirm_refuse" && GETPOST('confirm', 'alpha') == "yes" && $id > 0 && $user->hasRight('expensereport', 'approve')) {
|
|
$object = new ExpenseReport($db);
|
|
$object->fetch($id);
|
|
|
|
$detailRefuse = GETPOST('detail_refuse', 'alpha');
|
|
$result = $object->setDeny($user, $detailRefuse);
|
|
|
|
if ($result > 0) {
|
|
// Define output language
|
|
if (!getDolGlobalString('MAIN_DISABLE_PDF_AUTOUPDATE')) {
|
|
$outputlangs = $langs;
|
|
$newlang = '';
|
|
if (getDolGlobalInt('MAIN_MULTILANGS') /* && empty($newlang) */ && GETPOST('lang_id', 'aZ09')) {
|
|
$newlang = GETPOST('lang_id', 'aZ09');
|
|
}
|
|
if (getDolGlobalInt('MAIN_MULTILANGS') && empty($newlang)) {
|
|
$tmpuser = new User($db);
|
|
$tmpuser->fetch($object->fk_user_author);
|
|
$newlang = $tmpuser->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);
|
|
}
|
|
}
|
|
|
|
if ($result > 0) {
|
|
// Send mail
|
|
|
|
// TO
|
|
$destinataire = new User($db);
|
|
$destinataire->fetch($object->fk_user_author);
|
|
$emailTo = $destinataire->email;
|
|
|
|
// FROM
|
|
$expediteur = new User($db);
|
|
$expediteur->fetch($object->fk_user_refuse);
|
|
$emailFrom = getDolGlobalString('MAIN_MAIL_EMAIL_FROM');
|
|
|
|
if ($emailFrom && $emailTo) {
|
|
$filename = array();
|
|
$filedir = array();
|
|
$mimetype = array();
|
|
|
|
// SUBJECT
|
|
$societeName = getDolGlobalString('MAIN_INFO_SOCIETE_NOM');
|
|
if (getDolGlobalString('MAIN_APPLICATION_TITLE')) {
|
|
$societeName = getDolGlobalString('MAIN_APPLICATION_TITLE');
|
|
}
|
|
|
|
$subject = $societeName." - ".$langs->transnoentities("ExpenseReportRefused");
|
|
|
|
// CONTENT
|
|
$link = $urlwithroot.'/expensereport/card.php?id='.$object->id;
|
|
$link = '<a href="'.$link.'">'.$link.'</a>';
|
|
$message = $langs->transnoentities("ExpenseReportRefusedMessage", $object->ref, $destinataire->getFullName($langs), $expediteur->getFullName($langs), $detailRefuse, $link);
|
|
|
|
// Rebuilt pdf
|
|
/*
|
|
$object->setDocModel($user,"");
|
|
$resultPDF = expensereport_pdf_create($db,$object,'',"",$langs);
|
|
|
|
if($resultPDF
|
|
{
|
|
// ATTACHMENT
|
|
$filename=array(); $filedir=array(); $mimetype=array();
|
|
array_push($filename,dol_sanitizeFileName($object->ref).".pdf");
|
|
array_push($filedir, $conf->expensereport->dir_output."/".dol_sanitizeFileName($object->ref)."/".dol_sanitizeFileName($object->ref).".pdf");
|
|
array_push($mimetype,"application/pdf");
|
|
}
|
|
*/
|
|
|
|
// PREPARE SEND
|
|
$mailfile = new CMailFile($subject, $emailTo, $emailFrom, $message, $filedir, $mimetype, $filename, '', '', 0, -1);
|
|
|
|
if (empty($mailfile->error)) {
|
|
// SEND
|
|
$result = $mailfile->sendfile();
|
|
if ($result) {
|
|
$mesg = $langs->trans('MailSuccessfulySent', $mailfile->getValidAddress($emailFrom, 2), $mailfile->getValidAddress($emailTo, 2));
|
|
setEventMessages($mesg, null, 'mesgs');
|
|
header("Location: ".$_SERVER["PHP_SELF"]."?id=".$id);
|
|
exit;
|
|
} else {
|
|
$langs->load("other");
|
|
if ($mailfile->error) {
|
|
$mesg = '';
|
|
$mesg .= $langs->trans('ErrorFailedToSendMail', $emailFrom, $emailTo);
|
|
$mesg .= '<br>'.$mailfile->error;
|
|
setEventMessages($mesg, null, 'errors');
|
|
} else {
|
|
setEventMessages('No mail sent. Feature is disabled by option MAIN_DISABLE_ALL_MAILS', null, 'warnings');
|
|
}
|
|
}
|
|
} else {
|
|
setEventMessages($mailfile->error, $mailfile->errors, 'errors');
|
|
$action = '';
|
|
}
|
|
} else {
|
|
setEventMessages($langs->trans("NoEmailSentBadSenderOrRecipientEmail"), null, 'warnings');
|
|
$action = '';
|
|
}
|
|
} else {
|
|
setEventMessages($langs->trans("FailedtoSetToDeny"), null, 'warnings');
|
|
$action = '';
|
|
}
|
|
}
|
|
|
|
//var_dump($user->id == $object->fk_user_validator);exit;
|
|
if ($action == "confirm_cancel" && GETPOST('confirm', 'alpha') == "yes" && $id > 0 && $user->hasRight('expensereport', 'creer')) {
|
|
if (!GETPOST('detail_cancel', 'alpha')) {
|
|
setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("Comment")), null, 'errors');
|
|
} else {
|
|
$object = new ExpenseReport($db);
|
|
$object->fetch($id);
|
|
|
|
if ($user->id == $object->fk_user_valid || $user->id == $object->fk_user_author) {
|
|
$detailCancel = GETPOST('detail_cancel', 'alpha');
|
|
$result = $object->set_cancel($user, $detailCancel);
|
|
|
|
if ($result > 0) {
|
|
// Define output language
|
|
if (!getDolGlobalString('MAIN_DISABLE_PDF_AUTOUPDATE')) {
|
|
$outputlangs = $langs;
|
|
$newlang = '';
|
|
if (getDolGlobalInt('MAIN_MULTILANGS') /* && empty($newlang) */ && GETPOST('lang_id', 'aZ09')) {
|
|
$newlang = GETPOST('lang_id', 'aZ09');
|
|
}
|
|
if (getDolGlobalInt('MAIN_MULTILANGS') && empty($newlang)) {
|
|
$tmpuser = new User($db);
|
|
$tmpuser->fetch($object->fk_user_author);
|
|
$newlang = $tmpuser->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);
|
|
}
|
|
}
|
|
|
|
if ($result > 0) {
|
|
// Send mail
|
|
|
|
// TO
|
|
$destinataire = new User($db);
|
|
$destinataire->fetch($object->fk_user_author);
|
|
$emailTo = $destinataire->email;
|
|
|
|
// FROM
|
|
$expediteur = new User($db);
|
|
$expediteur->fetch($object->fk_user_cancel);
|
|
$emailFrom = getDolGlobalString('MAIN_MAIL_EMAIL_FROM');
|
|
|
|
if ($emailFrom && $emailTo) {
|
|
$filename = array();
|
|
$filedir = array();
|
|
$mimetype = array();
|
|
|
|
// SUBJECT
|
|
$societeName = getDolGlobalString('MAIN_INFO_SOCIETE_NOM');
|
|
if (getDolGlobalString('MAIN_APPLICATION_TITLE')) {
|
|
$societeName = getDolGlobalString('MAIN_APPLICATION_TITLE');
|
|
}
|
|
|
|
$subject = $societeName." - ".$langs->transnoentities("ExpenseReportCanceled");
|
|
|
|
// CONTENT
|
|
$link = $urlwithroot.'/expensereport/card.php?id='.$object->id;
|
|
$link = '<a href="'.$link.'">'.$link.'</a>';
|
|
$message = $langs->transnoentities("ExpenseReportCanceledMessage", $object->ref, $destinataire->getFullName($langs), $expediteur->getFullName($langs), $detailCancel, $link);
|
|
|
|
// Rebuilt pdf
|
|
/*
|
|
$object->setDocModel($user,"");
|
|
$resultPDF = expensereport_pdf_create($db,$object,'',"",$langs);
|
|
|
|
if($resultPDF
|
|
{
|
|
// ATTACHMENT
|
|
$filename=array(); $filedir=array(); $mimetype=array();
|
|
array_push($filename,dol_sanitizeFileName($object->ref).".pdf");
|
|
array_push($filedir, $conf->expensereport->dir_output."/".dol_sanitizeFileName($object->ref)."/".dol_sanitizeFileName($object->ref).".pdf");
|
|
array_push($mimetype,"application/pdf");
|
|
}
|
|
*/
|
|
|
|
// PREPARE SEND
|
|
$mailfile = new CMailFile($subject, $emailTo, $emailFrom, $message, $filedir, $mimetype, $filename, '', '', 0, -1);
|
|
|
|
if (empty($mailfile->error)) {
|
|
// SEND
|
|
$result = $mailfile->sendfile();
|
|
if ($result) {
|
|
$mesg = $langs->trans('MailSuccessfulySent', $mailfile->getValidAddress($emailFrom, 2), $mailfile->getValidAddress($emailTo, 2));
|
|
setEventMessages($mesg, null, 'mesgs');
|
|
header("Location: ".$_SERVER["PHP_SELF"]."?id=".$id);
|
|
exit;
|
|
} else {
|
|
$langs->load("other");
|
|
if ($mailfile->error) {
|
|
$mesg = '';
|
|
$mesg .= $langs->trans('ErrorFailedToSendMail', $emailFrom, $emailTo);
|
|
$mesg .= '<br>'.$mailfile->error;
|
|
setEventMessages($mesg, null, 'errors');
|
|
} else {
|
|
setEventMessages('No mail sent. Feature is disabled by option MAIN_DISABLE_ALL_MAILS', null, 'warnings');
|
|
}
|
|
}
|
|
} else {
|
|
setEventMessages($mailfile->error, $mailfile->errors, 'errors');
|
|
$action = '';
|
|
}
|
|
} else {
|
|
setEventMessages($langs->trans("NoEmailSentBadSenderOrRecipientEmail"), null, 'warnings');
|
|
$action = '';
|
|
}
|
|
} else {
|
|
setEventMessages($langs->trans("FailedToSetToCancel"), null, 'warnings');
|
|
$action = '';
|
|
}
|
|
} else {
|
|
setEventMessages($object->error, $object->errors, 'errors');
|
|
}
|
|
}
|
|
}
|
|
|
|
if ($action == "confirm_setdraft" && GETPOST('confirm', 'alpha') == "yes" && $id > 0 && $user->hasRight('expensereport', 'creer')) {
|
|
$object = new ExpenseReport($db);
|
|
$object->fetch($id);
|
|
if ($user->id == $object->fk_user_author || $user->id == $object->fk_user_valid || in_array($object->fk_user_author, $childids)) {
|
|
$result = $object->setStatut(ExpenseReport::STATUS_DRAFT);
|
|
|
|
if ($result > 0) {
|
|
// Define output language
|
|
if (!getDolGlobalString('MAIN_DISABLE_PDF_AUTOUPDATE')) {
|
|
$outputlangs = $langs;
|
|
$newlang = '';
|
|
if (getDolGlobalInt('MAIN_MULTILANGS') /* && empty($newlang) */ && GETPOST('lang_id', 'aZ09')) {
|
|
$newlang = GETPOST('lang_id', 'aZ09');
|
|
}
|
|
if (getDolGlobalInt('MAIN_MULTILANGS') && empty($newlang)) {
|
|
$tmpuser = new User($db);
|
|
$tmpuser->fetch($object->fk_user_author);
|
|
$newlang = $tmpuser->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);
|
|
}
|
|
}
|
|
|
|
if ($result > 0) {
|
|
header("Location: ".$_SERVER["PHP_SELF"]."?id=".$id);
|
|
exit;
|
|
} else {
|
|
setEventMessages($object->error, $object->errors, 'errors');
|
|
}
|
|
} else {
|
|
setEventMessages("NOT_AUTHOR", null, 'errors');
|
|
}
|
|
}
|
|
|
|
if ($action == 'set_unpaid' && $id > 0 && $user->hasRight('expensereport', 'to_paid')) {
|
|
$object = new ExpenseReport($db);
|
|
$object->fetch($id);
|
|
|
|
$result = $object->setUnpaid($user);
|
|
|
|
if ($result > 0) {
|
|
// Define output language
|
|
if (!getDolGlobalString('MAIN_DISABLE_PDF_AUTOUPDATE')) {
|
|
$outputlangs = $langs;
|
|
$newlang = '';
|
|
if (getDolGlobalInt('MAIN_MULTILANGS') /* && empty($newlang) */ && GETPOST('lang_id', 'aZ09')) {
|
|
$newlang = GETPOST('lang_id', 'aZ09');
|
|
}
|
|
if (getDolGlobalInt('MAIN_MULTILANGS') && empty($newlang)) {
|
|
$tmpuser = new User($db);
|
|
$tmpuser->fetch($object->fk_user_author);
|
|
$newlang = $tmpuser->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);
|
|
}
|
|
|
|
header("Location: ".$_SERVER["PHP_SELF"]."?id=".$id);
|
|
exit;
|
|
}
|
|
}
|
|
|
|
|
|
if ($action == 'set_paid' && $id > 0 && $user->hasRight('expensereport', 'to_paid')) {
|
|
$object = new ExpenseReport($db);
|
|
$object->fetch($id);
|
|
|
|
$result = $object->setPaid($id, $user);
|
|
|
|
if ($result > 0) {
|
|
// Define output language
|
|
if (!getDolGlobalString('MAIN_DISABLE_PDF_AUTOUPDATE')) {
|
|
$outputlangs = $langs;
|
|
$newlang = '';
|
|
if (getDolGlobalInt('MAIN_MULTILANGS') /* && empty($newlang) */ && GETPOST('lang_id', 'aZ09')) {
|
|
$newlang = GETPOST('lang_id', 'aZ09');
|
|
}
|
|
if (getDolGlobalInt('MAIN_MULTILANGS') && empty($newlang)) {
|
|
$tmpuser = new User($db);
|
|
$tmpuser->fetch($object->fk_user_author);
|
|
$newlang = $tmpuser->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);
|
|
}
|
|
}
|
|
|
|
if ($result > 0) {
|
|
// TODO We must never send an email without a setup or confirm option to choose if email is
|
|
// sent or not. So we add a hidden constant to avoid this for the moment.
|
|
if (getDolGlobalString('EXPENSEREPORT_SEND_EMAIL_ON_STATUS_PAID')) {
|
|
// Send mail
|
|
|
|
// TO
|
|
$destinataire = new User($db);
|
|
$destinataire->fetch($object->fk_user_author);
|
|
$emailTo = $destinataire->email;
|
|
|
|
// FROM
|
|
$expediteur = new User($db);
|
|
$expediteur->fetch($user->id);
|
|
$emailFrom = getDolGlobalString('MAIN_MAIL_EMAIL_FROM');
|
|
|
|
if ($emailFrom && $emailTo) {
|
|
$filename = array();
|
|
$filedir = array();
|
|
$mimetype = array();
|
|
|
|
// SUBJECT
|
|
$societeName = getDolGlobalString('MAIN_INFO_SOCIETE_NOM');
|
|
if (getDolGlobalString('MAIN_APPLICATION_TITLE')) {
|
|
$societeName = getDolGlobalString('MAIN_APPLICATION_TITLE');
|
|
}
|
|
|
|
$subject = $societeName." - ".$langs->transnoentities("ExpenseReportPaid");
|
|
|
|
// CONTENT
|
|
$link = $urlwithroot.'/expensereport/card.php?id='.$object->id;
|
|
$link = '<a href="'.$link.'">'.$link.'</a>';
|
|
$message = $langs->transnoentities("ExpenseReportPaidMessage", $object->ref, $destinataire->getFullName($langs), $expediteur->getFullName($langs), $link);
|
|
|
|
// Generate pdf before attachment
|
|
$object->setDocModel($user, "");
|
|
$resultPDF = expensereport_pdf_create($db, $object, '', "", $langs);
|
|
|
|
// PREPARE SEND
|
|
$mailfile = new CMailFile($subject, $emailTo, $emailFrom, $message, $filedir, $mimetype, $filename, '', '', 0, -1);
|
|
|
|
if (empty($mailfile->error)) {
|
|
// SEND
|
|
$result = $mailfile->sendfile();
|
|
if ($result) {
|
|
$mesg = $langs->trans('MailSuccessfulySent', $mailfile->getValidAddress($emailFrom, 2), $mailfile->getValidAddress($emailTo, 2));
|
|
setEventMessages($mesg, null, 'mesgs');
|
|
|
|
header("Location: ".$_SERVER["PHP_SELF"]."?id=".$id);
|
|
exit;
|
|
} else {
|
|
$langs->load("other");
|
|
if ($mailfile->error) {
|
|
$mesg = '';
|
|
$mesg .= $langs->trans('ErrorFailedToSendMail', $emailFrom, $emailTo);
|
|
$mesg .= '<br>'.$mailfile->error;
|
|
setEventMessages($mesg, null, 'errors');
|
|
} else {
|
|
setEventMessages('No mail sent. Feature is disabled by option MAIN_DISABLE_ALL_MAILS', null, 'warnings');
|
|
}
|
|
}
|
|
} else {
|
|
setEventMessages($mailfile->error, $mailfile->errors, 'errors');
|
|
}
|
|
} else {
|
|
setEventMessages($langs->trans("NoEmailSentBadSenderOrRecipientEmail"), null, 'warnings');
|
|
}
|
|
}
|
|
} else {
|
|
setEventMessages($langs->trans("FailedToSetPaid"), null, 'warnings');
|
|
}
|
|
|
|
$action = '';
|
|
}
|
|
|
|
if ($action == "addline" && $user->hasRight('expensereport', 'creer')) {
|
|
// First save uploaded file
|
|
$fk_ecm_files = 0;
|
|
if (GETPOSTISSET('attachfile')) {
|
|
$arrayoffiles = GETPOST('attachfile', 'array');
|
|
if (is_array($arrayoffiles) && !empty($arrayoffiles[0])) {
|
|
include_once DOL_DOCUMENT_ROOT.'/ecm/class/ecmfiles.class.php';
|
|
$entityprefix = ($conf->entity != '1') ? $conf->entity.'/' : '';
|
|
$relativepath = 'expensereport/'.$object->ref.'/'.$arrayoffiles[0];
|
|
$ecmfiles = new EcmFiles($db);
|
|
$ecmfiles->fetch(0, '', $relativepath);
|
|
$fk_ecm_files = $ecmfiles->id;
|
|
}
|
|
}
|
|
|
|
// if VAT is not used in Dolibarr, set VAT rate to 0 because VAT rate is necessary.
|
|
if (empty($vatrate)) {
|
|
$vatrate = "0.000";
|
|
}
|
|
$tmpvat = price2num(preg_replace('/\s*\(.*\)/', '', $vatrate));
|
|
|
|
$value_unit_ht = price2num(GETPOST('value_unit_ht', 'alpha'), 'MU');
|
|
$value_unit = price2num(GETPOST('value_unit', 'alpha'), 'MU');
|
|
if (empty($value_unit)) {
|
|
$value_unit = price2num((float) $value_unit_ht + ((float) $value_unit_ht * (float) $tmpvat / 100), 'MU');
|
|
}
|
|
|
|
$fk_c_exp_tax_cat = GETPOSTINT('fk_c_exp_tax_cat');
|
|
|
|
$qty = price2num(GETPOST('qty', 'alpha'));
|
|
if (empty($qty)) {
|
|
$qty = 1;
|
|
}
|
|
|
|
if (!($fk_c_type_fees > 0)) {
|
|
$error++;
|
|
setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("Type")), null, 'errors');
|
|
$action = '';
|
|
}
|
|
|
|
if ((float) $tmpvat < 0 || $tmpvat === '') {
|
|
$error++;
|
|
setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("VAT")), null, 'errors');
|
|
$action = '';
|
|
}
|
|
|
|
// If no date entered
|
|
if (empty($date) || $date == "--") {
|
|
$error++;
|
|
setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("Date")), null, 'errors');
|
|
} elseif ($date < $object->date_debut || $date > ($object->date_fin + (24 * 3600 - 1))) {
|
|
// Warning if date out of range or error if this conf is ON
|
|
if (getDolGlobalString('EXPENSEREPORT_BLOCK_LINE_CREATION_IF_NOT_BETWEEN_DATES')) {
|
|
$error++;
|
|
}
|
|
|
|
$langs->load("errors");
|
|
$type = $error > 0 ? 'errors' : 'warnings';
|
|
setEventMessages($langs->trans("WarningDateOfLineMustBeInExpenseReportRange"), null, $type);
|
|
}
|
|
|
|
// If no price entered
|
|
if ($value_unit == 0) {
|
|
$error++;
|
|
setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("PriceUTTC")), null, 'errors');
|
|
}
|
|
|
|
// If no project entered
|
|
if ($projectRequired && $fk_project <= 0) {
|
|
$error++;
|
|
setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("Project")), null, 'errors');
|
|
}
|
|
|
|
// If no file associated
|
|
if ($fileRequired && $fk_ecm_files == 0) {
|
|
$error++;
|
|
setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("File")), null, 'errors');
|
|
}
|
|
|
|
if (!$error) {
|
|
$type = 0; // TODO What if service ? We should take the type product/service from the type of expense report llx_c_type_fees
|
|
|
|
// Insert line
|
|
$result = $object->addline($qty, $value_unit, $fk_c_type_fees, $vatrate, $date, $comments, $fk_project, $fk_c_exp_tax_cat, $type, $fk_ecm_files);
|
|
if ($result > 0) {
|
|
$ret = $object->fetch($object->id); // Reload to get new records
|
|
|
|
if (!getDolGlobalString('MAIN_DISABLE_PDF_AUTOUPDATE')) {
|
|
// Define output language
|
|
$outputlangs = $langs;
|
|
$newlang = GETPOST('lang_id', 'alpha');
|
|
if (getDolGlobalInt('MAIN_MULTILANGS') && empty($newlang)) {
|
|
$tmpuser = new User($db);
|
|
$tmpuser->fetch($object->fk_user_author);
|
|
$newlang = $tmpuser->lang;
|
|
}
|
|
if (!empty($newlang)) {
|
|
$outputlangs = new Translate("", $conf);
|
|
$outputlangs->setDefaultLang($newlang);
|
|
}
|
|
|
|
$object->generateDocument($object->model_pdf, $outputlangs, $hidedetails, $hidedesc, $hideref);
|
|
}
|
|
|
|
unset($qty);
|
|
unset($value_unit_ht);
|
|
unset($value_unit);
|
|
unset($vatrate);
|
|
unset($comments);
|
|
unset($fk_c_type_fees);
|
|
$fk_project = 0;
|
|
|
|
$date = false;
|
|
} else {
|
|
$error++;
|
|
setEventMessages($object->error, $object->errors, 'errors');
|
|
}
|
|
}
|
|
|
|
if (!$error) {
|
|
header("Location: ".$_SERVER["PHP_SELF"]."?id=".GETPOSTINT('id'));
|
|
exit;
|
|
} else {
|
|
$action = '';
|
|
}
|
|
}
|
|
|
|
if ($action == 'confirm_delete_line' && GETPOST("confirm", 'alpha') == "yes" && $user->hasRight('expensereport', 'creer')) {
|
|
$object = new ExpenseReport($db);
|
|
$object->fetch($id);
|
|
|
|
$object_ligne = new ExpenseReportLine($db);
|
|
$object_ligne->fetch(GETPOSTINT("rowid"));
|
|
$total_ht = $object_ligne->total_ht;
|
|
$total_tva = $object_ligne->total_tva;
|
|
|
|
$result = $object->deleteLine(GETPOSTINT("rowid"), $user);
|
|
if ($result >= 0) {
|
|
if ($result > 0) {
|
|
// Define output language
|
|
if (!getDolGlobalString('MAIN_DISABLE_PDF_AUTOUPDATE')) {
|
|
$outputlangs = $langs;
|
|
$newlang = '';
|
|
if (getDolGlobalInt('MAIN_MULTILANGS') /* && empty($newlang) */ && GETPOST('lang_id', 'aZ09')) {
|
|
$newlang = GETPOST('lang_id', 'aZ09');
|
|
}
|
|
if (getDolGlobalInt('MAIN_MULTILANGS') && empty($newlang)) {
|
|
$tmpuser = new User($db);
|
|
$tmpuser->fetch($object->fk_user_author);
|
|
$newlang = $tmpuser->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);
|
|
}
|
|
}
|
|
|
|
header("Location: ".$_SERVER["PHP_SELF"]."?id=".GETPOSTINT('id'));
|
|
exit;
|
|
} else {
|
|
setEventMessages($object->error, $object->errors, 'errors');
|
|
}
|
|
}
|
|
|
|
if ($action == "updateline" && $permissiontoadd) {
|
|
$object = new ExpenseReport($db);
|
|
$object->fetch($id);
|
|
|
|
// First save uploaded file
|
|
$fk_ecm_files = 0;
|
|
if (GETPOSTISSET('attachfile')) {
|
|
$arrayoffiles = GETPOST('attachfile', 'array');
|
|
if (is_array($arrayoffiles) && !empty($arrayoffiles[0])) {
|
|
include_once DOL_DOCUMENT_ROOT.'/ecm/class/ecmfiles.class.php';
|
|
$relativepath = 'expensereport/'.$object->ref.'/'.$arrayoffiles[0];
|
|
$ecmfiles = new EcmFiles($db);
|
|
$ecmfiles->fetch(0, '', $relativepath);
|
|
$fk_ecm_files = $ecmfiles->id;
|
|
}
|
|
}
|
|
|
|
$rowid = GETPOSTINT('rowid');
|
|
$type_fees_id = GETPOSTINT('fk_c_type_fees');
|
|
$fk_c_exp_tax_cat = GETPOSTINT('fk_c_exp_tax_cat');
|
|
$projet_id = $fk_project;
|
|
$comments = GETPOST('comments', 'restricthtml');
|
|
$qty = price2num(GETPOST('qty', 'alpha'));
|
|
$vatrate = GETPOST('vatrate', 'alpha');
|
|
|
|
// if VAT is not used in Dolibarr, set VAT rate to 0 because VAT rate is necessary.
|
|
if (empty($vatrate)) {
|
|
$vatrate = "0.000";
|
|
}
|
|
$tmpvat = price2num(preg_replace('/\s*\(.*\)/', '', $vatrate));
|
|
|
|
$value_unit_ht = price2num(GETPOST('value_unit_ht', 'alpha'), 'MU');
|
|
$value_unit = price2num(GETPOST('value_unit', 'alpha'), 'MU');
|
|
if (empty($value_unit)) {
|
|
$value_unit = price2num((float) $value_unit_ht + ((float) $value_unit_ht * (float) $tmpvat / 100), 'MU');
|
|
}
|
|
|
|
if (!GETPOSTINT('fk_c_type_fees') > 0) {
|
|
$error++;
|
|
setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("Type")), null, 'errors');
|
|
$action = '';
|
|
}
|
|
if ((float) $tmpvat < 0 || $tmpvat == '') {
|
|
$error++;
|
|
setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("Vat")), null, 'errors');
|
|
$action = '';
|
|
}
|
|
// Warning if date out of range
|
|
if ($date < $object->date_debut || $date > ($object->date_fin + (24 * 3600 - 1))) {
|
|
if (getDolGlobalString('EXPENSEREPORT_BLOCK_LINE_CREATION_IF_NOT_BETWEEN_DATES')) {
|
|
$error++;
|
|
}
|
|
|
|
$langs->load("errors");
|
|
$type = $error > 0 ? 'errors' : 'warnings';
|
|
setEventMessages($langs->trans("WarningDateOfLineMustBeInExpenseReportRange"), null, $type);
|
|
}
|
|
|
|
// If no project entered
|
|
if ($projectRequired && $projet_id <= 0) {
|
|
$error++;
|
|
setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("Project")), null, 'errors');
|
|
}
|
|
|
|
if (!$error) {
|
|
// TODO Use update method of ExpenseReportLine
|
|
$result = $object->updateline($rowid, $type_fees_id, $projet_id, $vatrate, $comments, (float) $qty, (float) $value_unit, $date, $id, $fk_c_exp_tax_cat, $fk_ecm_files);
|
|
if ($result >= 0) {
|
|
if ($result > 0) {
|
|
// Define output language
|
|
if (!getDolGlobalString('MAIN_DISABLE_PDF_AUTOUPDATE')) {
|
|
$outputlangs = $langs;
|
|
$newlang = '';
|
|
if (getDolGlobalInt('MAIN_MULTILANGS') /* && empty($newlang) */ && GETPOST('lang_id', 'aZ09')) {
|
|
$newlang = GETPOST('lang_id', 'aZ09');
|
|
}
|
|
if (getDolGlobalInt('MAIN_MULTILANGS') && empty($newlang)) {
|
|
$tmpuser = new User($db);
|
|
$tmpuser->fetch($object->fk_user_author);
|
|
$newlang = $tmpuser->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);
|
|
}
|
|
|
|
unset($qty);
|
|
unset($value_unit_ht);
|
|
unset($value_unit);
|
|
unset($vatrate);
|
|
unset($comments);
|
|
unset($fk_c_type_fees);
|
|
unset($fk_project);
|
|
unset($date);
|
|
}
|
|
|
|
$action = '';
|
|
} else {
|
|
setEventMessages($object->error, $object->errors, 'errors');
|
|
}
|
|
}
|
|
}
|
|
|
|
// Actions when printing a doc from card
|
|
include DOL_DOCUMENT_ROOT.'/core/actions_printing.inc.php';
|
|
|
|
// Actions to send emails
|
|
$triggersendname = 'EXPENSEREPORT_SENTBYMAIL';
|
|
$autocopy = 'MAIN_MAIL_AUTOCOPY_EXPENSEREPORT_TO';
|
|
$trackid = 'exp'.$object->id;
|
|
include DOL_DOCUMENT_ROOT.'/core/actions_sendmails.inc.php';
|
|
|
|
// Actions to build doc
|
|
$upload_dir = $conf->expensereport->dir_output;
|
|
include DOL_DOCUMENT_ROOT.'/core/actions_builddoc.inc.php';
|
|
}
|
|
|
|
|
|
/*
|
|
* View
|
|
*/
|
|
|
|
$title = $langs->trans("ExpenseReport")." - ".$langs->trans("Card");
|
|
$help_url = "EN:Module_Expense_Reports|FR:Module_Notes_de_frais";
|
|
|
|
llxHeader("", $title, $help_url);
|
|
|
|
$form = new Form($db);
|
|
$formfile = new FormFile($db);
|
|
$formproject = new FormProjets($db);
|
|
$projecttmp = new Project($db);
|
|
$paymentexpensereportstatic = new PaymentExpenseReport($db);
|
|
$bankaccountstatic = new Account($db);
|
|
$ecmfilesstatic = new EcmFiles($db);
|
|
$formexpensereport = new FormExpenseReport($db);
|
|
$remaintopay = 0;
|
|
|
|
// Create
|
|
if ($action == 'create') {
|
|
print load_fiche_titre($langs->trans("NewTrip"), '', 'trip');
|
|
|
|
print '<form action="'.$_SERVER['PHP_SELF'].'" method="post" name="create">';
|
|
print '<input type="hidden" name="token" value="'.newToken().'">';
|
|
print '<input type="hidden" name="action" value="add">';
|
|
print '<input type="hidden" name="backtopage" value="'.$backtopage.'">';
|
|
|
|
print dol_get_fiche_head([]);
|
|
|
|
print '<table class="border centpercent">';
|
|
print '<tbody>';
|
|
|
|
// User for expense report
|
|
print '<tr>';
|
|
print '<td class="fieldrequired">'.$langs->trans("User").'</td>';
|
|
print '<td>';
|
|
$defaultselectuser = $user->id;
|
|
if (GETPOSTINT('fk_user_author') > 0) {
|
|
$defaultselectuser = GETPOSTINT('fk_user_author');
|
|
}
|
|
$include_users = 'hierarchyme';
|
|
if (getDolGlobalString('MAIN_USE_ADVANCED_PERMS') && $user->hasRight('expensereport', 'writeall_advance')) {
|
|
$include_users = array();
|
|
}
|
|
print img_picto('', 'user', 'class="pictofixedwidth"').$form->select_dolusers($defaultselectuser, 'fk_user_author', 0, null, 0, $include_users, '', '0,'.$conf->entity, 0, 0, '', 0, '', 'minwidth200 maxwidth500 inline-block');
|
|
print '</td>';
|
|
print '</tr>';
|
|
|
|
// Date start
|
|
print '<tr>';
|
|
print '<td class="titlefieldcreate fieldrequired">'.$langs->trans("DateStart").'</td>';
|
|
print '<td>'.img_picto('', 'action', 'class="pictofixedwidth"');
|
|
print $form->selectDate($date_start ? $date_start : -1, 'date_debut', 0, 0, 0, '', 1, 1);
|
|
print '</td>';
|
|
print '</tr>';
|
|
|
|
// Date end
|
|
print '<tr>';
|
|
print '<td class="fieldrequired">'.$langs->trans("DateEnd").'</td>';
|
|
print '<td>'.img_picto('', 'action', 'class="pictofixedwidth"');
|
|
print $form->selectDate($date_end ? $date_end : -1, 'date_fin', 0, 0, 0, '', 1, 1);
|
|
print '</td>';
|
|
print '</tr>';
|
|
|
|
|
|
// Approver
|
|
print '<tr>';
|
|
print '<td>'.$langs->trans("ReviewedByCP").'</td>';
|
|
print '<td>';
|
|
$object = new ExpenseReport($db);
|
|
$include_users = $object->fetch_users_approver_expensereport();
|
|
if (empty($include_users)) {
|
|
print img_warning().' '.$langs->trans("NobodyHasPermissionToValidateExpenseReport");
|
|
} else {
|
|
$defaultselectuser = (empty($user->fk_user_expense_validator) ? $user->fk_user : $user->fk_user_expense_validator); // Will work only if supervisor has permission to approve so is inside include_users
|
|
if (getDolGlobalString('EXPENSEREPORT_DEFAULT_VALIDATOR')) {
|
|
$defaultselectuser = getDolGlobalString('EXPENSEREPORT_DEFAULT_VALIDATOR'); // Can force default approver
|
|
}
|
|
if (GETPOSTINT('fk_user_validator') > 0) {
|
|
$defaultselectuser = GETPOSTINT('fk_user_validator');
|
|
}
|
|
$s = $form->select_dolusers($defaultselectuser, "fk_user_validator", 1, null, ((empty($defaultselectuser) || !getDolGlobalString('EXPENSEREPORT_DEFAULT_VALIDATOR_UNCHANGEABLE')) ? 0 : 1), $include_users);
|
|
print img_picto('', 'user', 'class="pictofixedwidth"').$form->textwithpicto($s, $langs->trans("AnyOtherInThisListCanValidate"));
|
|
}
|
|
print '</td>';
|
|
print '</tr>';
|
|
|
|
// Payment mode
|
|
if (getDolGlobalString('EXPENSEREPORT_ASK_PAYMENTMODE_ON_CREATION')) {
|
|
print '<tr>';
|
|
print '<td>'.$langs->trans("ModePaiement").'</td>';
|
|
print '<td>';
|
|
$form->select_types_paiements('', 'fk_c_paiement');
|
|
print '</td>';
|
|
print '</tr>';
|
|
}
|
|
|
|
// Public note
|
|
$note_public = GETPOSTISSET('note_public') ? GETPOST('note_public', 'restricthtml') : '';
|
|
|
|
print '<tr>';
|
|
print '<td class="tdtop">'.$langs->trans('NotePublic').'</td>';
|
|
print '<td>';
|
|
|
|
$doleditor = new DolEditor('note_public', $note_public, '', 80, 'dolibarr_notes', 'In', false, false, !getDolGlobalString('FCKEDITOR_ENABLE_NOTE_PUBLIC') ? 0 : 1, ROWS_3, '90%');
|
|
print $doleditor->Create(1);
|
|
print '</td></tr>';
|
|
|
|
// Private note
|
|
$note_private = GETPOSTISSET('note_private') ? GETPOST('note_private', 'restricthtml') : '';
|
|
|
|
if (empty($user->socid)) {
|
|
print '<tr>';
|
|
print '<td class="tdtop">'.$langs->trans('NotePrivate').'</td>';
|
|
print '<td>';
|
|
|
|
$doleditor = new DolEditor('note_private', $note_private, '', 80, 'dolibarr_notes', 'In', false, false, !getDolGlobalString('FCKEDITOR_ENABLE_NOTE_PRIVATE') ? 0 : 1, ROWS_3, '90%');
|
|
print $doleditor->Create(1);
|
|
print '</td></tr>';
|
|
}
|
|
|
|
// Other attributes
|
|
$parameters = array('colspan' => ' colspan="3"', 'cols' => 3);
|
|
$reshook = $hookmanager->executeHooks('formObjectOptions', $parameters, $object, $action); // Note that $action and $object may have been modified by
|
|
print $hookmanager->resPrint;
|
|
if (empty($reshook)) {
|
|
print $object->showOptionals($extrafields, 'create', $parameters);
|
|
}
|
|
|
|
print '<tbody>';
|
|
print '</table>';
|
|
|
|
print dol_get_fiche_end();
|
|
|
|
print $form->buttonsSaveCancel("AddTrip");
|
|
|
|
print '</form>';
|
|
} elseif ($object->id > 0) {
|
|
$userauthor = null;
|
|
$result = $object->fetch($id, $ref);
|
|
|
|
if ($result > 0) {
|
|
if (!in_array($object->fk_user_author, $childids)) {
|
|
if (!$user->hasRight('expensereport', 'readall') && !$user->hasRight('expensereport', 'lire_tous')
|
|
&& (!getDolGlobalString('MAIN_USE_ADVANCED_PERMS') || !$user->hasRight('expensereport', 'writeall_advance'))) {
|
|
print load_fiche_titre($langs->trans('TripCard'), '', 'trip');
|
|
|
|
print '<div class="tabBar">';
|
|
print $langs->trans('NotUserRightToView');
|
|
print '</div>';
|
|
|
|
// End of page
|
|
llxFooter();
|
|
|
|
$db->close();
|
|
|
|
exit;
|
|
}
|
|
}
|
|
|
|
$head = expensereport_prepare_head($object);
|
|
|
|
if ($action == 'edit' && ($object->status <= ExpenseReport::STATUS_VALIDATED || $object->status == ExpenseReport::STATUS_REFUSED)) {
|
|
print "<form name='update' action=\"".$_SERVER['PHP_SELF']."\" method=\"post\">\n";
|
|
print '<input type="hidden" name="token" value="'.newToken().'">';
|
|
print '<input type="hidden" name="id" value="'.$id.'">';
|
|
print '<input type="hidden" name="backtopage" value="'.$backtopage.'">';
|
|
|
|
print dol_get_fiche_head($head, 'card', $langs->trans("ExpenseReport"), 0, 'trip', 0, '', '', 0, '', 0); // No drag and drop on the edit form, dropping a file reloads the page and discards it
|
|
|
|
if ($object->status == ExpenseReport::STATUS_REFUSED) {
|
|
print '<input type="hidden" name="action" value="updateFromRefuse">';
|
|
} else {
|
|
print '<input type="hidden" name="action" value="update">';
|
|
}
|
|
|
|
$linkback = '<a href="'.DOL_URL_ROOT.'/expensereport/list.php?restore_lastsearch_values=1'.(!empty($socid) ? '&socid='.$socid : '').'">'.$langs->trans("BackToList").'</a>';
|
|
|
|
print '<table class="border centpercent">';
|
|
|
|
print '<tr>';
|
|
print '<td>'.$langs->trans("User").'</td>';
|
|
print '<td>';
|
|
$userfee = new User($db);
|
|
if ($object->fk_user_author > 0) {
|
|
$userfee->fetch($object->fk_user_author);
|
|
print $userfee->getNomUrl(-1);
|
|
}
|
|
print '</td></tr>';
|
|
|
|
// Ref
|
|
print '<tr><td class="titlefieldcreate">'.$langs->trans("Ref").'</td><td>';
|
|
print $form->showrefnav($object, 'ref', $linkback, 1, 'ref', 'ref', '');
|
|
print '</td></tr>';
|
|
|
|
print '<tr>';
|
|
print '<td>'.$langs->trans("DateStart").'</td>';
|
|
print '<td>';
|
|
print $form->selectDate($object->date_debut, 'date_debut');
|
|
print '</td>';
|
|
print '</tr>';
|
|
print '<tr>';
|
|
print '<td>'.$langs->trans("DateEnd").'</td>';
|
|
print '<td>';
|
|
print $form->selectDate($object->date_fin, 'date_fin');
|
|
print '</td>';
|
|
print '</tr>';
|
|
|
|
if (getDolGlobalString('EXPENSEREPORT_ASK_PAYMENTMODE_ON_CREATION')) {
|
|
print '<tr>';
|
|
print '<td>'.$langs->trans("ModePaiement").'</td>';
|
|
print '<td>';
|
|
$form->select_types_paiements((string) $object->fk_c_paiement, 'fk_c_paiement');
|
|
print '</td>';
|
|
print '</tr>';
|
|
}
|
|
|
|
if ($object->status < 3) {
|
|
print '<tr>';
|
|
print '<td>'.$langs->trans("VALIDATOR").'</td>'; // Approbator
|
|
print '<td>';
|
|
$include_users = $object->fetch_users_approver_expensereport();
|
|
$s = $form->select_dolusers($object->fk_user_validator, "fk_user_validator", 1, null, 0, $include_users);
|
|
print $form->textwithpicto($s, $langs->trans("AnyOtherInThisListCanValidate"));
|
|
print '</td>';
|
|
print '</tr>';
|
|
} else {
|
|
print '<tr>';
|
|
print '<td>'.$langs->trans("VALIDOR").'</td>';
|
|
print '<td>';
|
|
$userfee = new User($db);
|
|
$userfee->fetch($object->fk_user_valid);
|
|
print $userfee->getNomUrl(-1);
|
|
print '</td></tr>';
|
|
}
|
|
|
|
if ($object->status == ExpenseReport::STATUS_CLOSED) {
|
|
print '<tr>';
|
|
print '<td>'.$langs->trans("AUTHORPAIEMENT").'</td>';
|
|
print '<td>';
|
|
$userfee = new User($db);
|
|
$userfee->fetch($user->id);
|
|
print $userfee->getNomUrl(-1);
|
|
print '</td></tr>';
|
|
}
|
|
|
|
// Other attributes
|
|
//$cols = 3;
|
|
//include DOL_DOCUMENT_ROOT . '/core/tpl/extrafields_edit.tpl.php';
|
|
|
|
print '</table>';
|
|
|
|
print dol_get_fiche_end();
|
|
|
|
print $form->buttonsSaveCancel("Modify");
|
|
|
|
print '</form>';
|
|
} else {
|
|
$taxlessUnitPriceDisabled = getDolGlobalString('EXPENSEREPORT_FORCE_LINE_AMOUNTS_INCLUDING_TAXES_ONLY') ? ' disabled' : '';
|
|
|
|
print dol_get_fiche_head($head, 'card', $langs->trans("ExpenseReport"), -1, 'trip', 0, '', '', 0, '', 1);
|
|
|
|
$formconfirm = '';
|
|
|
|
// Clone confirmation
|
|
if ($action == 'clone') {
|
|
// Create an array for form
|
|
$criteriaforfilter = 'hierarchyme';
|
|
if ($user->hasRight('expensereport', 'readall')) {
|
|
$criteriaforfilter = '';
|
|
}
|
|
$formquestion = array(
|
|
'text' => '',
|
|
0 => array('type' => 'other', 'name' => 'fk_user_author', 'label' => $langs->trans("SelectTargetUser"), 'value' => $form->select_dolusers((GETPOSTINT('fk_user_author') > 0 ? GETPOSTINT('fk_user_author') : $user->id), 'fk_user_author', 0, null, 0, $criteriaforfilter, '', '0', 0, 0, '', 0, '', 'maxwidth150'))
|
|
);
|
|
// Paiement incomplet. On demande si motif = escompte ou autre
|
|
$formconfirm = $form->formconfirm($_SERVER["PHP_SELF"].'?id='.$object->id, $langs->trans('ToClone'), $langs->trans('ConfirmCloneExpenseReport', $object->ref), 'confirm_clone', $formquestion, 'yes', 1);
|
|
}
|
|
|
|
if ($action == 'save') {
|
|
$formconfirm = $form->formconfirm($_SERVER["PHP_SELF"]."?id=".$id, $langs->trans("SaveTrip"), $langs->trans("ConfirmSaveTrip"), "confirm_validate", "", "", 1);
|
|
}
|
|
|
|
if ($action == 'save_from_refuse') {
|
|
$formconfirm = $form->formconfirm($_SERVER["PHP_SELF"]."?id=".$id, $langs->trans("SaveTrip"), $langs->trans("ConfirmSaveTrip"), "confirm_save_from_refuse", "", "", 1);
|
|
}
|
|
|
|
if ($action == 'delete') {
|
|
$formconfirm = $form->formconfirm($_SERVER["PHP_SELF"]."?id=".$id, $langs->trans("DeleteTrip"), $langs->trans("ConfirmDeleteTrip"), "confirm_delete", "", "", 1);
|
|
}
|
|
|
|
if ($action == 'validate') {
|
|
$formconfirm = $form->formconfirm($_SERVER["PHP_SELF"]."?id=".$id, $langs->trans("ValideTrip"), $langs->trans("ConfirmValideTrip"), "confirm_approve", "", "", 1);
|
|
}
|
|
|
|
if ($action == 'paid') {
|
|
$formconfirm = $form->formconfirm($_SERVER["PHP_SELF"]."?id=".$id, $langs->trans("PaidTrip"), $langs->trans("ConfirmPaidTrip"), "confirm_paid", "", "", 1);
|
|
}
|
|
|
|
if ($action == 'cancel') {
|
|
$array_input = array('text' => $langs->trans("ConfirmCancelTrip"), 0 => array('type' => "text", 'label' => '<strong>'.$langs->trans("Comment").'</strong>', 'name' => "detail_cancel", 'value' => ""));
|
|
$formconfirm = $form->formconfirm($_SERVER["PHP_SELF"]."?id=".$id, $langs->trans("Cancel"), "", "confirm_cancel", $array_input, "", 1);
|
|
}
|
|
|
|
if ($action == 'setdraft') {
|
|
$formconfirm = $form->formconfirm($_SERVER["PHP_SELF"]."?id=".$id, $langs->trans("BrouillonnerTrip"), $langs->trans("ConfirmBrouillonnerTrip"), "confirm_setdraft", "", "", 1);
|
|
}
|
|
|
|
if ($action == 'refuse') { // Deny
|
|
$array_input = array('text' => $langs->trans("ConfirmRefuseTrip"), 0 => array('type' => "text", 'label' => $langs->trans("Comment"), 'name' => "detail_refuse", 'value' => ""));
|
|
$formconfirm = $form->formconfirm($_SERVER["PHP_SELF"]."?id=".$id, $langs->trans("Deny"), '', "confirm_refuse", $array_input, "yes", 1);
|
|
}
|
|
|
|
if ($action == 'delete_line') {
|
|
$formconfirm = $form->formconfirm($_SERVER["PHP_SELF"]."?id=".$id."&rowid=".GETPOSTINT('rowid'), $langs->trans("DeleteLine"), $langs->trans("ConfirmDeleteLine"), "confirm_delete_line", '', 'yes', 1);
|
|
}
|
|
|
|
// Call Hook formConfirm
|
|
$parameters = array('formConfirm' => $formconfirm);
|
|
$reshook = $hookmanager->executeHooks('formConfirm', $parameters, $object, $action); // Note that $action and $object may have been modified by hook
|
|
if (empty($reshook)) {
|
|
$formconfirm .= $hookmanager->resPrint;
|
|
} elseif ($reshook > 0) {
|
|
$formconfirm = $hookmanager->resPrint;
|
|
}
|
|
|
|
// Print form confirm
|
|
print $formconfirm;
|
|
|
|
// Expense report card
|
|
$linkback = '<a href="'.DOL_URL_ROOT.'/expensereport/list.php?restore_lastsearch_values=1'.(!empty($socid) ? '&socid='.$socid : '').'">'.$langs->trans("BackToList").'</a>';
|
|
|
|
$morehtmlref = '<div class="refidno">';
|
|
$morehtmlref .= '</div>';
|
|
|
|
dol_banner_tab($object, 'ref', $linkback, 1, 'ref', 'ref', $morehtmlref);
|
|
|
|
print '<div class="fichecenter">';
|
|
print '<div class="fichehalfleft">';
|
|
print '<div class="underbanner clearboth"></div>';
|
|
|
|
print '<table class="border tableforfield centpercent">';
|
|
|
|
// Author
|
|
print '<tr>';
|
|
print '<td class="titlefield">'.$langs->trans("User").'</td>';
|
|
print '<td>';
|
|
if ($object->fk_user_author > 0) {
|
|
$userauthor = new User($db);
|
|
$result = $userauthor->fetch($object->fk_user_author);
|
|
if ($result < 0) {
|
|
dol_print_error(null, $userauthor->error);
|
|
} elseif ($result > 0) {
|
|
print $userauthor->getNomUrl(-1);
|
|
}
|
|
}
|
|
print '</td></tr>';
|
|
|
|
// Period
|
|
print '<tr>';
|
|
print '<td class="titlefield">'.$langs->trans("Period").'</td>';
|
|
print '<td>';
|
|
print get_date_range($object->date_debut, $object->date_fin, 'day', $langs, 0);
|
|
print '</td>';
|
|
print '</tr>';
|
|
if (getDolGlobalString('EXPENSEREPORT_ASK_PAYMENTMODE_ON_CREATION')) {
|
|
print '<tr>';
|
|
print '<td>'.$langs->trans("ModePaiement").'</td>';
|
|
print '<td>'.$object->fk_c_paiement.'</td>';
|
|
print '</tr>';
|
|
}
|
|
|
|
// Validation date
|
|
print '<tr>';
|
|
print '<td>'.$langs->trans("DATE_SAVE").'</td>';
|
|
print '<td>'.dol_print_date($object->date_valid, 'dayhour', 'tzuser');
|
|
if ($object->status == ExpenseReport::STATUS_VALIDATED && $object->hasDelay('toapprove')) {
|
|
print ' '.img_warning($langs->trans("Late").' - '.$langs->trans("ToApprove"));
|
|
}
|
|
if ($object->status == ExpenseReport::STATUS_APPROVED && $object->hasDelay('topay')) {
|
|
print ' '.img_warning($langs->trans("Late").' - '.$langs->trans("ToPay"));
|
|
}
|
|
print '</td></tr>';
|
|
print '</tr>';
|
|
|
|
// User to inform for approval
|
|
if ($object->status <= ExpenseReport::STATUS_VALIDATED) { // informed
|
|
print '<tr>';
|
|
print '<td>'.$langs->trans("VALIDATOR").'</td>'; // approver
|
|
print '<td>';
|
|
if ($object->fk_user_validator > 0) {
|
|
$userfee = new User($db);
|
|
$result = $userfee->fetch($object->fk_user_validator);
|
|
if ($result > 0) {
|
|
print $userfee->getNomUrl(-1);
|
|
}
|
|
if (empty($userfee->email) || !isValidEmail($userfee->email)) {
|
|
$langs->load("errors");
|
|
print img_warning($langs->trans("ErrorBadEMail", $userfee->email));
|
|
}
|
|
}
|
|
print '</td></tr>';
|
|
} elseif ($object->status == ExpenseReport::STATUS_CANCELED) {
|
|
print '<tr>';
|
|
print '<td>'.$langs->trans("CANCEL_USER").'</span></td>';
|
|
print '<td>';
|
|
if ($object->fk_user_cancel > 0) {
|
|
$userfee = new User($db);
|
|
$result = $userfee->fetch($object->fk_user_cancel);
|
|
if ($result > 0) {
|
|
print $userfee->getNomUrl(-1);
|
|
}
|
|
}
|
|
print '</td></tr>';
|
|
|
|
print '<tr>';
|
|
print '<td>'.$langs->trans("MOTIF_CANCEL").'</td>';
|
|
print '<td>'.$object->detail_cancel.'</td></tr>';
|
|
print '</tr>';
|
|
print '<tr>';
|
|
print '<td>'.$langs->trans("DATE_CANCEL").'</td>';
|
|
print '<td>'.dol_print_date($object->date_cancel, 'dayhour', 'tzuser').'</td></tr>';
|
|
print '</tr>';
|
|
} else {
|
|
print '<tr>';
|
|
print '<td>'.$langs->trans("ApprovedBy").'</td>';
|
|
print '<td>';
|
|
if ($object->fk_user_approve > 0) {
|
|
$userapp = new User($db);
|
|
$result = $userapp->fetch($object->fk_user_approve);
|
|
if ($result > 0) {
|
|
print $userapp->getNomUrl(-1);
|
|
}
|
|
}
|
|
print '</td></tr>';
|
|
|
|
print '<tr>';
|
|
print '<td>'.$langs->trans("DateApprove").'</td>';
|
|
print '<td>'.dol_print_date($object->date_approve, 'dayhour', 'tzuser').'</td></tr>';
|
|
print '</tr>';
|
|
}
|
|
|
|
if ($object->status == ExpenseReport::STATUS_REFUSED || !empty($object->detail_refuse)) {
|
|
print '<tr>';
|
|
print '<td>'.$langs->trans("REFUSEUR").'</td>';
|
|
print '<td>';
|
|
$userfee = new User($db);
|
|
$result = $userfee->fetch($object->fk_user_refuse);
|
|
if ($result > 0) {
|
|
print $userfee->getNomUrl(-1);
|
|
}
|
|
print '</td></tr>';
|
|
|
|
print '<tr>';
|
|
print '<td>'.$langs->trans("DATE_REFUS").'</td>';
|
|
print '<td>'.dol_print_date($object->date_refuse, 'dayhour', 'tzuser');
|
|
if ($object->detail_refuse) {
|
|
print ' - '.$object->detail_refuse;
|
|
}
|
|
print '</td>';
|
|
print '</tr>';
|
|
}
|
|
|
|
if ($object->status == ExpenseReport::STATUS_CLOSED) {
|
|
/* TODO this fields are not yet filled
|
|
print '<tr>';
|
|
print '<td>'.$langs->trans("AUTHORPAIEMENT").'</td>';
|
|
print '<td>';
|
|
$userfee=new User($db);
|
|
$userfee->fetch($object->fk_user_paid);
|
|
print $userfee->getNomUrl(-1);
|
|
print '</td></tr>';
|
|
print '<tr>';
|
|
print '<td>'.$langs->trans("DATE_PAIEMENT").'</td>';
|
|
print '<td>'.$object->date_paiement.'</td></tr>';
|
|
print '</tr>';
|
|
*/
|
|
}
|
|
|
|
// Other attributes
|
|
$cols = 2;
|
|
include DOL_DOCUMENT_ROOT.'/core/tpl/extrafields_view.tpl.php';
|
|
|
|
print '</table>';
|
|
|
|
print '</div>';
|
|
print '<div class="fichehalfright">';
|
|
print '<div class="underbanner clearboth"></div>';
|
|
|
|
print '<table class="border tableforfield centpercent">';
|
|
|
|
// Amount
|
|
print '<tr>';
|
|
print '<td class="titlefieldmiddle">'.$langs->trans("AmountHT").'</td>';
|
|
print '<td class="nowrap amountcard">'.price($object->total_ht, 1, '', 1, - 1, - 1, $conf->currency).'</td>';
|
|
$rowspan = 5;
|
|
if ($object->status <= ExpenseReport::STATUS_VALIDATED) {
|
|
$rowspan++;
|
|
} else {
|
|
$rowspan += 2;
|
|
}
|
|
if ($object->status == ExpenseReport::STATUS_REFUSED || !empty($object->detail_refuse)) {
|
|
$rowspan += 2;
|
|
}
|
|
if ($object->status == ExpenseReport::STATUS_CLOSED) {
|
|
$rowspan += 2;
|
|
}
|
|
print "</td>";
|
|
print '</tr>';
|
|
|
|
print '<tr>';
|
|
print '<td>'.$langs->trans("AmountVAT").'</td>';
|
|
print '<td class="nowrap amountcard">'.price($object->total_tva, 1, '', 1, -1, -1, $conf->currency).'</td>';
|
|
print '</tr>';
|
|
|
|
// Amount Local Taxes
|
|
if ($mysoc->localtax1_assuj == "1" || $object->total_localtax1 != 0) { // Localtax1
|
|
print '<tr><td>'.$langs->transcountry("AmountLT1", $mysoc->country_code).'</td>';
|
|
print '<td class="valuefield">'.price($object->total_localtax1, 1, '', 1, -1, -1, $conf->currency).'</td></tr>';
|
|
}
|
|
if ($mysoc->localtax2_assuj == "1" || $object->total_localtax2 != 0) { // Localtax2 IRPF
|
|
print '<tr><td>'.$langs->transcountry("AmountLT2", $mysoc->country_code).'</td>';
|
|
print '<td class="valuefield">'.price($object->total_localtax2, 1, '', 1, -1, -1, $conf->currency).'</td></tr>';
|
|
}
|
|
|
|
print '<tr>';
|
|
print '<td>'.$langs->trans("AmountTTC").'</td>';
|
|
print '<td class="nowrap amountcard">'.price($object->total_ttc, 1, '', 1, -1, -1, $conf->currency).'</td>';
|
|
print '</tr>';
|
|
|
|
// List of payments already done
|
|
$canSeeBankAccount = isModEnabled('bank') && $user->hasRight('banque', 'lire');
|
|
$nbcols = 3;
|
|
$nbrows = 0;
|
|
if ($canSeeBankAccount) {
|
|
$nbrows++;
|
|
$nbcols++;
|
|
}
|
|
|
|
print '<div class="div-table-responsive-no-min">';
|
|
print '<table class="noborder paymenttable centpercent">';
|
|
|
|
print '<tr class="liste_titre">';
|
|
print '<td class="liste_titre">'.$langs->trans('Payments').'</td>';
|
|
print '<td class="liste_titre">'.$langs->trans('Date').'</td>';
|
|
print '<td class="liste_titre">'.$langs->trans('Type').'</td>';
|
|
if ($canSeeBankAccount) {
|
|
print '<td class="liste_titre right">'.$langs->trans('BankAccount').'</td>';
|
|
}
|
|
print '<td class="liste_titre" width="18"> </td>';
|
|
print '<td class="liste_titre right">'.$langs->trans('Amount').'</td>';
|
|
print '</tr>';
|
|
|
|
// Payments already done (from payment on this expensereport)
|
|
$sql = "SELECT p.rowid, p.num_payment, p.datep as dp, p.amount, p.fk_bank,";
|
|
$sql .= "c.code as payment_code, c.libelle as payment_type,";
|
|
$sql .= "ba.rowid as baid, ba.ref as baref, ba.label, ba.number as banumber, ba.account_number, ba.fk_accountancy_journal";
|
|
$sql .= " FROM ".MAIN_DB_PREFIX."expensereport as e, ".MAIN_DB_PREFIX."payment_expensereport as p";
|
|
$sql .= " LEFT JOIN ".MAIN_DB_PREFIX."c_paiement as c ON p.fk_typepayment = c.id";
|
|
$sql .= ' LEFT JOIN '.MAIN_DB_PREFIX.'bank as b ON p.fk_bank = b.rowid';
|
|
$sql .= ' LEFT JOIN '.MAIN_DB_PREFIX.'bank_account as ba ON b.fk_account = ba.rowid';
|
|
$sql .= " WHERE e.rowid = ".((int) $id);
|
|
$sql .= " AND p.fk_expensereport = e.rowid";
|
|
$sql .= ' AND e.entity IN ('.getEntity('expensereport').')';
|
|
$sql .= " ORDER BY dp";
|
|
|
|
$resql = $db->query($sql);
|
|
if ($resql) {
|
|
$num = $db->num_rows($resql);
|
|
$i = 0;
|
|
$totalpaid = 0;
|
|
while ($i < $num) {
|
|
$objp = $db->fetch_object($resql);
|
|
|
|
$paymentexpensereportstatic->id = $objp->rowid;
|
|
$paymentexpensereportstatic->datep = $db->jdate($objp->dp);
|
|
$paymentexpensereportstatic->ref = $objp->rowid;
|
|
$paymentexpensereportstatic->num_payment = $objp->num_payment;
|
|
$paymentexpensereportstatic->type_code = $objp->payment_code;
|
|
$paymentexpensereportstatic->type_label = $objp->payment_type;
|
|
|
|
print '<tr class="oddeven">';
|
|
print '<td>';
|
|
print $paymentexpensereportstatic->getNomUrl(1);
|
|
print '</td>';
|
|
print '<td>'.dol_print_date($db->jdate($objp->dp), 'day')."</td>\n";
|
|
$labeltype = $langs->trans("PaymentType".$objp->payment_code) != "PaymentType".$objp->payment_code ? $langs->trans("PaymentType".$objp->payment_code) : $objp->payment_type;
|
|
print "<td>".$labeltype.' '.$objp->num_payment."</td>\n";
|
|
// Bank account
|
|
if ($canSeeBankAccount) {
|
|
$bankaccountstatic->id = $objp->baid;
|
|
$bankaccountstatic->ref = $objp->baref;
|
|
$bankaccountstatic->label = $objp->baref;
|
|
$bankaccountstatic->number = $objp->banumber;
|
|
|
|
if (isModEnabled('accounting')) {
|
|
$bankaccountstatic->account_number = $objp->account_number;
|
|
|
|
$accountingjournal = new AccountingJournal($db);
|
|
$accountingjournal->fetch($objp->fk_accountancy_journal);
|
|
$bankaccountstatic->accountancy_journal = $accountingjournal->getNomUrl(0, 1, 1, '', 1);
|
|
}
|
|
|
|
print '<td class="right">';
|
|
if ($bankaccountstatic->id) {
|
|
print $bankaccountstatic->getNomUrl(1, 'transactions');
|
|
}
|
|
print '</td>';
|
|
}
|
|
print '<td></td>';
|
|
print '<td class="right">'.price($objp->amount)."</td>";
|
|
print "</tr>";
|
|
$totalpaid += $objp->amount;
|
|
$i++;
|
|
}
|
|
$totalpaid = price2num($totalpaid); // Round $totalpaid to fix floating problem after addition into loop
|
|
|
|
$remaintopay = price2num($object->total_ttc - (float) $totalpaid);
|
|
$resteapayeraffiche = $remaintopay;
|
|
|
|
if ($remaintopay > 0) {
|
|
$cssforamountpaymentcomplete = 'amountremaintopay';
|
|
} else {
|
|
$cssforamountpaymentcomplete = 'amountpaymentcomplete';
|
|
}
|
|
|
|
if ($object->status == ExpenseReport::STATUS_REFUSED) {
|
|
$cssforamountpaymentcomplete = 'amountpaymentneutral strikefordisabled';
|
|
} elseif ($object->paid == 1 && $remaintopay > 0) {
|
|
$cssforamountpaymentcomplete = 'amountpaymentneutral strikefordisabled';
|
|
}
|
|
print '<tr><td colspan="'.$nbcols.'" class="right">'.$langs->trans("AlreadyPaid").':</td>';
|
|
print '<td></td>';
|
|
print '<td class="right">'.price($totalpaid).'</td></tr>';
|
|
|
|
print '<tr><td colspan="'.$nbcols.'" class="right">'.$langs->trans("AmountExpected").':</td>';
|
|
print '<td></td>';
|
|
print '<td class="right">'.price($object->total_ttc).'</td></tr>';
|
|
|
|
print '<tr><td colspan="'.$nbcols.'" class="right">'.$langs->trans("RemainderToPay").':</td>';
|
|
print '<td></td>';
|
|
print '<td class="right'.($resteapayeraffiche ? ' amountremaintopay' : (' '.$cssforamountpaymentcomplete)).'">'.price($resteapayeraffiche).'</td></tr>';
|
|
|
|
$db->free($resql);
|
|
} else {
|
|
dol_print_error($db);
|
|
}
|
|
print "</table>";
|
|
print '</div>';
|
|
|
|
print '<div class="clearboth"></div>';
|
|
print '</div>';
|
|
|
|
|
|
print '<br><br>';
|
|
|
|
print '<div style="clear: both;"></div>';
|
|
|
|
$actiontouse = 'updateline';
|
|
if (($object->status == ExpenseReport::STATUS_DRAFT || $object->status == ExpenseReport::STATUS_REFUSED) && $action != 'editline') {
|
|
$actiontouse = 'addline';
|
|
}
|
|
|
|
print '<form name="expensereport" action="'.$_SERVER["PHP_SELF"].'" enctype="multipart/form-data" method="post" >';
|
|
print '<input type="hidden" name="token" value="'.newToken().'">';
|
|
print '<input type="hidden" name="action" value="'.$actiontouse.'">';
|
|
print '<input type="hidden" name="id" value="'.$object->id.'">';
|
|
print '<input type="hidden" name="fk_expensereport" value="'.$object->id.'" />';
|
|
print '<input type="hidden" name="backtopage" value="'.$backtopage.'">';
|
|
print '<input type="hidden" name="page_y" value="">';
|
|
|
|
print '<div class="div-table-responsive-no-min">';
|
|
print '<table id="tablelines" class="noborder centpercent">';
|
|
|
|
if (!empty($object->lines)) {
|
|
$i = 0;
|
|
$total = 0;
|
|
|
|
print '<tr class="liste_titre headerexpensereportdet">';
|
|
print '<td class="center linecollinenb">'.$langs->trans('LineNb').'</td>';
|
|
//print '<td class="center">'.$langs->trans('Piece').'</td>';
|
|
print '<td class="center linecoldate">'.$langs->trans('Date').'</td>';
|
|
if (isModEnabled('project')) {
|
|
print '<td class="minwidth100imp linecolproject">'.$langs->trans('Project').'</td>';
|
|
}
|
|
print '<td class="center linecoltype">'.$langs->trans('Type').'</td>';
|
|
if (getDolGlobalString('MAIN_USE_EXPENSE_IK')) {
|
|
print '<td class="center linecolcarcategory">'.$langs->trans('CarCategory').'</td>';
|
|
}
|
|
print '<td class="linecoldescription">'.$langs->trans('Description').'</td>';
|
|
print '<td class="right linecolvat">'.$langs->trans('VAT').'</td>';
|
|
print '<td class="right linecolpriceuht">'.$langs->trans('PriceUHT').'</td>';
|
|
print '<td class="right linecolpriceuttc">'.$langs->trans('PriceUTTC').'</td>';
|
|
print '<td class="right linecolqty">'.$langs->trans('Qty').'</td>';
|
|
if ($action != 'editline') {
|
|
print '<td class="right linecolamountht">'.$langs->trans('AmountHT').'</td>';
|
|
print '<td class="right linecolamountttc">'.$langs->trans('AmountTTC').'</td>';
|
|
}
|
|
// Picture
|
|
print '<td>';
|
|
print '</td>';
|
|
|
|
// Information if there's a rule restriction
|
|
print '<td>';
|
|
print '</td>';
|
|
|
|
// Ajout des boutons de modification/suppression
|
|
if (($object->status < ExpenseReport::STATUS_VALIDATED || $object->status == ExpenseReport::STATUS_REFUSED) && $user->hasRight('expensereport', 'creer')) {
|
|
print '<td class="right"></td>';
|
|
}
|
|
print '</tr>';
|
|
|
|
foreach ($object->lines as &$line) {
|
|
$numline = $i + 1;
|
|
|
|
if ($action != 'editline' || $line->id != GETPOSTINT('rowid')) {
|
|
print '<tr class="oddeven linetr" data-id="'.$line->id.'">';
|
|
|
|
// Num
|
|
print '<td class="center linecollinenb">';
|
|
print $numline;
|
|
print '</td>';
|
|
|
|
// Date
|
|
print '<td class="center linecoldate">'.dol_print_date($db->jdate($line->date), 'day').'</td>';
|
|
|
|
// Project
|
|
if (isModEnabled('project')) {
|
|
print '<td class="lineproject">';
|
|
if ($line->fk_project > 0) {
|
|
$projecttmp->id = $line->fk_project;
|
|
$projecttmp->ref = $line->projet_ref;
|
|
$projecttmp->title = $line->projet_title;
|
|
print $projecttmp->getNomUrl(1);
|
|
}
|
|
print '</td>';
|
|
}
|
|
|
|
$titlealt = '';
|
|
if (isModEnabled('accounting')) {
|
|
require_once DOL_DOCUMENT_ROOT.'/accountancy/class/accountingaccount.class.php';
|
|
$accountingaccount = new AccountingAccount($db);
|
|
$resaccountingaccount = $accountingaccount->fetch(0, $line->type_fees_accountancy_code, 1);
|
|
//$titlealt .= '<span class="opacitymedium">';
|
|
$titlealt .= $langs->trans("AccountancyCode").': ';
|
|
if ($resaccountingaccount > 0) {
|
|
$titlealt .= $accountingaccount->account_number;
|
|
} else {
|
|
$titlealt .= $langs->trans("NotFound");
|
|
}
|
|
//$titlealt .= '</span>';
|
|
}
|
|
|
|
// Type of fee
|
|
print '<td class="center linecoltype" title="'.dol_escape_htmltag($titlealt).'">';
|
|
$labeltype = ($langs->trans(($line->type_fees_code)) == $line->type_fees_code ? $line->type_fees_libelle : $langs->trans($line->type_fees_code));
|
|
print $labeltype;
|
|
print '</td>';
|
|
|
|
// IK
|
|
if (getDolGlobalString('MAIN_USE_EXPENSE_IK')) {
|
|
print '<td class="fk_c_exp_tax_cat linecoltaxcat">';
|
|
$exp_tax_cat_label = dol_getIdFromCode($db, $line->fk_c_exp_tax_cat, 'c_exp_tax_cat', 'rowid', 'label');
|
|
print $langs->trans($exp_tax_cat_label);
|
|
print '</td>';
|
|
}
|
|
|
|
// Comment
|
|
print '<td class="left linecolcomment minwidth100">'.dol_nl2br($line->comments).'</td>';
|
|
|
|
// VAT rate
|
|
$senderissupplier = 0;
|
|
$tooltiponprice = '';
|
|
$tooltiponpriceend = '';
|
|
if (!getDolGlobalString('MAIN_OPTIMIZEFORTEXTBROWSER')) {
|
|
$tooltiponprice = $langs->transcountry("TotalHT", $mysoc->country_code).'='.price($line->total_ht);
|
|
$tooltiponprice .= '<br>'.$langs->transcountry("TotalVAT", ($senderissupplier ? $object->thirdparty->country_code : $mysoc->country_code)).'='.price($line->total_tva);
|
|
if (is_object($object->thirdparty)) {
|
|
if ($senderissupplier) {
|
|
$seller = $object->thirdparty;
|
|
$buyer = $mysoc;
|
|
} else {
|
|
$seller = $mysoc;
|
|
$buyer = $object->thirdparty;
|
|
}
|
|
|
|
if ($mysoc->useLocalTax(1)) {
|
|
if (($seller->country_code == $buyer->country_code) || $line->total_localtax1 || $seller->useLocalTax(1)) {
|
|
$tooltiponprice .= '<br>'.$langs->transcountry("TotalLT1", $seller->country_code).'='.price($line->total_localtax1);
|
|
} else {
|
|
$tooltiponprice .= '<br>'.$langs->transcountry("TotalLT1", $seller->country_code).'=<span class="opacitymedium">'.$langs->trans($senderissupplier ? "NotUsedForThisVendor" : "NotUsedForThisCustomer").'</span>';
|
|
}
|
|
}
|
|
if ($mysoc->useLocalTax(2)) {
|
|
if ((isset($seller->country_code) && isset($buyer->thirdparty->country_code) && $seller->country_code == $buyer->thirdparty->country_code) || $line->total_localtax2 || $seller->useLocalTax(2)) {
|
|
$tooltiponprice .= '<br>'.$langs->transcountry("TotalLT2", $seller->country_code).'='.price($line->total_localtax2);
|
|
} else {
|
|
$tooltiponprice .= '<br>'.$langs->transcountry("TotalLT2", $seller->country_code).'=<span class="opacitymedium">'.$langs->trans($senderissupplier ? "NotUsedForThisVendor" : "NotUsedForThisCustomer").'</span>';
|
|
}
|
|
}
|
|
}
|
|
$tooltiponprice .= '<br>'.$langs->transcountry("TotalTTC", $mysoc->country_code).'='.price($line->total_ttc);
|
|
|
|
$tooltiponprice = '<span class="classfortooltip" title="'.dol_escape_htmltag($tooltiponprice).'">';
|
|
$tooltiponpriceend = '</span>';
|
|
}
|
|
|
|
print '<td class="right linecolvatrate">';
|
|
print $tooltiponprice;
|
|
print vatrate($line->vatrate.($line->vat_src_code ? ' ('.$line->vat_src_code.')' : ''), true);
|
|
print $tooltiponpriceend;
|
|
print '</td>';
|
|
|
|
// Unit price HT
|
|
print '<td class="right linecolunitht">';
|
|
if (!empty($line->value_unit_ht)) {
|
|
print price($line->value_unit_ht);
|
|
} else {
|
|
$tmpvat = price2num(preg_replace('/\s*\(.*\)/', '', $line->vatrate));
|
|
$pricenettoshow = price2num((float) $line->value_unit / (1 + (float) $tmpvat / 100), 'MU');
|
|
print price($pricenettoshow);
|
|
}
|
|
print '</td>';
|
|
|
|
print '<td class="right linecolunitttc">'.price($line->value_unit).'</td>';
|
|
|
|
print '<td class="right linecolqty">'.dol_escape_htmltag((string) $line->qty).'</td>';
|
|
|
|
if ($action != 'editline') {
|
|
print '<td class="right linecoltotalht">'.price($line->total_ht).'</td>';
|
|
print '<td class="right linecoltotalttc">'.price($line->total_ttc).'</td>';
|
|
}
|
|
|
|
// Column with preview
|
|
print '<td class="center linecolpreview">';
|
|
if ($line->fk_ecm_files > 0) {
|
|
$modulepart = 'expensereport';
|
|
$maxheightmini = 32;
|
|
|
|
$result = $ecmfilesstatic->fetch($line->fk_ecm_files);
|
|
if ($result > 0) {
|
|
$relativepath = preg_replace('/expensereport\//', '', $ecmfilesstatic->filepath);
|
|
$fileinfo = pathinfo($ecmfilesstatic->filepath.'/'.$ecmfilesstatic->filename);
|
|
if (image_format_supported($fileinfo['basename']) > 0) {
|
|
$minifile = getImageFileNameForSize($fileinfo['basename'], '_mini'); // For new thumbs using same ext (in lower case however) than original
|
|
if (!dol_is_file($conf->expensereport->dir_output.'/'.$relativepath.'/'.$minifile)) {
|
|
$minifile = getImageFileNameForSize($fileinfo['basename'], '_mini', '.png'); // For backward compatibility of old thumbs that were created with filename in lower case and with .png extension
|
|
}
|
|
//print $file['path'].'/'.$minifile.'<br>';
|
|
$urlforhref = getAdvancedPreviewUrl($modulepart, $relativepath.'/'.$fileinfo['filename'].'.'.strtolower($fileinfo['extension']), 1, '&entity='.(empty($object->entity) ? $conf->entity : $object->entity));
|
|
if (empty($urlforhref)) {
|
|
$urlforhref = DOL_URL_ROOT.'/viewimage.php?modulepart='.$modulepart.'&entity='.(empty($object->entity) ? $conf->entity : $object->entity).'&file='.urlencode($relativepath.$fileinfo['filename'].'.'.strtolower($fileinfo['extension']));
|
|
print '<a href="'.$urlforhref.'" class="aphoto" target="_blank" rel="noopener noreferrer">';
|
|
} else {
|
|
print '<a href="'.$urlforhref['url'].'" class="'.$urlforhref['css'].'" target="'.$urlforhref['target'].'" mime="'.$urlforhref['mime'].'">';
|
|
}
|
|
print '<img class="photo" height="'.$maxheightmini.'" src="'.DOL_URL_ROOT.'/viewimage.php?modulepart='.$modulepart.'&entity='.(empty($object->entity) ? $conf->entity : $object->entity).'&file='.urlencode($relativepath.'/'.$minifile).'" title="">';
|
|
print '</a>';
|
|
} else {
|
|
if (preg_match('/\.pdf$/i', $ecmfilesstatic->filename)) {
|
|
$filepdf = $conf->expensereport->dir_output.'/'.$relativepath.'/'.$ecmfilesstatic->filename;
|
|
$fileimage = $conf->expensereport->dir_output.'/'.$relativepath.'/'.$ecmfilesstatic->filename.'_preview.png';
|
|
$relativepathimage = $relativepath.'/'.$ecmfilesstatic->filename.'_preview.png';
|
|
|
|
$pdfexists = file_exists($filepdf);
|
|
if ($pdfexists) {
|
|
// Conversion du PDF en image png si fichier png non existent
|
|
if (!file_exists($fileimage) || (filemtime($fileimage) < filemtime($filepdf))) {
|
|
if (!getDolGlobalString('MAIN_DISABLE_PDF_THUMBS')) { // If you experience trouble with pdf thumb generation and imagick, you can disable here.
|
|
include_once DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php';
|
|
$ret = dol_convert_file($filepdf, 'png', $fileimage, '0'); // Convert first page of PDF into a file _preview.png
|
|
if ($ret < 0) {
|
|
$error++;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
if ($pdfexists && !$error) {
|
|
$heightforphotref = 70;
|
|
if (!empty($conf->dol_optimize_smallscreen)) {
|
|
$heightforphotref = 60;
|
|
}
|
|
$urlforhref = getAdvancedPreviewUrl($modulepart, $relativepath.'/'.$fileinfo['filename'].'.'.strtolower($fileinfo['extension']), 1, '&entity='.(empty($object->entity) ? $conf->entity : $object->entity));
|
|
print '<a href="'.$urlforhref['url'].'" class="'.$urlforhref['css'].'" target="'.$urlforhref['target'].'" mime="'.$urlforhref['mime'].'">';
|
|
// If the preview file is found we display the thumb
|
|
if (file_exists($fileimage)) {
|
|
print '<img height="'.$heightforphotref.'" class="photo photowithmargin photowithborder" src="'.DOL_URL_ROOT.'/viewimage.php?modulepart=apercu'.$modulepart.'&file='.urlencode($relativepathimage).'">';
|
|
} else {
|
|
// Else, we display an icon
|
|
print img_mime($ecmfilesstatic->filename);
|
|
}
|
|
print '</a>';
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
print '</td>';
|
|
|
|
print '<td class="nowrap right linecolwarning">';
|
|
print !empty($line->rule_warning_message) ? img_warning(html_entity_decode($line->rule_warning_message)) : '';
|
|
print '</td>';
|
|
|
|
// Ajout des boutons de modification/suppression
|
|
if (($object->status < ExpenseReport::STATUS_VALIDATED || $object->status == ExpenseReport::STATUS_REFUSED) && $user->hasRight('expensereport', 'creer')) {
|
|
print '<td class="nowrap right linecolaction">';
|
|
|
|
print '<a class="editfielda reposition paddingrightonly" href="'.$_SERVER["PHP_SELF"].'?id='.$object->id.'&action=editline&token='.newToken().'&rowid='.$line->rowid.'">';
|
|
print img_edit();
|
|
print '</a> ';
|
|
print '<a class="paddingrightonly" href="'.$_SERVER["PHP_SELF"].'?id='.$object->id.'&action=delete_line&token='.newToken().'&rowid='.$line->rowid.'">';
|
|
print img_delete();
|
|
print '</a>';
|
|
|
|
print '</td>';
|
|
}
|
|
|
|
print '</tr>';
|
|
}
|
|
|
|
if ($action == 'editline' && $line->id == GETPOSTINT('rowid')) {
|
|
// Add line with link to add new file or attach line to an existing file
|
|
$colspan = 11;
|
|
if (isModEnabled('project')) {
|
|
$colspan++;
|
|
}
|
|
if (getDolGlobalString('MAIN_USE_EXPENSE_IK')) {
|
|
$colspan++;
|
|
}
|
|
|
|
print '<!-- line of expense report -->'."\n";
|
|
print '<tr class="tredited">';
|
|
|
|
print '<td class="center">';
|
|
print $numline;
|
|
print '</td>';
|
|
|
|
print '<td colspan="'.($colspan - 1).'" class="liste_titre"> ';
|
|
print '<a href="" class="commonlink auploadnewfilenow reposition">'.$langs->trans("UploadANewFileNow");
|
|
print img_picto($langs->trans("UploadANewFileNow"), 'chevron-down', '', 0, 0, 0, '', 'marginleftonly');
|
|
print '</a>';
|
|
if (!getDolGlobalString('EXPENSEREPORT_DISABLE_ATTACHMENT_ON_LINES')) {
|
|
print ' - <a href="" class="commonlink aattachtodoc reposition">'.$langs->trans("AttachTheNewLineToTheDocument");
|
|
print img_picto($langs->trans("AttachTheNewLineToTheDocument"), 'chevron-down', '', 0, 0, 0, '', 'marginleftonly');
|
|
print '</a>';
|
|
}
|
|
|
|
print '<!-- Code to open/close section to submit or link files in edit mode -->'."\n";
|
|
print '<script type="text/javascript">'."\n";
|
|
print '$(document).ready(function() {
|
|
$( ".auploadnewfilenow" ).click(function() {
|
|
jQuery(".truploadnewfilenow").toggle();
|
|
jQuery(".trattachnewfilenow").hide();
|
|
return false;
|
|
});
|
|
$( ".aattachtodoc" ).click(function() {
|
|
jQuery(".trattachnewfilenow").toggle();
|
|
jQuery(".truploadnewfilenow").hide();
|
|
return false;
|
|
});';
|
|
if (is_array(GETPOST('attachfile', 'array')) && count(GETPOST('attachfile', 'array'))) {
|
|
print 'jQuery(".trattachnewfilenow").toggle();'."\n";
|
|
}
|
|
print '
|
|
jQuery("form[name=\"expensereport\"]").submit(function() {
|
|
if (jQuery(".truploadnewfilenow").is(":hidden")) {
|
|
jQuery("input[name=\"sendit\"]").val("");
|
|
}
|
|
});
|
|
';
|
|
print '
|
|
});
|
|
';
|
|
print '</script>'."\n";
|
|
print '</td></tr>';
|
|
|
|
$filenamelinked = '';
|
|
if ($line->fk_ecm_files > 0) {
|
|
$result = $ecmfilesstatic->fetch($line->fk_ecm_files);
|
|
if ($result > 0) {
|
|
$filenamelinked = $ecmfilesstatic->filename;
|
|
}
|
|
}
|
|
|
|
$tredited = 'tredited'; // Case the addfile and linkto file is used for edit (used by following tpl)
|
|
include DOL_DOCUMENT_ROOT.'/expensereport/tpl/expensereport_addfile.tpl.php';
|
|
include DOL_DOCUMENT_ROOT.'/expensereport/tpl/expensereport_linktofile.tpl.php';
|
|
|
|
print '<tr class="oddeven tredited">';
|
|
|
|
print '<td></td>';
|
|
|
|
// Select date
|
|
print '<td class="center">';
|
|
print $form->selectDate($line->date, 'date');
|
|
print '</td>';
|
|
|
|
// Select project
|
|
if (isModEnabled('project')) {
|
|
print '<td class="nowraponall">';
|
|
print $formproject->select_projects(-1, (string) $line->fk_project, 'fk_project', 0, 0, $projectRequired ? 0 : 1, 1, 0, 0, 0, '', 1, 0, 'maxwidth300');
|
|
print '</td>';
|
|
}
|
|
|
|
// Select type
|
|
print '<td class="center">';
|
|
print $formexpensereport->selectTypeExpenseReport($line->fk_c_type_fees, 'fk_c_type_fees');
|
|
print '</td>';
|
|
|
|
if (getDolGlobalString('MAIN_USE_EXPENSE_IK')) {
|
|
print '<td class="fk_c_exp_tax_cat">';
|
|
$params = array('fk_expense' => $object->id, 'fk_expense_det' => $line->id, 'date' => $line->date);
|
|
print $form->selectExpenseCategories((string) $line->fk_c_exp_tax_cat, 'fk_c_exp_tax_cat', 1, array(), 'fk_c_type_fees', (int) $userauthor->default_c_exp_tax_cat, $params);
|
|
print '</td>';
|
|
}
|
|
|
|
// Add comments
|
|
print '<td>';
|
|
print '<textarea name="comments" class="flat_ndf centpercent">'.dol_escape_htmltag($line->comments, 0, 1).'</textarea>';
|
|
print '</td>';
|
|
|
|
// VAT
|
|
$selectedvat = price2num($line->vatrate).(!empty($line->vat_src_code) ? ' ('.$line->vat_src_code.')' : '');
|
|
print '<td class="right">';
|
|
// We must use null, null for seller and buyer as we don't know them for expense report.
|
|
print $form->load_tva('vatrate', (GETPOSTISSET("vatrate") ? GETPOST("vatrate") : $selectedvat), null, null, 0, 0, '', false, 1, 2);
|
|
print '</td>';
|
|
|
|
// Unit price
|
|
print '<td class="right">';
|
|
print '<input type="text" min="0" class="right maxwidth50" id="value_unit_ht" name="value_unit_ht" value="'.dol_escape_htmltag(price2num((!empty($line->value_unit_ht) ? $line->value_unit_ht : ""))).'"'.$taxlessUnitPriceDisabled.' />';
|
|
print '</td>';
|
|
|
|
// Unit price with tax
|
|
print '<td class="right">';
|
|
print '<input type="text" min="0" class="right maxwidth50" id="value_unit" name="value_unit" value="'.dol_escape_htmltag(price2num($line->value_unit)).'" />';
|
|
print '</td>';
|
|
|
|
// Quantity
|
|
print '<td class="right">';
|
|
print '<input type="text" min="0" class="input_qty right maxwidth50" name="qty" value="'.dol_escape_htmltag((string) $line->qty).'" />'; // We must be able to enter decimal qty
|
|
print '</td>';
|
|
|
|
//print '<td class="right">'.$langs->trans('AmountHT').'</td>';
|
|
//print '<td class="right">'.$langs->trans('AmountTTC').'</td>';
|
|
|
|
// Picture
|
|
print '<td class="center">';
|
|
//print $line->fk_ecm_files;
|
|
print '</td>';
|
|
// Information if there's a rule restriction
|
|
print '<td class="center">';
|
|
print '</td>';
|
|
|
|
print '<td>';
|
|
print '<input type="hidden" name="rowid" value="'.$line->rowid.'">';
|
|
print $form->buttonsSaveCancel('Save', 'Cancel', array(), false, 'small');
|
|
print '</td>';
|
|
|
|
print '</tr>';
|
|
}
|
|
|
|
$i++;
|
|
}
|
|
}
|
|
|
|
// Add a new line
|
|
if (($object->status == ExpenseReport::STATUS_DRAFT || $object->status == ExpenseReport::STATUS_REFUSED) && $action != 'editline' && $user->hasRight('expensereport', 'creer')) {
|
|
$colspan = 12;
|
|
if (getDolGlobalString('MAIN_USE_EXPENSE_IK')) {
|
|
$colspan++;
|
|
}
|
|
if (isModEnabled('project')) {
|
|
$colspan++;
|
|
}
|
|
if ($action != 'editline') {
|
|
$colspan++;
|
|
}
|
|
|
|
$nbFiles = $nbLinks = 0;
|
|
$arrayoffiles = array();
|
|
if (!getDolGlobalString('EXPENSEREPORT_DISABLE_ATTACHMENT_ON_LINES')) {
|
|
require_once DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php';
|
|
require_once DOL_DOCUMENT_ROOT.'/core/lib/images.lib.php';
|
|
require_once DOL_DOCUMENT_ROOT.'/core/class/link.class.php';
|
|
$upload_dir = $conf->expensereport->dir_output."/".dol_sanitizeFileName($object->ref);
|
|
$arrayoffiles = dol_dir_list($upload_dir, 'files', 0, '', '(\.meta|_preview.*\.png|'.preg_quote(dol_sanitizeFileName($object->ref.'.pdf'), '/').')$');
|
|
$nbFiles = count($arrayoffiles);
|
|
$nbLinks = Link::count($db, $object->element, $object->id);
|
|
}
|
|
|
|
// Add line with link to add new file or attach to an existing file
|
|
print '<tr class="liste_titre">';
|
|
print '<td colspan="'.$colspan.'" class="liste_titre expensereportautoload">';
|
|
print '<a href="" class="commonlink auploadnewfilenow reposition">'.$langs->trans("UploadANewFileNow");
|
|
print img_picto($langs->trans("UploadANewFileNow"), 'chevron-down', '', 0, 0, 0, '', 'marginleftonly');
|
|
print '</a>';
|
|
if (!getDolGlobalString('EXPENSEREPORT_DISABLE_ATTACHMENT_ON_LINES')) {
|
|
print ' - <a href="" class="commonlink aattachtodoc reposition">'.$langs->trans("AttachTheNewLineToTheDocument");
|
|
print img_picto($langs->trans("AttachTheNewLineToTheDocument"), 'chevron-down', '', 0, 0, 0, '', 'marginleftonly');
|
|
print '</a>';
|
|
}
|
|
|
|
print '<!-- Code to open/close section to submit or link files in the form to add new line -->'."\n";
|
|
print '<script type="text/javascript">'."\n";
|
|
print '$(document).ready(function() {
|
|
$( ".auploadnewfilenow" ).click(function() {
|
|
console.log("We click on toggle of auploadnewfilenow");
|
|
jQuery(".truploadnewfilenow").toggle();
|
|
jQuery(".trattachnewfilenow").hide();
|
|
if (jQuery(".truploadnewfilenow").is(":hidden")) {
|
|
jQuery("input[name=\"sendit\"]").prop("name", "senditdisabled");
|
|
} else {
|
|
jQuery("input[name=\"senditdisabled\"]").prop("name", "sendit");
|
|
}
|
|
// TODO Switch css fa-chevron-dow and add fa-chevron-up
|
|
return false;
|
|
});
|
|
$( ".aattachtodoc" ).click(function() {
|
|
console.log("We click on toggle of aattachtodoc");
|
|
jQuery(".trattachnewfilenow").toggle();
|
|
jQuery(".truploadnewfilenow").hide();
|
|
// TODO Switch css fa-chevron-dow and add fa-chevron-up
|
|
return false;
|
|
});'."\n";
|
|
if (is_array(GETPOST('attachfile', 'array')) && count(GETPOST('attachfile', 'array')) && $action != 'updateline') {
|
|
print 'jQuery(".trattachnewfilenow").show();'."\n";
|
|
}
|
|
print '
|
|
jQuery("form[name=\"expensereport\"]").submit(function() {
|
|
if (jQuery(".truploadnewfilenow").is(":hidden")) {
|
|
/* When section to send file is not expanded, we disable the button sendit that submit form to add a new file, so button to submit line will work. */
|
|
jQuery("input[name=\"sendit\"]").val("");
|
|
jQuery("input[name=\"sendit\"]").prop("name", "senditdisabled");
|
|
} else {
|
|
jQuery("input[name=\"senditdisabled\"]").prop("name", "sendit");
|
|
}
|
|
});
|
|
';
|
|
print '
|
|
});
|
|
';
|
|
print '</script>'."\n";
|
|
print '</td></tr>';
|
|
|
|
$tredited = ''; // Case the addfile and linkto file is used for edit (used by following tpl)
|
|
include DOL_DOCUMENT_ROOT.'/expensereport/tpl/expensereport_linktofile.tpl.php';
|
|
include DOL_DOCUMENT_ROOT.'/expensereport/tpl/expensereport_addfile.tpl.php';
|
|
|
|
print '<tr class="liste_titre expensereportcreate">';
|
|
print '<td></td>';
|
|
print '<td class="center expensereportcreatedate">'.$langs->trans('Date').'</td>';
|
|
if (isModEnabled('project')) {
|
|
print '<td class="minwidth100imp">'.$form->textwithpicto($langs->trans('Project'), $langs->trans("ClosedProjectsAreHidden")).'</td>';
|
|
}
|
|
print '<td class="center expensereportcreatetype">'.$langs->trans('Type').'</td>';
|
|
if (getDolGlobalString('MAIN_USE_EXPENSE_IK')) {
|
|
print '<td>'.$langs->trans('CarCategory').'</td>';
|
|
}
|
|
print '<td class="expensereportcreatedescription">'.$langs->trans('Description').'</td>';
|
|
print '<td class="right expensereportcreatevat">'.$langs->trans('VAT').'</td>';
|
|
print '<td class="right expensereportcreatepriceuth">'.$langs->trans('PriceUHT').'</td>';
|
|
print '<td class="right expensereportcreatepricettc">'.$langs->trans('PriceUTTC').'</td>';
|
|
print '<td class="right expensereportcreateqty">'.$langs->trans('Qty').'</td>';
|
|
print '<td></td>';
|
|
print '<td></td>';
|
|
print '<td></td>';
|
|
print '<td></td>';
|
|
print '<td></td>';
|
|
print '</tr>';
|
|
print '<tr class="oddeven nohover">';
|
|
|
|
// Line number
|
|
print '<td></td>';
|
|
|
|
// Select date
|
|
print '<td class="center inputdate">';
|
|
print $form->selectDate(!empty($date) ? $date : -1, 'date', 0, 0, 0, '', 1, 1);
|
|
print '</td>';
|
|
|
|
// Select project
|
|
if (isModEnabled('project')) {
|
|
print '<td class="inputproject">';
|
|
$formproject->select_projects(-1, !empty($fk_project) ? (string) $fk_project : '0', 'fk_project', 0, 0, $projectRequired ? 0 : 1, -1, 0, 0, 0, '', 0, 0, 'maxwidth300');
|
|
print '</td>';
|
|
}
|
|
|
|
// Select type
|
|
print '<td class="center inputtype">';
|
|
print $formexpensereport->selectTypeExpenseReport(!empty($fk_c_type_fees) ? $fk_c_type_fees : "", 'fk_c_type_fees', 1);
|
|
print '</td>';
|
|
|
|
if (getDolGlobalString('MAIN_USE_EXPENSE_IK')) {
|
|
print '<td class="fk_c_exp_tax_cat">';
|
|
$params = array('fk_expense' => $object->id);
|
|
print $form->selectExpenseCategories('', 'fk_c_exp_tax_cat', 1, array(), 'fk_c_type_fees', $userauthor->default_c_exp_tax_cat, $params, 0);
|
|
print '</td>';
|
|
}
|
|
|
|
// Add comments
|
|
print '<td class="inputcomment">';
|
|
print '<textarea class="flat_ndf centpercent" name="comments" rows="'.ROWS_2.'">'.dol_escape_htmltag(!empty($comments) ? $comments : "", 0, 1).'</textarea>';
|
|
print '</td>';
|
|
|
|
// Select VAT
|
|
print '<td class="right inputvat">';
|
|
$defaultvat = '';
|
|
if (getDolGlobalString('EXPENSEREPORT_NO_DEFAULT_VAT')) {
|
|
// If option to have no default VAT on expense report is on, we force MAIN_VAT_DEFAULT_IF_AUTODETECT_FAILS
|
|
$conf->global->MAIN_VAT_DEFAULT_IF_AUTODETECT_FAILS = 'none';
|
|
}
|
|
// We must use null, null for seller and buyer as we don't know them for expense report.
|
|
print $form->load_tva('vatrate', (!empty($vatrate) ? $vatrate : $defaultvat), null, null, 0, 0, '', false, 1);
|
|
print '</td>';
|
|
|
|
// Unit price net
|
|
print '<td class="right inputpricenet">';
|
|
print '<input type="text" class="right maxwidth50" id="value_unit_ht" name="value_unit_ht" value="'.dol_escape_htmltag((!empty($value_unit_ht) ? $value_unit_ht : "")).'"'.$taxlessUnitPriceDisabled.' />';
|
|
print '</td>';
|
|
|
|
// Unit price with tax
|
|
print '<td class="right inputtax">';
|
|
print '<input type="text" class="right maxwidth50" id="value_unit" name="value_unit" value="'.dol_escape_htmltag((!empty($value_unit) ? $value_unit : "")).'">';
|
|
print '</td>';
|
|
|
|
// Quantity
|
|
print '<td class="right inputqty">';
|
|
print '<input type="text" min="0" class=" input_qty right maxwidth50" name="qty" value="'.dol_escape_htmltag(!empty($qty) ? $qty : 1).'">'; // We must be able to enter decimal qty
|
|
print '</td>';
|
|
|
|
// Picture
|
|
print '<td></td>';
|
|
|
|
if ($action != 'editline') {
|
|
print '<td class="right"></td>';
|
|
print '<td class="right"></td>';
|
|
print '<td></td>';
|
|
}
|
|
|
|
print '<td class="center inputbuttons">';
|
|
print $form->buttonsSaveCancel("Add", '', array(), true, 'reposition');
|
|
print '</td>';
|
|
|
|
print '</tr>';
|
|
} // End if paid/validated
|
|
|
|
print '</table>';
|
|
print '</div>';
|
|
|
|
print '<script>
|
|
|
|
/* JQuery for product free or predefined select */
|
|
jQuery(document).ready(function() {
|
|
jQuery("#value_unit_ht").keyup(function(event) {
|
|
console.log(event.which); // discard event tag and arrows
|
|
if (event.which != 9 && (event.which < 37 ||event.which > 40) && jQuery("#value_unit_ht").val() != "") {
|
|
jQuery("#value_unit").val("");
|
|
}
|
|
});
|
|
jQuery("#value_unit").keyup(function(event) {
|
|
console.log(event.which); // discard event tag and arrows
|
|
if (event.which != 9 && (event.which < 37 || event.which > 40) && jQuery("#value_unit").val() != "") {
|
|
jQuery("#value_unit_ht").val("");
|
|
}
|
|
});
|
|
';
|
|
|
|
if (getDolGlobalString('MAIN_USE_EXPENSE_IK')) {
|
|
print '
|
|
|
|
/* unit price coef calculation */
|
|
jQuery(".input_qty, #fk_c_type_fees, #select_fk_c_exp_tax_cat, #vatrate ").change(function(event) {
|
|
console.log("We change a parameter");
|
|
|
|
let type_fee = jQuery("#fk_c_type_fees").find(":selected").val();
|
|
let tax_cat = jQuery("#select_fk_c_exp_tax_cat").find(":selected").val();
|
|
let tva = jQuery("#vatrate").find(":selected").val();
|
|
let qty = jQuery(".input_qty").val();
|
|
|
|
let path = "'.DOL_URL_ROOT.'/expensereport/ajax/ajaxik.php";
|
|
path += "?fk_c_exp_tax_cat="+tax_cat;
|
|
path += "&fk_expense="+'.((int) $object->id).';
|
|
path += "&vatrate="+tva;
|
|
path += "&qty="+qty;
|
|
|
|
if (type_fee == 4) { // mileage expenses
|
|
if (tax_cat == "" || parseInt(tax_cat) <= 0){
|
|
return ;
|
|
}
|
|
|
|
jQuery.ajax({
|
|
url: path,
|
|
async: true,
|
|
dataType: "json",
|
|
success: function(response) {
|
|
if (response.response_status == "success"){';
|
|
|
|
if (getDolGlobalString('EXPENSEREPORT_FORCE_LINE_AMOUNTS_INCLUDING_TAXES_ONLY')) {
|
|
print '
|
|
jQuery("#value_unit").val(parseFloat(response.data) * (100 + parseFloat(tva)) / 100);
|
|
jQuery("#value_unit").trigger("change");
|
|
';
|
|
} else {
|
|
print '
|
|
jQuery("#value_unit_ht").val(response.data);
|
|
jQuery("#value_unit_ht").trigger("change");
|
|
jQuery("#value_unit").val("");
|
|
';
|
|
}
|
|
|
|
print '
|
|
} else if(response.response_status == "error" && response.errorMessage != undefined && response.errorMessage.length > 0 ) {
|
|
console.log("We get an error result");
|
|
$.jnotify(response.errorMessage, "error", {timeout: 0, type: "error"},{ remove: function (){} } );
|
|
}
|
|
}
|
|
});
|
|
}
|
|
|
|
/*console.log(event.which); // discard event tag and arrows
|
|
if (event.which != 9 && (event.which < 37 || event.which > 40) && jQuery("#value_unit").val() != "") {
|
|
jQuery("#value_unit_ht").val("");
|
|
}*/
|
|
});
|
|
';
|
|
}
|
|
|
|
print '
|
|
|
|
});
|
|
|
|
</script>';
|
|
|
|
print '</form>';
|
|
|
|
print dol_get_fiche_end();
|
|
}
|
|
} else {
|
|
dol_print_error($db);
|
|
}
|
|
} else {
|
|
print 'Record not found';
|
|
|
|
llxFooter();
|
|
exit(1);
|
|
}
|
|
|
|
|
|
/*
|
|
* Action bar
|
|
*/
|
|
|
|
print '<div class="tabsAction">';
|
|
|
|
if ($action != 'create' && $action != 'edit' && $action != 'editline') {
|
|
$object = new ExpenseReport($db);
|
|
$object->fetch($id, $ref);
|
|
|
|
// Send
|
|
if (empty($user->socid)) {
|
|
if ($object->status > ExpenseReport::STATUS_DRAFT) {
|
|
print dolGetButtonAction('', $langs->trans('SendMail'), 'email', dolBuildUrl($_SERVER["PHP_SELF"], ['id' => $object->id, 'action' => 'presend', 'mode' => 'init'], true).'#formmailbeforetitle', '');
|
|
}
|
|
}
|
|
|
|
/* If status is "Draft"
|
|
* AND user has "create/delete" right
|
|
* AND fk_user_author == current user
|
|
* Show: "Save" / "Modify" / "Delete"
|
|
*/
|
|
if ($user->hasRight('expensereport', 'creer') && $object->status == ExpenseReport::STATUS_DRAFT) {
|
|
if (in_array($object->fk_user_author, $childids) || $user->hasRight('expensereport', 'writeall_advance')) {
|
|
// Modify
|
|
print '<div class="inline-block divButAction"><a class="butAction" href="'.$_SERVER["PHP_SELF"].'?action=edit&token='.newToken().'&id='.$object->id.'">'.$langs->trans('Modify').'</a></div>';
|
|
|
|
// Validate
|
|
if (count($object->lines) > 0) {
|
|
print '<div class="inline-block divButAction"><a class="butAction" href="'.$_SERVER["PHP_SELF"].'?action=save&token='.newToken().'&id='.$object->id.'">'.$langs->trans('ValidateAndSubmit').'</a></div>';
|
|
}
|
|
}
|
|
}
|
|
|
|
/* If status is "Refused"
|
|
* AND user has "create/delete" right
|
|
* AND fk_user_author == current user
|
|
* Show: "Save" / "Modify" / "Delete"
|
|
*/
|
|
if ($user->hasRight('expensereport', 'creer') && $object->status == ExpenseReport::STATUS_REFUSED) {
|
|
if ($user->id == $object->fk_user_author || $user->id == $object->fk_user_valid) {
|
|
// Modify
|
|
print '<div class="inline-block divButAction"><a class="butAction" href="'.$_SERVER["PHP_SELF"].'?action=edit&token='.newToken().'&id='.$object->id.'">'.$langs->trans('Modify').'</a></div>';
|
|
|
|
print '<div class="inline-block divButAction"><a class="butAction" href="'.$_SERVER["PHP_SELF"].'?action=save_from_refuse&token='.newToken().'&id='.$object->id.'">'.$langs->trans('ValidateAndSubmit').'</a></div>';
|
|
}
|
|
}
|
|
|
|
if ($user->hasRight('expensereport', 'to_paid') && $object->status == ExpenseReport::STATUS_APPROVED) {
|
|
if ($user->id == $object->fk_user_author || $user->id == $object->fk_user_valid) {
|
|
// setdraft
|
|
print '<div class="inline-block divButAction"><a class="butAction" href="'.$_SERVER["PHP_SELF"].'?action=setdraft&token='.newToken().'&id='.$object->id.'">'.$langs->trans('SetToDraft').'</a></div>';
|
|
}
|
|
}
|
|
|
|
/* If status is "Pending approval"
|
|
* AND user has "approve" right
|
|
* AND fk_user_validator == current user
|
|
* Show: "Validate" / "Refuse" / "Delete"
|
|
*/
|
|
if ($object->status == ExpenseReport::STATUS_VALIDATED) {
|
|
if (in_array($object->fk_user_author, $childids)) {
|
|
// set draft
|
|
print '<div class="inline-block divButAction"><a class="butAction" href="'.$_SERVER["PHP_SELF"].'?action=setdraft&token='.newToken().'&id='.$object->id.'">'.$langs->trans('SetToDraft').'</a></div>';
|
|
}
|
|
}
|
|
|
|
if ($user->hasRight('expensereport', 'approve') && $object->status == ExpenseReport::STATUS_VALIDATED) {
|
|
//if($object->fk_user_validator==$user->id)
|
|
//{
|
|
// Validate
|
|
print '<div class="inline-block divButAction"><a class="butAction" href="'.$_SERVER["PHP_SELF"].'?action=validate&token='.newToken().'&id='.$object->id.'">'.$langs->trans('Approve').'</a></div>';
|
|
// Deny
|
|
print '<div class="inline-block divButAction"><a class="butAction" href="'.$_SERVER["PHP_SELF"].'?action=refuse&token='.newToken().'&id='.$object->id.'">'.$langs->trans('Deny').'</a></div>';
|
|
//}
|
|
|
|
if ($user->id == $object->fk_user_author || $user->id == $object->fk_user_valid) {
|
|
// Cancel
|
|
print '<div class="inline-block divButAction"><a class="butAction" href="'.$_SERVER["PHP_SELF"].'?action=cancel&id='.$object->id.'">'.$langs->trans("Cancel").'</a></div>';
|
|
}
|
|
}
|
|
|
|
|
|
// If status is Approved
|
|
// ---------------------
|
|
|
|
if ($user->hasRight('expensereport', 'approve') && $object->status == ExpenseReport::STATUS_APPROVED) {
|
|
print '<div class="inline-block divButAction"><a class="butAction" href="'.$_SERVER["PHP_SELF"].'?action=refuse&token='.newToken().'&id='.$object->id.'">'.$langs->trans('Deny').'</a></div>';
|
|
}
|
|
|
|
// If bank module is used
|
|
if ($user->hasRight('expensereport', 'to_paid') && isModEnabled("bank") && $object->status == ExpenseReport::STATUS_APPROVED) {
|
|
// Pay
|
|
if ($remaintopay == 0) {
|
|
print '<div class="inline-block divButAction"><span class="butActionRefused classfortooltip" title="'.$langs->trans("DisabledBecauseRemainderToPayIsZero").'">'.$langs->trans('DoPayment').'</span></div>';
|
|
} else {
|
|
print '<div class="inline-block divButAction"><a class="butAction" href="'.DOL_URL_ROOT.'/expensereport/payment/payment.php?id='.$object->id.'&action=create">'.$langs->trans('DoPayment').'</a></div>';
|
|
}
|
|
}
|
|
|
|
// If bank module is not used
|
|
if (($user->hasRight('expensereport', 'to_paid') || empty(isModEnabled("bank"))) && $object->status == ExpenseReport::STATUS_APPROVED) {
|
|
//if ((round($remaintopay) == 0 || !isModEnabled("bank")) && $object->paid == 0)
|
|
if ($object->paid == 0) {
|
|
print '<div class="inline-block divButAction"><a class="butAction" href="'.$_SERVER["PHP_SELF"].'?id='.$object->id.'&action=set_paid&token='.newToken().'">'.$langs->trans("ClassifyPaid")."</a></div>";
|
|
}
|
|
}
|
|
|
|
if ($user->hasRight('expensereport', 'creer') && ($user->id == $object->fk_user_author || $user->id == $object->fk_user_valid) && $object->status == ExpenseReport::STATUS_APPROVED) {
|
|
// Cancel
|
|
print '<div class="inline-block divButAction"><a class="butAction" href="'.$_SERVER["PHP_SELF"].'?action=cancel&token='.newToken().'&id='.$object->id.'">'.$langs->trans("Cancel").'</a></div>';
|
|
}
|
|
|
|
// If status is Closed
|
|
// ---------------------
|
|
|
|
// TODO Replace this. It should be SetUnpaid and should go back to status unpaid not canceled.
|
|
if (($user->hasRight('expensereport', 'approve') || $user->hasRight('expensereport', 'to_paid')) && $object->status == ExpenseReport::STATUS_CLOSED) {
|
|
// Cancel
|
|
print '<div class="inline-block divButAction"><a class="butAction" href="'.$_SERVER["PHP_SELF"].'?action=cancel&token='.newToken().'&id='.$object->id.'">'.$langs->trans("Cancel").'</a></div>';
|
|
}
|
|
|
|
if ($user->hasRight('expensereport', 'to_paid') && $object->paid && $object->status == ExpenseReport::STATUS_CLOSED) {
|
|
// Set unpaid
|
|
print '<div class="inline-block divButAction"><a class="butAction" href="'.$_SERVER["PHP_SELF"].'?action=set_unpaid&token='.newToken().'&id='.$object->id.'">'.$langs->trans('ClassifyUnPaid').'</a></div>';
|
|
}
|
|
|
|
// Clone
|
|
if ($user->hasRight('expensereport', 'creer')) {
|
|
print '<div class="inline-block divButAction"><a class="butAction butActionClone" href="'.$_SERVER['PHP_SELF'].'?id='.$object->id.'&action=clone&token='.newToken().'">'.$langs->trans("ToClone").'</a></div>';
|
|
}
|
|
|
|
/* If draft, validated, cancel, and user can create, he can always delete its card before it is approved */
|
|
if ($user->hasRight('expensereport', 'creer') && $user->id == $object->fk_user_author && $object->status < ExpenseReport::STATUS_APPROVED) {
|
|
// Delete
|
|
print '<div class="inline-block divButAction"><a class="butActionDelete" href="'.$_SERVER["PHP_SELF"].'?action=delete&token='.newToken().'&id='.$object->id.'">'.$langs->trans('Delete').'</a></div>';
|
|
} elseif ($candelete && $object->status != ExpenseReport::STATUS_CLOSED) {
|
|
// Delete
|
|
print '<div class="inline-block divButAction"><a class="butActionDelete" href="'.$_SERVER["PHP_SELF"].'?action=delete&token='.newToken().'&id='.$object->id.'">'.$langs->trans('Delete').'</a></div>';
|
|
}
|
|
|
|
$parameters = array();
|
|
$reshook = $hookmanager->executeHooks('addMoreActionsButtons', $parameters, $object, $action); // Note that $action and $object may have been
|
|
}
|
|
|
|
print '</div>';
|
|
|
|
|
|
// Select mail models is same action as presend
|
|
if (GETPOST('modelselected', 'alpha')) {
|
|
$action = 'presend';
|
|
}
|
|
|
|
if ($action != 'presend') {
|
|
/*
|
|
* Generate documents
|
|
*/
|
|
|
|
print '<div class="fichecenter"><div class="fichehalfleft">';
|
|
print '<a name="builddoc"></a>'; // ancre
|
|
|
|
if ($user->hasRight('expensereport', 'creer') && $action != 'create' && $action != 'edit') {
|
|
$filename = dol_sanitizeFileName($object->ref);
|
|
$filedir = $conf->expensereport->dir_output."/".dol_sanitizeFileName($object->ref);
|
|
$urlsource = $_SERVER["PHP_SELF"]."?id=".$object->id;
|
|
$genallowed = $user->hasRight('expensereport', 'creer');
|
|
$delallowed = $user->hasRight('expensereport', 'creer');
|
|
$var = true;
|
|
print $formfile->showdocuments('expensereport', $filename, $filedir, $urlsource, $genallowed, $delallowed);
|
|
$somethingshown = $formfile->numoffiles;
|
|
}
|
|
|
|
// Disabled for expensereport, there is no thirdparty on expensereport, so nothing to define the list of other object we can suggest to link to
|
|
/*
|
|
if ($action != 'create' && $action != 'edit' && ($id || $ref))
|
|
{
|
|
$tmparray = $form->showLinkToObjectBlock($object, array(), array('expensereport'), 1);
|
|
$linktoelem = $tmparray['linktoelem'];
|
|
$htmltoenteralink = $tmparray['htmltoenteralink'];
|
|
print $htmltoenteralink;
|
|
|
|
$somethingshown = $form->showLinkedObjectBlock($object, $linktoelem);
|
|
}
|
|
*/
|
|
|
|
print '</div><div class="fichehalfright">';
|
|
// List of actions on element
|
|
include_once DOL_DOCUMENT_ROOT.'/core/class/html.formactions.class.php';
|
|
$formactions = new FormActions($db);
|
|
$somethingshown = $formactions->showactions($object, 'expensereport', 0);
|
|
|
|
print '</div></div>';
|
|
}
|
|
|
|
// Presend form
|
|
$modelmail = 'expensereport_send';
|
|
$defaulttopic = 'SendExpenseReportRef';
|
|
$diroutput = $conf->expensereport->dir_output;
|
|
$trackid = 'exp'.$object->id;
|
|
|
|
include DOL_DOCUMENT_ROOT.'/core/tpl/card_presend.tpl.php';
|
|
|
|
|
|
llxFooter();
|
|
|
|
$db->close();
|