* * 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 2 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, write to the Free Software * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. * * $Id$ * $Source$ */ /** \file htdocs/admin/droitpret.php \ingroup pret \brief Page d'administration/configuration du module DroitPret \version $Revision$ */ require("./pre.inc.php"); require_once(DOL_DOCUMENT_ROOT."/lib/admin.lib.php"); require_once(DOL_DOCUMENT_ROOT."/categories/categorie.class.php"); $langs->load("admin"); $langs->load("categories"); if (!$user->admin) accessforbidden(); // positionne la variable pour le test d'affichage de l'icone $var=True; // Action mise a jour ou ajout d'une constante if ($_POST["action"] == 'update' || $_POST["action"] == 'add') { if (! dolibarr_set_const($db, $_POST["constname"],$_POST["constvalue"],$_POST["consttype"],0,isset($_POST["constnote"])?$_POST["constnote"]:'')) { print $db->error(); } else { Header("Location: droitpret.php"); exit; } } llxHeader(); /* * Interface de configuration de certaines variables de la partie adherent */ $linkback=''.$langs->trans("BackToModuleList").''; print_fiche_titre($langs->trans("PretSetup"),$linkback,'setup'); print "
"; print_fiche_titre($langs->trans("MemberMainOptions")); print ''; print ''; print ''; print ''; print ''; print "\n"; $var=true; $form = new Form($db); // Cat�gorie $var=!$var; print ''; print ''; print ''; print ''; print ''; print "\n"; print ''; // Adresse destination $var=!$var; print ''; print ''; print ''; print ''; print ''; print "'; print ''; print '\n"; print ''; print '
'.$langs->trans("Description").''.$langs->trans("Value").''.$langs->trans("Action").'
".$langs->trans("catActive").''; print $form->select_all_categories(2,$conf->global->DROITPRET_CAT,"constvalue"); print ''; print ''; print "
".$langs->trans("mailDroitPret").''; print ''; print "
'; print '
'; ?>