dolibarr 18.0.6
website_options.php
1<?php
2/* Copyright (C) 2004-2017 Laurent Destailleur <eldy@users.sourceforge.net>
3 *
4 * This program is free software; you can redistribute it and/or modify
5 * it under the terms of the GNU General Public License as published by
6 * the Free Software Foundation; either version 3 of the License, or
7 * (at your option) any later version.
8 *
9 * This program is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 * GNU General Public License for more details.
13 *
14 * You should have received a copy of the GNU General Public License
15 * along with this program. If not, see <https://www.gnu.org/licenses/>.
16 */
17
24// Load Dolibarr environment
25require '../main.inc.php';
26require_once DOL_DOCUMENT_ROOT.'/core/class/html.formadmin.class.php';
27require_once DOL_DOCUMENT_ROOT.'/core/class/html.formcompany.class.php';
28require_once DOL_DOCUMENT_ROOT.'/core/lib/admin.lib.php';
29require_once DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php';
30require_once DOL_DOCUMENT_ROOT.'/core/lib/website.lib.php';
31require_once DOL_DOCUMENT_ROOT.'/core/lib/functions2.lib.php';
32require_once DOL_DOCUMENT_ROOT.'/core/class/doleditor.class.php';
33require_once DOL_DOCUMENT_ROOT.'/website/class/website.class.php';
34
35// Load translation files required by the page
36$langs->loadLangs(array('errors', 'admin', 'companies', 'website'));
37
38$action = GETPOST('action', 'alpha') ?GETPOST('action', 'alpha') : 'view';
39$confirm = GETPOST('confirm', 'alpha');
40$backtopage = GETPOST('backtopage', 'alpha');
41
42$rowid = GETPOST('rowid', 'alpha');
43
44if (!$user->admin) {
46}
47
48$status = 1;
49
50// Load variable for pagination
51$limit = GETPOST('limit', 'int') ?GETPOST('limit', 'int') : $conf->liste_limit;
52$sortfield = GETPOST('sortfield', 'aZ09comma');
53$sortorder = GETPOST('sortorder', 'aZ09comma');
54$page = GETPOSTISSET('pageplusone') ? (GETPOST('pageplusone') - 1) : GETPOST("page", 'int');
55if (empty($page) || $page == -1) {
56 $page = 0;
57} // If $page is not defined, or '' or -1
58$offset = $limit * $page;
59$pageprev = $page - 1;
60$pagenext = $page + 1;
61
62// Initialize technical object to manage hooks of page. Note that conf->hooks_modules contains array of hook context
63$hookmanager->initHooks(array('admin'));
64
65$arrayofparameters = array('WEBSITE_USE_WEBSITE_ACCOUNTS'=>array('css'=>'minwidth200'));
66
67
68/*
69 * Actions
70 */
71
72include DOL_DOCUMENT_ROOT.'/core/actions_setmoduleoptions.inc.php';
73
74
75/*
76 * View
77 */
78
79$form = new Form($db);
80$formadmin = new FormAdmin($db);
81
82llxHeader('', $langs->trans("WebsiteSetup"));
83
84$titre = $langs->trans("WebsiteSetup");
85$linkback = '<a href="'.($backtopage ? $backtopage : DOL_URL_ROOT.'/admin/modules.php').'">'.$langs->trans("BackToModuleList").'</a>';
86print load_fiche_titre($titre, $linkback, 'title_setup');
87
88// Onglets
89$head = array();
90$h = 0;
91
92$head[$h][0] = DOL_URL_ROOT."/admin/website.php";
93$head[$h][1] = $langs->trans("WebSites");
94$head[$h][2] = 'website';
95$h++;
96
97$head[$h][0] = DOL_URL_ROOT."/admin/website_options.php";
98$head[$h][1] = $langs->trans("Options");
99$head[$h][2] = 'options';
100$h++;
101
102print dol_get_fiche_head($head, 'options', '', -1);
103
104
105if ($action == 'edit') {
106 print '<form method="POST" action="'.$_SERVER["PHP_SELF"].'">';
107 print '<input type="hidden" name="token" value="'.newToken().'">';
108 print '<input type="hidden" name="action" value="update">';
109
110 print '<table class="noborder centpercent">';
111 print '<tr class="liste_titre"><td class="titlefield">'.$langs->trans("Parameter").'</td><td>'.$langs->trans("Value").'</td></tr>';
112
113 foreach ($arrayofparameters as $key => $val) {
114 print '<tr class="oddeven"><td>';
115 print $form->textwithpicto($langs->trans($key), $langs->trans($key.'Tooltip'));
116 print '</td><td><input name="'.$key.'" class="flat '.(empty($val['css']) ? 'minwidth200' : $val['css']).'" value="'.getDolGlobalString($key).'"></td></tr>';
117 }
118
119 print '</table>';
120
121 print '<br><div class="center">';
122 print '<input class="button button-save" type="submit" value="'.$langs->trans("Save").'">';
123 print '</div>';
124
125 print '</form>';
126 print '<br>';
127} else {
128 print '<table class="noborder centpercent">';
129 print '<tr class="liste_titre"><td class="titlefield">'.$langs->trans("Parameter").'</td><td>'.$langs->trans("Value").'</td></tr>';
130
131 foreach ($arrayofparameters as $key => $val) {
132 print '<tr class="oddeven"><td>';
133 print $form->textwithpicto($langs->trans($key), $langs->trans($key.'Tooltip'));
134 print '</td><td>'.getDolGlobalString($key).'</td></tr>';
135 }
136
137 print '</table>';
138
139 print '<div class="tabsAction">';
140 print '<a class="butAction" href="'.$_SERVER["PHP_SELF"].'?action=edit&token='.newToken().'">'.$langs->trans("Modify").'</a>';
141 print '</div>';
142}
143
144
145print dol_get_fiche_end();
146
147// End of page
148llxFooter();
149$db->close();
if(!defined('NOREQUIRESOC')) if(!defined( 'NOREQUIRETRAN')) if(!defined('NOTOKENRENEWAL')) if(!defined( 'NOREQUIREMENU')) if(!defined('NOREQUIREHTML')) if(!defined( 'NOREQUIREAJAX')) llxHeader()
Empty header.
Definition wrapper.php:56
llxFooter()
Empty footer.
Definition wrapper.php:70
Class to generate html code for admin pages.
Class to manage generation of HTML components Only common components must be here.
load_fiche_titre($titre, $morehtmlright='', $picto='generic', $pictoisfullpath=0, $id='', $morecssontable='', $morehtmlcenter='')
Load a title with picto.
dol_get_fiche_head($links=array(), $active='', $title='', $notab=0, $picto='', $pictoisfullpath=0, $morehtmlright='', $morecss='', $limittoshow=0, $moretabssuffix='', $dragdropfile=0)
Show tabs of a record.
dol_get_fiche_end($notab=0)
Return tab footer of a card.
GETPOST($paramname, $check='alphanohtml', $method=0, $filter=null, $options=null, $noreplace=0)
Return value of a param into GET or POST supervariable.
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.