* * 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/closure.php * \ingroup Accountancy (Double entries) * \brief Setup page to configure accounting expert module */ require '../../main.inc.php'; 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 . '/core/class/html.formaccounting.class.php'; // Load translation files required by the page $langs->loadLangs(array("compta","admin","accountancy")); // Security check if (empty($user->rights->accounting->chartofaccount)) { accessforbidden(); } $action = GETPOST('action', 'aZ09'); $list_account_main = array ( 'ACCOUNTING_RESULT_PROFIT', 'ACCOUNTING_RESULT_LOSS' ); /* * Actions */ if ($action == 'update') { $error = 0; $defaultjournal = GETPOST('ACCOUNTING_CLOSURE_DEFAULT_JOURNAL', 'alpha'); if (! empty($defaultjournal)) { if (! dolibarr_set_const($db, 'ACCOUNTING_CLOSURE_DEFAULT_JOURNAL', $defaultjournal, 'chaine', 0, '', $conf->entity)) { $error ++; } } else { $error ++; } foreach ($list_account_main 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 */ $form = new Form($db); $formaccounting = new FormAccounting($db); llxHeader(); $linkback = ''; print load_fiche_titre($langs->trans('MenuClosureAccounts'), $linkback, 'title_accountancy'); print ''.$langs->trans("DefaultClosureDesc").'
'; print '
'; print '

'; print ''; print ''; // Define main accounts for closure print ''; foreach ($list_account_main as $key) { print ''; // Param $label = $langs->trans($key); $keydesc=$key.'_Desc'; $htmltext = $langs->trans($keydesc); print ''; // Value print ''; print ''; } // Journal print ''; print ''; print ''; print "

'; print $form->textwithpicto($label, $htmltext); print '	'; // Do not force class=right, or it align also the content of the select box print $formaccounting->select_account($conf->global->$key, $key, 1, '', 1, 1); print '
' . $langs->trans("ACCOUNTING_CLOSURE_DEFAULT_JOURNAL") . '	'; $defaultjournal=$conf->global->ACCOUNTING_CLOSURE_DEFAULT_JOURNAL; print $formaccounting->select_journal($defaultjournal, "ACCOUNTING_CLOSURE_DEFAULT_JOURNAL", 9, 1, 0, 0); print '

\n"; print '

'; print '

'; // End of page llxFooter(); $db->close();