29 require
'../main.inc.php';
30 require_once DOL_DOCUMENT_ROOT.
'/core/class/html.formexpensereport.class.php';
31 require_once DOL_DOCUMENT_ROOT.
'/core/class/html.formfile.class.php';
32 require_once DOL_DOCUMENT_ROOT.
'/core/class/html.formmail.class.php';
33 require_once DOL_DOCUMENT_ROOT.
'/core/class/html.formprojet.class.php';
34 require_once DOL_DOCUMENT_ROOT.
'/core/class/CMailFile.class.php';
35 require_once DOL_DOCUMENT_ROOT.
'/projet/class/project.class.php';
36 require_once DOL_DOCUMENT_ROOT.
'/ecm/class/ecmfiles.class.php';
37 require_once DOL_DOCUMENT_ROOT.
'/compta/bank/class/account.class.php';
38 require_once DOL_DOCUMENT_ROOT.
'/core/lib/expensereport.lib.php';
39 require_once DOL_DOCUMENT_ROOT.
'/core/lib/price.lib.php';
40 require_once DOL_DOCUMENT_ROOT.
'/core/lib/files.lib.php';
41 require_once DOL_DOCUMENT_ROOT.
'/core/lib/images.lib.php';
42 require_once DOL_DOCUMENT_ROOT.
'/core/modules/expensereport/modules_expensereport.php';
43 require_once DOL_DOCUMENT_ROOT.
'/expensereport/class/expensereport.class.php';
44 require_once DOL_DOCUMENT_ROOT.
'/expensereport/class/paymentexpensereport.class.php';
45 require_once DOL_DOCUMENT_ROOT.
'/core/class/doleditor.class.php';
46 require_once DOL_DOCUMENT_ROOT.
'/core/class/extrafields.class.php';
47 if (!empty($conf->accounting->enabled)) {
48 require_once DOL_DOCUMENT_ROOT.
'/accountancy/class/accountingjournal.class.php';
52 $langs->loadLangs(array(
"trips",
"bills",
"mails"));
54 $action =
GETPOST(
'action',
'aZ09');
55 $cancel =
GETPOST(
'cancel',
'alpha');
56 $confirm =
GETPOST(
'confirm',
'alpha');
62 $fk_project =
GETPOST(
'fk_project',
'int');
63 $vatrate =
GETPOST(
'vatrate',
'alpha');
65 $comments =
GETPOST(
'comments',
'restricthtml');
66 $fk_c_type_fees =
GETPOST(
'fk_c_type_fees',
'int');
69 $childids = $user->getAllChildIds(1);
71 if (! empty($conf->global->EXPENSEREPORT_PREFILL_DATES_WITH_CURRENT_MONTH)) {
72 if (empty($date_start)) {
76 if (empty($date_end)) {
83 $rootfordata = DOL_DATA_ROOT;
84 $rootforuser = DOL_DATA_ROOT;
86 if (!empty($conf->multicompany->enabled) && !empty($conf->entity) && $conf->entity > 1) {
87 $rootfordata .=
'/'.$conf->entity;
89 $conf->expensereport->dir_output = $rootfordata.
'/expensereport';
92 $urlwithouturlroot = preg_replace(
'/'.preg_quote(DOL_URL_ROOT,
'/').
'$/i',
'', trim($dolibarr_main_url_root));
93 $urlwithroot = $urlwithouturlroot.DOL_URL_ROOT;
97 $hidedetails = (
GETPOST(
'hidedetails',
'int') ?
GETPOST(
'hidedetails',
'int') : (!empty($conf->global->MAIN_GENERATE_DOCUMENTS_HIDE_DETAILS) ? 1 : 0));
98 $hidedesc = (
GETPOST(
'hidedesc',
'int') ?
GETPOST(
'hidedesc',
'int') : (!empty($conf->global->MAIN_GENERATE_DOCUMENTS_HIDE_DESC) ? 1 : 0));
99 $hideref = (
GETPOST(
'hideref',
'int') ?
GETPOST(
'hideref',
'int') : (!empty($conf->global->MAIN_GENERATE_DOCUMENTS_HIDE_REF) ? 1 : 0));
106 $extrafields->fetch_name_optionals_label($object->table_element);
109 include DOL_DOCUMENT_ROOT.
'/core/actions_fetchobject.inc.php';
112 $hookmanager->initHooks(array(
'expensereportcard',
'globalcard'));
114 $permissionnote = $user->rights->expensereport->creer;
115 $permissiondellink = $user->rights->expensereport->creer;
116 $permissiontoadd = $user->rights->expensereport->creer;
120 $projectRequired = $conf->project->enabled && ! empty($conf->global->EXPENSEREPORT_PROJECT_IS_REQUIRED);
121 $fileRequired = !empty($conf->global->EXPENSEREPORT_FILE_IS_REQUIRED);
123 if ($object->id > 0) {
126 if (!empty($user->rights->expensereport->readall)) {
129 if (!empty($user->rights->expensereport->lire) && in_array($object->fk_user_author, $childids)) {
138 if (!empty($user->rights->expensereport->supprimer)) {
141 if ($object->statut ==
ExpenseReport::STATUS_DRAFT && $user->hasRight(
'expensereport',
'write') && in_array($object->fk_user_author, $childids)) {
147 $socid = $user->socid;
149 $result =
restrictedArea($user,
'expensereport', $object->id,
'expensereport');
151 $permissiontoadd = $user->rights->expensereport->creer;
159 $reshook = $hookmanager->executeHooks(
'doActions',
$parameters, $object, $action);
164 if (empty($reshook)) {
165 $backurlforlist = DOL_URL_ROOT.
'/expensereport/list.php';
167 if (empty($backtopage) || ($cancel && empty($id))) {
168 if (empty($backtopage) || ($cancel && strpos($backtopage,
'__ID__'))) {
169 if (empty($id) && (($action !=
'add' && $action !=
'create') || $cancel)) {
170 $backtopage = $backurlforlist;
172 $backtopage = DOL_URL_ROOT.
'/expensereport/card.php?id='.((!empty($id) && $id > 0) ? $id :
'__ID__');
178 if (!empty($backtopageforcancel)) {
179 header(
"Location: ".$backtopageforcancel);
181 } elseif (!empty($backtopage)) {
182 header(
"Location: ".$backtopage);
196 $fk_c_type_fees = -1;
199 include DOL_DOCUMENT_ROOT.
'/core/actions_linkedfiles.inc.php';
201 if (!empty(
GETPOST(
'sendit',
'alpha'))) {
202 if ($action ==
'updateline') {
203 $action =
'editline';
209 include DOL_DOCUMENT_ROOT.
'/core/actions_setnotes.inc.php';
211 include DOL_DOCUMENT_ROOT.
'/core/actions_dellink.inc.php';
213 include DOL_DOCUMENT_ROOT.
'/core/actions_lineupdown.inc.php';
216 if ($action ==
'confirm_clone' && $confirm ==
'yes' && $user->rights->expensereport->creer) {
217 if (1 == 0 && !
GETPOST(
'clone_content',
'alpha') && !
GETPOST(
'clone_receivers',
'alpha')) {
220 if ($object->id > 0) {
222 $orig = clone $object;
224 $result = $object->createFromClone($user,
GETPOST(
'fk_user_author',
'int'));
226 header(
"Location: ".$_SERVER[
'PHP_SELF'].
'?id='.$result);
237 if ($action ==
'confirm_delete' &&
GETPOST(
"confirm",
'alpha') ==
"yes" && $id > 0 && $candelete) {
239 $result = $object->fetch($id);
240 $result = $object->delete($user);
242 header(
"Location: index.php");
249 if ($action ==
'add' && $user->rights->expensereport->creer) {
254 $object->date_debut = $date_start;
255 $object->date_fin = $date_end;
257 $object->fk_user_author =
GETPOST(
'fk_user_author',
'int');
258 if (!($object->fk_user_author > 0)) {
259 $object->fk_user_author = $user->id;
263 if ((empty($conf->global->MAIN_USE_ADVANCED_PERMS) && empty($user->rights->expensereport->creer))
264 || (!empty($conf->global->MAIN_USE_ADVANCED_PERMS) && empty($user->rights->expensereport->creer) && empty($user->rights->expensereport->writeall_advance))) {
269 if (empty($conf->global->MAIN_USE_ADVANCED_PERMS) || empty($user->rights->expensereport->writeall_advance)) {
270 if (!in_array($object->fk_user_author, $childids)) {
277 $fuser =
new User($db);
278 $fuser->fetch($object->fk_user_author);
281 $object->fk_c_paiement =
GETPOST(
'fk_c_paiement',
'int');
282 $object->fk_user_validator =
GETPOST(
'fk_user_validator',
'int');
283 $object->note_public =
GETPOST(
'note_public',
'restricthtml');
284 $object->note_private =
GETPOST(
'note_private',
'restricthtml');
287 $ret = $extrafields->setOptionalsFromPost(
null, $object);
293 if (!$error && empty($conf->global->EXPENSEREPORT_ALLOW_OVERLAPPING_PERIODS)) {
294 $overlappingExpenseReportID = $object->periode_existe($fuser, $object->date_debut, $object->date_fin,
true);
296 if ($overlappingExpenseReportID > 0) {
298 setEventMessages($langs->trans(
"ErrorDoubleDeclaration").
' <a href="'.$_SERVER[
'PHP_SELF'].
'?id='.$overlappingExpenseReportID.
'">'. $langs->trans(
'ShowTrip').
'</a>',
null,
'errors');
306 $id = $object->create($user);
313 Header(
"Location: ".$_SERVER[
"PHP_SELF"].
"?id=".$id);
323 if (($action ==
'update' || $action ==
'updateFromRefuse') && $user->rights->expensereport->creer) {
327 $object->date_debut = $date_start;
328 $object->date_fin = $date_end;
330 if ($object->status < 3) {
331 $object->fk_user_validator =
GETPOST(
'fk_user_validator',
'int');
334 $object->fk_c_paiement =
GETPOST(
'fk_c_paiement',
'int');
335 $object->note_public =
GETPOST(
'note_public',
'restricthtml');
336 $object->note_private =
GETPOST(
'note_private',
'restricthtml');
337 $object->fk_user_modif = $user->id;
339 $result = $object->update($user);
341 header(
"Location: ".$_SERVER[
"PHP_SELF"].
"?id=".
GETPOST(
'id',
'int'));
348 if ($action ==
'update_extras') {
352 $ret = $extrafields->setOptionalsFromPost(
null, $object,
GETPOST(
'attribute',
'restricthtml'));
359 $result = $object->insertExtraFields(
'EXPENSEREPORT_MODIFY');
367 $action =
'edit_extras';
371 if ($action ==
"confirm_validate" &&
GETPOST(
"confirm",
'alpha') ==
"yes" && $id > 0 && $user->rights->expensereport->creer) {
379 $result = $object->setValidate($user);
383 if (empty($conf->global->MAIN_DISABLE_PDF_AUTOUPDATE)) {
384 $outputlangs = $langs;
386 if ($conf->global->MAIN_MULTILANGS && empty($newlang) &&
GETPOST(
'lang_id',
'aZ09')) {
387 $newlang =
GETPOST(
'lang_id',
'aZ09');
389 if ($conf->global->MAIN_MULTILANGS && empty($newlang)) {
390 $newlang = $object->thirdparty->default_lang;
392 if (!empty($newlang)) {
394 $outputlangs->setDefaultLang($newlang);
396 $model = $object->model_pdf;
397 $ret = $object->fetch($id);
399 $object->generateDocument($model, $outputlangs, $hidedetails, $hidedesc, $hideref);
406 if (!$error && $result > 0 && $object->fk_user_validator > 0) {
407 $langs->load(
"mails");
410 $destinataire =
new User($db);
411 $destinataire->fetch($object->fk_user_validator);
412 $emailTo = $destinataire->email;
415 $expediteur =
new User($db);
416 $expediteur->fetch($object->fk_user_author);
417 $emailFrom = $conf->global->MAIN_MAIL_EMAIL_FROM;
419 if ($emailTo && $emailFrom) {
420 $filename = array(); $filedir = array(); $mimetype = array();
423 $societeName = $conf->global->MAIN_INFO_SOCIETE_NOM;
424 if (!empty($conf->global->MAIN_APPLICATION_TITLE)) {
425 $societeName = $conf->global->MAIN_APPLICATION_TITLE;
428 $subject = $societeName.
" - ".$langs->transnoentities(
"ExpenseReportWaitingForApproval");
431 $link = $urlwithroot.
'/expensereport/card.php?id='.$object->id;
432 $link =
'<a href="'.$link.
'">'.$link.
'</a>';
433 $message = $langs->transnoentities(
"ExpenseReportWaitingForApprovalMessage", $expediteur->getFullName($langs),
get_date_range($object->date_debut, $object->date_fin,
'', $langs), $link);
448 $mailfile =
new CMailFile($subject, $emailTo, $emailFrom, $message, $filedir, $mimetype, $filename,
'',
'', 0, -1);
452 $result = $mailfile->sendfile();
454 $mesg = $langs->trans(
'MailSuccessfulySent', $mailfile->getValidAddress($emailFrom, 2), $mailfile->getValidAddress($emailTo, 2));
457 $langs->load(
"other");
458 if ($mailfile->error) {
460 $mesg .= $langs->trans(
'ErrorFailedToSendMail', $emailFrom, $emailTo);
461 $mesg .=
'<br>'.$mailfile->error;
464 setEventMessages(
'No mail sent. Feature is disabled by option MAIN_DISABLE_ALL_MAILS',
null,
'warnings');
472 setEventMessages($langs->trans(
"NoEmailSentBadSenderOrRecipientEmail"),
null,
'warnings');
479 header(
"Location: ".$_SERVER[
"PHP_SELF"].
"?id=".$id);
486 if ($action ==
"confirm_save_from_refuse" &&
GETPOST(
"confirm",
'alpha') ==
"yes" && $id > 0 && $user->rights->expensereport->creer) {
489 $result = $object->set_save_from_refuse($user);
493 if (empty($conf->global->MAIN_DISABLE_PDF_AUTOUPDATE)) {
494 $outputlangs = $langs;
496 if ($conf->global->MAIN_MULTILANGS && empty($newlang) &&
GETPOST(
'lang_id',
'aZ09')) {
497 $newlang =
GETPOST(
'lang_id',
'aZ09');
499 if ($conf->global->MAIN_MULTILANGS && empty($newlang)) {
500 $newlang = $object->thirdparty->default_lang;
502 if (!empty($newlang)) {
504 $outputlangs->setDefaultLang($newlang);
506 $model = $object->model_pdf;
507 $ret = $object->fetch($id);
509 $object->generateDocument($model, $outputlangs, $hidedetails, $hidedesc, $hideref);
517 $destinataire =
new User($db);
518 $destinataire->fetch($object->fk_user_validator);
519 $emailTo = $destinataire->email;
522 $expediteur =
new User($db);
523 $expediteur->fetch($object->fk_user_author);
524 $emailFrom = $conf->global->MAIN_MAIL_EMAIL_FROM;
526 if ($emailFrom && $emailTo) {
527 $filename = array(); $filedir = array(); $mimetype = array();
530 $societeName = $conf->global->MAIN_INFO_SOCIETE_NOM;
531 if (!empty($conf->global->MAIN_APPLICATION_TITLE)) {
532 $societeName = $conf->global->MAIN_APPLICATION_TITLE;
535 $subject = $societeName.
" - ".$langs->transnoentities(
"ExpenseReportWaitingForReApproval");
538 $link = $urlwithroot.
'/expensereport/card.php?id='.$object->id;
539 $link =
'<a href="'.$link.
'">'.$link.
'</a>';
540 $dateRefusEx = explode(
" ", $object->date_refuse);
541 $message = $langs->transnoentities(
"ExpenseReportWaitingForReApprovalMessage", $dateRefusEx[0], $object->detail_refuse, $expediteur->getFullName($langs), $link);
560 $mailfile =
new CMailFile($subject, $emailTo, $emailFrom, $message, $filedir, $mimetype, $filename,
'',
'', 0, -1);
564 $result = $mailfile->sendfile();
566 $mesg = $langs->trans(
'MailSuccessfulySent', $mailfile->getValidAddress($emailFrom, 2), $mailfile->getValidAddress($emailTo, 2));
568 header(
"Location: ".$_SERVER[
"PHP_SELF"].
"?id=".$id);
571 $langs->load(
"other");
572 if ($mailfile->error) {
574 $mesg .= $langs->trans(
'ErrorFailedToSendMail', $emailFrom, $emailTo);
575 $mesg .=
'<br>'.$mailfile->error;
578 setEventMessages(
'No mail sent. Feature is disabled by option MAIN_DISABLE_ALL_MAILS',
null,
'warnings');
586 setEventMessages($langs->trans(
"NoEmailSentBadSenderOrRecipientEmail"),
null,
'warnings');
595 if ($action ==
"confirm_approve" &&
GETPOST(
"confirm",
'alpha') ==
"yes" && $id > 0 && $user->rights->expensereport->approve) {
599 $result = $object->setApproved($user);
603 if (empty($conf->global->MAIN_DISABLE_PDF_AUTOUPDATE)) {
604 $outputlangs = $langs;
606 if ($conf->global->MAIN_MULTILANGS && empty($newlang) &&
GETPOST(
'lang_id',
'aZ09')) {
607 $newlang =
GETPOST(
'lang_id',
'aZ09');
609 if ($conf->global->MAIN_MULTILANGS && empty($newlang)) {
610 $newlang = $object->thirdparty->default_lang;
612 if (!empty($newlang)) {
614 $outputlangs->setDefaultLang($newlang);
616 $model = $object->model_pdf;
617 $ret = $object->fetch($id);
619 $object->generateDocument($model, $outputlangs, $hidedetails, $hidedesc, $hideref);
627 $destinataire =
new User($db);
628 $destinataire->fetch($object->fk_user_author);
629 $emailTo = $destinataire->email;
632 $emailCC = $conf->global->NDF_CC_EMAILS;
633 if (empty($emailTo)) {
638 $expediteur =
new User($db);
639 $expediteur->fetch($object->fk_user_approve > 0 ? $object->fk_user_approve : $object->fk_user_validator);
640 $emailFrom = $conf->global->MAIN_MAIL_EMAIL_FROM;
642 if ($emailFrom && $emailTo) {
643 $filename = array(); $filedir = array(); $mimetype = array();
646 $societeName = $conf->global->MAIN_INFO_SOCIETE_NOM;
647 if (!empty($conf->global->MAIN_APPLICATION_TITLE)) {
648 $societeName = $conf->global->MAIN_APPLICATION_TITLE;
651 $subject = $societeName.
" - ".$langs->transnoentities(
"ExpenseReportApproved");
654 $link = $urlwithroot.
'/expensereport/card.php?id='.$object->id;
655 $link =
'<a href="'.$link.
'">'.$link.
'</a>';
656 $message = $langs->transnoentities(
"ExpenseReportApprovedMessage", $object->ref, $destinataire->getFullName($langs), $expediteur->getFullName($langs), $link);
673 $mailfile =
new CMailFile($subject, $emailTo, $emailFrom, $message, $filedir, $mimetype, $filename,
'',
'', 0, -1);
677 $result = $mailfile->sendfile();
679 $mesg = $langs->trans(
'MailSuccessfulySent', $mailfile->getValidAddress($emailFrom, 2), $mailfile->getValidAddress($emailTo, 2));
681 header(
"Location: ".$_SERVER[
"PHP_SELF"].
"?id=".$id);
684 $langs->load(
"other");
685 if ($mailfile->error) {
687 $mesg .= $langs->trans(
'ErrorFailedToSendMail', $emailFrom, $emailTo);
688 $mesg .=
'<br>'.$mailfile->error;
691 setEventMessages(
'No mail sent. Feature is disabled by option MAIN_DISABLE_ALL_MAILS',
null,
'warnings');
699 setEventMessages($langs->trans(
"NoEmailSentBadSenderOrRecipientEmail"),
null,
'warnings');
708 if ($action ==
"confirm_refuse" &&
GETPOST(
'confirm',
'alpha') ==
"yes" && $id > 0 && $user->rights->expensereport->approve) {
712 $detailRefuse =
GETPOST(
'detail_refuse',
'alpha');
713 $result = $object->setDeny($user, $detailRefuse);
717 if (empty($conf->global->MAIN_DISABLE_PDF_AUTOUPDATE)) {
718 $outputlangs = $langs;
720 if ($conf->global->MAIN_MULTILANGS && empty($newlang) &&
GETPOST(
'lang_id',
'aZ09')) {
721 $newlang =
GETPOST(
'lang_id',
'aZ09');
723 if ($conf->global->MAIN_MULTILANGS && empty($newlang)) {
724 $newlang = $object->thirdparty->default_lang;
726 if (!empty($newlang)) {
728 $outputlangs->setDefaultLang($newlang);
730 $model = $object->model_pdf;
731 $ret = $object->fetch($id);
733 $object->generateDocument($model, $outputlangs, $hidedetails, $hidedesc, $hideref);
741 $destinataire =
new User($db);
742 $destinataire->fetch($object->fk_user_author);
743 $emailTo = $destinataire->email;
746 $expediteur =
new User($db);
747 $expediteur->fetch($object->fk_user_refuse);
748 $emailFrom = $conf->global->MAIN_MAIL_EMAIL_FROM;
750 if ($emailFrom && $emailTo) {
751 $filename = array(); $filedir = array(); $mimetype = array();
754 $societeName = $conf->global->MAIN_INFO_SOCIETE_NOM;
755 if (!empty($conf->global->MAIN_APPLICATION_TITLE)) {
756 $societeName = $conf->global->MAIN_APPLICATION_TITLE;
759 $subject = $societeName.
" - ".$langs->transnoentities(
"ExpenseReportRefused");
762 $link = $urlwithroot.
'/expensereport/card.php?id='.$object->id;
763 $link =
'<a href="'.$link.
'">'.$link.
'</a>';
764 $message = $langs->transnoentities(
"ExpenseReportRefusedMessage", $object->ref, $destinataire->getFullName($langs), $expediteur->getFullName($langs), $detailRefuse, $link);
782 $mailfile =
new CMailFile($subject, $emailTo, $emailFrom, $message, $filedir, $mimetype, $filename,
'',
'', 0, -1);
786 $result = $mailfile->sendfile();
788 $mesg = $langs->trans(
'MailSuccessfulySent', $mailfile->getValidAddress($emailFrom, 2), $mailfile->getValidAddress($emailTo, 2));
790 header(
"Location: ".$_SERVER[
"PHP_SELF"].
"?id=".$id);
793 $langs->load(
"other");
794 if ($mailfile->error) {
796 $mesg .= $langs->trans(
'ErrorFailedToSendMail', $emailFrom, $emailTo);
797 $mesg .=
'<br>'.$mailfile->error;
800 setEventMessages(
'No mail sent. Feature is disabled by option MAIN_DISABLE_ALL_MAILS',
null,
'warnings');
808 setEventMessages($langs->trans(
"NoEmailSentBadSenderOrRecipientEmail"),
null,
'warnings');
818 if ($action ==
"confirm_cancel" &&
GETPOST(
'confirm',
'alpha') ==
"yes" && $id > 0 && $user->rights->expensereport->creer) {
819 if (!
GETPOST(
'detail_cancel',
'alpha')) {
820 setEventMessages($langs->trans(
"ErrorFieldRequired", $langs->transnoentitiesnoconv(
"Comment")),
null,
'errors');
825 if ($user->id == $object->fk_user_valid || $user->id == $object->fk_user_author) {
826 $detailCancel =
GETPOST(
'detail_cancel',
'alpha');
827 $result = $object->set_cancel($user, $detailCancel);
831 if (empty($conf->global->MAIN_DISABLE_PDF_AUTOUPDATE)) {
832 $outputlangs = $langs;
834 if ($conf->global->MAIN_MULTILANGS && empty($newlang) &&
GETPOST(
'lang_id',
'aZ09')) {
835 $newlang =
GETPOST(
'lang_id',
'aZ09');
837 if ($conf->global->MAIN_MULTILANGS && empty($newlang)) {
838 $newlang = $object->thirdparty->default_lang;
840 if (!empty($newlang)) {
842 $outputlangs->setDefaultLang($newlang);
844 $model = $object->model_pdf;
845 $ret = $object->fetch($id);
847 $object->generateDocument($model, $outputlangs, $hidedetails, $hidedesc, $hideref);
855 $destinataire =
new User($db);
856 $destinataire->fetch($object->fk_user_author);
857 $emailTo = $destinataire->email;
860 $expediteur =
new User($db);
861 $expediteur->fetch($object->fk_user_cancel);
862 $emailFrom = $conf->global->MAIN_MAIL_EMAIL_FROM;
864 if ($emailFrom && $emailTo) {
865 $filename = array(); $filedir = array(); $mimetype = array();
868 $societeName = $conf->global->MAIN_INFO_SOCIETE_NOM;
869 if (!empty($conf->global->MAIN_APPLICATION_TITLE)) {
870 $societeName = $conf->global->MAIN_APPLICATION_TITLE;
873 $subject = $societeName.
" - ".$langs->transnoentities(
"ExpenseReportCanceled");
876 $link = $urlwithroot.
'/expensereport/card.php?id='.$object->id;
877 $link =
'<a href="'.$link.
'">'.$link.
'</a>';
878 $message = $langs->transnoentities(
"ExpenseReportCanceledMessage", $object->ref, $destinataire->getFullName($langs), $expediteur->getFullName($langs), $detailCancel, $link);
896 $mailfile =
new CMailFile($subject, $emailTo, $emailFrom, $message, $filedir, $mimetype, $filename,
'',
'', 0, -1);
900 $result = $mailfile->sendfile();
902 $mesg = $langs->trans(
'MailSuccessfulySent', $mailfile->getValidAddress($emailFrom, 2), $mailfile->getValidAddress($emailTo, 2));
904 header(
"Location: ".$_SERVER[
"PHP_SELF"].
"?id=".$id);
907 $langs->load(
"other");
908 if ($mailfile->error) {
910 $mesg .= $langs->trans(
'ErrorFailedToSendMail', $emailFrom, $emailTo);
911 $mesg .=
'<br>'.$mailfile->error;
914 setEventMessages(
'No mail sent. Feature is disabled by option MAIN_DISABLE_ALL_MAILS',
null,
'warnings');
922 setEventMessages($langs->trans(
"NoEmailSentBadSenderOrRecipientEmail"),
null,
'warnings');
935 if ($action ==
"confirm_setdraft" &&
GETPOST(
'confirm',
'alpha') ==
"yes" && $id > 0 && $user->rights->expensereport->creer) {
938 if ($user->id == $object->fk_user_author || $user->id == $object->fk_user_valid) {
939 $result = $object->setStatut(0);
943 if (empty($conf->global->MAIN_DISABLE_PDF_AUTOUPDATE)) {
944 $outputlangs = $langs;
946 if ($conf->global->MAIN_MULTILANGS && empty($newlang) &&
GETPOST(
'lang_id',
'aZ09')) {
947 $newlang =
GETPOST(
'lang_id',
'aZ09');
949 if ($conf->global->MAIN_MULTILANGS && empty($newlang)) {
950 $newlang = $object->thirdparty->default_lang;
952 if (!empty($newlang)) {
954 $outputlangs->setDefaultLang($newlang);
956 $model = $object->model_pdf;
957 $ret = $object->fetch($id);
959 $object->generateDocument($model, $outputlangs, $hidedetails, $hidedesc, $hideref);
964 header(
"Location: ".$_SERVER[
"PHP_SELF"].
"?id=".$id);
974 if ($action ==
'set_unpaid' && $id > 0 && $user->rights->expensereport->to_paid) {
978 $result = $object->setUnpaid($user);
982 if (empty($conf->global->MAIN_DISABLE_PDF_AUTOUPDATE)) {
983 $outputlangs = $langs;
985 if ($conf->global->MAIN_MULTILANGS && empty($newlang) &&
GETPOST(
'lang_id',
'aZ09')) {
986 $newlang =
GETPOST(
'lang_id',
'aZ09');
988 if ($conf->global->MAIN_MULTILANGS && empty($newlang)) {
989 $newlang = $object->thirdparty->default_lang;
991 if (!empty($newlang)) {
993 $outputlangs->setDefaultLang($newlang);
995 $model = $object->model_pdf;
996 $ret = $object->fetch($id);
998 $object->generateDocument($model, $outputlangs, $hidedetails, $hidedesc, $hideref);
1003 if ($action ==
'set_paid' && $id > 0 && $user->rights->expensereport->to_paid) {
1005 $object->fetch($id);
1007 $result = $object->setPaid($id, $user);
1011 if (empty($conf->global->MAIN_DISABLE_PDF_AUTOUPDATE)) {
1012 $outputlangs = $langs;
1014 if ($conf->global->MAIN_MULTILANGS && empty($newlang) &&
GETPOST(
'lang_id',
'aZ09')) {
1015 $newlang =
GETPOST(
'lang_id',
'aZ09');
1017 if ($conf->global->MAIN_MULTILANGS && empty($newlang)) {
1018 $newlang = $object->thirdparty->default_lang;
1020 if (!empty($newlang)) {
1021 $outputlangs =
new Translate(
"", $conf);
1022 $outputlangs->setDefaultLang($newlang);
1024 $model = $object->model_pdf;
1025 $ret = $object->fetch($id);
1027 $object->generateDocument($model, $outputlangs, $hidedetails, $hidedesc, $hideref);
1035 $destinataire =
new User($db);
1036 $destinataire->fetch($object->fk_user_author);
1037 $emailTo = $destinataire->email;
1040 $expediteur =
new User($db);
1041 $expediteur->fetch($user->id);
1042 $emailFrom = $conf->global->MAIN_MAIL_EMAIL_FROM;
1044 if ($emailFrom && $emailTo) {
1045 $filename = array(); $filedir = array(); $mimetype = array();
1048 $societeName = $conf->global->MAIN_INFO_SOCIETE_NOM;
1049 if (!empty($conf->global->MAIN_APPLICATION_TITLE)) {
1050 $societeName = $conf->global->MAIN_APPLICATION_TITLE;
1053 $subject = $societeName.
" - ".$langs->transnoentities(
"ExpenseReportPaid");
1056 $link = $urlwithroot.
'/expensereport/card.php?id='.$object->id;
1057 $link =
'<a href="'.$link.
'">'.$link.
'</a>';
1058 $message = $langs->transnoentities(
"ExpenseReportPaidMessage", $object->ref, $destinataire->getFullName($langs), $expediteur->getFullName($langs), $link);
1061 $object->setDocModel($user,
"");
1062 $resultPDF = expensereport_pdf_create($db, $object,
'',
"", $langs);
1065 $mailfile =
new CMailFile($subject, $emailTo, $emailFrom, $message, $filedir, $mimetype, $filename,
'',
'', 0, -1);
1069 $result = $mailfile->sendfile();
1071 $mesg = $langs->trans(
'MailSuccessfulySent', $mailfile->getValidAddress($emailFrom, 2), $mailfile->getValidAddress($emailTo, 2));
1073 header(
"Location: ".$_SERVER[
"PHP_SELF"].
"?id=".$id);
1076 $langs->load(
"other");
1077 if ($mailfile->error) {
1079 $mesg .= $langs->trans(
'ErrorFailedToSendMail', $emailFrom, $emailTo);
1080 $mesg .=
'<br>'.$mailfile->error;
1083 setEventMessages(
'No mail sent. Feature is disabled by option MAIN_DISABLE_ALL_MAILS',
null,
'warnings');
1091 setEventMessages($langs->trans(
"NoEmailSentBadSenderOrRecipientEmail"),
null,
'warnings');
1100 if ($action ==
"addline" && $user->rights->expensereport->creer) {
1106 $arrayoffiles =
GETPOST(
'attachfile',
'array');
1107 if (is_array($arrayoffiles) && !empty($arrayoffiles[0])) {
1108 include_once DOL_DOCUMENT_ROOT.
'/ecm/class/ecmfiles.class.php';
1109 $entityprefix = ($conf->entity !=
'1') ? $conf->entity.
'/' :
'';
1110 $relativepath =
'expensereport/'.$object->ref.
'/'.$arrayoffiles[0];
1112 $ecmfiles->
fetch(0,
'', $relativepath);
1113 $fk_ecm_files = $ecmfiles->id;
1118 if (empty($vatrate)) {
1121 $tmpvat =
price2num(preg_replace(
'/\s*\(.*\)/',
'', $vatrate));
1125 if (empty($value_unit)) {
1126 $value_unit =
price2num($value_unit_ht + ($value_unit_ht * $tmpvat / 100),
'MU');
1129 $fk_c_exp_tax_cat =
GETPOST(
'fk_c_exp_tax_cat',
'int');
1136 if (!($fk_c_type_fees > 0)) {
1138 setEventMessages($langs->trans(
"ErrorFieldRequired", $langs->transnoentitiesnoconv(
"Type")),
null,
'errors');
1142 if ((
float) $tmpvat < 0 || $tmpvat ===
'') {
1144 setEventMessages($langs->trans(
"ErrorFieldRequired", $langs->transnoentitiesnoconv(
"VAT")),
null,
'errors');
1149 if (empty($date) || $date ==
"--") {
1151 setEventMessages($langs->trans(
"ErrorFieldRequired", $langs->transnoentitiesnoconv(
"Date")),
null,
'errors');
1152 } elseif ($date < $object->date_debut || $date > ($object->date_fin + (24 * 3600 - 1))) {
1154 $langs->load(
"errors");
1155 setEventMessages($langs->trans(
"WarningDateOfLineMustBeInExpenseReportRange"),
null,
'warnings');
1159 if ($value_unit == 0) {
1161 setEventMessages($langs->trans(
"ErrorFieldRequired", $langs->transnoentitiesnoconv(
"PriceUTTC")),
null,
'errors');
1165 if ($projectRequired && $fk_project <= 0) {
1167 setEventMessages($langs->trans(
"ErrorFieldRequired", $langs->transnoentitiesnoconv(
"Project")),
null,
'errors');
1171 if ($fileRequired && $fk_ecm_files == 0) {
1173 setEventMessages($langs->trans(
"ErrorFieldRequired", $langs->transnoentitiesnoconv(
"File")),
null,
'errors');
1180 $result = $object->addline($qty, $value_unit, $fk_c_type_fees, $vatrate, $date, $comments, $fk_project, $fk_c_exp_tax_cat, $type, $fk_ecm_files);
1182 $ret = $object->fetch($object->id);
1184 if (empty($conf->global->MAIN_DISABLE_PDF_AUTOUPDATE)) {
1186 $outputlangs = $langs;
1187 $newlang =
GETPOST(
'lang_id',
'alpha');
1188 if (!empty($conf->global->MAIN_MULTILANGS) && empty($newlang)) {
1189 $newlang = $object->thirdparty->default_lang;
1191 if (!empty($newlang)) {
1192 $outputlangs =
new Translate(
"", $conf);
1193 $outputlangs->setDefaultLang($newlang);
1196 $object->generateDocument($object->model_pdf, $outputlangs, $hidedetails, $hidedesc, $hideref);
1200 unset($value_unit_ht);
1204 unset($fk_c_type_fees);
1215 header(
"Location: ".$_SERVER[
"PHP_SELF"].
"?id=".
GETPOST(
'id',
'int'));
1222 if ($action ==
'confirm_delete_line' &&
GETPOST(
"confirm",
'alpha') ==
"yes" && $user->rights->expensereport->creer) {
1224 $object->fetch($id);
1227 $object_ligne->fetch(
GETPOST(
"rowid",
'int'));
1228 $total_ht = $object_ligne->total_ht;
1229 $total_tva = $object_ligne->total_tva;
1231 $result = $object->deleteline(
GETPOST(
"rowid",
'int'), $user);
1235 if (empty($conf->global->MAIN_DISABLE_PDF_AUTOUPDATE)) {
1236 $outputlangs = $langs;
1238 if ($conf->global->MAIN_MULTILANGS && empty($newlang) &&
GETPOST(
'lang_id',
'aZ09')) {
1239 $newlang =
GETPOST(
'lang_id',
'aZ09');
1241 if ($conf->global->MAIN_MULTILANGS && empty($newlang)) {
1242 $newlang = $object->thirdparty->default_lang;
1244 if (!empty($newlang)) {
1245 $outputlangs =
new Translate(
"", $conf);
1246 $outputlangs->setDefaultLang($newlang);
1248 $model = $object->model_pdf;
1249 $ret = $object->fetch($id);
1251 $object->generateDocument($model, $outputlangs, $hidedetails, $hidedesc, $hideref);
1255 header(
"Location: ".$_SERVER[
"PHP_SELF"].
"?id=".
GETPOST(
'id',
'int'));
1262 if ($action ==
"updateline" && $user->rights->expensereport->creer) {
1264 $object->fetch($id);
1269 $arrayoffiles =
GETPOST(
'attachfile',
'array');
1270 if (is_array($arrayoffiles) && !empty($arrayoffiles[0])) {
1271 include_once DOL_DOCUMENT_ROOT.
'/ecm/class/ecmfiles.class.php';
1272 $relativepath =
'expensereport/'.$object->ref.
'/'.$arrayoffiles[0];
1274 $ecmfiles->fetch(0,
'', $relativepath);
1275 $fk_ecm_files = $ecmfiles->id;
1279 $rowid =
GETPOST(
'rowid',
'int');
1280 $type_fees_id =
GETPOST(
'fk_c_type_fees',
'int');
1281 $fk_c_exp_tax_cat =
GETPOST(
'fk_c_exp_tax_cat',
'int');
1282 $projet_id = $fk_project;
1283 $comments =
GETPOST(
'comments',
'restricthtml');
1285 $vatrate =
GETPOST(
'vatrate',
'alpha');
1288 if (empty($vatrate)) {
1291 $tmpvat =
price2num(preg_replace(
'/\s*\(.*\)/',
'', $vatrate));
1295 if (empty($value_unit)) {
1296 $value_unit =
price2num($value_unit_ht + ($value_unit_ht * $tmpvat / 100),
'MU');
1299 if (!
GETPOST(
'fk_c_type_fees',
'int') > 0) {
1301 setEventMessages($langs->trans(
"ErrorFieldRequired", $langs->transnoentitiesnoconv(
"Type")),
null,
'errors');
1304 if ((
float) $tmpvat < 0 || $tmpvat ==
'') {
1306 setEventMessages($langs->trans(
"ErrorFieldRequired", $langs->transnoentitiesnoconv(
"Vat")),
null,
'errors');
1310 if ($date < $object->date_debut || $date > ($object->date_fin + (24 * 3600 - 1))) {
1311 $langs->load(
"errors");
1312 setEventMessages($langs->trans(
"WarningDateOfLineMustBeInExpenseReportRange"),
null,
'warnings');
1316 if ($projectRequired && $projet_id <= 0) {
1318 setEventMessages($langs->trans(
"ErrorFieldRequired", $langs->transnoentitiesnoconv(
"Project")),
null,
'errors');
1323 $result = $object->updateline($rowid, $type_fees_id, $projet_id, $vatrate, $comments, $qty, $value_unit, $date, $id, $fk_c_exp_tax_cat, $fk_ecm_files);
1327 if (empty($conf->global->MAIN_DISABLE_PDF_AUTOUPDATE)) {
1328 $outputlangs = $langs;
1330 if ($conf->global->MAIN_MULTILANGS && empty($newlang) &&
GETPOST(
'lang_id',
'aZ09')) {
1331 $newlang =
GETPOST(
'lang_id',
'aZ09');
1333 if ($conf->global->MAIN_MULTILANGS && empty($newlang)) {
1334 $newlang = $object->thirdparty->default_lang;
1336 if (!empty($newlang)) {
1337 $outputlangs =
new Translate(
"", $conf);
1338 $outputlangs->setDefaultLang($newlang);
1340 $model = $object->model_pdf;
1341 $ret = $object->fetch($id);
1343 $object->generateDocument($model, $outputlangs, $hidedetails, $hidedesc, $hideref);
1347 unset($value_unit_ht);
1351 unset($fk_c_type_fees);
1365 include DOL_DOCUMENT_ROOT.
'/core/actions_printing.inc.php';
1368 $triggersendname =
'EXPENSEREPORT_SENTBYMAIL';
1369 $autocopy =
'MAIN_MAIL_AUTOCOPY_EXPENSEREPORT_TO';
1370 $trackid =
'exp'.$object->id;
1371 include DOL_DOCUMENT_ROOT.
'/core/actions_sendmails.inc.php';
1374 $upload_dir = $conf->expensereport->dir_output;
1375 include DOL_DOCUMENT_ROOT.
'/core/actions_builddoc.inc.php';
1383 $title = $langs->trans(
"ExpenseReport").
" - ".$langs->trans(
"Card");
1384 $help_url =
"EN:Module_Expense_Reports|FR:Module_Notes_de_frais";
1391 $projecttmp =
new Project($db);
1393 $bankaccountstatic =
new Account($db);
1394 $ecmfilesstatic =
new EcmFiles($db);
1398 if ($action ==
'create') {
1401 print
'<form action="'.$_SERVER[
'PHP_SELF'].
'" method="post" name="create">';
1402 print
'<input type="hidden" name="token" value="'.newToken().
'">';
1403 print
'<input type="hidden" name="action" value="add">';
1407 print
'<table class="border centpercent">';
1412 print
'<td class="titlefieldcreate fieldrequired">'.$langs->trans(
"DateStart").
'</td>';
1414 print
$form->selectDate($date_start ? $date_start : -1,
'date_debut', 0, 0, 0,
'', 1, 1);
1420 print
'<td class="fieldrequired">'.$langs->trans(
"DateEnd").
'</td>';
1422 print
$form->selectDate($date_end ? $date_end : -1,
'date_fin', 0, 0, 0,
'', 1, 1);
1428 print
'<td class="fieldrequired">'.$langs->trans(
"User").
'</td>';
1430 $defaultselectuser = $user->id;
1431 if (
GETPOST(
'fk_user_author',
'int') > 0) {
1432 $defaultselectuser =
GETPOST(
'fk_user_author',
'int');
1434 $include_users =
'hierarchyme';
1435 if (!empty($conf->global->MAIN_USE_ADVANCED_PERMS) && !empty($user->rights->expensereport->writeall_advance)) {
1436 $include_users = array();
1438 $s =
$form->select_dolusers($defaultselectuser,
"fk_user_author", 0,
"", 0, $include_users,
'',
'0,'.$conf->entity);
1445 print
'<td>'.$langs->trans(
"VALIDATOR").
'</td>';
1448 $include_users = $object->fetch_users_approver_expensereport();
1449 if (empty($include_users)) {
1450 print
img_warning().
' '.$langs->trans(
"NobodyHasPermissionToValidateExpenseReport");
1452 $defaultselectuser = (empty($user->fk_user_expense_validator) ? $user->fk_user : $user->fk_user_expense_validator);
1453 if (!empty($conf->global->EXPENSEREPORT_DEFAULT_VALIDATOR)) {
1454 $defaultselectuser = $conf->global->EXPENSEREPORT_DEFAULT_VALIDATOR;
1456 if (
GETPOST(
'fk_user_validator',
'int') > 0) {
1457 $defaultselectuser =
GETPOST(
'fk_user_validator',
'int');
1459 $s =
$form->select_dolusers($defaultselectuser,
"fk_user_validator", 1,
"", ((empty($defaultselectuser) || empty($conf->global->EXPENSEREPORT_DEFAULT_VALIDATOR_UNCHANGEABLE)) ? 0 : 1), $include_users);
1460 print
$form->textwithpicto($s, $langs->trans(
"AnyOtherInThisListCanValidate"));
1466 if (!empty($conf->global->EXPENSEREPORT_ASK_PAYMENTMODE_ON_CREATION)) {
1468 print
'<td>'.$langs->trans(
"ModePaiement").
'</td>';
1470 $form->select_types_paiements(
'',
'fk_c_paiement');
1479 print
'<td class="tdtop">'.$langs->trans(
'NotePublic').
'</td>';
1482 $doleditor =
new DolEditor(
'note_public', $note_public,
'', 80,
'dolibarr_notes',
'In', 0,
false, empty($conf->global->FCKEDITOR_ENABLE_NOTE_PUBLIC) ? 0 : 1, ROWS_3,
'90%');
1483 print $doleditor->Create(1);
1487 $note_private =
GETPOSTISSET(
'note_private') ?
GETPOST(
'note_private',
'restricthtml') :
'';
1489 if (empty($user->socid)) {
1491 print
'<td class="tdtop">'.$langs->trans(
'NotePrivate').
'</td>';
1494 $doleditor =
new DolEditor(
'note_private', $note_private,
'', 80,
'dolibarr_notes',
'In', 0,
false, empty($conf->global->FCKEDITOR_ENABLE_NOTE_PRIVATE) ? 0 : 1, ROWS_3,
'90%');
1495 print $doleditor->Create(1);
1500 $parameters = array(
'colspan' =>
' colspan="3"',
'cols' => 3);
1501 $reshook = $hookmanager->executeHooks(
'formObjectOptions',
$parameters, $object, $action);
1502 print $hookmanager->resPrint;
1503 if (empty($reshook)) {
1504 print $object->showOptionals($extrafields,
'create',
$parameters);
1512 print
$form->buttonsSaveCancel(
"AddTrip");
1515 } elseif ($id > 0 || $ref) {
1516 $result = $object->fetch($id, $ref);
1519 if (!in_array($object->fk_user_author, $user->getAllChildIds(1))) {
1520 if (empty($user->rights->expensereport->readall) && empty($user->rights->expensereport->lire_tous)
1521 && (empty($conf->global->MAIN_USE_ADVANCED_PERMS) || empty($user->rights->expensereport->writeall_advance))) {
1524 print
'<div class="tabBar">';
1525 print $langs->trans(
'NotUserRightToView');
1538 if ($action ==
'edit' && ($object->status < 3 || $object->status == 99)) {
1539 print
"<form name='update' action=\"".$_SERVER[
'PHP_SELF'].
"\" method=\"post\">\n";
1540 print
'<input type="hidden" name="token" value="'.newToken().
'">';
1541 print
'<input type="hidden" name="id" value="'.$id.
'">';
1545 if ($object->status == 99) {
1546 print
'<input type="hidden" name="action" value="updateFromRefuse">';
1548 print
'<input type="hidden" name="action" value="update">';
1551 $linkback =
'<a href="'.DOL_URL_ROOT.
'/expensereport/list.php?restore_lastsearch_values=1'.(!empty($socid) ?
'&socid='.$socid :
'').
'">'.$langs->trans(
"BackToList").
'</a>';
1553 print
'<table class="border" style="width:100%;">';
1556 print
'<td>'.$langs->trans(
"User").
'</td>';
1558 $userfee =
new User($db);
1559 if ($object->fk_user_author > 0) {
1560 $userfee->fetch($object->fk_user_author);
1561 print $userfee->getNomUrl(-1);
1566 print
'<tr><td class="titlefieldcreate">'.$langs->trans(
"Ref").
'</td><td>';
1567 print
$form->showrefnav($object,
'ref', $linkback, 1,
'ref',
'ref',
'');
1571 print
'<td>'.$langs->trans(
"DateStart").
'</td>';
1573 print
$form->selectDate($object->date_debut,
'date_debut');
1577 print
'<td>'.$langs->trans(
"DateEnd").
'</td>';
1579 print
$form->selectDate($object->date_fin,
'date_fin');
1583 if (!empty($conf->global->EXPENSEREPORT_ASK_PAYMENTMODE_ON_CREATION)) {
1585 print
'<td>'.$langs->trans(
"ModePaiement").
'</td>';
1587 $form->select_types_paiements($object->fk_c_paiement,
'fk_c_paiement');
1592 if ($object->status < 3) {
1594 print
'<td>'.$langs->trans(
"VALIDATOR").
'</td>';
1596 $include_users = $object->fetch_users_approver_expensereport();
1597 $s =
$form->select_dolusers($object->fk_user_validator,
"fk_user_validator", 1,
"", 0, $include_users);
1598 print
$form->textwithpicto($s, $langs->trans(
"AnyOtherInThisListCanValidate"));
1603 print
'<td>'.$langs->trans(
"VALIDOR").
'</td>';
1605 $userfee =
new User($db);
1606 $userfee->fetch($object->fk_user_valid);
1607 print $userfee->getNomUrl(-1);
1611 if ($object->status == 6) {
1613 print
'<td>'.$langs->trans(
"AUTHORPAIEMENT").
'</td>';
1615 $userfee =
new User($db);
1616 $userfee->fetch($user->id);
1617 print $userfee->getNomUrl(-1);
1629 print
$form->buttonsSaveCancel(
"Modify");
1633 $taxlessUnitPriceDisabled = ! empty($conf->global->EXPENSEREPORT_FORCE_LINE_AMOUNTS_INCLUDING_TAXES_ONLY) ?
' disabled' :
'';
1640 if ($action ==
'clone') {
1642 $criteriaforfilter =
'hierarchyme';
1643 if (!empty($user->rights->expensereport->readall)) {
1644 $criteriaforfilter =
'';
1646 $formquestion = array(
1648 array(
'type' =>
'other',
'name' =>
'fk_user_author',
'label' => $langs->trans(
"SelectTargetUser"),
'value' =>
$form->select_dolusers((
GETPOST(
'fk_user_author',
'int') > 0 ?
GETPOST(
'fk_user_author',
'int') : $user->id),
'fk_user_author', 0,
null, 0, $criteriaforfilter,
'',
'0', 0, 0,
'', 0,
'',
'maxwidth150'))
1651 $formconfirm =
$form->formconfirm($_SERVER[
"PHP_SELF"].
'?id='.$object->id, $langs->trans(
'ToClone'), $langs->trans(
'ConfirmCloneExpenseReport', $object->ref),
'confirm_clone', $formquestion,
'yes', 1);
1654 if ($action ==
'save') {
1655 $formconfirm =
$form->formconfirm($_SERVER[
"PHP_SELF"].
"?id=".$id, $langs->trans(
"SaveTrip"), $langs->trans(
"ConfirmSaveTrip"),
"confirm_validate",
"",
"", 1);
1658 if ($action ==
'save_from_refuse') {
1659 $formconfirm =
$form->formconfirm($_SERVER[
"PHP_SELF"].
"?id=".$id, $langs->trans(
"SaveTrip"), $langs->trans(
"ConfirmSaveTrip"),
"confirm_save_from_refuse",
"",
"", 1);
1662 if ($action ==
'delete') {
1663 $formconfirm =
$form->formconfirm($_SERVER[
"PHP_SELF"].
"?id=".$id, $langs->trans(
"DeleteTrip"), $langs->trans(
"ConfirmDeleteTrip"),
"confirm_delete",
"",
"", 1);
1666 if ($action ==
'validate') {
1667 $formconfirm =
$form->formconfirm($_SERVER[
"PHP_SELF"].
"?id=".$id, $langs->trans(
"ValideTrip"), $langs->trans(
"ConfirmValideTrip"),
"confirm_approve",
"",
"", 1);
1670 if ($action ==
'paid') {
1671 $formconfirm =
$form->formconfirm($_SERVER[
"PHP_SELF"].
"?id=".$id, $langs->trans(
"PaidTrip"), $langs->trans(
"ConfirmPaidTrip"),
"confirm_paid",
"",
"", 1);
1674 if ($action ==
'cancel') {
1675 $array_input = array(
'text'=>$langs->trans(
"ConfirmCancelTrip"), array(
'type'=>
"text",
'label'=>
'<strong>'.$langs->trans(
"Comment").
'</strong>',
'name'=>
"detail_cancel",
'value'=>
""));
1676 $formconfirm =
$form->formconfirm($_SERVER[
"PHP_SELF"].
"?id=".$id, $langs->trans(
"Cancel"),
"",
"confirm_cancel", $array_input,
"", 1);
1679 if ($action ==
'setdraft') {
1680 $formconfirm =
$form->formconfirm($_SERVER[
"PHP_SELF"].
"?id=".$id, $langs->trans(
"BrouillonnerTrip"), $langs->trans(
"ConfirmBrouillonnerTrip"),
"confirm_setdraft",
"",
"", 1);
1683 if ($action ==
'refuse') {
1684 $array_input = array(
'text'=>$langs->trans(
"ConfirmRefuseTrip"), array(
'type'=>
"text",
'label'=>$langs->trans(
"Comment"),
'name'=>
"detail_refuse",
'value'=>
""));
1685 $formconfirm =
$form->formconfirm($_SERVER[
"PHP_SELF"].
"?id=".$id, $langs->trans(
"Deny"),
'',
"confirm_refuse", $array_input,
"yes", 1);
1688 if ($action ==
'delete_line') {
1689 $formconfirm =
$form->formconfirm($_SERVER[
"PHP_SELF"].
"?id=".$id.
"&rowid=".
GETPOST(
'rowid',
'int'), $langs->trans(
"DeleteLine"), $langs->trans(
"ConfirmDeleteLine"),
"confirm_delete_line",
'',
'yes', 1);
1696 $linkback =
'<a href="'.DOL_URL_ROOT.
'/expensereport/list.php?restore_lastsearch_values=1'.(!empty($socid) ?
'&socid='.$socid :
'').
'">'.$langs->trans(
"BackToList").
'</a>';
1698 $morehtmlref =
'<div class="refidno">';
1737 $morehtmlref .=
'</div>';
1739 dol_banner_tab($object,
'ref', $linkback, 1,
'ref',
'ref', $morehtmlref);
1741 print
'<div class="fichecenter">';
1742 print
'<div class="fichehalfleft">';
1743 print
'<div class="underbanner clearboth"></div>';
1745 print
'<table class="border tableforfield centpercent">';
1749 print
'<td class="titlefield">'.$langs->trans(
"User").
'</td>';
1751 if ($object->fk_user_author > 0) {
1752 $userauthor =
new User($db);
1753 $result = $userauthor->fetch($object->fk_user_author);
1756 } elseif ($result > 0) {
1757 print $userauthor->getNomUrl(-1);
1764 print
'<td class="titlefield">'.$langs->trans(
"Period").
'</td>';
1766 print
get_date_range($object->date_debut, $object->date_fin,
'day', $langs, 0);
1769 if (!empty($conf->global->EXPENSEREPORT_ASK_PAYMENTMODE_ON_CREATION)) {
1771 print
'<td>'.$langs->trans(
"ModePaiement").
'</td>';
1772 print
'<td>'.$object->fk_c_paiement.
'</td>';
1778 print
'<td>'.$langs->trans(
"DATE_SAVE").
'</td>';
1779 print
'<td>'.dol_print_date($object->date_valid,
'dayhour',
'tzuser');
1780 if ($object->status == 2 && $object->hasDelay(
'toapprove')) {
1781 print
' '.img_warning($langs->trans(
"Late").
' - '.$langs->trans(
"ToApprove"));
1783 if ($object->status == 5 && $object->hasDelay(
'topay')) {
1784 print
' '.img_warning($langs->trans(
"Late").
' - '.$langs->trans(
"ToPay"));
1792 print
'<td>'.$langs->trans(
"VALIDATOR").
'</td>';
1794 if ($object->fk_user_validator > 0) {
1795 $userfee =
new User($db);
1796 $result = $userfee->fetch($object->fk_user_validator);
1798 print $userfee->getNomUrl(-1);
1800 if (empty($userfee->email) || !
isValidEmail($userfee->email)) {
1801 $langs->load(
"errors");
1802 print
img_warning($langs->trans(
"ErrorBadEMail", $userfee->email));
1808 print
'<td>'.$langs->trans(
"CANCEL_USER").
'</span></td>';
1810 if ($object->fk_user_cancel > 0) {
1811 $userfee =
new User($db);
1812 $result = $userfee->fetch($object->fk_user_cancel);
1814 print $userfee->getNomUrl(-1);
1820 print
'<td>'.$langs->trans(
"MOTIF_CANCEL").
'</td>';
1821 print
'<td>'.$object->detail_cancel.
'</td></tr>';
1824 print
'<td>'.$langs->trans(
"DATE_CANCEL").
'</td>';
1825 print
'<td>'.dol_print_date($object->date_cancel,
'dayhour',
'tzuser').
'</td></tr>';
1829 print
'<td>'.$langs->trans(
"ApprovedBy").
'</td>';
1831 if ($object->fk_user_approve > 0) {
1832 $userapp =
new User($db);
1833 $result = $userapp->fetch($object->fk_user_approve);
1835 print $userapp->getNomUrl(-1);
1841 print
'<td>'.$langs->trans(
"DateApprove").
'</td>';
1842 print
'<td>'.dol_print_date($object->date_approve,
'dayhour',
'tzuser').
'</td></tr>';
1846 if ($object->status == 99 || !empty($object->detail_refuse)) {
1848 print
'<td>'.$langs->trans(
"REFUSEUR").
'</td>';
1850 $userfee =
new User($db);
1851 $result = $userfee->fetch($object->fk_user_refuse);
1853 print $userfee->getNomUrl(-1);
1858 print
'<td>'.$langs->trans(
"DATE_REFUS").
'</td>';
1859 print
'<td>'.dol_print_date($object->date_refuse,
'dayhour',
'tzuser');
1860 if ($object->detail_refuse) {
1861 print
' - '.$object->detail_refuse;
1867 if ($object->status == $object::STATUS_CLOSED) {
1885 include DOL_DOCUMENT_ROOT.
'/core/tpl/extrafields_view.tpl.php';
1890 print
'<div class="fichehalfright">';
1891 print
'<div class="underbanner clearboth"></div>';
1893 print
'<table class="border tableforfield centpercent">';
1897 print
'<td class="titlefieldmiddle">'.$langs->trans(
"AmountHT").
'</td>';
1898 print
'<td class="nowrap amountcard">'.price($object->total_ht, 1,
'', 1, - 1, - 1, $conf->currency).
'</td>';
1917 print
'<td>'.$langs->trans(
"AmountVAT").
'</td>';
1918 print
'<td class="nowrap amountcard">'.price($object->total_tva, 1,
'', 1, -1, -1, $conf->currency).
'</td>';
1922 if ($mysoc->localtax1_assuj ==
"1" || $object->total_localtax1 != 0) {
1923 print
'<tr><td>'.$langs->transcountry(
"AmountLT1", $mysoc->country_code).
'</td>';
1924 print
'<td class="valuefield">'.price($object->total_localtax1, 1,
'', 1, -1, -1, $conf->currency).
'</td></tr>';
1926 if ($mysoc->localtax2_assuj ==
"1" || $object->total_localtax2 != 0) {
1927 print
'<tr><td>'.$langs->transcountry(
"AmountLT2", $mysoc->country_code).
'</td>';
1928 print
'<td class="valuefield">'.price($object->total_localtax2, 1,
'', 1, -1, -1, $conf->currency).
'</td></tr>';
1932 print
'<td>'.$langs->trans(
"AmountTTC").
'</td>';
1933 print
'<td class="nowrap amountcard">'.price($object->total_ttc, 1,
'', 1, -1, -1, $conf->currency).
'</td>';
1939 if (!empty($conf->banque->enabled)) {
1944 print
'<table class="noborder paymenttable centpercent">';
1946 print
'<tr class="liste_titre">';
1947 print
'<td class="liste_titre">'.$langs->trans(
'Payments').
'</td>';
1948 print
'<td class="liste_titre">'.$langs->trans(
'Date').
'</td>';
1949 print
'<td class="liste_titre">'.$langs->trans(
'Type').
'</td>';
1950 if (!empty($conf->banque->enabled)) {
1951 print
'<td class="liste_titre right">'.$langs->trans(
'BankAccount').
'</td>';
1953 print
'<td class="liste_titre right">'.$langs->trans(
'Amount').
'</td>';
1954 print
'<td class="liste_titre" width="18"> </td>';
1958 $sql =
"SELECT p.rowid, p.num_payment, p.datep as dp, p.amount, p.fk_bank,";
1959 $sql .=
"c.code as payment_code, c.libelle as payment_type,";
1960 $sql .=
"ba.rowid as baid, ba.ref as baref, ba.label, ba.number as banumber, ba.account_number, ba.fk_accountancy_journal";
1961 $sql .=
" FROM ".MAIN_DB_PREFIX.
"expensereport as e, ".MAIN_DB_PREFIX.
"payment_expensereport as p";
1962 $sql .=
" LEFT JOIN ".MAIN_DB_PREFIX.
"c_paiement as c ON p.fk_typepayment = c.id";
1963 $sql .=
' LEFT JOIN '.MAIN_DB_PREFIX.
'bank as b ON p.fk_bank = b.rowid';
1964 $sql .=
' LEFT JOIN '.MAIN_DB_PREFIX.
'bank_account as ba ON b.fk_account = ba.rowid';
1965 $sql .=
" WHERE e.rowid = ".((int) $id);
1966 $sql .=
" AND p.fk_expensereport = e.rowid";
1967 $sql .=
' AND e.entity IN ('.getEntity(
'expensereport').
')';
1968 $sql .=
" ORDER BY dp";
1970 $resql = $db->query($sql);
1972 $num = $db->num_rows(
$resql);
1973 $i = 0; $totalpaid = 0;
1975 $objp = $db->fetch_object(
$resql);
1977 $paymentexpensereportstatic->id = $objp->rowid;
1978 $paymentexpensereportstatic->datep = $db->jdate($objp->dp);
1979 $paymentexpensereportstatic->ref = $objp->rowid;
1980 $paymentexpensereportstatic->num_payment = $objp->num_payment;
1981 $paymentexpensereportstatic->type_code = $objp->payment_code;
1982 $paymentexpensereportstatic->type_label = $objp->payment_type;
1984 print
'<tr class="oddseven">';
1986 print $paymentexpensereportstatic->getNomUrl(1);
1988 print
'<td>'.dol_print_date($db->jdate($objp->dp),
'day').
"</td>\n";
1989 $labeltype = $langs->trans(
"PaymentType".$objp->payment_code) != (
"PaymentType".$objp->payment_code) ? $langs->trans(
"PaymentType".$objp->payment_code) : $objp->payment_type;
1990 print
"<td>".$labeltype.
' '.$objp->num_payment.
"</td>\n";
1992 if (!empty($conf->banque->enabled)) {
1993 $bankaccountstatic->id = $objp->baid;
1994 $bankaccountstatic->ref = $objp->baref;
1995 $bankaccountstatic->label = $objp->baref;
1996 $bankaccountstatic->number = $objp->banumber;
1998 if (!empty($conf->accounting->enabled)) {
1999 $bankaccountstatic->account_number = $objp->account_number;
2002 $accountingjournal->fetch($objp->fk_accountancy_journal);
2003 $bankaccountstatic->accountancy_journal = $accountingjournal->getNomUrl(0, 1, 1,
'', 1);
2006 print
'<td class="right">';
2007 if ($bankaccountstatic->id) {
2008 print $bankaccountstatic->getNomUrl(1,
'transactions');
2012 print
'<td class="right">'.price($objp->amount).
"</td>";
2015 $totalpaid += $objp->amount;
2018 if (!is_null($totalpaid)) {
2022 $remaintopay =
price2num($object->total_ttc - $totalpaid);
2023 $resteapayeraffiche = $remaintopay;
2025 $cssforamountpaymentcomplete =
'amountpaymentcomplete';
2028 $cssforamountpaymentcomplete =
'amountpaymentneutral';
2029 $resteapayeraffiche = 0;
2030 } elseif ($object->paid == 0) {
2031 $cssforamountpaymentcomplete =
'amountpaymentneutral';
2033 print
'<tr><td colspan="'.$nbcols.
'" class="right">'.$langs->trans(
"AlreadyPaid").
':</td><td class="right">'.
price($totalpaid).
'</td><td></td></tr>';
2034 print
'<tr><td colspan="'.$nbcols.
'" class="right">'.$langs->trans(
"AmountExpected").
':</td><td class="right">'.
price($object->total_ttc).
'</td><td></td></tr>';
2036 print
'<tr><td colspan="'.$nbcols.
'" class="right">'.$langs->trans(
"RemainderToPay").
':</td>';
2037 print
'<td class="right'.($resteapayeraffiche ?
' amountremaintopay' : (
' '.$cssforamountpaymentcomplete)).
'">'.
price($resteapayeraffiche).
'</td><td></td></tr>';
2048 print
'<div class="clearboth"></div><br>';
2050 print
'<div style="clear: both;"></div>';
2052 $actiontouse =
'updateline';
2053 if (($object->status == 0 || $object->status == 99) && $action !=
'editline') {
2054 $actiontouse =
'addline';
2057 print
'<form name="expensereport" action="'.$_SERVER[
"PHP_SELF"].
'" enctype="multipart/form-data" method="post" >';
2058 print
'<input type="hidden" name="token" value="'.newToken().
'">';
2059 print
'<input type="hidden" name="action" value="'.$actiontouse.
'">';
2060 print
'<input type="hidden" name="id" value="'.$object->id.
'">';
2061 print
'<input type="hidden" name="fk_expensereport" value="'.$object->id.
'" />';
2063 print
'<div class="div-table-responsive-no-min">';
2064 print
'<table id="tablelines" class="noborder centpercent">';
2066 if (!empty($object->lines)) {
2069 print
'<tr class="liste_titre headerexpensereportdet">';
2070 print
'<td class="center linecollinenb">'.$langs->trans(
'LineNb').
'</td>';
2072 print
'<td class="center linecoldate">'.$langs->trans(
'Date').
'</td>';
2073 if (!empty($conf->project->enabled)) {
2074 print
'<td class="minwidth100imp linecolproject">'.$langs->trans(
'Project').
'</td>';
2076 print
'<td class="center linecoltype">'.$langs->trans(
'Type').
'</td>';
2077 if (!empty($conf->global->MAIN_USE_EXPENSE_IK)) {
2078 print
'<td class="center linecolcarcategory">'.$langs->trans(
'CarCategory').
'</td>';
2080 print
'<td class="center linecoldescription">'.$langs->trans(
'Description').
'</td>';
2081 print
'<td class="right linecolvat">'.$langs->trans(
'VAT').
'</td>';
2082 print
'<td class="right linecolpriceuht">'.$langs->trans(
'PriceUHT').
'</td>';
2083 print
'<td class="right linecolpriceuttc">'.$langs->trans(
'PriceUTTC').
'</td>';
2084 print
'<td class="right linecolqty">'.$langs->trans(
'Qty').
'</td>';
2085 if ($action !=
'editline') {
2086 print
'<td class="right linecolamountht">'.$langs->trans(
'AmountHT').
'</td>';
2087 print
'<td class="right linecolamountttc">'.$langs->trans(
'AmountTTC').
'</td>';
2098 if (($object->status < 2 || $object->status == 99) && $user->rights->expensereport->creer) {
2099 print
'<td class="right"></td>';
2103 foreach ($object->lines as &$line) {
2106 if ($action !=
'editline' || $line->rowid !=
GETPOST(
'rowid',
'int')) {
2107 print
'<tr class="oddeven linetr" data-id="'.$line->id.
'">';
2110 print
'<td class="center linecollinenb">';
2115 print
'<td class="center linecoldate">'.dol_print_date($db->jdate($line->date),
'day').
'</td>';
2118 if (!empty($conf->project->enabled)) {
2119 print
'<td class="center dateproject">';
2120 if ($line->fk_project > 0) {
2121 $projecttmp->id = $line->fk_project;
2122 $projecttmp->ref = $line->projet_ref;
2123 $projecttmp->title = $line->projet_title;
2124 print $projecttmp->getNomUrl(1);
2130 if (!empty($conf->accounting->enabled)) {
2131 require_once DOL_DOCUMENT_ROOT.
'/accountancy/class/accountingaccount.class.php';
2133 $resaccountingaccount = $accountingaccount->fetch(0, $line->type_fees_accountancy_code, 1);
2135 $titlealt .= $langs->trans(
"AccountancyCode").
': ';
2136 if ($resaccountingaccount > 0) {
2137 $titlealt .= $accountingaccount->account_number;
2139 $titlealt .= $langs->trans(
"NotFound");
2145 print
'<td class="center linecoltype" title="'.dol_escape_htmltag($titlealt).
'">';
2146 $labeltype = ($langs->trans(($line->type_fees_code)) == $line->type_fees_code ? $line->type_fees_libelle : $langs->trans($line->type_fees_code));
2151 if (!empty($conf->global->MAIN_USE_EXPENSE_IK)) {
2152 print
'<td class="fk_c_exp_tax_cat linecoltaxcat">';
2153 $exp_tax_cat_label =
dol_getIdFromCode($db, $line->fk_c_exp_tax_cat,
'c_exp_tax_cat',
'rowid',
'label');
2154 print $langs->trans($exp_tax_cat_label);
2159 print
'<td class="left linecolcomment">'.dol_nl2br($line->comments).
'</td>';
2162 print
'<td class="right linecolvatrate">'.vatrate($line->vatrate.($line->vat_src_code ?
' ('.$line->vat_src_code.
')' :
''),
true).
'</td>';
2165 print
'<td class="right linecolunitht">';
2166 if (!empty($line->value_unit_ht)) {
2167 print
price($line->value_unit_ht);
2169 $tmpvat =
price2num(preg_replace(
'/\s*\(.*\)/',
'', $line->vatrate));
2170 $pricenettoshow =
price2num($line->value_unit / (1 + $tmpvat / 100),
'MU');
2171 print
price($pricenettoshow);
2175 print
'<td class="right linecolunitttc">'.price($line->value_unit).
'</td>';
2177 print
'<td class="right linecolqty">'.dol_escape_htmltag($line->qty).
'</td>';
2179 if ($action !=
'editline') {
2180 print
'<td class="right linecoltotalht">'.price($line->total_ht).
'</td>';
2181 print
'<td class="right linecoltotalttc">'.price($line->total_ttc).
'</td>';
2185 print
'<td class="center linecolpreview">';
2186 if ($line->fk_ecm_files > 0) {
2187 $modulepart =
'expensereport';
2188 $maxheightmini = 32;
2190 $result = $ecmfilesstatic->fetch($line->fk_ecm_files);
2192 $relativepath = preg_replace(
'/expensereport\//',
'', $ecmfilesstatic->filepath);
2193 $fileinfo = pathinfo($ecmfilesstatic->filepath.
'/'.$ecmfilesstatic->filename);
2196 if (!
dol_is_file($conf->expensereport->dir_output.
'/'.$relativepath.
'/'.$minifile)) {
2200 $urlforhref =
getAdvancedPreviewUrl($modulepart, $relativepath.
'/'.$fileinfo[
'filename'].
'.'.strtolower($fileinfo[
'extension']), 1,
'&entity='.(!empty($object->entity) ? $object->entity : $conf->entity));
2201 if (empty($urlforhref)) {
2202 $urlforhref = DOL_URL_ROOT.
'/viewimage.php?modulepart='.$modulepart.
'&entity='.(!empty($object->entity) ? $object->entity : $conf->entity).
'&file='.urlencode($relativepath.$fileinfo[
'filename'].
'.'.strtolower($fileinfo[
'extension']));
2203 print
'<a href="'.$urlforhref.
'" class="aphoto" target="_blank" rel="noopener noreferrer">';
2205 print
'<a href="'.$urlforhref[
'url'].
'" class="'.$urlforhref[
'css'].
'" target="'.$urlforhref[
'target'].
'" mime="'.$urlforhref[
'mime'].
'">';
2207 print
'<img class="photo" height="'.$maxheightmini.
'" src="'.DOL_URL_ROOT.
'/viewimage.php?modulepart='.$modulepart.
'&entity='.(!empty($object->entity) ? $object->entity : $conf->entity).
'&file='.urlencode($relativepath.
'/'.$minifile).
'" title="">';
2210 $modulepart =
'expensereport';
2212 if (preg_match(
'/\.pdf$/i', $ecmfilesstatic->filename)) {
2213 $filepdf = $conf->expensereport->dir_output.
'/'.$relativepath.
'/'.$ecmfilesstatic->filename;
2214 $fileimage = $conf->expensereport->dir_output.
'/'.$relativepath.
'/'.$ecmfilesstatic->filename.
'_preview.png';
2215 $relativepathimage = $relativepath.
'/'.$ecmfilesstatic->filename.
'_preview.png';
2217 $pdfexists = file_exists($filepdf);
2220 if (!file_exists($fileimage) || (filemtime($fileimage) < filemtime($filepdf))) {
2221 if (empty($conf->global->MAIN_DISABLE_PDF_THUMBS)) {
2222 include_once DOL_DOCUMENT_ROOT.
'/core/lib/files.lib.php';
2231 if ($pdfexists && !$error) {
2232 $heightforphotref = 70;
2233 if (!empty($conf->dol_optimize_smallscreen)) {
2234 $heightforphotref = 60;
2237 if (file_exists($fileimage)) {
2239 $urlforhref =
getAdvancedPreviewUrl($modulepart, $relativepath.
'/'.$fileinfo[
'filename'].
'.'.strtolower($fileinfo[
'extension']), 1,
'&entity='.(!empty($object->entity) ? $object->entity : $conf->entity));
2240 print
'<a href="'.$urlforhref[
'url'].
'" class="'.$urlforhref[
'css'].
'" target="'.$urlforhref[
'target'].
'" mime="'.$urlforhref[
'mime'].
'">';
2241 print
'<img height="'.$heightforphotref.
'" class="photo photowithmargin photowithborder" src="'.DOL_URL_ROOT.
'/viewimage.php?modulepart=apercu'.$modulepart.
'&file='.urlencode($relativepathimage).
'">';
2248 print
img_mime($ecmfilesstatic->filename);
2255 print
'<td class="nowrap right linecolwarning">';
2256 print !empty($line->rule_warning_message) ?
img_warning(html_entity_decode($line->rule_warning_message)) :
' ';
2261 print
'<td class="nowrap right linecolaction">';
2263 print
'<a class="editfielda reposition paddingrightonly" href="'.$_SERVER[
"PHP_SELF"].
'?id='.$object->id.
'&action=editline&token='.
newToken().
'&rowid='.$line->rowid.
'">';
2265 print
'</a> ';
2266 print
'<a class="paddingrightonly" href="'.$_SERVER[
"PHP_SELF"].
'?id='.$object->id.
'&action=delete_line&token='.
newToken().
'&rowid='.$line->rowid.
'">';
2276 if ($action ==
'editline' && $line->rowid ==
GETPOST(
'rowid',
'int')) {
2279 if (!empty($conf->project->enabled)) {
2282 if (!empty($conf->global->MAIN_USE_EXPENSE_IK)) {
2286 print
'<!-- line of expense report -->'.
"\n";
2287 print
'<tr class="tredited">';
2289 print
'<td class="center">';
2293 print
'<td colspan="'.($colspan - 1).
'" class="liste_titre"> ';
2294 print
'<a href="" class="commonlink auploadnewfilenow reposition">'.$langs->trans(
"UploadANewFileNow");
2295 print
img_picto($langs->trans(
"UploadANewFileNow"),
'chevron-down',
'',
false, 0, 0,
'',
'marginleftonly');
2297 if (empty($conf->global->EXPENSEREPORT_DISABLE_ATTACHMENT_ON_LINES)) {
2298 print
' - <a href="" class="commonlink aattachtodoc reposition">'.$langs->trans(
"AttachTheNewLineToTheDocument");
2299 print
img_picto($langs->trans(
"AttachTheNewLineToTheDocument"),
'chevron-down',
'',
false, 0, 0,
'',
'marginleftonly');
2303 print
'<!-- Code to open/close section to submit or link files in edit mode -->'.
"\n";
2304 print
'<script type="text/javascript">'.
"\n";
2305 print
'$(document).ready(function() {
2306 $( ".auploadnewfilenow" ).click(function() {
2307 jQuery(".truploadnewfilenow").toggle();
2308 jQuery(".trattachnewfilenow").hide();
2311 $( ".aattachtodoc" ).click(function() {
2312 jQuery(".trattachnewfilenow").toggle();
2313 jQuery(".truploadnewfilenow").hide();
2316 if (is_array(
GETPOST(
'attachfile',
'array')) && count(
GETPOST(
'attachfile',
'array'))) {
2317 print
'jQuery(".trattachnewfilenow").toggle();'.
"\n";
2320 jQuery("form[name=\"expensereport\"]").submit(function() {
2321 if (jQuery(".truploadnewfilenow").is(":hidden")) {
2322 jQuery("input[name=\"sendit\"]").val("");
2329 print
'</script>'.
"\n";
2332 $filenamelinked =
'';
2333 if ($line->fk_ecm_files > 0) {
2334 $result = $ecmfilesstatic->fetch($line->fk_ecm_files);
2336 $filenamelinked = $ecmfilesstatic->filename;
2340 $tredited =
'tredited';
2341 include DOL_DOCUMENT_ROOT.
'/expensereport/tpl/expensereport_addfile.tpl.php';
2342 include DOL_DOCUMENT_ROOT.
'/expensereport/tpl/expensereport_linktofile.tpl.php';
2344 print
'<tr class="oddeven tredited">';
2349 print
'<td class="center">';
2350 print
$form->selectDate($line->date,
'date');
2354 if (!empty($conf->project->enabled)) {
2356 $formproject->select_projects(-1, $line->fk_project,
'fk_project', 0, 0, $projectRequired ? 0 : 1, 1, 0, 0, 0,
'', 0, 0,
'maxwidth300');
2361 print
'<td class="center">';
2362 print $formexpensereport->selectTypeExpenseReport($line->fk_c_type_fees,
'fk_c_type_fees');
2365 if (!empty($conf->global->MAIN_USE_EXPENSE_IK)) {
2366 print
'<td class="fk_c_exp_tax_cat">';
2367 $params = array(
'fk_expense' => $object->id,
'fk_expense_det' => $line->rowid,
'date' => $line->dates);
2368 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);
2374 print
'<textarea name="comments" class="flat_ndf centpercent">'.dol_escape_htmltag($line->comments, 0, 1).
'</textarea>';
2378 $selectedvat =
price2num($line->vatrate).($line->vat_src_code ?
' ('.$line->vat_src_code.
')' :
'');
2379 print
'<td class="right">';
2380 print
$form->load_tva(
'vatrate', (
GETPOSTISSET(
"vatrate") ?
GETPOST(
"vatrate") : $selectedvat), $mysoc,
'', 0, 0,
'',
false, 1);
2384 print
'<td class="right">';
2385 print
'<input type="text" min="0" class="right maxwidth50" id="value_unit_ht" name="value_unit_ht" value="'.dol_escape_htmltag(
price2num($line->value_unit_ht)).
'"'.$taxlessUnitPriceDisabled.
' />';
2389 print
'<td class="right">';
2390 print
'<input type="text" min="0" class="right maxwidth50" id="value_unit" name="value_unit" value="'.dol_escape_htmltag(
price2num($line->value_unit)).
'" />';
2394 print
'<td class="right">';
2395 print
'<input type="text" min="0" class="input_qty right maxwidth50" name="qty" value="'.dol_escape_htmltag($line->qty).
'" />';
2402 print
'<td class="center">';
2406 print
'<td class="center">';
2410 print
'<input type="hidden" name="rowid" value="'.$line->rowid.
'">';
2411 print
$form->buttonsSaveCancel(
'Save',
'Cancel', array(), 0,
'small');
2424 if (!empty($conf->global->MAIN_USE_EXPENSE_IK)) {
2427 if (!empty($conf->project->enabled)) {
2430 if ($action !=
'editline') {
2434 $nbFiles = $nbLinks = 0;
2435 $arrayoffiles = array();
2436 if (empty($conf->global->EXPENSEREPORT_DISABLE_ATTACHMENT_ON_LINES)) {
2437 require_once DOL_DOCUMENT_ROOT.
'/core/lib/files.lib.php';
2438 require_once DOL_DOCUMENT_ROOT.
'/core/lib/images.lib.php';
2439 require_once DOL_DOCUMENT_ROOT.
'/core/class/link.class.php';
2442 $nbFiles = count($arrayoffiles);
2443 $nbLinks =
Link::count($db, $object->element, $object->id);
2447 print
'<tr class="liste_titre">';
2448 print
'<td colspan="'.$colspan.
'" class="liste_titre expensereportautoload">';
2449 print
'<a href="" class="commonlink auploadnewfilenow reposition">'.$langs->trans(
"UploadANewFileNow");
2450 print
img_picto($langs->trans(
"UploadANewFileNow"),
'chevron-down',
'',
false, 0, 0,
'',
'marginleftonly');
2452 if (empty($conf->global->EXPENSEREPORT_DISABLE_ATTACHMENT_ON_LINES)) {
2453 print
' - <a href="" class="commonlink aattachtodoc reposition">'.$langs->trans(
"AttachTheNewLineToTheDocument");
2454 print
img_picto($langs->trans(
"AttachTheNewLineToTheDocument"),
'chevron-down',
'',
false, 0, 0,
'',
'marginleftonly');
2458 print
'<!-- Code to open/close section to submit or link files in the form to add new line -->'.
"\n";
2459 print
'<script type="text/javascript">'.
"\n";
2460 print
'$(document).ready(function() {
2461 $( ".auploadnewfilenow" ).click(function() {
2462 console.log("We click on toggle of auploadnewfilenow");
2463 jQuery(".truploadnewfilenow").toggle();
2464 jQuery(".trattachnewfilenow").hide();
2465 if (jQuery(".truploadnewfilenow").is(":hidden")) {
2466 jQuery("input[name=\"sendit\"]").prop("name", "senditdisabled");
2468 jQuery("input[name=\"senditdisabled\"]").prop("name", "sendit");
2472 $( ".aattachtodoc" ).click(function() {
2473 console.log("We click on toggle of aattachtodoc");
2474 jQuery(".trattachnewfilenow").toggle();
2475 jQuery(".truploadnewfilenow").hide();
2478 if (is_array(
GETPOST(
'attachfile',
'array')) && count(
GETPOST(
'attachfile',
'array')) && $action !=
'updateline') {
2479 print
'jQuery(".trattachnewfilenow").show();'.
"\n";
2482 jQuery("form[name=\"expensereport\"]").submit(function() {
2483 if (jQuery(".truploadnewfilenow").is(":hidden")) {
2484 /* 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. */
2485 jQuery("input[name=\"sendit\"]").val("");
2486 jQuery("input[name=\"sendit\"]").prop("name", "senditdisabled");
2488 jQuery("input[name=\"senditdisabled\"]").prop("name", "sendit");
2495 print
'</script>'.
"\n";
2498 include DOL_DOCUMENT_ROOT.
'/expensereport/tpl/expensereport_linktofile.tpl.php';
2499 include DOL_DOCUMENT_ROOT.
'/expensereport/tpl/expensereport_addfile.tpl.php';
2501 print
'<tr class="liste_titre expensereportcreate">';
2503 print
'<td class="center expensereportcreatedate">'.$langs->trans(
'Date').
'</td>';
2504 if (!empty($conf->project->enabled)) {
2505 print
'<td class="minwidth100imp">'.$form->textwithpicto($langs->trans(
'Project'), $langs->trans(
"ClosedProjectsAreHidden")).
'</td>';
2507 print
'<td class="center expensereportcreatetype">'.$langs->trans(
'Type').
'</td>';
2508 if (!empty($conf->global->MAIN_USE_EXPENSE_IK)) {
2509 print
'<td>'.$langs->trans(
'CarCategory').
'</td>';
2511 print
'<td class="right expensereportcreatedescription">'.$langs->trans(
'Description').
'</td>';
2512 print
'<td class="right expensereportcreatevat">'.$langs->trans(
'VAT').
'</td>';
2513 print
'<td class="right expensereportcreatepriceuth">'.$langs->trans(
'PriceUHT').
'</td>';
2514 print
'<td class="right expensereportcreatepricettc">'.$langs->trans(
'PriceUTTC').
'</td>';
2515 print
'<td class="right expensereportcreateqty">'.$langs->trans(
'Qty').
'</td>';
2522 print
'<tr class="oddeven nohover">';
2528 print
'<td class="center inputdate">';
2529 print
$form->selectDate($date ? $date : -1,
'date', 0, 0, 0,
'', 1, 1);
2533 if (!empty($conf->project->enabled)) {
2534 print
'<td class="inputproject">';
2535 $formproject->select_projects(-1, $fk_project,
'fk_project', 0, 0, $projectRequired ? 0 : 1, -1, 0, 0, 0,
'', 0, 0,
'maxwidth300');
2540 print
'<td class="center inputtype">';
2541 print $formexpensereport->selectTypeExpenseReport($fk_c_type_fees,
'fk_c_type_fees', 1);
2544 if (!empty($conf->global->MAIN_USE_EXPENSE_IK)) {
2545 print
'<td class="fk_c_exp_tax_cat">';
2546 $params = array(
'fk_expense' => $object->id);
2547 print
$form->selectExpenseCategories(
'',
'fk_c_exp_tax_cat', 1, array(),
'fk_c_type_fees', $userauthor->default_c_exp_tax_cat, $params, 0);
2552 print
'<td class="inputcomment">';
2553 print
'<textarea class="flat_ndf centpercent" name="comments" rows="'.ROWS_2.
'">'.
dol_escape_htmltag($comments, 0, 1).
'</textarea>';
2557 print
'<td class="right inputvat">';
2559 if (!empty($conf->global->EXPENSEREPORT_NO_DEFAULT_VAT)) {
2560 $conf->global->MAIN_VAT_DEFAULT_IF_AUTODETECT_FAILS =
'none';
2562 print
$form->load_tva(
'vatrate', ($vatrate !=
'' ? $vatrate : $defaultvat), $mysoc,
'', 0, 0,
'',
false, 1);
2566 print
'<td class="right inputpricenet">';
2567 print
'<input type="text" class="right maxwidth50" id="value_unit_ht" name="value_unit_ht" value="'.dol_escape_htmltag($value_unit_ht).
'"'.$taxlessUnitPriceDisabled.
' />';
2571 print
'<td class="right inputtax">';
2572 print
'<input type="text" class="right maxwidth50" id="value_unit" name="value_unit" value="'.dol_escape_htmltag($value_unit).
'">';
2576 print
'<td class="right inputqty">';
2577 print
'<input type="text" min="0" class=" input_qty right maxwidth50" name="qty" value="'.dol_escape_htmltag($qty ? $qty : 1).
'">';
2583 if ($action !=
'editline') {
2584 print
'<td class="right"></td>';
2585 print
'<td class="right"></td>';
2588 print
'<td class="center inputbuttons">';
2589 print
$form->buttonsSaveCancel(
"Add",
'',
'', 1);
2600 /* JQuery for product free or predefined select */
2601 jQuery(document).ready(function() {
2602 jQuery("#value_unit_ht").keyup(function(event) {
2603 console.log(event.which); // discard event tag and arrows
2604 if (event.which != 9 && (event.which < 37 ||event.which > 40) && jQuery("#value_unit_ht").val() != "") {
2605 jQuery("#value_unit").val("");
2608 jQuery("#value_unit").keyup(function(event) {
2609 console.log(event.which); // discard event tag and arrows
2610 if (event.which != 9 && (event.which < 37 || event.which > 40) && jQuery("#value_unit").val() != "") {
2611 jQuery("#value_unit_ht").val("");
2616 if (! empty($conf->global->MAIN_USE_EXPENSE_IK)) {
2619 /* unit price coéf calculation */
2620 jQuery(".input_qty, #fk_c_type_fees, #select_fk_c_exp_tax_cat, #vatrate ").change(function(event) {
2622 let type_fee = jQuery("#fk_c_type_fees").find(":selected").val();
2623 let tax_cat = jQuery("#select_fk_c_exp_tax_cat").find(":selected").val();
2624 let tva = jQuery("#vatrate").find(":selected").val();
2625 let qty = jQuery(".input_qty").val();
2629 let path = "'.dol_buildpath(
"/expensereport/ajax/ajaxik.php", 1) .
'";
2630 path += "?fk_c_exp_tax_cat="+tax_cat;
2631 path +="&fk_expense="+'.$object->id.
';
2632 path += "&vatrate="+tva;
2633 path += "&qty="+qty;
2635 if (type_fee == 4) { // frais_kilométriques
2637 if (tax_cat == "" || parseInt(tax_cat) <= 0){
2645 ,success:function(response) {
2646 if (response.response_status == "success"){';
2648 if (!empty($conf->global->EXPENSEREPORT_FORCE_LINE_AMOUNTS_INCLUDING_TAXES_ONLY)) {
2650 jQuery("#value_unit").val(parseFloat(response.data) * (100 + parseFloat(tva)) / 100);
2651 jQuery("#value_unit").trigger("change");
2655 jQuery("#value_unit_ht").val(response.data);
2656 jQuery("#value_unit_ht").trigger("change");
2657 jQuery("#value_unit").val("");
2662 } else if(response.response_status == "error" && response.errorMessage != undefined && response.errorMessage.length > 0 ){
2663 $.jnotify(response.errorMessage, "error", {timeout: 0, type: "error"},{ remove: function (){} } );
2670 /*console.log(event.which); // discard event tag and arrows
2671 if (event.which != 9 && (event.which < 37 || event.which > 40) && jQuery("#value_unit").val() != "") {
2672 jQuery("#value_unit_ht").val("");
2692 print
'Record not found';
2703 print
'<div class="tabsAction">';
2705 if ($action !=
'create' && $action !=
'edit' && $action !=
'editline') {
2707 $object->fetch($id, $ref);
2710 if (empty($user->socid)) {
2713 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>';
2725 if (in_array($object->fk_user_author, $user->getAllChildIds(1)) || !empty($user->rights->expensereport->writeall_advance)) {
2727 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>';
2730 if (count($object->lines) > 0) {
2731 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>';
2742 if ($user->id == $object->fk_user_author || $user->id == $object->fk_user_valid) {
2744 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>';
2749 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>';
2754 if ($user->id == $object->fk_user_author || $user->id == $object->fk_user_valid) {
2756 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>';
2766 if (in_array($object->fk_user_author, $user->getAllChildIds(1))) {
2768 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>';
2776 print
'<div class="inline-block divButAction"><a class="butAction" href="'.$_SERVER[
"PHP_SELF"].
'?action=validate&id='.$object->id.
'">'.$langs->trans(
'Approve').
'</a></div>';
2778 print
'<div class="inline-block divButAction"><a class="butAction" href="'.$_SERVER[
"PHP_SELF"].
'?action=refuse&id='.$object->id.
'">'.$langs->trans(
'Deny').
'</a></div>';
2781 if ($user->id == $object->fk_user_author || $user->id == $object->fk_user_valid) {
2783 print
'<div class="inline-block divButAction"><a class="butAction" href="'.$_SERVER[
"PHP_SELF"].
'?action=cancel&id='.$object->id.
'">'.$langs->trans(
"Cancel").
'</a></div>';
2792 print
'<div class="inline-block divButAction"><a class="butAction" href="'.$_SERVER[
"PHP_SELF"].
'?action=refuse&id='.$object->id.
'">'.$langs->trans(
'Deny').
'</a></div>';
2798 if ($remaintopay == 0) {
2799 print
'<div class="inline-block divButAction"><span class="butActionRefused classfortooltip" title="'.$langs->trans(
"DisabledBecauseRemainderToPayIsZero").
'">'.$langs->trans(
'DoPayment').
'</span></div>';
2801 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>';
2808 if ($object->paid == 0) {
2809 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>";
2813 if ($user->rights->expensereport->creer && ($user->id == $object->fk_user_author || $user->id == $object->fk_user_valid) && $object->status ==
ExpenseReport::STATUS_APPROVED) {
2815 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>';
2819 if (($user->rights->expensereport->approve || $user->rights->expensereport->to_paid) && $object->status ==
ExpenseReport::STATUS_CLOSED) {
2821 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>';
2826 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>';
2830 if ($user->rights->expensereport->creer) {
2831 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>';
2837 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>';
2840 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>';
2844 $reshook = $hookmanager->executeHooks(
'addMoreActionsButtons',
$parameters, $object, $action);
2851 if (
GETPOST(
'modelselected',
'alpha')) {
2852 $action =
'presend';
2855 if ($action !=
'presend') {
2860 print
'<div class="fichecenter"><div class="fichehalfleft">';
2861 print
'<a name="builddoc"></a>';
2863 if ($user->rights->expensereport->creer && $action !=
'create' && $action !=
'edit') {
2866 $urlsource = $_SERVER[
"PHP_SELF"].
"?id=".$object->id;
2867 $genallowed = $user->rights->expensereport->creer;
2868 $delallowed = $user->rights->expensereport->creer;
2870 print $formfile->showdocuments(
'expensereport', $filename, $filedir, $urlsource, $genallowed, $delallowed);
2871 $somethingshown = $formfile->numoffiles;
2883 print
'</div><div class="fichehalfright">';
2885 include_once DOL_DOCUMENT_ROOT.
'/core/class/html.formactions.class.php';
2887 $somethingshown =
$formactions->showactions($object,
'expensereport',
null);
2889 print
'</div></div>';
2893 $modelmail =
'expensereport';
2894 $defaulttopic =
'SendExpenseReportRef';
2895 $diroutput = $conf->expensereport->dir_output;
2896 $trackid =
'exp'.$object->id;
2898 include DOL_DOCUMENT_ROOT.
'/core/tpl/card_presend.tpl.php';