31require
'../main.inc.php';
32require_once DOL_DOCUMENT_ROOT.
'/core/class/html.formexpensereport.class.php';
33require_once DOL_DOCUMENT_ROOT.
'/core/class/html.formfile.class.php';
34require_once DOL_DOCUMENT_ROOT.
'/core/class/html.formmail.class.php';
35require_once DOL_DOCUMENT_ROOT.
'/core/class/html.formprojet.class.php';
36require_once DOL_DOCUMENT_ROOT.
'/core/class/CMailFile.class.php';
37require_once DOL_DOCUMENT_ROOT.
'/projet/class/project.class.php';
38require_once DOL_DOCUMENT_ROOT.
'/ecm/class/ecmfiles.class.php';
39require_once DOL_DOCUMENT_ROOT.
'/compta/bank/class/account.class.php';
40require_once DOL_DOCUMENT_ROOT.
'/core/lib/expensereport.lib.php';
41require_once DOL_DOCUMENT_ROOT.
'/core/lib/price.lib.php';
42require_once DOL_DOCUMENT_ROOT.
'/core/lib/files.lib.php';
43require_once DOL_DOCUMENT_ROOT.
'/core/lib/images.lib.php';
44require_once DOL_DOCUMENT_ROOT.
'/core/modules/expensereport/modules_expensereport.php';
45require_once DOL_DOCUMENT_ROOT.
'/expensereport/class/expensereport.class.php';
46require_once DOL_DOCUMENT_ROOT.
'/expensereport/class/paymentexpensereport.class.php';
47require_once DOL_DOCUMENT_ROOT.
'/core/class/doleditor.class.php';
48require_once DOL_DOCUMENT_ROOT.
'/core/class/extrafields.class.php';
49if (isModEnabled(
'accounting')) {
50 require_once DOL_DOCUMENT_ROOT.
'/accountancy/class/accountingjournal.class.php';
54$langs->loadLangs(array(
"trips",
"bills",
"mails"));
56$action =
GETPOST(
'action',
'aZ09');
57$cancel =
GETPOST(
'cancel',
'alpha');
58$confirm =
GETPOST(
'confirm',
'alpha');
59$backtopage =
GETPOST(
'backtopage',
'alpha');
66$vatrate =
GETPOST(
'vatrate',
'alpha');
68$comments =
GETPOST(
'comments',
'restricthtml');
73$childids = $user->getAllChildIds(1);
76 if (empty($date_start)) {
80 if (empty($date_end)) {
87$rootfordata = DOL_DATA_ROOT;
88$rootforuser = DOL_DATA_ROOT;
90if (isModEnabled(
'multicompany') && !empty($conf->entity) && $conf->entity > 1) {
91 $rootfordata .=
'/'.$conf->entity;
93$conf->expensereport->dir_output = $rootfordata.
'/expensereport';
96$urlwithouturlroot = preg_replace(
'/'.preg_quote(DOL_URL_ROOT,
'/').
'$/i',
'', trim($dolibarr_main_url_root));
97$urlwithroot = $urlwithouturlroot.DOL_URL_ROOT;
110$extrafields->fetch_name_optionals_label(
$object->table_element);
113include DOL_DOCUMENT_ROOT.
'/core/actions_fetchobject.inc.php';
116$hookmanager->initHooks(array(
'expensereportcard',
'globalcard'));
118$permissionnote = $user->hasRight(
'expensereport',
'creer');
119$permissiondellink = $user->hasRight(
'expensereport',
'creer');
120$permissiontoadd = $user->hasRight(
'expensereport',
'creer');
124$projectRequired = isModEnabled(
'project') &&
getDolGlobalString(
'EXPENSEREPORT_PROJECT_IS_REQUIRED');
130 if ($user->hasRight(
'expensereport',
'readall')) {
133 if ($user->hasRight(
'expensereport',
'lire') && in_array(
$object->fk_user_author, $childids)) {
142if ($user->hasRight(
'expensereport',
'supprimer')) {
151 $socid = $user->socid;
155$permissiontoadd = $user->hasRight(
'expensereport',
'creer');
165$parameters = array(
'socid' => $socid);
166$reshook = $hookmanager->executeHooks(
'doActions', $parameters,
$object, $action);
171if (empty($reshook)) {
172 $backurlforlist = DOL_URL_ROOT.
'/expensereport/list.php';
174 if (empty($backtopage) || ($cancel && empty($id))) {
175 if (empty($backtopage) || ($cancel && strpos($backtopage,
'__ID__'))) {
176 if (empty($id) && (($action !=
'add' && $action !=
'create') || $cancel)) {
177 $backtopage = $backurlforlist;
179 $backtopage = DOL_URL_ROOT.
'/expensereport/card.php?id='.((!empty($id) &&
$id > 0) ? $id :
'__ID__');
185 if (!empty($backtopageforcancel)) {
186 header(
"Location: ".$backtopageforcancel);
188 } elseif (!empty($backtopage)) {
189 header(
"Location: ".$backtopage);
203 $fk_c_type_fees = -1;
206 include DOL_DOCUMENT_ROOT.
'/core/actions_linkedfiles.inc.php';
208 if (!empty(
GETPOST(
'sendit',
'alpha'))) {
209 if ($action ==
'updateline') {
210 $action =
'editline';
216 include DOL_DOCUMENT_ROOT.
'/core/actions_setnotes.inc.php';
218 include DOL_DOCUMENT_ROOT.
'/core/actions_dellink.inc.php';
220 include DOL_DOCUMENT_ROOT.
'/core/actions_lineupdown.inc.php';
223 if ($action ==
'confirm_clone' && $confirm ==
'yes' && $permissiontoadd) {
224 if (1 == 0 && !
GETPOST(
'clone_content',
'alpha') && !
GETPOST(
'clone_receivers',
'alpha')) {
233 header(
"Location: ".$_SERVER[
'PHP_SELF'].
'?id='.$result);
244 if ($action ==
'confirm_delete' &&
GETPOST(
"confirm",
'alpha') ==
"yes" && $id > 0 && $candelete) {
247 $result =
$object->delete($user);
249 header(
"Location: index.php");
256 if ($action ==
'add' && $permissiontoadd) {
261 $object->date_debut = $date_start;
265 if (!(
$object->fk_user_author > 0)) {
266 $object->fk_user_author = $user->id;
270 if ((!
getDolGlobalString(
'MAIN_USE_ADVANCED_PERMS') && !$user->hasRight(
'expensereport',
'creer'))
271 || (
getDolGlobalString(
'MAIN_USE_ADVANCED_PERMS') && !$user->hasRight(
'expensereport',
'creer') && !$user->hasRight(
'expensereport',
'writeall_advance'))) {
276 if (!
getDolGlobalString(
'MAIN_USE_ADVANCED_PERMS') || !$user->hasRight(
'expensereport',
'writeall_advance')) {
277 if (!in_array(
$object->fk_user_author, $childids)) {
284 $fuser =
new User($db);
285 $fuser->fetch(
$object->fk_user_author);
294 $ret = $extrafields->setOptionalsFromPost(
null,
$object);
301 $overlappingExpenseReportID =
$object->periode_existe($fuser,
$object->date_debut,
$object->date_fin);
303 if ($overlappingExpenseReportID > 0) {
305 setEventMessages($langs->trans(
"ErrorDoubleDeclaration").
' <a href="'.$_SERVER[
'PHP_SELF'].
'?id='.$overlappingExpenseReportID.
'">'. $langs->trans(
'ShowTrip').
'</a>',
null,
'errors');
320 header(
"Location: ".$_SERVER[
"PHP_SELF"].
"?id=".$id);
330 if (($action ==
'update' || $action ==
'updateFromRefuse') && $permissiontoadd) {
334 $object->date_debut = $date_start;
344 $object->fk_user_modif = $user->id;
346 $result =
$object->update($user);
348 header(
"Location: ".$_SERVER[
"PHP_SELF"].
"?id=".
GETPOSTINT(
'id'));
355 if ($action ==
'update_extras' && $permissiontoadd) {
359 $ret = $extrafields->setOptionalsFromPost(
null,
$object,
GETPOST(
'attribute',
'restricthtml'));
366 $result =
$object->insertExtraFields(
'EXPENSEREPORT_MODIFY');
374 $action =
'edit_extras';
378 if ($action ==
"confirm_validate" &&
GETPOST(
"confirm",
'alpha') ==
"yes" && $id > 0 && $permissiontoadd) {
386 $result =
$object->setValidate($user);
391 $outputlangs = $langs;
394 $newlang =
GETPOST(
'lang_id',
'aZ09');
397 $newlang =
$object->thirdparty->default_lang;
399 if (!empty($newlang)) {
401 $outputlangs->setDefaultLang($newlang);
406 $object->generateDocument($model, $outputlangs, $hidedetails, $hidedesc, $hideref);
413 if (!$error && $result > 0 &&
$object->fk_user_validator > 0) {
414 $langs->load(
"mails");
417 $destinataire =
new User($db);
418 $destinataire->fetch(
$object->fk_user_validator);
419 $emailTo = $destinataire->email;
422 $expediteur =
new User($db);
423 $expediteur->fetch(
$object->fk_user_author);
426 if ($emailTo && $emailFrom) {
437 $subject = $societeName.
" - ".$langs->transnoentities(
"ExpenseReportWaitingForApproval");
440 $link = $urlwithroot.
'/expensereport/card.php?id='.
$object->id;
441 $link =
'<a href="'.$link.
'">'.$link.
'</a>';
442 $message = $langs->transnoentities(
"ExpenseReportWaitingForApprovalMessage", $expediteur->getFullName($langs),
get_date_range(
$object->date_debut,
$object->date_fin,
'', $langs), $link);
457 $mailfile =
new CMailFile($subject, $emailTo, $emailFrom, $message, $filedir, $mimetype, $filename,
'',
'', 0, -1);
459 if (!empty($mailfile->error)) {
461 $result = $mailfile->sendfile();
463 $mesg = $langs->trans(
'MailSuccessfulySent', $mailfile->getValidAddress($emailFrom, 2), $mailfile->getValidAddress($emailTo, 2));
466 $langs->load(
"other");
467 if ($mailfile->error) {
469 $mesg .= $langs->trans(
'ErrorFailedToSendMail', $emailFrom, $emailTo);
470 $mesg .=
'<br>'.$mailfile->error;
473 setEventMessages(
'No mail sent. Feature is disabled by option MAIN_DISABLE_ALL_MAILS',
null,
'warnings');
481 setEventMessages($langs->trans(
"NoEmailSentBadSenderOrRecipientEmail"),
null,
'warnings');
488 header(
"Location: ".$_SERVER[
"PHP_SELF"].
"?id=".$id);
495 if ($action ==
"confirm_save_from_refuse" &&
GETPOST(
"confirm",
'alpha') ==
"yes" && $id > 0 && $permissiontoadd) {
498 $result =
$object->set_save_from_refuse($user);
503 $outputlangs = $langs;
506 $newlang =
GETPOST(
'lang_id',
'aZ09');
509 $newlang =
$object->thirdparty->default_lang;
511 if (!empty($newlang)) {
513 $outputlangs->setDefaultLang($newlang);
518 $object->generateDocument($model, $outputlangs, $hidedetails, $hidedesc, $hideref);
526 $destinataire =
new User($db);
527 $destinataire->fetch(
$object->fk_user_validator);
528 $emailTo = $destinataire->email;
531 $expediteur =
new User($db);
532 $expediteur->fetch(
$object->fk_user_author);
535 if ($emailFrom && $emailTo) {
546 $subject = $societeName.
" - ".$langs->transnoentities(
"ExpenseReportWaitingForReApproval");
549 $link = $urlwithroot.
'/expensereport/card.php?id='.
$object->id;
550 $link =
'<a href="'.$link.
'">'.$link.
'</a>';
552 $message .=
'<br>'.$langs->transnoentities(
"ExpenseReportWaitingForReApprovalMessage2", $link);
571 $mailfile =
new CMailFile($subject, $emailTo, $emailFrom, $message, $filedir, $mimetype, $filename,
'',
'', 0, -1);
573 if (!empty($mailfile->error)) {
575 $result = $mailfile->sendfile();
577 $mesg = $langs->trans(
'MailSuccessfulySent', $mailfile->getValidAddress($emailFrom, 2), $mailfile->getValidAddress($emailTo, 2));
579 header(
"Location: ".$_SERVER[
"PHP_SELF"].
"?id=".$id);
582 $langs->load(
"other");
583 if ($mailfile->error) {
585 $mesg .= $langs->trans(
'ErrorFailedToSendMail', $emailFrom, $emailTo);
586 $mesg .=
'<br>'.$mailfile->error;
589 setEventMessages(
'No mail sent. Feature is disabled by option MAIN_DISABLE_ALL_MAILS',
null,
'warnings');
597 setEventMessages($langs->trans(
"NoEmailSentBadSenderOrRecipientEmail"),
null,
'warnings');
606 if ($action ==
"confirm_approve" &&
GETPOST(
"confirm",
'alpha') ==
"yes" && $id > 0 && $user->hasRight(
'expensereport',
'approve')) {
610 $result =
$object->setApproved($user);
615 $outputlangs = $langs;
618 $newlang =
GETPOST(
'lang_id',
'aZ09');
621 $newlang =
$object->thirdparty->default_lang;
623 if (!empty($newlang)) {
625 $outputlangs->setDefaultLang($newlang);
630 $object->generateDocument($model, $outputlangs, $hidedetails, $hidedesc, $hideref);
638 $destinataire =
new User($db);
639 $destinataire->fetch(
$object->fk_user_author);
640 $emailTo = $destinataire->email;
644 if (empty($emailTo)) {
649 $expediteur =
new User($db);
650 $expediteur->fetch(
$object->fk_user_approve > 0 ?
$object->fk_user_approve :
$object->fk_user_validator);
653 if ($emailFrom && $emailTo) {
664 $subject = $societeName.
" - ".$langs->transnoentities(
"ExpenseReportApproved");
667 $link = $urlwithroot.
'/expensereport/card.php?id='.
$object->id;
668 $link =
'<a href="'.$link.
'">'.$link.
'</a>';
669 $message = $langs->transnoentities(
"ExpenseReportApprovedMessage",
$object->ref, $destinataire->getFullName($langs), $expediteur->getFullName($langs), $link);
686 $mailfile =
new CMailFile($subject, $emailTo, $emailFrom, $message, $filedir, $mimetype, $filename, $emailCC,
'', 0, -1);
688 if (!empty($mailfile->error)) {
690 $result = $mailfile->sendfile();
692 $mesg = $langs->trans(
'MailSuccessfulySent', $mailfile->getValidAddress($emailFrom, 2), $mailfile->getValidAddress($emailTo, 2));
694 header(
"Location: ".$_SERVER[
"PHP_SELF"].
"?id=".$id);
697 $langs->load(
"other");
698 if ($mailfile->error) {
700 $mesg .= $langs->trans(
'ErrorFailedToSendMail', $emailFrom, $emailTo);
701 $mesg .=
'<br>'.$mailfile->error;
704 setEventMessages(
'No mail sent. Feature is disabled by option MAIN_DISABLE_ALL_MAILS',
null,
'warnings');
712 setEventMessages($langs->trans(
"NoEmailSentBadSenderOrRecipientEmail"),
null,
'warnings');
721 if ($action ==
"confirm_refuse" &&
GETPOST(
'confirm',
'alpha') ==
"yes" && $id > 0 && $user->hasRight(
'expensereport',
'approve')) {
725 $detailRefuse =
GETPOST(
'detail_refuse',
'alpha');
726 $result =
$object->setDeny($user, $detailRefuse);
731 $outputlangs = $langs;
734 $newlang =
GETPOST(
'lang_id',
'aZ09');
737 $newlang =
$object->thirdparty->default_lang;
739 if (!empty($newlang)) {
741 $outputlangs->setDefaultLang($newlang);
746 $object->generateDocument($model, $outputlangs, $hidedetails, $hidedesc, $hideref);
754 $destinataire =
new User($db);
755 $destinataire->fetch(
$object->fk_user_author);
756 $emailTo = $destinataire->email;
759 $expediteur =
new User($db);
760 $expediteur->fetch(
$object->fk_user_refuse);
763 if ($emailFrom && $emailTo) {
774 $subject = $societeName.
" - ".$langs->transnoentities(
"ExpenseReportRefused");
777 $link = $urlwithroot.
'/expensereport/card.php?id='.
$object->id;
778 $link =
'<a href="'.$link.
'">'.$link.
'</a>';
779 $message = $langs->transnoentities(
"ExpenseReportRefusedMessage",
$object->ref, $destinataire->getFullName($langs), $expediteur->getFullName($langs), $detailRefuse, $link);
797 $mailfile =
new CMailFile($subject, $emailTo, $emailFrom, $message, $filedir, $mimetype, $filename,
'',
'', 0, -1);
799 if (!empty($mailfile->error)) {
801 $result = $mailfile->sendfile();
803 $mesg = $langs->trans(
'MailSuccessfulySent', $mailfile->getValidAddress($emailFrom, 2), $mailfile->getValidAddress($emailTo, 2));
805 header(
"Location: ".$_SERVER[
"PHP_SELF"].
"?id=".$id);
808 $langs->load(
"other");
809 if ($mailfile->error) {
811 $mesg .= $langs->trans(
'ErrorFailedToSendMail', $emailFrom, $emailTo);
812 $mesg .=
'<br>'.$mailfile->error;
815 setEventMessages(
'No mail sent. Feature is disabled by option MAIN_DISABLE_ALL_MAILS',
null,
'warnings');
823 setEventMessages($langs->trans(
"NoEmailSentBadSenderOrRecipientEmail"),
null,
'warnings');
833 if ($action ==
"confirm_cancel" &&
GETPOST(
'confirm',
'alpha') ==
"yes" && $id > 0 && $user->hasRight(
'expensereport',
'creer')) {
834 if (!
GETPOST(
'detail_cancel',
'alpha')) {
835 setEventMessages($langs->trans(
"ErrorFieldRequired", $langs->transnoentitiesnoconv(
"Comment")),
null,
'errors');
840 if ($user->id ==
$object->fk_user_valid || $user->id ==
$object->fk_user_author) {
841 $detailCancel =
GETPOST(
'detail_cancel',
'alpha');
842 $result =
$object->set_cancel($user, $detailCancel);
847 $outputlangs = $langs;
850 $newlang =
GETPOST(
'lang_id',
'aZ09');
853 $newlang =
$object->thirdparty->default_lang;
855 if (!empty($newlang)) {
857 $outputlangs->setDefaultLang($newlang);
862 $object->generateDocument($model, $outputlangs, $hidedetails, $hidedesc, $hideref);
870 $destinataire =
new User($db);
871 $destinataire->fetch(
$object->fk_user_author);
872 $emailTo = $destinataire->email;
875 $expediteur =
new User($db);
876 $expediteur->fetch(
$object->fk_user_cancel);
879 if ($emailFrom && $emailTo) {
890 $subject = $societeName.
" - ".$langs->transnoentities(
"ExpenseReportCanceled");
893 $link = $urlwithroot.
'/expensereport/card.php?id='.
$object->id;
894 $link =
'<a href="'.$link.
'">'.$link.
'</a>';
895 $message = $langs->transnoentities(
"ExpenseReportCanceledMessage",
$object->ref, $destinataire->getFullName($langs), $expediteur->getFullName($langs), $detailCancel, $link);
913 $mailfile =
new CMailFile($subject, $emailTo, $emailFrom, $message, $filedir, $mimetype, $filename,
'',
'', 0, -1);
915 if (!empty($mailfile->error)) {
917 $result = $mailfile->sendfile();
919 $mesg = $langs->trans(
'MailSuccessfulySent', $mailfile->getValidAddress($emailFrom, 2), $mailfile->getValidAddress($emailTo, 2));
921 header(
"Location: ".$_SERVER[
"PHP_SELF"].
"?id=".$id);
924 $langs->load(
"other");
925 if ($mailfile->error) {
927 $mesg .= $langs->trans(
'ErrorFailedToSendMail', $emailFrom, $emailTo);
928 $mesg .=
'<br>'.$mailfile->error;
931 setEventMessages(
'No mail sent. Feature is disabled by option MAIN_DISABLE_ALL_MAILS',
null,
'warnings');
939 setEventMessages($langs->trans(
"NoEmailSentBadSenderOrRecipientEmail"),
null,
'warnings');
952 if ($action ==
"confirm_setdraft" &&
GETPOST(
'confirm',
'alpha') ==
"yes" && $id > 0 && $user->hasRight(
'expensereport',
'creer')) {
955 if ($user->id ==
$object->fk_user_author || $user->id ==
$object->fk_user_valid || in_array(
$object->fk_user_author, $childids)) {
956 $result =
$object->setStatut(0);
961 $outputlangs = $langs;
964 $newlang =
GETPOST(
'lang_id',
'aZ09');
967 $newlang =
$object->thirdparty->default_lang;
969 if (!empty($newlang)) {
971 $outputlangs->setDefaultLang($newlang);
976 $object->generateDocument($model, $outputlangs, $hidedetails, $hidedesc, $hideref);
981 header(
"Location: ".$_SERVER[
"PHP_SELF"].
"?id=".$id);
991 if ($action ==
'set_unpaid' && $id > 0 && $user->hasRight(
'expensereport',
'to_paid')) {
995 $result =
$object->setUnpaid($user);
1000 $outputlangs = $langs;
1003 $newlang =
GETPOST(
'lang_id',
'aZ09');
1006 $newlang =
$object->thirdparty->default_lang;
1008 if (!empty($newlang)) {
1009 $outputlangs =
new Translate(
"", $conf);
1010 $outputlangs->setDefaultLang($newlang);
1015 $object->generateDocument($model, $outputlangs, $hidedetails, $hidedesc, $hideref);
1020 if ($action ==
'set_paid' && $id > 0 && $user->hasRight(
'expensereport',
'to_paid')) {
1024 $result =
$object->setPaid($id, $user);
1029 $outputlangs = $langs;
1032 $newlang =
GETPOST(
'lang_id',
'aZ09');
1035 $newlang =
$object->thirdparty->default_lang;
1037 if (!empty($newlang)) {
1038 $outputlangs =
new Translate(
"", $conf);
1039 $outputlangs->setDefaultLang($newlang);
1044 $object->generateDocument($model, $outputlangs, $hidedetails, $hidedesc, $hideref);
1052 $destinataire =
new User($db);
1053 $destinataire->fetch(
$object->fk_user_author);
1054 $emailTo = $destinataire->email;
1057 $expediteur =
new User($db);
1058 $expediteur->fetch($user->id);
1061 if ($emailFrom && $emailTo) {
1062 $filename = array();
1064 $mimetype = array();
1072 $subject = $societeName.
" - ".$langs->transnoentities(
"ExpenseReportPaid");
1075 $link = $urlwithroot.
'/expensereport/card.php?id='.
$object->id;
1076 $link =
'<a href="'.$link.
'">'.$link.
'</a>';
1077 $message = $langs->transnoentities(
"ExpenseReportPaidMessage",
$object->ref, $destinataire->getFullName($langs), $expediteur->getFullName($langs), $link);
1080 $object->setDocModel($user,
"");
1081 $resultPDF = expensereport_pdf_create($db,
$object,
'',
"", $langs);
1084 $mailfile =
new CMailFile($subject, $emailTo, $emailFrom, $message, $filedir, $mimetype, $filename,
'',
'', 0, -1);
1086 if (!empty($mailfile->error)) {
1088 $result = $mailfile->sendfile();
1090 $mesg = $langs->trans(
'MailSuccessfulySent', $mailfile->getValidAddress($emailFrom, 2), $mailfile->getValidAddress($emailTo, 2));
1092 header(
"Location: ".$_SERVER[
"PHP_SELF"].
"?id=".$id);
1095 $langs->load(
"other");
1096 if ($mailfile->error) {
1098 $mesg .= $langs->trans(
'ErrorFailedToSendMail', $emailFrom, $emailTo);
1099 $mesg .=
'<br>'.$mailfile->error;
1102 setEventMessages(
'No mail sent. Feature is disabled by option MAIN_DISABLE_ALL_MAILS',
null,
'warnings');
1110 setEventMessages($langs->trans(
"NoEmailSentBadSenderOrRecipientEmail"),
null,
'warnings');
1119 if ($action ==
"addline" && $user->hasRight(
'expensereport',
'creer')) {
1124 if (GETPOSTISSET(
'attachfile')) {
1125 $arrayoffiles =
GETPOST(
'attachfile',
'array');
1126 if (is_array($arrayoffiles) && !empty($arrayoffiles[0])) {
1127 include_once DOL_DOCUMENT_ROOT.
'/ecm/class/ecmfiles.class.php';
1128 $entityprefix = ($conf->entity !=
'1') ? $conf->entity.
'/' :
'';
1129 $relativepath =
'expensereport/'.$object->ref.
'/'.$arrayoffiles[0];
1131 $ecmfiles->fetch(0,
'', $relativepath);
1132 $fk_ecm_files = $ecmfiles->id;
1137 if (empty($vatrate)) {
1140 $tmpvat =
price2num(preg_replace(
'/\s*\(.*\)/',
'', $vatrate));
1144 if (empty($value_unit)) {
1145 $value_unit =
price2num((
float) $value_unit_ht + ((
float) $value_unit_ht * (
float) $tmpvat / 100),
'MU');
1148 $fk_c_exp_tax_cat =
GETPOSTINT(
'fk_c_exp_tax_cat');
1155 if (!($fk_c_type_fees > 0)) {
1157 setEventMessages($langs->trans(
"ErrorFieldRequired", $langs->transnoentitiesnoconv(
"Type")),
null,
'errors');
1161 if ((
float) $tmpvat < 0 || $tmpvat ===
'') {
1163 setEventMessages($langs->trans(
"ErrorFieldRequired", $langs->transnoentitiesnoconv(
"VAT")),
null,
'errors');
1168 if (empty($date) || $date ==
"--") {
1170 setEventMessages($langs->trans(
"ErrorFieldRequired", $langs->transnoentitiesnoconv(
"Date")),
null,
'errors');
1171 } elseif ($date < $object->date_debut || $date > (
$object->date_fin + (24 * 3600 - 1))) {
1177 $langs->load(
"errors");
1178 $type = $error > 0 ?
'errors' :
'warnings';
1179 setEventMessages($langs->trans(
"WarningDateOfLineMustBeInExpenseReportRange"),
null, $type);
1183 if ($value_unit == 0) {
1185 setEventMessages($langs->trans(
"ErrorFieldRequired", $langs->transnoentitiesnoconv(
"PriceUTTC")),
null,
'errors');
1189 if ($projectRequired && $fk_project <= 0) {
1191 setEventMessages($langs->trans(
"ErrorFieldRequired", $langs->transnoentitiesnoconv(
"Project")),
null,
'errors');
1195 if ($fileRequired && $fk_ecm_files == 0) {
1197 setEventMessages($langs->trans(
"ErrorFieldRequired", $langs->transnoentitiesnoconv(
"File")),
null,
'errors');
1204 $result =
$object->addline($qty, $value_unit, $fk_c_type_fees, $vatrate, $date, $comments, $fk_project, $fk_c_exp_tax_cat, $type, $fk_ecm_files);
1210 $outputlangs = $langs;
1211 $newlang =
GETPOST(
'lang_id',
'alpha');
1213 $user =
new User($db);
1214 $user->fetch(
$object->fk_user_author);
1215 $newlang = $user->lang;
1217 if (!empty($newlang)) {
1218 $outputlangs =
new Translate(
"", $conf);
1219 $outputlangs->setDefaultLang($newlang);
1222 $object->generateDocument(
$object->model_pdf, $outputlangs, $hidedetails, $hidedesc, $hideref);
1226 unset($value_unit_ht);
1230 unset($fk_c_type_fees);
1241 header(
"Location: ".$_SERVER[
"PHP_SELF"].
"?id=".
GETPOSTINT(
'id'));
1248 if ($action ==
'confirm_delete_line' &&
GETPOST(
"confirm",
'alpha') ==
"yes" && $user->hasRight(
'expensereport',
'creer')) {
1254 $total_ht = $object_ligne->total_ht;
1255 $total_tva = $object_ligne->total_tva;
1262 $outputlangs = $langs;
1265 $newlang =
GETPOST(
'lang_id',
'aZ09');
1268 $newlang =
$object->thirdparty->default_lang;
1270 if (!empty($newlang)) {
1271 $outputlangs =
new Translate(
"", $conf);
1272 $outputlangs->setDefaultLang($newlang);
1277 $object->generateDocument($model, $outputlangs, $hidedetails, $hidedesc, $hideref);
1281 header(
"Location: ".$_SERVER[
"PHP_SELF"].
"?id=".
GETPOSTINT(
'id'));
1288 if ($action ==
"updateline" && $permissiontoadd) {
1294 if (GETPOSTISSET(
'attachfile')) {
1295 $arrayoffiles =
GETPOST(
'attachfile',
'array');
1296 if (is_array($arrayoffiles) && !empty($arrayoffiles[0])) {
1297 include_once DOL_DOCUMENT_ROOT.
'/ecm/class/ecmfiles.class.php';
1298 $relativepath =
'expensereport/'.$object->ref.
'/'.$arrayoffiles[0];
1300 $ecmfiles->fetch(0,
'', $relativepath);
1301 $fk_ecm_files = $ecmfiles->id;
1306 $type_fees_id =
GETPOSTINT(
'fk_c_type_fees');
1307 $fk_c_exp_tax_cat =
GETPOSTINT(
'fk_c_exp_tax_cat');
1308 $projet_id = $fk_project;
1309 $comments =
GETPOST(
'comments',
'restricthtml');
1311 $vatrate =
GETPOST(
'vatrate',
'alpha');
1314 if (empty($vatrate)) {
1317 $tmpvat =
price2num(preg_replace(
'/\s*\(.*\)/',
'', $vatrate));
1321 if (empty($value_unit)) {
1322 $value_unit =
price2num((
float) $value_unit_ht + ((
float) $value_unit_ht * (
float) $tmpvat / 100),
'MU');
1327 setEventMessages($langs->trans(
"ErrorFieldRequired", $langs->transnoentitiesnoconv(
"Type")),
null,
'errors');
1330 if ((
float) $tmpvat < 0 || $tmpvat ==
'') {
1332 setEventMessages($langs->trans(
"ErrorFieldRequired", $langs->transnoentitiesnoconv(
"Vat")),
null,
'errors');
1336 if ($date < $object->date_debut || $date > (
$object->date_fin + (24 * 3600 - 1))) {
1341 $langs->load(
"errors");
1342 $type = $error > 0 ?
'errors' :
'warnings';
1343 setEventMessages($langs->trans(
"WarningDateOfLineMustBeInExpenseReportRange"),
null, $type);
1347 if ($projectRequired && $projet_id <= 0) {
1349 setEventMessages($langs->trans(
"ErrorFieldRequired", $langs->transnoentitiesnoconv(
"Project")),
null,
'errors');
1354 $result =
$object->updateline($rowid, $type_fees_id, $projet_id, $vatrate, $comments, $qty, $value_unit, $date, $id, $fk_c_exp_tax_cat, $fk_ecm_files);
1359 $outputlangs = $langs;
1362 $newlang =
GETPOST(
'lang_id',
'aZ09');
1365 $newlang =
$object->thirdparty->default_lang;
1367 if (!empty($newlang)) {
1368 $outputlangs =
new Translate(
"", $conf);
1369 $outputlangs->setDefaultLang($newlang);
1374 $object->generateDocument($model, $outputlangs, $hidedetails, $hidedesc, $hideref);
1378 unset($value_unit_ht);
1382 unset($fk_c_type_fees);
1396 include DOL_DOCUMENT_ROOT.
'/core/actions_printing.inc.php';
1399 $triggersendname =
'EXPENSEREPORT_SENTBYMAIL';
1400 $autocopy =
'MAIN_MAIL_AUTOCOPY_EXPENSEREPORT_TO';
1401 $trackid =
'exp'.$object->id;
1402 include DOL_DOCUMENT_ROOT.
'/core/actions_sendmails.inc.php';
1405 $upload_dir = $conf->expensereport->dir_output;
1406 include DOL_DOCUMENT_ROOT.
'/core/actions_builddoc.inc.php';
1414$title = $langs->trans(
"ExpenseReport").
" - ".$langs->trans(
"Card");
1415$help_url =
"EN:Module_Expense_Reports|FR:Module_Notes_de_frais";
1419$form =
new Form($db);
1422$projecttmp =
new Project($db);
1424$bankaccountstatic =
new Account($db);
1425$ecmfilesstatic =
new EcmFiles($db);
1429if ($action ==
'create') {
1432 print
'<form action="'.$_SERVER[
'PHP_SELF'].
'" method="post" name="create">';
1433 print
'<input type="hidden" name="token" value="'.newToken().
'">';
1434 print
'<input type="hidden" name="action" value="add">';
1435 print
'<input type="hidden" name="backtopage" value="'.$backtopage.
'">';
1439 print
'<table class="border centpercent">';
1444 print
'<td class="titlefieldcreate fieldrequired">'.$langs->trans(
"DateStart").
'</td>';
1446 print $form->selectDate($date_start ? $date_start : -1,
'date_debut', 0, 0, 0,
'', 1, 1);
1452 print
'<td class="fieldrequired">'.$langs->trans(
"DateEnd").
'</td>';
1454 print $form->selectDate($date_end ? $date_end : -1,
'date_fin', 0, 0, 0,
'', 1, 1);
1460 print
'<td class="fieldrequired">'.$langs->trans(
"User").
'</td>';
1462 $defaultselectuser = $user->id;
1464 $defaultselectuser =
GETPOSTINT(
'fk_user_author');
1466 $include_users =
'hierarchyme';
1467 if (
getDolGlobalString(
'MAIN_USE_ADVANCED_PERMS') && $user->hasRight(
'expensereport',
'writeall_advance')) {
1468 $include_users = array();
1470 $s = $form->select_dolusers($defaultselectuser,
"fk_user_author", 0,
"", 0, $include_users,
'',
'0,'.$conf->entity);
1477 print
'<td>'.$langs->trans(
"VALIDATOR").
'</td>';
1480 $include_users =
$object->fetch_users_approver_expensereport();
1481 if (empty($include_users)) {
1482 print
img_warning().
' '.$langs->trans(
"NobodyHasPermissionToValidateExpenseReport");
1484 $defaultselectuser = (empty($user->fk_user_expense_validator) ? $user->fk_user : $user->fk_user_expense_validator);
1489 $defaultselectuser =
GETPOSTINT(
'fk_user_validator');
1491 $s = $form->select_dolusers($defaultselectuser,
"fk_user_validator", 1,
"", ((empty($defaultselectuser) || !
getDolGlobalString(
'EXPENSEREPORT_DEFAULT_VALIDATOR_UNCHANGEABLE')) ? 0 : 1), $include_users);
1492 print $form->textwithpicto($s, $langs->trans(
"AnyOtherInThisListCanValidate"));
1500 print
'<td>'.$langs->trans(
"ModePaiement").
'</td>';
1502 $form->select_types_paiements(
'',
'fk_c_paiement');
1508 $note_public = GETPOSTISSET(
'note_public') ?
GETPOST(
'note_public',
'restricthtml') :
'';
1511 print
'<td class="tdtop">'.$langs->trans(
'NotePublic').
'</td>';
1514 $doleditor =
new DolEditor(
'note_public', $note_public,
'', 80,
'dolibarr_notes',
'In', 0,
false, !
getDolGlobalString(
'FCKEDITOR_ENABLE_NOTE_PUBLIC') ? 0 : 1, ROWS_3,
'90%');
1515 print $doleditor->Create(1);
1519 $note_private = GETPOSTISSET(
'note_private') ?
GETPOST(
'note_private',
'restricthtml') :
'';
1521 if (empty($user->socid)) {
1523 print
'<td class="tdtop">'.$langs->trans(
'NotePrivate').
'</td>';
1526 $doleditor =
new DolEditor(
'note_private', $note_private,
'', 80,
'dolibarr_notes',
'In', 0,
false, !
getDolGlobalString(
'FCKEDITOR_ENABLE_NOTE_PRIVATE') ? 0 : 1, ROWS_3,
'90%');
1527 print $doleditor->Create(1);
1532 $parameters = array(
'colspan' =>
' colspan="3"',
'cols' => 3);
1533 $reshook = $hookmanager->executeHooks(
'formObjectOptions', $parameters,
$object, $action);
1534 print $hookmanager->resPrint;
1535 if (empty($reshook)) {
1536 print
$object->showOptionals($extrafields,
'create', $parameters);
1544 print $form->buttonsSaveCancel(
"AddTrip");
1547} elseif ($id > 0 || $ref) {
1548 $result =
$object->fetch($id, $ref);
1551 if (!in_array(
$object->fk_user_author, $childids)) {
1552 if (!$user->hasRight(
'expensereport',
'readall') && !$user->hasRight(
'expensereport',
'lire_tous')
1553 && (!
getDolGlobalString(
'MAIN_USE_ADVANCED_PERMS') || !$user->hasRight(
'expensereport',
'writeall_advance'))) {
1556 print
'<div class="tabBar">';
1557 print $langs->trans(
'NotUserRightToView');
1570 if ($action ==
'edit' && (
$object->status < 3 ||
$object->status == 99)) {
1571 print
"<form name='update' action=\"".$_SERVER[
'PHP_SELF'].
"\" method=\"post\">\n";
1572 print
'<input type="hidden" name="token" value="'.newToken().
'">';
1573 print
'<input type="hidden" name="id" value="'.$id.
'">';
1574 print
'<input type="hidden" name="backtopage" value="'.$backtopage.
'">';
1579 print
'<input type="hidden" name="action" value="updateFromRefuse">';
1581 print
'<input type="hidden" name="action" value="update">';
1584 $linkback =
'<a href="'.DOL_URL_ROOT.
'/expensereport/list.php?restore_lastsearch_values=1'.(!empty($socid) ?
'&socid='.$socid :
'').
'">'.$langs->trans(
"BackToList").
'</a>';
1586 print
'<table class="border centpercent">';
1589 print
'<td>'.$langs->trans(
"User").
'</td>';
1591 $userfee =
new User($db);
1592 if (
$object->fk_user_author > 0) {
1593 $userfee->fetch(
$object->fk_user_author);
1594 print $userfee->getNomUrl(-1);
1599 print
'<tr><td class="titlefieldcreate">'.$langs->trans(
"Ref").
'</td><td>';
1600 print $form->showrefnav(
$object,
'ref', $linkback, 1,
'ref',
'ref',
'');
1604 print
'<td>'.$langs->trans(
"DateStart").
'</td>';
1606 print $form->selectDate(
$object->date_debut,
'date_debut');
1610 print
'<td>'.$langs->trans(
"DateEnd").
'</td>';
1612 print $form->selectDate(
$object->date_fin,
'date_fin');
1618 print
'<td>'.$langs->trans(
"ModePaiement").
'</td>';
1620 $form->select_types_paiements(
$object->fk_c_paiement,
'fk_c_paiement');
1627 print
'<td>'.$langs->trans(
"VALIDATOR").
'</td>';
1629 $include_users =
$object->fetch_users_approver_expensereport();
1630 $s = $form->select_dolusers(
$object->fk_user_validator,
"fk_user_validator", 1,
"", 0, $include_users);
1631 print $form->textwithpicto($s, $langs->trans(
"AnyOtherInThisListCanValidate"));
1636 print
'<td>'.$langs->trans(
"VALIDOR").
'</td>';
1638 $userfee =
new User($db);
1639 $userfee->fetch(
$object->fk_user_valid);
1640 print $userfee->getNomUrl(-1);
1646 print
'<td>'.$langs->trans(
"AUTHORPAIEMENT").
'</td>';
1648 $userfee =
new User($db);
1649 $userfee->fetch($user->id);
1650 print $userfee->getNomUrl(-1);
1662 print $form->buttonsSaveCancel(
"Modify");
1666 $taxlessUnitPriceDisabled =
getDolGlobalString(
'EXPENSEREPORT_FORCE_LINE_AMOUNTS_INCLUDING_TAXES_ONLY') ?
' disabled' :
'';
1673 if ($action ==
'clone') {
1675 $criteriaforfilter =
'hierarchyme';
1676 if ($user->hasRight(
'expensereport',
'readall')) {
1677 $criteriaforfilter =
'';
1679 $formquestion = array(
1681 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'))
1684 $formconfirm = $form->formconfirm($_SERVER[
"PHP_SELF"].
'?id='.
$object->id, $langs->trans(
'ToClone'), $langs->trans(
'ConfirmCloneExpenseReport',
$object->ref),
'confirm_clone', $formquestion,
'yes', 1);
1687 if ($action ==
'save') {
1688 $formconfirm = $form->formconfirm($_SERVER[
"PHP_SELF"].
"?id=".$id, $langs->trans(
"SaveTrip"), $langs->trans(
"ConfirmSaveTrip"),
"confirm_validate",
"",
"", 1);
1691 if ($action ==
'save_from_refuse') {
1692 $formconfirm = $form->formconfirm($_SERVER[
"PHP_SELF"].
"?id=".$id, $langs->trans(
"SaveTrip"), $langs->trans(
"ConfirmSaveTrip"),
"confirm_save_from_refuse",
"",
"", 1);
1695 if ($action ==
'delete') {
1696 $formconfirm = $form->formconfirm($_SERVER[
"PHP_SELF"].
"?id=".$id, $langs->trans(
"DeleteTrip"), $langs->trans(
"ConfirmDeleteTrip"),
"confirm_delete",
"",
"", 1);
1699 if ($action ==
'validate') {
1700 $formconfirm = $form->formconfirm($_SERVER[
"PHP_SELF"].
"?id=".$id, $langs->trans(
"ValideTrip"), $langs->trans(
"ConfirmValideTrip"),
"confirm_approve",
"",
"", 1);
1703 if ($action ==
'paid') {
1704 $formconfirm = $form->formconfirm($_SERVER[
"PHP_SELF"].
"?id=".$id, $langs->trans(
"PaidTrip"), $langs->trans(
"ConfirmPaidTrip"),
"confirm_paid",
"",
"", 1);
1707 if ($action ==
'cancel') {
1708 $array_input = array(
'text' => $langs->trans(
"ConfirmCancelTrip"), 0 => array(
'type' =>
"text",
'label' =>
'<strong>'.$langs->trans(
"Comment").
'</strong>',
'name' =>
"detail_cancel",
'value' =>
""));
1709 $formconfirm = $form->formconfirm($_SERVER[
"PHP_SELF"].
"?id=".$id, $langs->trans(
"Cancel"),
"",
"confirm_cancel", $array_input,
"", 1);
1712 if ($action ==
'setdraft') {
1713 $formconfirm = $form->formconfirm($_SERVER[
"PHP_SELF"].
"?id=".$id, $langs->trans(
"BrouillonnerTrip"), $langs->trans(
"ConfirmBrouillonnerTrip"),
"confirm_setdraft",
"",
"", 1);
1716 if ($action ==
'refuse') {
1717 $array_input = array(
'text' => $langs->trans(
"ConfirmRefuseTrip"), 0 => array(
'type' =>
"text",
'label' => $langs->trans(
"Comment"),
'name' =>
"detail_refuse",
'value' =>
""));
1718 $formconfirm = $form->formconfirm($_SERVER[
"PHP_SELF"].
"?id=".$id, $langs->trans(
"Deny"),
'',
"confirm_refuse", $array_input,
"yes", 1);
1721 if ($action ==
'delete_line') {
1722 $formconfirm = $form->formconfirm($_SERVER[
"PHP_SELF"].
"?id=".
$id.
"&rowid=".
GETPOSTINT(
'rowid'), $langs->trans(
"DeleteLine"), $langs->trans(
"ConfirmDeleteLine"),
"confirm_delete_line",
'',
'yes', 1);
1729 $linkback =
'<a href="'.DOL_URL_ROOT.
'/expensereport/list.php?restore_lastsearch_values=1'.(!empty($socid) ?
'&socid='.$socid :
'').
'">'.$langs->trans(
"BackToList").
'</a>';
1731 $morehtmlref =
'<div class="refidno">';
1732 $morehtmlref .=
'</div>';
1734 dol_banner_tab(
$object,
'ref', $linkback, 1,
'ref',
'ref', $morehtmlref);
1736 print
'<div class="fichecenter">';
1737 print
'<div class="fichehalfleft">';
1738 print
'<div class="underbanner clearboth"></div>';
1740 print
'<table class="border tableforfield centpercent">';
1744 print
'<td class="titlefield">'.$langs->trans(
"User").
'</td>';
1746 if (
$object->fk_user_author > 0) {
1747 $userauthor =
new User($db);
1748 $result = $userauthor->fetch(
$object->fk_user_author);
1751 } elseif ($result > 0) {
1752 print $userauthor->getNomUrl(-1);
1759 print
'<td class="titlefield">'.$langs->trans(
"Period").
'</td>';
1766 print
'<td>'.$langs->trans(
"ModePaiement").
'</td>';
1767 print
'<td>'.$object->fk_c_paiement.
'</td>';
1773 print
'<td>'.$langs->trans(
"DATE_SAVE").
'</td>';
1774 print
'<td>'.dol_print_date(
$object->date_valid,
'dayhour',
'tzuser');
1776 print
' '.img_warning($langs->trans(
"Late").
' - '.$langs->trans(
"ToApprove"));
1779 print
' '.img_warning($langs->trans(
"Late").
' - '.$langs->trans(
"ToPay"));
1787 print
'<td>'.$langs->trans(
"VALIDATOR").
'</td>';
1789 if (
$object->fk_user_validator > 0) {
1790 $userfee =
new User($db);
1791 $result = $userfee->fetch(
$object->fk_user_validator);
1793 print $userfee->getNomUrl(-1);
1795 if (empty($userfee->email) || !
isValidEmail($userfee->email)) {
1796 $langs->load(
"errors");
1797 print
img_warning($langs->trans(
"ErrorBadEMail", $userfee->email));
1803 print
'<td>'.$langs->trans(
"CANCEL_USER").
'</span></td>';
1805 if (
$object->fk_user_cancel > 0) {
1806 $userfee =
new User($db);
1807 $result = $userfee->fetch(
$object->fk_user_cancel);
1809 print $userfee->getNomUrl(-1);
1815 print
'<td>'.$langs->trans(
"MOTIF_CANCEL").
'</td>';
1816 print
'<td>'.$object->detail_cancel.
'</td></tr>';
1819 print
'<td>'.$langs->trans(
"DATE_CANCEL").
'</td>';
1820 print
'<td>'.dol_print_date(
$object->date_cancel,
'dayhour',
'tzuser').
'</td></tr>';
1824 print
'<td>'.$langs->trans(
"ApprovedBy").
'</td>';
1826 if (
$object->fk_user_approve > 0) {
1827 $userapp =
new User($db);
1828 $result = $userapp->fetch(
$object->fk_user_approve);
1830 print $userapp->getNomUrl(-1);
1836 print
'<td>'.$langs->trans(
"DateApprove").
'</td>';
1837 print
'<td>'.dol_print_date(
$object->date_approve,
'dayhour',
'tzuser').
'</td></tr>';
1843 print
'<td>'.$langs->trans(
"REFUSEUR").
'</td>';
1845 $userfee =
new User($db);
1846 $result = $userfee->fetch(
$object->fk_user_refuse);
1848 print $userfee->getNomUrl(-1);
1853 print
'<td>'.$langs->trans(
"DATE_REFUS").
'</td>';
1854 print
'<td>'.dol_print_date(
$object->date_refuse,
'dayhour',
'tzuser');
1856 print
' - '.$object->detail_refuse;
1862 if (
$object->status == $object::STATUS_CLOSED) {
1880 include DOL_DOCUMENT_ROOT.
'/core/tpl/extrafields_view.tpl.php';
1885 print
'<div class="fichehalfright">';
1886 print
'<div class="underbanner clearboth"></div>';
1888 print
'<table class="border tableforfield centpercent">';
1892 print
'<td class="titlefieldmiddle">'.$langs->trans(
"AmountHT").
'</td>';
1893 print
'<td class="nowrap amountcard">'.price(
$object->total_ht, 1,
'', 1, - 1, - 1, $conf->currency).
'</td>';
1910 print
'<td>'.$langs->trans(
"AmountVAT").
'</td>';
1911 print
'<td class="nowrap amountcard">'.price(
$object->total_tva, 1,
'', 1, -1, -1, $conf->currency).
'</td>';
1915 if ($mysoc->localtax1_assuj ==
"1" ||
$object->total_localtax1 != 0) {
1916 print
'<tr><td>'.$langs->transcountry(
"AmountLT1", $mysoc->country_code).
'</td>';
1917 print
'<td class="valuefield">'.price(
$object->total_localtax1, 1,
'', 1, -1, -1, $conf->currency).
'</td></tr>';
1919 if ($mysoc->localtax2_assuj ==
"1" ||
$object->total_localtax2 != 0) {
1920 print
'<tr><td>'.$langs->transcountry(
"AmountLT2", $mysoc->country_code).
'</td>';
1921 print
'<td class="valuefield">'.price(
$object->total_localtax2, 1,
'', 1, -1, -1, $conf->currency).
'</td></tr>';
1925 print
'<td>'.$langs->trans(
"AmountTTC").
'</td>';
1926 print
'<td class="nowrap amountcard">'.price(
$object->total_ttc, 1,
'', 1, -1, -1, $conf->currency).
'</td>';
1932 if (isModEnabled(
"bank")) {
1937 print
'<table class="noborder paymenttable centpercent">';
1939 print
'<tr class="liste_titre">';
1940 print
'<td class="liste_titre">'.$langs->trans(
'Payments').
'</td>';
1941 print
'<td class="liste_titre">'.$langs->trans(
'Date').
'</td>';
1942 print
'<td class="liste_titre">'.$langs->trans(
'Type').
'</td>';
1943 if (isModEnabled(
"bank")) {
1944 print
'<td class="liste_titre right">'.$langs->trans(
'BankAccount').
'</td>';
1946 print
'<td class="liste_titre right">'.$langs->trans(
'Amount').
'</td>';
1947 print
'<td class="liste_titre" width="18"> </td>';
1951 $sql =
"SELECT p.rowid, p.num_payment, p.datep as dp, p.amount, p.fk_bank,";
1952 $sql .=
"c.code as payment_code, c.libelle as payment_type,";
1953 $sql .=
"ba.rowid as baid, ba.ref as baref, ba.label, ba.number as banumber, ba.account_number, ba.fk_accountancy_journal";
1954 $sql .=
" FROM ".MAIN_DB_PREFIX.
"expensereport as e, ".MAIN_DB_PREFIX.
"payment_expensereport as p";
1955 $sql .=
" LEFT JOIN ".MAIN_DB_PREFIX.
"c_paiement as c ON p.fk_typepayment = c.id";
1956 $sql .=
' LEFT JOIN '.MAIN_DB_PREFIX.
'bank as b ON p.fk_bank = b.rowid';
1957 $sql .=
' LEFT JOIN '.MAIN_DB_PREFIX.
'bank_account as ba ON b.fk_account = ba.rowid';
1958 $sql .=
" WHERE e.rowid = ".((int) $id);
1959 $sql .=
" AND p.fk_expensereport = e.rowid";
1960 $sql .=
' AND e.entity IN ('.getEntity(
'expensereport').
')';
1961 $sql .=
" ORDER BY dp";
1963 $resql = $db->query($sql);
1965 $num = $db->num_rows($resql);
1969 $objp = $db->fetch_object($resql);
1971 $paymentexpensereportstatic->id = $objp->rowid;
1972 $paymentexpensereportstatic->datep = $db->jdate($objp->dp);
1973 $paymentexpensereportstatic->ref = $objp->rowid;
1974 $paymentexpensereportstatic->num_payment = $objp->num_payment;
1975 $paymentexpensereportstatic->type_code = $objp->payment_code;
1976 $paymentexpensereportstatic->type_label = $objp->payment_type;
1978 print
'<tr class="oddseven">';
1980 print $paymentexpensereportstatic->getNomUrl(1);
1982 print
'<td>'.dol_print_date($db->jdate($objp->dp),
'day').
"</td>\n";
1983 $labeltype = $langs->trans(
"PaymentType".$objp->payment_code) !=
"PaymentType".$objp->payment_code ? $langs->trans(
"PaymentType".$objp->payment_code) : $objp->payment_type;
1984 print
"<td>".$labeltype.
' '.$objp->num_payment.
"</td>\n";
1986 if (isModEnabled(
"bank")) {
1987 $bankaccountstatic->id = $objp->baid;
1988 $bankaccountstatic->ref = $objp->baref;
1989 $bankaccountstatic->label = $objp->baref;
1990 $bankaccountstatic->number = $objp->banumber;
1992 if (isModEnabled(
'accounting')) {
1993 $bankaccountstatic->account_number = $objp->account_number;
1996 $accountingjournal->fetch($objp->fk_accountancy_journal);
1997 $bankaccountstatic->accountancy_journal = $accountingjournal->getNomUrl(0, 1, 1,
'', 1);
2000 print
'<td class="right">';
2001 if ($bankaccountstatic->id) {
2002 print $bankaccountstatic->getNomUrl(1,
'transactions');
2006 print
'<td class="right">'.price($objp->amount).
"</td>";
2009 $totalpaid += $objp->amount;
2015 $resteapayeraffiche = $remaintopay;
2017 $cssforamountpaymentcomplete =
'amountpaymentcomplete';
2020 $cssforamountpaymentcomplete =
'amountpaymentneutral';
2021 $resteapayeraffiche = 0;
2022 } elseif (
$object->paid == 0) {
2023 $cssforamountpaymentcomplete =
'amountpaymentneutral';
2025 print
'<tr><td colspan="'.$nbcols.
'" class="right">'.$langs->trans(
"AlreadyPaid").
':</td><td class="right">'.
price($totalpaid).
'</td><td></td></tr>';
2026 print
'<tr><td colspan="'.$nbcols.
'" class="right">'.$langs->trans(
"AmountExpected").
':</td><td class="right">'.
price(
$object->total_ttc).
'</td><td></td></tr>';
2028 print
'<tr><td colspan="'.$nbcols.
'" class="right">'.$langs->trans(
"RemainderToPay").
':</td>';
2029 print
'<td class="right'.($resteapayeraffiche ?
' amountremaintopay' : (
' '.$cssforamountpaymentcomplete)).
'">'.
price($resteapayeraffiche).
'</td><td></td></tr>';
2040 print
'<div class="clearboth"></div><br><br>';
2042 print
'<div style="clear: both;"></div>';
2044 $actiontouse =
'updateline';
2045 if ((
$object->status == 0 ||
$object->status == 99) && $action !=
'editline') {
2046 $actiontouse =
'addline';
2049 print
'<form name="expensereport" action="'.$_SERVER[
"PHP_SELF"].
'" enctype="multipart/form-data" method="post" >';
2050 print
'<input type="hidden" name="token" value="'.newToken().
'">';
2051 print
'<input type="hidden" name="action" value="'.$actiontouse.
'">';
2052 print
'<input type="hidden" name="id" value="'.$object->id.
'">';
2053 print
'<input type="hidden" name="fk_expensereport" value="'.$object->id.
'" />';
2054 print
'<input type="hidden" name="backtopage" value="'.$backtopage.
'">';
2055 print
'<input type="hidden" name="page_y" value="">';
2057 print
'<div class="div-table-responsive-no-min">';
2058 print
'<table id="tablelines" class="noborder centpercent">';
2064 print
'<tr class="liste_titre headerexpensereportdet">';
2065 print
'<td class="center linecollinenb">'.$langs->trans(
'LineNb').
'</td>';
2067 print
'<td class="center linecoldate">'.$langs->trans(
'Date').
'</td>';
2068 if (isModEnabled(
'project')) {
2069 print
'<td class="minwidth100imp linecolproject">'.$langs->trans(
'Project').
'</td>';
2071 print
'<td class="center linecoltype">'.$langs->trans(
'Type').
'</td>';
2073 print
'<td class="center linecolcarcategory">'.$langs->trans(
'CarCategory').
'</td>';
2075 print
'<td class="linecoldescription">'.$langs->trans(
'Description').
'</td>';
2076 print
'<td class="right linecolvat">'.$langs->trans(
'VAT').
'</td>';
2077 print
'<td class="right linecolpriceuht">'.$langs->trans(
'PriceUHT').
'</td>';
2078 print
'<td class="right linecolpriceuttc">'.$langs->trans(
'PriceUTTC').
'</td>';
2079 print
'<td class="right linecolqty">'.$langs->trans(
'Qty').
'</td>';
2080 if ($action !=
'editline') {
2081 print
'<td class="right linecolamountht">'.$langs->trans(
'AmountHT').
'</td>';
2082 print
'<td class="right linecolamountttc">'.$langs->trans(
'AmountTTC').
'</td>';
2093 if ((
$object->status < 2 ||
$object->status == 99) && $user->hasRight(
'expensereport',
'creer')) {
2094 print
'<td class="right"></td>';
2098 foreach (
$object->lines as &$line) {
2101 if ($action !=
'editline' || $line->id !=
GETPOSTINT(
'rowid')) {
2102 print
'<tr class="oddeven linetr" data-id="'.$line->id.
'">';
2105 print
'<td class="center linecollinenb">';
2110 print
'<td class="center linecoldate">'.dol_print_date($db->jdate($line->date),
'day').
'</td>';
2113 if (isModEnabled(
'project')) {
2114 print
'<td class="lineproject">';
2115 if ($line->fk_project > 0) {
2116 $projecttmp->id = $line->fk_project;
2117 $projecttmp->ref = $line->projet_ref;
2118 $projecttmp->title = $line->projet_title;
2119 print $projecttmp->getNomUrl(1);
2125 if (isModEnabled(
'accounting')) {
2126 require_once DOL_DOCUMENT_ROOT.
'/accountancy/class/accountingaccount.class.php';
2128 $resaccountingaccount = $accountingaccount->fetch(0, $line->type_fees_accountancy_code, 1);
2130 $titlealt .= $langs->trans(
"AccountancyCode").
': ';
2131 if ($resaccountingaccount > 0) {
2132 $titlealt .= $accountingaccount->account_number;
2134 $titlealt .= $langs->trans(
"NotFound");
2140 print
'<td class="center linecoltype" title="'.dol_escape_htmltag($titlealt).
'">';
2141 $labeltype = ($langs->trans(($line->type_fees_code)) == $line->type_fees_code ? $line->type_fees_libelle : $langs->trans($line->type_fees_code));
2147 print
'<td class="fk_c_exp_tax_cat linecoltaxcat">';
2148 $exp_tax_cat_label =
dol_getIdFromCode($db, $line->fk_c_exp_tax_cat,
'c_exp_tax_cat',
'rowid',
'label');
2149 print $langs->trans($exp_tax_cat_label);
2154 print
'<td class="left linecolcomment">'.dol_nl2br($line->comments).
'</td>';
2157 $senderissupplier = 0;
2158 $tooltiponprice =
'';
2159 $tooltiponpriceend =
'';
2161 $tooltiponprice = $langs->transcountry(
"TotalHT", $mysoc->country_code).
'='.
price($line->total_ht);
2162 $tooltiponprice .=
'<br>'.$langs->transcountry(
"TotalVAT", ($senderissupplier ?
$object->thirdparty->country_code : $mysoc->country_code)).
'='.
price($line->total_tva);
2163 if (is_object(
$object->thirdparty)) {
2164 if ($senderissupplier) {
2165 $seller =
$object->thirdparty;
2172 if ($mysoc->useLocalTax(1)) {
2173 if (($seller->country_code == $buyer->country_code) || $line->total_localtax1 || $seller->useLocalTax(1)) {
2174 $tooltiponprice .=
'<br>'.$langs->transcountry(
"TotalLT1", $seller->country_code).
'='.
price($line->total_localtax1);
2176 $tooltiponprice .=
'<br>'.$langs->transcountry(
"TotalLT1", $seller->country_code).
'=<span class="opacitymedium">'.$langs->trans($senderissupplier ?
"NotUsedForThisVendor" :
"NotUsedForThisCustomer").
'</span>';
2179 if ($mysoc->useLocalTax(2)) {
2180 if ((isset($seller->country_code) && isset($buyer->thirdparty->country_code) && $seller->country_code == $buyer->thirdparty->country_code) || $line->total_localtax2 || $seller->useLocalTax(2)) {
2181 $tooltiponprice .=
'<br>'.$langs->transcountry(
"TotalLT2", $seller->country_code).
'='.
price($line->total_localtax2);
2183 $tooltiponprice .=
'<br>'.$langs->transcountry(
"TotalLT2", $seller->country_code).
'=<span class="opacitymedium">'.$langs->trans($senderissupplier ?
"NotUsedForThisVendor" :
"NotUsedForThisCustomer").
'</span>';
2187 $tooltiponprice .=
'<br>'.$langs->transcountry(
"TotalTTC", $mysoc->country_code).
'='.
price($line->total_ttc);
2189 $tooltiponprice =
'<span class="classfortooltip" title="'.dol_escape_htmltag($tooltiponprice).
'">';
2190 $tooltiponpriceend =
'</span>';
2193 print
'<td class="right linecolvatrate">';
2194 print $tooltiponprice;
2195 print
vatrate($line->vatrate.($line->vat_src_code ?
' ('.$line->vat_src_code.
')' :
''), true);
2196 print $tooltiponpriceend;
2200 print
'<td class="right linecolunitht">';
2201 if (!empty($line->value_unit_ht)) {
2202 print
price($line->value_unit_ht);
2204 $tmpvat =
price2num(preg_replace(
'/\s*\(.*\)/',
'', $line->vatrate));
2205 $pricenettoshow =
price2num((
float) $line->value_unit / (1 + (
float) $tmpvat / 100),
'MU');
2206 print
price($pricenettoshow);
2210 print
'<td class="right linecolunitttc">'.price($line->value_unit).
'</td>';
2212 print
'<td class="right linecolqty">'.dol_escape_htmltag($line->qty).
'</td>';
2214 if ($action !=
'editline') {
2215 print
'<td class="right linecoltotalht">'.price($line->total_ht).
'</td>';
2216 print
'<td class="right linecoltotalttc">'.price($line->total_ttc).
'</td>';
2220 print
'<td class="center linecolpreview">';
2221 if ($line->fk_ecm_files > 0) {
2222 $modulepart =
'expensereport';
2223 $maxheightmini = 32;
2225 $result = $ecmfilesstatic->fetch($line->fk_ecm_files);
2227 $relativepath = preg_replace(
'/expensereport\//',
'', $ecmfilesstatic->filepath);
2228 $fileinfo = pathinfo($ecmfilesstatic->filepath.
'/'.$ecmfilesstatic->filename);
2231 if (!
dol_is_file($conf->expensereport->dir_output.
'/'.$relativepath.
'/'.$minifile)) {
2235 $urlforhref =
getAdvancedPreviewUrl($modulepart, $relativepath.
'/'.$fileinfo[
'filename'].
'.'.strtolower($fileinfo[
'extension']), 1,
'&entity='.(empty(
$object->entity) ? $conf->entity :
$object->entity));
2236 if (empty($urlforhref)) {
2237 $urlforhref = DOL_URL_ROOT.
'/viewimage.php?modulepart='.$modulepart.
'&entity='.(empty(
$object->entity) ? $conf->entity :
$object->entity).
'&file='.urlencode($relativepath.$fileinfo[
'filename'].
'.'.strtolower($fileinfo[
'extension']));
2238 print
'<a href="'.$urlforhref.
'" class="aphoto" target="_blank" rel="noopener noreferrer">';
2240 print
'<a href="'.$urlforhref[
'url'].
'" class="'.$urlforhref[
'css'].
'" target="'.$urlforhref[
'target'].
'" mime="'.$urlforhref[
'mime'].
'">';
2242 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="">';
2245 if (preg_match(
'/\.pdf$/i', $ecmfilesstatic->filename)) {
2246 $filepdf = $conf->expensereport->dir_output.
'/'.$relativepath.
'/'.$ecmfilesstatic->filename;
2247 $fileimage = $conf->expensereport->dir_output.
'/'.$relativepath.
'/'.$ecmfilesstatic->filename.
'_preview.png';
2248 $relativepathimage = $relativepath.
'/'.$ecmfilesstatic->filename.
'_preview.png';
2250 $pdfexists = file_exists($filepdf);
2253 if (!file_exists($fileimage) || (filemtime($fileimage) < filemtime($filepdf))) {
2255 include_once DOL_DOCUMENT_ROOT.
'/core/lib/files.lib.php';
2264 if ($pdfexists && !$error) {
2265 $heightforphotref = 70;
2266 if (!empty($conf->dol_optimize_smallscreen)) {
2267 $heightforphotref = 60;
2269 $urlforhref =
getAdvancedPreviewUrl($modulepart, $relativepath.
'/'.$fileinfo[
'filename'].
'.'.strtolower($fileinfo[
'extension']), 1,
'&entity='.(empty(
$object->entity) ? $conf->entity :
$object->entity));
2270 print
'<a href="'.$urlforhref[
'url'].
'" class="'.$urlforhref[
'css'].
'" target="'.$urlforhref[
'target'].
'" mime="'.$urlforhref[
'mime'].
'">';
2272 if (file_exists($fileimage)) {
2273 print
'<img height="'.$heightforphotref.
'" class="photo photowithmargin photowithborder" src="'.DOL_URL_ROOT.
'/viewimage.php?modulepart=apercu'.$modulepart.
'&file='.urlencode($relativepathimage).
'">';
2276 print
img_mime($ecmfilesstatic->filename);
2286 print
'<td class="nowrap right linecolwarning">';
2287 print !empty($line->rule_warning_message) ?
img_warning(html_entity_decode($line->rule_warning_message)) :
' ';
2292 print
'<td class="nowrap right linecolaction">';
2294 print
'<a class="editfielda reposition paddingrightonly" href="'.$_SERVER[
"PHP_SELF"].
'?id='.
$object->id.
'&action=editline&token='.
newToken().
'&rowid='.$line->rowid.
'">';
2296 print
'</a> ';
2297 print
'<a class="paddingrightonly" href="'.$_SERVER[
"PHP_SELF"].
'?id='.
$object->id.
'&action=delete_line&token='.
newToken().
'&rowid='.$line->rowid.
'">';
2307 if ($action ==
'editline' && $line->id ==
GETPOSTINT(
'rowid')) {
2310 if (isModEnabled(
'project')) {
2317 print
'<!-- line of expense report -->'.
"\n";
2318 print
'<tr class="tredited">';
2320 print
'<td class="center">';
2324 print
'<td colspan="'.($colspan - 1).
'" class="liste_titre"> ';
2325 print
'<a href="" class="commonlink auploadnewfilenow reposition">'.$langs->trans(
"UploadANewFileNow");
2326 print
img_picto($langs->trans(
"UploadANewFileNow"),
'chevron-down',
'', 0, 0, 0,
'',
'marginleftonly');
2329 print
' - <a href="" class="commonlink aattachtodoc reposition">'.$langs->trans(
"AttachTheNewLineToTheDocument");
2330 print
img_picto($langs->trans(
"AttachTheNewLineToTheDocument"),
'chevron-down',
'', 0, 0, 0,
'',
'marginleftonly');
2334 print
'<!-- Code to open/close section to submit or link files in edit mode -->'.
"\n";
2335 print
'<script type="text/javascript">'.
"\n";
2336 print
'$(document).ready(function() {
2337 $( ".auploadnewfilenow" ).click(function() {
2338 jQuery(".truploadnewfilenow").toggle();
2339 jQuery(".trattachnewfilenow").hide();
2342 $( ".aattachtodoc" ).click(function() {
2343 jQuery(".trattachnewfilenow").toggle();
2344 jQuery(".truploadnewfilenow").hide();
2347 if (is_array(
GETPOST(
'attachfile',
'array')) && count(
GETPOST(
'attachfile',
'array'))) {
2348 print
'jQuery(".trattachnewfilenow").toggle();'.
"\n";
2351 jQuery("form[name=\"expensereport\"]").submit(function() {
2352 if (jQuery(".truploadnewfilenow").is(":hidden")) {
2353 jQuery("input[name=\"sendit\"]").val("");
2360 print
'</script>'.
"\n";
2363 $filenamelinked =
'';
2364 if ($line->fk_ecm_files > 0) {
2365 $result = $ecmfilesstatic->fetch($line->fk_ecm_files);
2367 $filenamelinked = $ecmfilesstatic->filename;
2371 $tredited =
'tredited';
2372 include DOL_DOCUMENT_ROOT.
'/expensereport/tpl/expensereport_addfile.tpl.php';
2373 include DOL_DOCUMENT_ROOT.
'/expensereport/tpl/expensereport_linktofile.tpl.php';
2375 print
'<tr class="oddeven tredited">';
2380 print
'<td class="center">';
2381 print $form->selectDate($line->date,
'date');
2385 if (isModEnabled(
'project')) {
2387 $formproject->select_projects(-1, $line->fk_project,
'fk_project', 0, 0, $projectRequired ? 0 : 1, 1, 0, 0, 0,
'', 0, 0,
'maxwidth300');
2392 print
'<td class="center">';
2393 print $formexpensereport->selectTypeExpenseReport($line->fk_c_type_fees,
'fk_c_type_fees');
2397 print
'<td class="fk_c_exp_tax_cat">';
2398 $params = array(
'fk_expense' =>
$object->id,
'fk_expense_det' => $line->id,
'date' => $line->date);
2399 print $form->selectExpenseCategories($line->fk_c_exp_tax_cat,
'fk_c_exp_tax_cat', 1, array(),
'fk_c_type_fees', $userauthor->default_c_exp_tax_cat, $params);
2405 print
'<textarea name="comments" class="flat_ndf centpercent">'.dol_escape_htmltag($line->comments, 0, 1).
'</textarea>';
2409 $selectedvat =
price2num($line->vatrate).(!empty($line->vat_src_code) ?
' ('.$line->vat_src_code.
')' :
'');
2410 print
'<td class="right">';
2411 print $form->load_tva(
'vatrate', (GETPOSTISSET(
"vatrate") ?
GETPOST(
"vatrate") : $selectedvat), $mysoc,
'', 0, 0,
'', false, 1, 2);
2415 print
'<td class="right">';
2416 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.
' />';
2420 print
'<td class="right">';
2421 print
'<input type="text" min="0" class="right maxwidth50" id="value_unit" name="value_unit" value="'.dol_escape_htmltag(
price2num($line->value_unit)).
'" />';
2425 print
'<td class="right">';
2426 print
'<input type="text" min="0" class="input_qty right maxwidth50" name="qty" value="'.dol_escape_htmltag($line->qty).
'" />';
2433 print
'<td class="center">';
2437 print
'<td class="center">';
2441 print
'<input type="hidden" name="rowid" value="'.$line->rowid.
'">';
2442 print $form->buttonsSaveCancel(
'Save',
'Cancel', array(), 0,
'small');
2458 if (isModEnabled(
'project')) {
2461 if ($action !=
'editline') {
2465 $nbFiles = $nbLinks = 0;
2466 $arrayoffiles = array();
2468 require_once DOL_DOCUMENT_ROOT.
'/core/lib/files.lib.php';
2469 require_once DOL_DOCUMENT_ROOT.
'/core/lib/images.lib.php';
2470 require_once DOL_DOCUMENT_ROOT.
'/core/class/link.class.php';
2473 $nbFiles = count($arrayoffiles);
2478 print
'<tr class="liste_titre">';
2479 print
'<td colspan="'.$colspan.
'" class="liste_titre expensereportautoload">';
2480 print
'<a href="" class="commonlink auploadnewfilenow reposition">'.$langs->trans(
"UploadANewFileNow");
2481 print
img_picto($langs->trans(
"UploadANewFileNow"),
'chevron-down',
'', 0, 0, 0,
'',
'marginleftonly');
2484 print
' - <a href="" class="commonlink aattachtodoc reposition">'.$langs->trans(
"AttachTheNewLineToTheDocument");
2485 print
img_picto($langs->trans(
"AttachTheNewLineToTheDocument"),
'chevron-down',
'', 0, 0, 0,
'',
'marginleftonly');
2489 print
'<!-- Code to open/close section to submit or link files in the form to add new line -->'.
"\n";
2490 print
'<script type="text/javascript">'.
"\n";
2491 print
'$(document).ready(function() {
2492 $( ".auploadnewfilenow" ).click(function() {
2493 console.log("We click on toggle of auploadnewfilenow");
2494 jQuery(".truploadnewfilenow").toggle();
2495 jQuery(".trattachnewfilenow").hide();
2496 if (jQuery(".truploadnewfilenow").is(":hidden")) {
2497 jQuery("input[name=\"sendit\"]").prop("name", "senditdisabled");
2499 jQuery("input[name=\"senditdisabled\"]").prop("name", "sendit");
2501 // TODO Switch css fa-chevron-dow and add fa-chevron-up
2504 $( ".aattachtodoc" ).click(function() {
2505 console.log("We click on toggle of aattachtodoc");
2506 jQuery(".trattachnewfilenow").toggle();
2507 jQuery(".truploadnewfilenow").hide();
2508 // TODO Switch css fa-chevron-dow and add fa-chevron-up
2511 if (is_array(
GETPOST(
'attachfile',
'array')) && count(
GETPOST(
'attachfile',
'array')) && $action !=
'updateline') {
2512 print
'jQuery(".trattachnewfilenow").show();'.
"\n";
2515 jQuery("form[name=\"expensereport\"]").submit(function() {
2516 if (jQuery(".truploadnewfilenow").is(":hidden")) {
2517 /* 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. */
2518 jQuery("input[name=\"sendit\"]").val("");
2519 jQuery("input[name=\"sendit\"]").prop("name", "senditdisabled");
2521 jQuery("input[name=\"senditdisabled\"]").prop("name", "sendit");
2528 print
'</script>'.
"\n";
2532 include DOL_DOCUMENT_ROOT.
'/expensereport/tpl/expensereport_linktofile.tpl.php';
2533 include DOL_DOCUMENT_ROOT.
'/expensereport/tpl/expensereport_addfile.tpl.php';
2535 print
'<tr class="liste_titre expensereportcreate">';
2537 print
'<td class="center expensereportcreatedate">'.$langs->trans(
'Date').
'</td>';
2538 if (isModEnabled(
'project')) {
2539 print
'<td class="minwidth100imp">'.$form->textwithpicto($langs->trans(
'Project'), $langs->trans(
"ClosedProjectsAreHidden")).
'</td>';
2541 print
'<td class="center expensereportcreatetype">'.$langs->trans(
'Type').
'</td>';
2543 print
'<td>'.$langs->trans(
'CarCategory').
'</td>';
2545 print
'<td class="expensereportcreatedescription">'.$langs->trans(
'Description').
'</td>';
2546 print
'<td class="right expensereportcreatevat">'.$langs->trans(
'VAT').
'</td>';
2547 print
'<td class="right expensereportcreatepriceuth">'.$langs->trans(
'PriceUHT').
'</td>';
2548 print
'<td class="right expensereportcreatepricettc">'.$langs->trans(
'PriceUTTC').
'</td>';
2549 print
'<td class="right expensereportcreateqty">'.$langs->trans(
'Qty').
'</td>';
2556 print
'<tr class="oddeven nohover">';
2562 print
'<td class="center inputdate">';
2563 print $form->selectDate(!empty($date) ? $date : -1,
'date', 0, 0, 0,
'', 1, 1);
2567 if (isModEnabled(
'project')) {
2568 print
'<td class="inputproject">';
2569 $formproject->select_projects(-1, !empty($fk_project) ? $fk_project : 0,
'fk_project', 0, 0, $projectRequired ? 0 : 1, -1, 0, 0, 0,
'', 0, 0,
'maxwidth300');
2574 print
'<td class="center inputtype">';
2575 print $formexpensereport->selectTypeExpenseReport(!empty($fk_c_type_fees) ? $fk_c_type_fees :
"",
'fk_c_type_fees', 1);
2579 print
'<td class="fk_c_exp_tax_cat">';
2580 $params = array(
'fk_expense' =>
$object->id);
2581 print $form->selectExpenseCategories(
'',
'fk_c_exp_tax_cat', 1, array(),
'fk_c_type_fees', $userauthor->default_c_exp_tax_cat, $params, 0);
2586 print
'<td class="inputcomment">';
2587 print
'<textarea class="flat_ndf centpercent" name="comments" rows="'.ROWS_2.
'">'.
dol_escape_htmltag(!empty($comments) ? $comments :
"", 0, 1).
'</textarea>';
2591 print
'<td class="right inputvat">';
2595 $conf->global->MAIN_VAT_DEFAULT_IF_AUTODETECT_FAILS =
'none';
2597 print $form->load_tva(
'vatrate', (!empty($vatrate) ? $vatrate : $defaultvat), $mysoc,
'', 0, 0,
'', false, 1);
2601 print
'<td class="right inputpricenet">';
2602 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 : 0)).
'"'.$taxlessUnitPriceDisabled.
' />';
2606 print
'<td class="right inputtax">';
2607 print
'<input type="text" class="right maxwidth50" id="value_unit" name="value_unit" value="'.dol_escape_htmltag((!empty($value_unit) ? $value_unit : 0)).
'">';
2611 print
'<td class="right inputqty">';
2612 print
'<input type="text" min="0" class=" input_qty right maxwidth50" name="qty" value="'.dol_escape_htmltag(!empty($qty) ? $qty : 1).
'">';
2618 if ($action !=
'editline') {
2619 print
'<td class="right"></td>';
2620 print
'<td class="right"></td>';
2624 print
'<td class="center inputbuttons">';
2625 print $form->buttonsSaveCancel(
"Add",
'',
'', 1,
'reposition');
2636 /* JQuery for product free or predefined select */
2637 jQuery(document).ready(function() {
2638 jQuery("#value_unit_ht").keyup(function(event) {
2639 console.log(event.which); // discard event tag and arrows
2640 if (event.which != 9 && (event.which < 37 ||event.which > 40) && jQuery("#value_unit_ht").val() != "") {
2641 jQuery("#value_unit").val("");
2644 jQuery("#value_unit").keyup(function(event) {
2645 console.log(event.which); // discard event tag and arrows
2646 if (event.which != 9 && (event.which < 37 || event.which > 40) && jQuery("#value_unit").val() != "") {
2647 jQuery("#value_unit_ht").val("");
2655 /* unit price coef calculation */
2656 jQuery(".input_qty, #fk_c_type_fees, #select_fk_c_exp_tax_cat, #vatrate ").change(function(event) {
2657 console.log("We change a parameter");
2659 let type_fee = jQuery("#fk_c_type_fees").find(":selected").val();
2660 let tax_cat = jQuery("#select_fk_c_exp_tax_cat").find(":selected").val();
2661 let tva = jQuery("#vatrate").find(":selected").val();
2662 let qty = jQuery(".input_qty").val();
2664 let path = "'.DOL_URL_ROOT.
'/expensereport/ajax/ajaxik.php";
2665 path += "?fk_c_exp_tax_cat="+tax_cat;
2666 path += "&fk_expense="+'.((int)
$object->id).
';
2667 path += "&vatrate="+tva;
2668 path += "&qty="+qty;
2670 if (type_fee == 4) { // frais_kilométriques
2671 if (tax_cat == "" || parseInt(tax_cat) <= 0){
2679 success: function(response) {
2680 if (response.response_status == "success"){';
2684 jQuery("#value_unit").val(parseFloat(response.data) * (100 + parseFloat(tva)) / 100);
2685 jQuery("#value_unit").trigger("change");
2689 jQuery("#value_unit_ht").val(response.data);
2690 jQuery("#value_unit_ht").trigger("change");
2691 jQuery("#value_unit").val("");
2696 } else if(response.response_status == "error" && response.errorMessage != undefined && response.errorMessage.length > 0 ) {
2697 console.log("We get an error result");
2698 $.jnotify(response.errorMessage, "error", {timeout: 0, type: "error"},{ remove: function (){} } );
2704 /*console.log(event.which); // discard event tag and arrows
2705 if (event.which != 9 && (event.which < 37 || event.which > 40) && jQuery("#value_unit").val() != "") {
2706 jQuery("#value_unit_ht").val("");
2726 print
'Record not found';
2737print
'<div class="tabsAction">';
2739if ($action !=
'create' && $action !=
'edit' && $action !=
'editline') {
2744 if (empty($user->socid)) {
2747 print
'<div class="inline-block divButAction"><a class="butAction" href="'.$_SERVER[
"PHP_SELF"].
'?id='.
$object->id.
'&action=presend&mode=init#formmailbeforetitle">'.$langs->trans(
'SendMail').
'</a></div>';
2759 if (in_array(
$object->fk_user_author, $childids) || $user->hasRight(
'expensereport',
'writeall_advance')) {
2761 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>';
2764 if (count(
$object->lines) > 0) {
2765 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>';
2776 if ($user->id ==
$object->fk_user_author || $user->id ==
$object->fk_user_valid) {
2778 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>';
2783 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>';
2788 if ($user->id ==
$object->fk_user_author || $user->id ==
$object->fk_user_valid) {
2790 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>';
2800 if (in_array(
$object->fk_user_author, $childids)) {
2802 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>';
2810 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>';
2812 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>';
2815 if ($user->id ==
$object->fk_user_author || $user->id ==
$object->fk_user_valid) {
2817 print
'<div class="inline-block divButAction"><a class="butAction" href="'.$_SERVER[
"PHP_SELF"].
'?action=cancel&id='.
$object->id.
'">'.$langs->trans(
"Cancel").
'</a></div>';
2826 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>';
2832 if ($remaintopay == 0) {
2833 print
'<div class="inline-block divButAction"><span class="butActionRefused classfortooltip" title="'.$langs->trans(
"DisabledBecauseRemainderToPayIsZero").
'">'.$langs->trans(
'DoPayment').
'</span></div>';
2835 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>';
2843 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>";
2849 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>';
2855 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>';
2860 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>';
2864 if ($user->hasRight(
'expensereport',
'creer')) {
2865 print
'<div class="inline-block divButAction"><a class="butAction" href="'.$_SERVER[
'PHP_SELF'].
'?id='.
$object->id.
'&action=clone&token='.
newToken().
'">'.$langs->trans(
"ToClone").
'</a></div>';
2871 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>';
2874 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>';
2877 $parameters = array();
2878 $reshook = $hookmanager->executeHooks(
'addMoreActionsButtons', $parameters,
$object, $action);
2885if (
GETPOST(
'modelselected',
'alpha')) {
2886 $action =
'presend';
2889if ($action !=
'presend') {
2894 print
'<div class="fichecenter"><div class="fichehalfleft">';
2895 print
'<a name="builddoc"></a>';
2897 if ($user->hasRight(
'expensereport',
'creer') && $action !=
'create' && $action !=
'edit') {
2900 $urlsource = $_SERVER[
"PHP_SELF"].
"?id=".
$object->id;
2901 $genallowed = $user->hasRight(
'expensereport',
'creer');
2902 $delallowed = $user->hasRight(
'expensereport',
'creer');
2904 print $formfile->showdocuments(
'expensereport', $filename, $filedir, $urlsource, $genallowed, $delallowed);
2905 $somethingshown = $formfile->numoffiles;
2917 print
'</div><div class="fichehalfright">';
2919 include_once DOL_DOCUMENT_ROOT.
'/core/class/html.formactions.class.php';
2921 $somethingshown = $formactions->showactions(
$object,
'expensereport',
null);
2923 print
'</div></div>';
2927$modelmail =
'expensereport';
2928$defaulttopic =
'SendExpenseReportRef';
2929$diroutput = $conf->expensereport->dir_output;
2930$trackid =
'exp'.$object->id;
2932include DOL_DOCUMENT_ROOT.
'/core/tpl/card_presend.tpl.php';
if( $user->socid > 0) if(! $user->hasRight('accounting', 'chartofaccount')) $object
if(!defined('NOREQUIRESOC')) if(!defined( 'NOREQUIRETRAN')) if(!defined('NOTOKENRENEWAL')) if(!defined( 'NOREQUIREMENU')) if(!defined('NOREQUIREHTML')) if(!defined( 'NOREQUIREAJAX')) llxHeader($head='', $title='', $help_url='', $target='', $disablejs=0, $disablehead=0, $arrayofjs='', $arrayofcss='', $morequerystring='', $morecssonbody='', $replacemainareaby='', $disablenofollow=0, $disablenoindex=0)
Empty header.
Class to manage bank accounts.
Class to manage accounting accounts.
Class to manage accounting journals.
Class to send emails (with attachments or not) Usage: $mailfile = new CMailFile($subject,...
Class to manage a WYSIWYG editor.
Class to manage ECM files.
Class to manage Trips and Expenses.
const STATUS_DRAFT
Draft status.
const STATUS_APPROVED
Classified approved.
const STATUS_CANCELED
Classified canceled.
const STATUS_CLOSED
Classified paid.
const STATUS_REFUSED
Classified refused.
const STATUS_VALIDATED
Validated (need to be paid)
Class of expense report details lines.
static count($dbs, $objecttype, $objectid)
Return nb of links.
Class to manage payments of expense report.
Class to manage projects.
Class to manage translations.
Class to manage Dolibarr users.
expensereport_prepare_head($object)
Prepare array with list of tabs.
dol_convert_file($fileinput, $ext='png', $fileoutput='', $page='')
Convert an image file or a PDF into another image format.
dol_is_file($pathoffile)
Return if path is a file.
dol_dir_list($utf8_path, $types="all", $recursive=0, $filter="", $excludefilter=null, $sortcriteria="name", $sortorder=SORT_ASC, $mode=0, $nohook=0, $relativename="", $donotfollowsymlinks=0, $nbsecondsold=0)
Scan a directory and return a list of files/directories.
dol_mktime($hour, $minute, $second, $month, $day, $year, $gm='auto', $check=1)
Return a timestamp date built from detailed information (by default a local PHP server timestamp) Rep...
load_fiche_titre($title, $morehtmlright='', $picto='generic', $pictoisfullpath=0, $id='', $morecssontable='', $morehtmlcenter='')
Load a title with picto.
setEventMessages($mesg, $mesgs, $style='mesgs', $messagekey='', $noduplicate=0, $attop=0)
Set event messages in dol_events session object.
vatrate($rate, $addpercent=false, $info_bits=0, $usestarfornpr=0, $html=0)
Return a string with VAT rate label formatted for view output Used into pdf and HTML pages.
img_warning($titlealt='default', $moreatt='', $morecss='pictowarning')
Show warning logo.
img_delete($titlealt='default', $other='class="pictodelete"', $morecss='')
Show delete logo.
img_picto($titlealt, $picto, $moreatt='', $pictoisfullpath=0, $srconly=0, $notitle=0, $alt='', $morecss='', $marginleftonlyshort=2)
Show picto whatever it's its name (generic function)
GETPOSTINT($paramname, $method=0)
Return the value of a $_GET or $_POST supervariable, converted into integer.
dol_get_fiche_head($links=array(), $active='', $title='', $notab=0, $picto='', $pictoisfullpath=0, $morehtmlright='', $morecss='', $limittoshow=0, $moretabssuffix='', $dragdropfile=0)
Show tabs of a record.
price2num($amount, $rounding='', $option=0)
Function that return a number with universal decimal format (decimal separator is '.
dol_get_fiche_end($notab=0)
Return tab footer of a card.
price($amount, $form=0, $outlangs='', $trunc=1, $rounding=-1, $forcerounding=-1, $currency_code='')
Function to format a value into an amount for visual output Function used into PDF and HTML pages.
dol_now($mode='auto')
Return date for now.
img_mime($file, $titlealt='', $morecss='')
Show MIME img of a file.
getDolGlobalInt($key, $default=0)
Return a Dolibarr global constant int value.
dol_getIdFromCode($db, $key, $tablename, $fieldkey='code', $fieldid='id', $entityfilter=0, $filters='')
Return an id or code from a code or id.
dol_print_date($time, $format='', $tzoutput='auto', $outputlangs=null, $encodetooutput=false)
Output date in a string format according to outputlangs (or langs if not defined).
newToken()
Return the value of token currently saved into session with name 'newtoken'.
dol_clone($object, $native=0)
Create a clone of instance of object (new instance with same value for each properties) With native =...
getImageFileNameForSize($file, $extName, $extImgTarget='')
Return the filename of file to get the thumbs.
get_date_range($date_start, $date_end, $format='', $outputlangs=null, $withparenthesis=1)
Format output for start and end date.
getAdvancedPreviewUrl($modulepart, $relativepath, $alldata=0, $param='')
Return URL we can use for advanced preview links.
GETPOST($paramname, $check='alphanohtml', $method=0, $filter=null, $options=null, $noreplace=0)
Return value of a param into GET or POST supervariable.
dol_sanitizeFileName($str, $newstr='_', $unaccent=1)
Clean a string to use it as a file name.
dol_print_error($db=null, $error='', $errors=null)
Displays error message system with all the information to facilitate the diagnosis and the escalation...
isValidEmail($address, $acceptsupervisorkey=0, $acceptuserkey=0)
Return true if email syntax is ok.
getDolGlobalString($key, $default='')
Return a Dolibarr global constant string value.
img_edit($titlealt='default', $float=0, $other='')
Show logo edit/modify fiche.
dol_escape_htmltag($stringtoescape, $keepb=0, $keepn=0, $noescapetags='', $escapeonlyhtmltags=0, $cleanalsojavascript=0)
Returns text escaped for inclusion in HTML alt or title or value tags, or into values of HTML input f...
image_format_supported($file, $acceptsvg=0)
Return if a filename is file name of a supported image format.
restrictedArea(User $user, $features, $object=0, $tableandshare='', $feature2='', $dbt_keyfield='fk_soc', $dbt_select='rowid', $isdraft=0, $mode=0)
Check permissions of a user to show a page and an object.
accessforbidden($message='', $printheader=1, $printfooter=1, $showonlymessage=0, $params=null)
Show a message to say access is forbidden and stop program.