* Copyright (C) 2013-2015 Alexandre Spangaro * Copyright (C) 2014 Florian Henry * Copyright (C) 2014 Marcos García * Copyright (C) 2014 Juanjo Menent * Copyright (C) 2015 Jean-François Ferry * * 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 htdocs/accountancy/admin/export.php * \ingroup Advanced accountancy * \brief Setup page to configure accounting expert module */ require '../../main.inc.php'; // Class require_once DOL_DOCUMENT_ROOT . '/core/lib/admin.lib.php'; require_once DOL_DOCUMENT_ROOT . '/core/lib/accounting.lib.php'; require_once DOL_DOCUMENT_ROOT . '/accountancy/class/accountancyexport.class.php'; $langs->load("compta"); $langs->load("bills"); $langs->load("admin"); $langs->load("accountancy"); // Security check if (empty($user->admin) && empty($user->rights->accounting->chartofaccount)) { accessforbidden(); } $action = GETPOST('action', 'alpha'); // Parameters ACCOUNTING_EXPORT_* $main_option = array ( 'ACCOUNTING_EXPORT_PREFIX_SPEC' ); $model_option = array ( 'ACCOUNTING_EXPORT_SEPARATORCSV', 'ACCOUNTING_EXPORT_DATE' /* 'ACCOUNTING_EXPORT_PIECE', 'ACCOUNTING_EXPORT_GLOBAL_ACCOUNT', 'ACCOUNTING_EXPORT_LABEL', 'ACCOUNTING_EXPORT_AMOUNT', 'ACCOUNTING_EXPORT_DEVISE' */ ); /* * Actions */ if ($action == 'update') { $error = 0; $format = GETPOST('format', 'alpha'); $modelcsv = GETPOST('modelcsv', 'int'); if (! empty($format)) { if (! dolibarr_set_const($db, 'ACCOUNTING_EXPORT_FORMAT', $format, 'chaine', 0, '', $conf->entity)) { $error ++; } } else { $error ++; } if (! empty($modelcsv)) { if (! dolibarr_set_const($db, 'ACCOUNTING_EXPORT_MODELCSV', $modelcsv, 'chaine', 0, '', $conf->entity)) { $error ++; } if ($modelcsv==AccountancyExport::$EXPORT_TYPE_QUADRATUS || $modelcsv==AccountancyExport::$EXPORT_TYPE_CIEL) { dolibarr_set_const($db, 'ACCOUNTING_EXPORT_FORMAT', 'txt', 'chaine', 0, '', $conf->entity); } } else { $error ++; } foreach ( $main_option as $constname ) { $constvalue = GETPOST($constname, 'alpha'); if (! dolibarr_set_const($db, $constname, $constvalue, 'chaine', 0, '', $conf->entity)) { $error ++; } } foreach ( $model_option as $constname ) { $constvalue = GETPOST($constname, 'alpha'); if (! dolibarr_set_const($db, $constname, $constvalue, 'chaine', 0, '', $conf->entity)) { $error ++; } } if (! $error) { setEventMessages($langs->trans("SetupSaved"), null, 'mesgs'); } else { setEventMessages($langs->trans("Error"), null, 'errors'); } } /* * View */ llxHeader(); $form = new Form($db); $linkback = '' . $langs->trans("BackToModuleList") . ''; print load_fiche_titre($langs->trans('ConfigAccountingExpert'), $linkback, 'title_setup'); $head = admin_accounting_prepare_head(); print '

'; print ''; print ''; dol_fiche_head($head, 'export', $langs->trans("Configuration"), -1, 'cron'); $var = true; /* * Main Options */ print ''; print ''; print ''; print "\n"; $var = ! $var; $num = count($main_option); if ($num) { foreach ( $main_option as $key ) { print ''; // Param $label = $langs->trans($key); print ''; // Value print ''; } } print "

' . $langs->trans('Options') . '
' . $label . '	'; print ''; print '

\n"; print "
\n"; /* * Export model */ print ''; print ''; print ''; print ''; $var = ! $var; print ''; print ''; if (! $conf->use_javascript_ajax) { print '"; } else { print ''; } print ""; print "

' . $langs->trans("Modelcsv") . '
' . $langs->trans("Selectmodelcsv") . '	'; print $langs->trans("NotAvailableWhenAjaxDisabled"); print "	'; $listmodelcsv = AccountancyExport::getType(); print $form->selectarray("modelcsv", $listmodelcsv, $conf->global->ACCOUNTING_EXPORT_MODELCSV, 0); print '

"; print "
\n"; /* * Parameters */ $num2 = count($model_option); if ($num2) { print ''; print ''; print ''; print "\n"; if ($conf->global->ACCOUNTING_EXPORT_MODELCSV > AccountancyExport::$EXPORT_TYPE_NORMAL) { print ''; } print ''; print ''; if (! $conf->use_javascript_ajax) { print '"; } else { print ''; } print ""; foreach ( $model_option as $key ) { print ''; // Param $label = $langs->trans($key); print ''; // Value print ''; } print "

' . $langs->trans('OtherOptions') . '
' . $langs->trans('OptionsDeactivatedForThisExportModel') . '
' . $langs->trans("Selectformat") . '	'; print $langs->trans("NotAvailableWhenAjaxDisabled"); print "	'; $listformat = array ( 'csv' => $langs->trans("csv"), 'txt' => $langs->trans("txt") ); print $form->selectarray("format", $listformat, $conf->global->ACCOUNTING_EXPORT_FORMAT, 0); print '
' . $label . '	'; print ''; print '

\n"; } dol_fiche_end(); print '

'; print '

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