* * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 3 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ /** * \file admin/setup.php * \ingroup exportzugferd * \brief ExportZugferd setup page */ // Load Dolibarr environment $res = 0; if (!$res && !empty($_SERVER["CONTEXT_DOCUMENT_ROOT"])) { $res = @include $_SERVER["CONTEXT_DOCUMENT_ROOT"]."/main.inc.php"; } $tmp = empty($_SERVER['SCRIPT_FILENAME']) ? '' : $_SERVER['SCRIPT_FILENAME']; $tmp2 = realpath(__FILE__); $i = strlen($tmp) - 1; $j = strlen($tmp2) - 1; while ($i > 0 && $j > 0 && isset($tmp[$i]) && isset($tmp2[$j]) && $tmp[$i] == $tmp2[$j]) { $i--; $j--; } if (!$res && $i > 0 && file_exists(substr($tmp, 0, ($i + 1))."/main.inc.php")) { $res = @include substr($tmp, 0, ($i + 1))."/main.inc.php"; } if (!$res && $i > 0 && file_exists(dirname(substr($tmp, 0, ($i + 1)))."/main.inc.php")) { $res = @include dirname(substr($tmp, 0, ($i + 1)))."/main.inc.php"; } if (!$res && file_exists("../main.inc.php")) { $res = @include "../main.inc.php"; } if (!$res && file_exists("../../main.inc.php")) { $res = @include "../../main.inc.php"; } if (!$res && file_exists("../../../main.inc.php")) { $res = @include "../../../main.inc.php"; } if (!$res) { die("Include of main fails"); } require_once DOL_DOCUMENT_ROOT . '/core/lib/admin.lib.php'; require_once __DIR__ . '/../lib/exportzugferd.lib.php'; // Security check if (!$user->admin) { accessforbidden(); } $langs->loadLangs(array('admin', 'exportzugferd@exportzugferd')); $action = GETPOST('action', 'aZ09'); // Available profiles $profiles = array( 'MINIMUM' => 'ZUGFeRD Minimum', 'BASIC WL' => 'ZUGFeRD Basic WL', 'BASIC' => 'ZUGFeRD Basic', 'EN16931' => 'ZUGFeRD EN16931 (Comfort)', 'EXTENDED' => 'ZUGFeRD Extended', 'XRECHNUNG' => 'XRechnung 3.0', ); /* * Actions */ if ($action == 'update') { $error = 0; $profile = GETPOST('EXPORTZUGFERD_PROFILE', 'alpha'); $autoGenerate = GETPOSTINT('EXPORTZUGFERD_AUTO_GENERATE'); $embedPdf = GETPOSTINT('EXPORTZUGFERD_EMBED_IN_PDF'); $deleteXmlAfterEmbed = GETPOSTINT('EXPORTZUGFERD_DELETE_XML_AFTER_EMBED'); $attachToEmail = GETPOSTINT('EXPORTZUGFERD_ATTACH_TO_EMAIL'); if (!$error) { $result = dolibarr_set_const($db, 'EXPORTZUGFERD_PROFILE', $profile, 'chaine', 0, '', $conf->entity); if ($result < 0) { $error++; } } if (!$error) { $result = dolibarr_set_const($db, 'EXPORTZUGFERD_AUTO_GENERATE', $autoGenerate, 'chaine', 0, '', $conf->entity); if ($result < 0) { $error++; } } if (!$error) { $result = dolibarr_set_const($db, 'EXPORTZUGFERD_EMBED_IN_PDF', $embedPdf, 'chaine', 0, '', $conf->entity); if ($result < 0) { $error++; } } if (!$error) { $result = dolibarr_set_const($db, 'EXPORTZUGFERD_DELETE_XML_AFTER_EMBED', $deleteXmlAfterEmbed, 'chaine', 0, '', $conf->entity); if ($result < 0) { $error++; } } if (!$error) { $result = dolibarr_set_const($db, 'EXPORTZUGFERD_ATTACH_TO_EMAIL', $attachToEmail, 'chaine', 0, '', $conf->entity); if ($result < 0) { $error++; } } if (!$error) { setEventMessages($langs->trans('SetupSaved'), null, 'mesgs'); } else { setEventMessages($langs->trans('Error'), null, 'errors'); } } /* * View */ $page_name = 'ExportZugferdSetup'; llxHeader('', $langs->trans($page_name), '', '', 0, 0, '', '', '', 'mod-exportzugferd page-admin-setup'); // Subheader $linkback = '' . $langs->trans('BackToModuleList') . ''; print load_fiche_titre($langs->trans($page_name), $linkback, 'title_setup'); // Configuration header $head = exportzugferd_admin_prepare_head(); print dol_get_fiche_head($head, 'settings', $langs->trans('ExportZugferd'), -1, 'fa-file-export'); print '

'; print ''; print ''; print ''; // Profile selection print ''; print ''; print ''; print ''; print ''; print ''; print ''; // Auto-generate print ''; print ''; print ''; print ''; // Embed in PDF print ''; print ''; print ''; print ''; // Delete XML after embedding print ''; print ''; print ''; print ''; // Attach to Email print ''; print ''; print ''; print ''; print '

' . $langs->trans('GeneralSettings') . '
' . $langs->trans('ZugferdProfile') . '	'; print ''; print '
' . $langs->trans('AutoGenerateZugferd') . '	'; print $form->selectyesno('EXPORTZUGFERD_AUTO_GENERATE', getDolGlobalInt('EXPORTZUGFERD_AUTO_GENERATE', 0), 1); print ' - ' . $langs->trans('AutoGenerateZugferdDesc') . ''; print '
' . $langs->trans('EmbedXMLInPDF') . '	'; print $form->selectyesno('EXPORTZUGFERD_EMBED_IN_PDF', getDolGlobalInt('EXPORTZUGFERD_EMBED_IN_PDF', 0), 1); print ' - ' . $langs->trans('EmbedXMLInPDFDesc') . ''; print '
' . $langs->trans('DeleteXMLAfterEmbed') . '	'; print $form->selectyesno('EXPORTZUGFERD_DELETE_XML_AFTER_EMBED', getDolGlobalInt('EXPORTZUGFERD_DELETE_XML_AFTER_EMBED', 0), 1); print ' - ' . $langs->trans('DeleteXMLAfterEmbedDesc') . ''; print '
' . $langs->trans('AttachZugferdToEmail') . '	'; print $form->selectyesno('EXPORTZUGFERD_ATTACH_TO_EMAIL', getDolGlobalInt('EXPORTZUGFERD_ATTACH_TO_EMAIL', 0), 1); print ' - ' . $langs->trans('AttachZugferdToEmailDesc') . ''; print '

'; print '
'; print '

'; print ''; print '

'; print '

'; // Info section print '
'; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print ''; print '

' . $langs->trans('Information') . '
' . $langs->trans('SupportedProfiles') . '	'; print ' '; print ' ZUGFeRD Minimum: ' . $langs->trans('ProfileMinimumDesc') . ' '; print ' ZUGFeRD Basic: ' . $langs->trans('ProfileBasicDesc') . ' '; print ' ZUGFeRD EN16931: ' . $langs->trans('ProfileEN16931Desc') . ' '; print ' XRechnung: ' . $langs->trans('ProfileXRechnungDesc') . ' '; print ' '; print '

'; print dol_get_fiche_end(); llxFooter(); $db->close();