dolibarr 19.0.4
card.php
Go to the documentation of this file.
1<?php
2/* Copyright (C) 2005 Matthieu Valleton <mv@seeschloss.org>
3 * Copyright (C) 2006-2021 Laurent Destailleur <eldy@users.sourceforge.net>
4 * Copyright (C) 2005-2014 Regis Houssin <regis.houssin@inodbox.com>
5 * Copyright (C) 2007 Patrick Raguin <patrick.raguin@gmail.com>
6 * Copyright (C) 2013 Florian Henry <florian.henry@open-concept.pro>
7 * Copyright (C) 2015 Raphaël Doursenaud <rdoursenaud@gpcsolutions.fr>
8 * Copyright (C) 2020 Frédéric France <frederic.france@netlogic.fr>
9 *
10 * This program is free software; you can redistribute it and/or modify
11 * it under the terms of the GNU General Public License as published by
12 * the Free Software Foundation; either version 3 of the License, or
13 * (at your option) any later version.
14 *
15 * This program is distributed in the hope that it will be useful,
16 * but WITHOUT ANY WARRANTY; without even the implied warranty of
17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 * GNU General Public License for more details.
19 *
20 * You should have received a copy of the GNU General Public License
21 * along with this program. If not, see <https://www.gnu.org/licenses/>.
22 */
23
30// Load Dolibarr environment
31require '../main.inc.php';
32require_once DOL_DOCUMENT_ROOT.'/categories/class/categorie.class.php';
33require_once DOL_DOCUMENT_ROOT.'/core/class/extrafields.class.php';
34require_once DOL_DOCUMENT_ROOT.'/core/class/html.formother.class.php';
35
36// Load translation files required by the page
37$langs->load("categories");
38
39// Security check
40$socid = (int) GETPOST('socid', 'int');
41if (!$user->hasRight('categorie', 'lire')) {
43}
44
45$action = GETPOST('action', 'alpha');
46$cancel = GETPOST('cancel', 'alpha');
47$origin = GETPOST('origin', 'alpha');
48$catorigin = (int) GETPOST('catorigin', 'int');
49$type = GETPOST('type', 'aZ09');
50$urlfrom = GETPOST('urlfrom', 'alpha');
51$backtopage = GETPOST('backtopage', 'alpha');
52
53$label = (string) GETPOST('label', 'alphanohtml');
54$description = (string) GETPOST('description', 'restricthtml');
55$color = preg_replace('/[^0-9a-f#]/i', '', (string) GETPOST('color', 'alphanohtml'));
56$visible = (int) GETPOST('visible', 'int');
57$parent = (int) GETPOST('parent', 'int');
58
59if ($origin) {
60 if ($type == Categorie::TYPE_PRODUCT) {
61 $idProdOrigin = $origin;
62 }
63 if ($type == Categorie::TYPE_SUPPLIER) {
64 $idSupplierOrigin = $origin;
65 }
66 if ($type == Categorie::TYPE_CUSTOMER) {
67 $idCompanyOrigin = $origin;
68 }
69 if ($type == Categorie::TYPE_MEMBER) {
70 $idMemberOrigin = $origin;
71 }
72 if ($type == Categorie::TYPE_CONTACT) {
73 $idContactOrigin = $origin;
74 }
75 if ($type == Categorie::TYPE_PROJECT) {
76 $idProjectOrigin = $origin;
77 }
78}
79
80if ($catorigin && $type == Categorie::TYPE_PRODUCT) {
81 $idCatOrigin = $catorigin;
82}
83
84$object = new Categorie($db);
85
86$extrafields = new ExtraFields($db);
87$extrafields->fetch_name_optionals_label($object->table_element);
88
89// Initialize technical object to manage hooks. Note that conf->hooks_modules contains array array
90$hookmanager->initHooks(array('categorycard'));
91
92$error = 0;
93
94
95/*
96 * Actions
97 */
98$parameters = array('socid' => $socid, 'origin' => $origin, 'catorigin' => $catorigin, 'type' => $type, 'urlfrom' => $urlfrom, 'backtopage' => $backtopage, 'label' => $label, 'description' => $description, 'color' => $color, 'visible' => $visible, 'parent' => $parent);
99// Note that $action and $object may be modified by some hooks
100$reshook = $hookmanager->executeHooks('doActions', $parameters, $object, $action);
101if ($reshook < 0) {
102 setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
103}
104
105if (empty($reshook)) {
106 // Add action
107 if ($action == 'add' && $user->hasRight('categorie', 'creer')) {
108 // Action add a category
109 if ($cancel) {
110 if ($urlfrom) {
111 header("Location: ".$urlfrom);
112 exit;
113 } elseif ($backtopage) {
114 header("Location: ".$backtopage);
115 exit;
116 } elseif ($idProdOrigin) {
117 header("Location: ".DOL_URL_ROOT.'/categories/viewcat.php?id='.$idProdOrigin.'&type='.$type);
118 exit;
119 } elseif ($idCompanyOrigin) {
120 header("Location: ".DOL_URL_ROOT.'/categories/viewcat.php?id='.$idCompanyOrigin.'&type='.$type);
121 exit;
122 } elseif ($idSupplierOrigin) {
123 header("Location: ".DOL_URL_ROOT.'/categories/viewcat.php?id='.$idSupplierOrigin.'&type='.$type);
124 exit;
125 } elseif ($idMemberOrigin) {
126 header("Location: ".DOL_URL_ROOT.'/categories/viewcat.php?id='.$idMemberOrigin.'&type='.$type);
127 exit;
128 } elseif ($idContactOrigin) {
129 header("Location: ".DOL_URL_ROOT.'/categories/viewcat.php?id='.$idContactOrigin.'&type='.$type);
130 exit;
131 } elseif ($idProjectOrigin) {
132 header("Location: ".DOL_URL_ROOT.'/categories/viewcat.php?id='.$idProjectOrigin.'&type='.$type);
133 exit;
134 } else {
135 header("Location: ".DOL_URL_ROOT.'/categories/index.php?leftmenu=cat&type='.$type);
136 exit;
137 }
138 }
139 $object->label = $label;
140 $object->color = $color;
141 $object->description = dol_htmlcleanlastbr($description);
142 $object->socid = ($socid > 0 ? $socid : 0);
143 $object->visible = $visible;
144 $object->type = $type;
145
146 if ($parent != "-1") {
147 $object->fk_parent = $parent;
148 }
149
150 $ret = $extrafields->setOptionalsFromPost(null, $object);
151 if ($ret < 0) {
152 $error++;
153 }
154
155 if (!$object->label) {
156 $error++;
157 setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentities("Ref")), null, 'errors');
158 $action = 'create';
159 }
160
161 // Create category in database
162 if (!$error) {
163 $result = $object->create($user);
164 if ($result > 0) {
165 $action = 'confirmed';
166 $_POST["addcat"] = '';
167 } else {
168 setEventMessages($object->error, $object->errors, 'errors');
169 }
170 }
171 }
172 // Confirm action
173 if (($action == 'add' || $action == 'confirmed') && $user->hasRight('categorie', 'creer')) {
174 // Action confirmation of creation category
175 if ($action == 'confirmed') {
176 if ($urlfrom) {
177 header("Location: ".$urlfrom);
178 exit;
179 } elseif ($backtopage) {
180 header("Location: ".$backtopage);
181 exit;
182 } elseif ($idProdOrigin) {
183 header("Location: ".DOL_URL_ROOT.'/categories/viewcat.php?id='.$idProdOrigin.'&type='.$type.'&mesg='.urlencode($langs->trans("CatCreated")));
184 exit;
185 } elseif ($idCompanyOrigin) {
186 header("Location: ".DOL_URL_ROOT.'/categories/viewcat.php?id='.$idCompanyOrigin.'&type='.$type.'&mesg='.urlencode($langs->trans("CatCreated")));
187 exit;
188 } elseif ($idSupplierOrigin) {
189 header("Location: ".DOL_URL_ROOT.'/categories/viewcat.php?id='.$idSupplierOrigin.'&type='.$type.'&mesg='.urlencode($langs->trans("CatCreated")));
190 exit;
191 } elseif ($idMemberOrigin) {
192 header("Location: ".DOL_URL_ROOT.'/categories/viewcat.php?id='.$idMemberOrigin.'&type='.$type.'&mesg='.urlencode($langs->trans("CatCreated")));
193 exit;
194 } elseif ($idContactOrigin) {
195 header("Location: ".DOL_URL_ROOT.'/categories/viewcat.php?id='.$idContactOrigin.'&type='.$type.'&mesg='.urlencode($langs->trans("CatCreated")));
196 exit;
197 } elseif ($idProjectOrigin) {
198 header("Location: ".DOL_URL_ROOT.'/categories/viewcat.php?id='.$idProjectOrigin.'&type='.$type.'&mesg='.urlencode($langs->trans("CatCreated")));
199 exit;
200 }
201
202 header("Location: ".DOL_URL_ROOT.'/categories/viewcat.php?id='.$result.'&type='.$type);
203 exit;
204 }
205 }
206}
207
208/*
209 * View
210 */
211
212$form = new Form($db);
213$formother = new FormOther($db);
214
215$help_url = 'EN:Module_Categories|FR:Module_Catégories|DE:Modul_Kategorien';
216
217llxHeader("", $langs->trans("Categories"), $help_url);
218
219if ($user->hasRight('categorie', 'creer')) {
220 // Create or add
221 if ($action == 'create' || GETPOST("addcat") == 'addcat') {
222 dol_set_focus('#label');
223
224 print '<form action="'.$_SERVER['PHP_SELF'].'?type='.$type.'" method="POST">';
225 print '<input type="hidden" name="token" value="'.newToken().'">';
226 print '<input type="hidden" name="urlfrom" value="'.$urlfrom.'">';
227 print '<input type="hidden" name="action" value="add">';
228 print '<input type="hidden" name="addcat" value="addcat">';
229 print '<input type="hidden" name="id" value="'.GETPOST('origin', 'alpha').'">';
230 print '<input type="hidden" name="type" value="'.$type.'">';
231 print '<input type="hidden" name="backtopage" value="'.$backtopage.'">';
232 if ($origin) {
233 print '<input type="hidden" name="origin" value="'.$origin.'">';
234 }
235 if ($catorigin) {
236 print '<input type="hidden" name="catorigin" value="'.$catorigin.'">';
237 }
238
239 print load_fiche_titre($langs->trans("CreateCat"));
240
241 print dol_get_fiche_head('');
242
243 print '<table width="100%" class="border">';
244
245 // Ref
246 print '<tr>';
247 print '<td class="titlefieldcreate fieldrequired">'.$langs->trans("Ref").'</td><td><input id="label" class="minwidth100" name="label" value="'.dol_escape_htmltag($label).'">';
248 print'</td></tr>';
249
250 // Description
251 print '<tr><td class="tdtop">'.$langs->trans("Description").'</td><td>';
252 require_once DOL_DOCUMENT_ROOT.'/core/class/doleditor.class.php';
253 $doleditor = new DolEditor('description', $description, '', 160, 'dolibarr_notes', '', false, true, getDolGlobalInt('FCKEDITOR_ENABLE_SOCIETE'), ROWS_5, '90%');
254 $doleditor->Create();
255 print '</td></tr>';
256
257 // Color
258 print '<tr><td>'.$langs->trans("Color").'</td><td>';
259 print $formother->selectColor($color, 'color');
260 print '</td></tr>';
261
262 // Parent category
263 print '<tr><td>'.$langs->trans("AddIn").'</td><td>';
264 print img_picto($langs->trans("ParentCategory"), 'category', 'class="pictofixedwidth"');
265 print $form->select_all_categories($type, $catorigin, 'parent');
266 print ajax_combobox('parent');
267 print '</td></tr>';
268
269 $parameters = array();
270 $reshook = $hookmanager->executeHooks('formObjectOptions', $parameters, $object, $action); // Note that $action and $object may have been modified by hook
271 print $hookmanager->resPrint;
272 if (empty($reshook)) {
273 print $object->showOptionals($extrafields, 'create', $parameters);
274 }
275
276 print '</table>';
277
278 print dol_get_fiche_end('');
279
280 print '<div class="center">';
281 print '<input type="submit" class="button b" value="'.$langs->trans("CreateThisCat").'" name="creation" />';
282 print '&nbsp; &nbsp; &nbsp;';
283 print '<input type="submit" class="button button-cancel" value="'.$langs->trans("Cancel").'" name="cancel" />';
284 print '</div>';
285
286 print '</form>';
287 }
288}
289
290// End of page
291llxFooter();
292$db->close();
ajax_combobox($htmlname, $events=array(), $minLengthToAutocomplete=0, $forcefocus=0, $widthTypeOfAutocomplete='resolve', $idforemptyvalue='-1', $morecss='')
Convert a html select field into an ajax combobox.
Definition ajax.lib.php:455
if(!defined('NOREQUIRESOC')) if(!defined( 'NOREQUIRETRAN')) if(!defined('NOTOKENRENEWAL')) if(!defined( 'NOREQUIREMENU')) if(!defined('NOREQUIREHTML')) if(!defined( 'NOREQUIREAJAX')) llxHeader()
Empty header.
Definition wrapper.php:55
llxFooter()
Empty footer.
Definition wrapper.php:69
Class to manage categories.
Class to manage a WYSIWYG editor.
Class to manage standard extra fields.
Class to manage generation of HTML components Only common components must be here.
Classe permettant la generation de composants html autre Only common components are 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.
getDolGlobalInt($key, $default=0)
Return a Dolibarr global constant int value.
img_picto($titlealt, $picto, $moreatt='', $pictoisfullpath=false, $srconly=0, $notitle=0, $alt='', $morecss='', $marginleftonlyshort=2)
Show picto whatever it's its name (generic function)
dol_set_focus($selector)
Set focus onto field with selector (similar behaviour of 'autofocus' HTML5 tag)
dol_htmlcleanlastbr($stringtodecode)
This function remove all ending and br at end.
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.
dol_escape_htmltag($stringtoescape, $keepb=0, $keepn=0, $noescapetags='', $escapeonlyhtmltags=0, $cleanalsojavascript=0)
Returns text escaped for inclusion in HTML alt or title or value tags, or into values of HTML input f...
accessforbidden($message='', $printheader=1, $printfooter=1, $showonlymessage=0, $params=null)
Show a message to say access is forbidden and stop program.