26require
'../main.inc.php';
29require_once DOL_DOCUMENT_ROOT.
'/core/lib/admin.lib.php';
30if (isModEnabled(
'accounting')) {
31 require_once DOL_DOCUMENT_ROOT.
'/core/class/html.formaccounting.class.php';
35$langs->loadLangs(array(
'admin',
'loan'));
42$action =
GETPOST(
'action',
'aZ09');
46 'LOAN_ACCOUNTING_ACCOUNT_CAPITAL',
47 'LOAN_ACCOUNTING_ACCOUNT_INTEREST',
48 'LOAN_ACCOUNTING_ACCOUNT_INSURANCE'
55if ($action ==
'update') {
58 foreach ($list as $constname) {
59 $constvalue =
GETPOST($constname,
'alpha');
61 if (!
dolibarr_set_const($db, $constname, $constvalue,
'chaine', 0,
'', $conf->entity)) {
77llxHeader(
'',
'',
'',
'', 0, 0,
'',
'',
'',
'mod-admin page-loan');
80if (isModEnabled(
'accounting')) {
84$linkback =
'<a href="'.DOL_URL_ROOT.
'/admin/modules.php?restore_lastsearch_values=1">'.$langs->trans(
"BackToModuleList").
'</a>';
85print
load_fiche_titre($langs->trans(
'ConfigLoan'), $linkback,
'title_setup');
87print
'<form action="'.$_SERVER[
"PHP_SELF"].
'" method="post">';
88print
'<input type="hidden" name="token" value="'.newToken().
'">';
89print
'<input type="hidden" name="action" value="update">';
94print
'<table class="noborder centpercent">';
95print
'<tr class="liste_titre">';
96print
'<td colspan="3">'.$langs->trans(
'Options').
'</td>';
99foreach ($list as $key) {
100 print
'<tr class="oddeven value">';
103 $label = $langs->trans($key);
104 print
'<td><label for="' . $key .
'">' . $label .
'</label></td>';
108 if (isModEnabled(
'accounting')) {
111 print
'<input type="text" size="20" id="' . $key .
'" name="' . $key .
'" value="' .
getDolGlobalString($key) .
'">';
121print
'<br><div style="text-align:center"><input type="submit" class="button button-edit" name="button" value="'.$langs->trans(
'Modify').
'"></div>';
dolibarr_set_const($db, $name, $value, $type='chaine', $visible=0, $note='', $entity=1)
Insert a parameter (key,value) into database (delete old key then insert it again).
if(!defined('NOREQUIRESOC')) if(!defined( 'NOREQUIRETRAN')) if(!defined('NOTOKENRENEWAL')) if(!defined( 'NOREQUIREMENU')) if(!defined('NOREQUIREHTML')) if(!defined( 'NOREQUIREAJAX')) llxHeader()
Empty header.
load_fiche_titre($title, $morehtmlright='', $picto='generic', $pictoisfullpath=0, $id='', $morecssontable='', $morehtmlcenter='')
Load a title with picto.
GETPOST($paramname, $check='alphanohtml', $method=0, $filter=null, $options=null, $noreplace=0)
Return value of a param into GET or POST supervariable.
setEventMessages($mesg, $mesgs, $style='mesgs', $messagekey='', $noduplicate=0)
Set event messages in dol_events session object.
getDolGlobalString($key, $default='')
Return dolibarr global constant string value.
accessforbidden($message='', $printheader=1, $printfooter=1, $showonlymessage=0, $params=null)
Show a message to say access is forbidden and stop program.