dolibarr 25.0.0-alpha
myobject_agenda.php
Go to the documentation of this file.
1<?php
2/* Copyright (C) 2017 Laurent Destailleur <eldy@users.sourceforge.net>
3 * Copyright (C) 2024-2025 Frédéric France <frederic.france@free.fr>
4 * Copyright (C) ---Replace with your own copyright and developer email---
5 * Copyright (C) 2026 Jose MARTINEZ <jose.martinez@pichinov.com>
6 *
7 * This program is free software; you can redistribute it and/or modify
8 * it under the terms of the GNU General Public License as published by
9 * the Free Software Foundation; either version 3 of the License, or
10 * (at your option) any later version.
11 *
12 * This program is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 * GNU General Public License for more details.
16 *
17 * You should have received a copy of the GNU General Public License
18 * along with this program. If not, see <https://www.gnu.org/licenses/>.
19 */
20
27//if (! defined('NOREQUIREDB')) define('NOREQUIREDB', '1'); // Do not create database handler $db
28//if (! defined('NOREQUIREUSER')) define('NOREQUIREUSER', '1'); // Do not load object $user
29//if (! defined('NOREQUIRESOC')) define('NOREQUIRESOC', '1'); // Do not load object $mysoc
30//if (! defined('NOREQUIRETRAN')) define('NOREQUIRETRAN', '1'); // Do not load object $langs
31//if (! defined('NOSCANGETFORINJECTION')) define('NOSCANGETFORINJECTION', '1'); // Do not check injection attack on GET parameters
32//if (! defined('NOSCANPOSTFORINJECTION')) define('NOSCANPOSTFORINJECTION', '1'); // Do not check injection attack on POST parameters
33//if (! defined('NOTOKENRENEWAL')) define('NOTOKENRENEWAL', '1'); // Do not roll the Anti CSRF token (used if MAIN_SECURITY_CSRF_WITH_TOKEN is on)
34//if (! defined('NOSTYLECHECK')) define('NOSTYLECHECK', '1'); // Do not check style html tag into posted data
35//if (! defined('NOREQUIREMENU')) define('NOREQUIREMENU', '1'); // If there is no need to load and show top and left menu
36//if (! defined('NOREQUIREHTML')) define('NOREQUIREHTML', '1'); // If we don't need to load the html.form.class.php
37//if (! defined('NOREQUIREAJAX')) define('NOREQUIREAJAX', '1'); // Do not load ajax.lib.php library
38//if (! defined("NOLOGIN")) define("NOLOGIN", '1'); // If this page is public (can be called outside logged session). This include the NOIPCHECK too.
39//if (! defined('NOIPCHECK')) define('NOIPCHECK', '1'); // Do not check IP defined into conf $dolibarr_main_restrict_ip
40//if (! defined("MAIN_LANG_DEFAULT")) define('MAIN_LANG_DEFAULT', 'auto'); // Force lang to a particular value
41//if (! defined("MAIN_AUTHENTICATION_MODE")) define('MAIN_AUTHENTICATION_MODE', 'aloginmodule'); // Force authentication handler
42//if (! defined("MAIN_SECURITY_FORCECSP")) define('MAIN_SECURITY_FORCECSP', 'none'); // Disable all Content Security Policies
43//if (! defined('CSRFCHECK_WITH_TOKEN')) define('CSRFCHECK_WITH_TOKEN', '1'); // Force use of CSRF protection with tokens even for GET
44//if (! defined('NOBROWSERNOTIF')) define('NOBROWSERNOTIF', '1'); // Disable browser notification
45
46// Load Dolibarr environment
47$res = 0;
48// Try main.inc.php into web root known defined into CONTEXT_DOCUMENT_ROOT (not always defined)
49if (!$res && !empty($_SERVER["CONTEXT_DOCUMENT_ROOT"])) {
50 $res = @include str_replace("..", "", $_SERVER["CONTEXT_DOCUMENT_ROOT"])."/main.inc.php";
51}
52// Try main.inc.php into web root detected using web root calculated from SCRIPT_FILENAME
53$tmp = empty($_SERVER['SCRIPT_FILENAME']) ? '' : $_SERVER['SCRIPT_FILENAME'];
54$tmp2 = realpath(__FILE__);
55$i = strlen($tmp) - 1; // @phan-suppress-current-line DolibarrForbiddenFunctionPlugin
56$j = strlen($tmp2) - 1; // @phan-suppress-current-line DolibarrForbiddenFunctionPlugin
57while ($i > 0 && $j > 0 && isset($tmp[$i]) && isset($tmp2[$j]) && $tmp[$i] == $tmp2[$j]) {
58 $i--;
59 $j--;
60}
61if (!$res && $i > 0 && file_exists(substr($tmp, 0, ($i + 1))."/main.inc.php")) {
62 $res = @include substr($tmp, 0, ($i + 1))."/main.inc.php";
63}
64if (!$res && $i > 0 && file_exists(dirname(substr($tmp, 0, ($i + 1)))."/main.inc.php")) {
65 $res = @include dirname(substr($tmp, 0, ($i + 1)))."/main.inc.php";
66}
67// Try main.inc.php using relative path
68if (!$res && file_exists("../main.inc.php")) {
69 $res = @include "../main.inc.php";
70}
71if (!$res && file_exists("../../main.inc.php")) {
72 $res = @include "../../main.inc.php";
73}
74if (!$res && file_exists("../../../main.inc.php")) {
75 $res = @include "../../../main.inc.php";
76}
77if (!$res) {
78 die("Include of main fails");
79}
88include_once DOL_DOCUMENT_ROOT.'/contact/class/contact.class.php';
89include_once DOL_DOCUMENT_ROOT.'/core/lib/company.lib.php';
90require_once DOL_DOCUMENT_ROOT . '/core/lib/functions.lib.php';
91include_once DOL_DOCUMENT_ROOT.'/core/lib/functions2.lib.php';
92dol_include_once('/mymodule/class/myobject.class.php');
93dol_include_once('/mymodule/lib/mymodule_myobject.lib.php');
94
95// Load translation files required by the page
96$langs->loadLangs(array("mymodule@mymodule", "other"));
97
98// Get parameters
99$id = GETPOSTINT('id');
100$ref = GETPOST('ref', 'alpha');
101$action = GETPOST('action', 'aZ09');
102$cancel = GETPOST('cancel');
103$contextpage = GETPOST('contextpage', 'aZ') ? GETPOST('contextpage', 'aZ') : getDolDefaultContextPage(__FILE__); // To manage different context of search
104$backtopage = GETPOST('backtopage', 'alpha');
105
106if (GETPOSTISARRAY('actioncode')) {
107 $actioncode = GETPOST('actioncode', 'array:alpha', 3);
108 if (!count($actioncode)) {
109 $actioncode = '0';
110 }
111} else {
112 $actioncode = GETPOST("actioncode", "alpha", 3) ? GETPOST("actioncode", "alpha", 3) : (GETPOST("actioncode") == '0' ? '0' : getDolGlobalString('AGENDA_DEFAULT_FILTER_TYPE_FOR_OBJECT'));
113}
114$search_rowid = GETPOST('search_rowid');
115$search_agenda_label = GETPOST('search_agenda_label');
116$search_complete = GETPOST('search_complete');
117$search_filtert = GETPOSTINT('search_filtert');
118$search_dateevent_start = GETPOSTDATE('dateevent_start');
119$search_dateevent_end = GETPOSTDATE('dateevent_end');
120
121$limit = GETPOSTINT('limit') ? GETPOSTINT('limit') : $conf->liste_limit;
122$sortfield = GETPOST('sortfield', 'aZ09comma');
123$sortorder = GETPOST('sortorder', 'aZ09comma');
124$page = GETPOSTISSET('pageplusone') ? (GETPOSTINT('pageplusone') - 1) : GETPOSTINT("page");
125if (empty($page) || $page == -1) {
126 // If $page is not defined, or '' or -1 or if we click on clear filters
127 $page = 0;
128}
129$offset = $limit * $page;
130$pageprev = $page - 1;
131$pagenext = $page + 1;
132if (!$sortfield) {
133 $sortfield = 'a.datep,a.id';
134}
135if (!$sortorder) {
136 $sortorder = 'DESC,DESC';
137}
138
139// Initialize a technical objects
140$object = new MyObject($db);
141$extrafields = new ExtraFields($db);
142$diroutputmassaction = $conf->mymodule->dir_output.'/temp/massgeneration/'.$user->id;
143$hookmanager->initHooks(array($object->element.'agenda', 'globalcard')); // Note that conf->hooks_modules contains array
144// Fetch optionals attributes and labels
145$extrafields->fetch_name_optionals_label($object->table_element);
146
147// Load object
148include DOL_DOCUMENT_ROOT.'/core/actions_fetchobject.inc.php'; // Must be 'include', not 'include_once'. Include fetch and fetch_thirdparty but not fetch_optionals
149if ($id > 0 || !empty($ref)) {
150 $upload_dir = $conf->mymodule->multidir_output[!empty($object->entity) ? $object->entity : $conf->entity]."/".$object->id;
151}
152
153// There is several ways to check permission.
154// Set $enablepermissioncheck to 1 to enable a minimum low level of checks
155$enablepermissioncheck = getDolGlobalInt('MYMODULE_ENABLE_PERMISSION_CHECK');
156if ($enablepermissioncheck) {
157 $permissiontoread = $user->hasRight('mymodule', 'myobject', 'read');
158 $permissiontoadd = $user->hasRight('mymodule', 'myobject', 'write');
159} else {
160 $permissiontoread = 1;
161 $permissiontoadd = 1;
162}
163
164// Security check (enable the most restrictive one)
165//if ($user->socid > 0) accessforbidden();
166//if ($user->socid > 0) $socid = $user->socid;
167//$isdraft = (($object->status == $object::STATUS_DRAFT) ? 1 : 0);
168//restrictedArea($user, $object->module, $object->id, $object->table_element, $object->element, 'fk_soc', 'rowid', $isdraft);
169if (!isModEnabled("mymodule")) {
171}
172if (!$permissiontoread) {
174}
175
176
177/*
178 * Actions
179 */
180
181$parameters = array('id' => $id);
182$reshook = $hookmanager->executeHooks('doActions', $parameters, $object, $action); // Note that $action and $object may have been modified by some hooks
183if ($reshook < 0) {
184 setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
185}
186
187if (empty($reshook)) {
188 // Cancel
189 if (GETPOST('cancel', 'alpha') && !empty($backtopage)) {
190 header("Location: ".$backtopage);
191 exit;
192 }
193
194 // Purge search criteria
195 if (GETPOST('button_removefilter_x', 'alpha') || GETPOST('button_removefilter.x', 'alpha') || GETPOST('button_removefilter', 'alpha')) { // All tests are required to be compatible with all browsers
196 $actioncode = '';
197 $search_rowid = '';
198 $search_agenda_label = '';
199 $search_complete = '';
200 $search_filtert = '';
201 }
202}
203
204
205
206/*
207 * View
208 */
209
210$form = new Form($db);
211
212if ($object->id > 0) {
213 $title = $langs->trans("MyObject")." - ".$langs->trans('Agenda');
214 //$title = $object->ref." - ".$langs->trans("Agenda");
215 $help_url = 'EN:Module_Agenda_En|DE:Modul_Terminplanung';
216
217 llxHeader('', $title, $help_url, '', 0, 0, '', '', '', 'mod-mymodule page-card_agenda');
218
219 if (isModEnabled('notification')) {
220 $langs->load("mails");
221 }
222 $head = myobjectPrepareHead($object);
223
224
225 print dol_get_fiche_head($head, 'agenda', $langs->trans("MyObject"), -1, $object->picto);
226
227 // Object card
228 // ------------------------------------------------------------
229 $linkback = '<a href="'.dol_buildpath('/mymodule/myobject_list.php', 1).'?restore_lastsearch_values=1'.(!empty($socid) ? '&socid='.$socid : '').'">'.$langs->trans("BackToList").'</a>';
230
231 $morehtmlref = '<div class="refidno">';
232 /*
233 // Ref customer
234 $morehtmlref.=$form->editfieldkey("RefCustomer", 'ref_client', $object->ref_client, $object, 0, 'string', '', 0, 1);
235 $morehtmlref.=$form->editfieldval("RefCustomer", 'ref_client', $object->ref_client, $object, 0, 'string', '', null, null, '', 1);
236 // Thirdparty
237 $morehtmlref.='<br>'.$langs->trans('ThirdParty') . ' : ' . (is_object($object->thirdparty) ? $object->thirdparty->getNomUrl(1) : '');
238 // Project
239 if (isModEnabled('project')) {
240 $langs->load("projects");
241 $morehtmlref.='<br>'.$langs->trans('Project') . ' ';
242 if ($permissiontoadd) {
243 if ($action != 'classify') {
244 //$morehtmlref.='<a class="editfielda" href="' . dolBuildUrl($_SERVER['PHP_SELF'], ['action' => 'classify', 'id' => $object->id], true) . '">' . img_edit($langs->transnoentitiesnoconv('SetProject')) . '</a> : ';
245 }
246 $morehtmlref.=' : ';
247 if ($action == 'classify') {
248 //$morehtmlref.=$form->form_project($_SERVER['PHP_SELF'] . '?id=' . $object->id, $object->socid, $object->fk_project, 'projectid', 0, 0, 1, 1);
249 $morehtmlref.='<form method="post" action="'.$_SERVER['PHP_SELF'].'?id='.$object->id.'">';
250 $morehtmlref.='<input type="hidden" name="action" value="classin">';
251 $morehtmlref.='<input type="hidden" name="token" value="'.newToken().'">';
252 $morehtmlref.=$formproject->select_projects($object->socid, $object->fk_project, 'projectid', $maxlength, 0, 1, 0, 1, 0, 0, '', 1);
253 $morehtmlref.='<input type="submit" class="button valignmiddle" value="'.$langs->trans("Modify").'">';
254 $morehtmlref.='</form>';
255 } else {
256 $morehtmlref.=$form->form_project($_SERVER['PHP_SELF'] . '?id=' . $object->id, $object->socid, $object->fk_project, 'none', 0, 0, 0, 1);
257 }
258 } else {
259 if (!empty($object->fk_project)) {
260 $proj = new Project($db);
261 $proj->fetch($object->fk_project);
262 $morehtmlref .= ': '.$proj->getNomUrl();
263 } else {
264 $morehtmlref .= '';
265 }
266 }
267 }*/
268 $morehtmlref .= '</div>';
269
270
271 dol_banner_tab($object, 'ref', $linkback, 1, 'ref', 'ref', $morehtmlref);
272
273 print '<div class="fichecenter">';
274 print '<div class="underbanner clearboth"></div>';
275
276 $object->info($object->id);
277 dol_print_object_info($object, 1);
278
279 print '</div>';
280
281 print dol_get_fiche_end();
282
283
284
285 // Actions buttons
286
287 $objthirdparty = $object;
288 $objcon = new stdClass();
289
290 $out = '&origin='.urlencode($object->element.(!empty($object->module) ? '@'.$object->module : '')).'&originid='.urlencode((string) $object->id);
291 $urlbacktopage = $_SERVER['PHP_SELF'].'?id='.$object->id;
292 $out .= '&backtopage='.urlencode($urlbacktopage);
293 $permok = $user->hasRight('agenda', 'myactions', 'create');
294 if ((!empty($objthirdparty->id) || !empty($objcon->id)) && $permok) {
295 //$out.='<a href="'.DOL_URL_ROOT.'/comm/action/card.php?action=create';
296 if (get_class($objthirdparty) == 'Societe') {
297 $out .= '&socid='.urlencode((string) $objthirdparty->id);
298 }
299 $out .= (!empty($objcon->id) ? '&contactid='.urlencode($objcon->id) : '');
300 //$out.=$langs->trans("AddAnAction").' ';
301 //$out.=img_picto($langs->trans("AddAnAction"),'filenew');
302 //$out.="</a>";
303 }
304
305 $morehtmlright = '';
306
307 //$messagingUrl = DOL_URL_ROOT.'/societe/messaging.php?socid='.$object->id;
308 //$morehtmlright .= dolGetButtonTitle($langs->trans('ShowAsConversation'), '', 'fa fa-comments imgforviewmode', $messagingUrl, '', 1);
309 //$messagingUrl = DOL_URL_ROOT.'/societe/agenda.php?socid='.$object->id;
310 //$morehtmlright .= dolGetButtonTitle($langs->trans('MessageListViewType'), '', 'fa fa-bars imgforviewmode', $messagingUrl, '', 2);
311
312 if (isModEnabled('agenda')) {
313 if ($user->hasRight('agenda', 'myactions', 'create') || $user->hasRight('agenda', 'allactions', 'create')) {
314 $morehtmlright .= dolGetButtonTitle($langs->trans('AddAction'), '', 'fa fa-plus-circle', DOL_URL_ROOT.'/comm/action/card.php?action=create'.$out);
315 } else {
316 $morehtmlright .= dolGetButtonTitle($langs->trans('AddAction'), '', 'fa fa-plus-circle', DOL_URL_ROOT.'/comm/action/card.php?action=create'.$out, '', 0);
317 }
318 }
319
320
321 if (isModEnabled('agenda') && ($user->hasRight('agenda', 'myactions', 'read') || $user->hasRight('agenda', 'allactions', 'read'))) {
322 print '<br>';
323
324 $param = '&id='.$object->id;
325 if (!empty($contextpage) && $contextpage != getDolDefaultContextPage(__FILE__)) {
326 $param .= '&contextpage='.urlencode($contextpage);
327 }
328 if ($limit > 0 && $limit != $conf->liste_limit) {
329 $param .= '&limit='.((int) $limit);
330 }
331 if ($search_rowid) {
332 $param .= '&search_rowid='.urlencode($search_rowid);
333 }
334 if ($actioncode !== '' && $actioncode !== '-1') {
335 $param .= '&actioncode='.urlencode($actioncode);
336 }
337 if ($search_agenda_label) {
338 $param .= '&search_agenda_label='.urlencode($search_agenda_label);
339 }
340 if ($search_complete != '') {
341 $param .= '&search_complete='.urlencode($search_complete);
342 }
343 if ($search_filtert != '') {
344 $param .= '&search_filtert='.urlencode((string) $search_filtert);
345 }
346 if ($search_dateevent_start != '') {
347 $param .= '&dateevent_startyear='.GETPOSTINT('dateevent_startyear');
348 $param .= '&dateevent_startmonth='.GETPOSTINT('dateevent_startmonth');
349 $param .= '&dateevent_startday='.GETPOSTINT('dateevent_startday');
350 }
351 if ($search_dateevent_end != '') {
352 $param .= '&dateevent_endyear='.GETPOSTINT('dateevent_endyear');
353 $param .= '&dateevent_endmonth='.GETPOSTINT('dateevent_endmonth');
354 $param .= '&dateevent_endday='.GETPOSTINT('dateevent_endday');
355 }
356
357 // Try to know count of actioncomm from cache
358 $nbEvent = 0;
359 //require_once DOL_DOCUMENT_ROOT.'/core/lib/memory.lib.php';
360 //$cachekey = 'count_events_myobject_'.$object->id;
361 //$nbEvent = dol_getcache($cachekey);
362 $titlelist = $langs->trans("Actions").(is_numeric($nbEvent) ? '<span class="opacitymedium colorblack paddingleft">('.$nbEvent.')</span>' : '');
363 if (!empty($conf->dol_optimize_smallscreen)) {
364 $titlelist = $langs->trans("Actions").(is_numeric($nbEvent) ? '<span class="opacitymedium colorblack paddingleft">('.$nbEvent.')</span>' : '');
365 }
366
367 // Hook to let external modules add buttons to the object right toolbar. Works on any object page; the hook gets the context (elementtype) so a module can scope itself (e.g. only on event pages).
368 $parameters = array('morehtmlright' => &$morehtmlright, 'elementtype' => $object->element);
369 $reshook = $hookmanager->executeHooks('printObjectRightToolbar', $parameters, $object, $action);
370 if ($reshook < 0) {
371 setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
372 } else {
373 $morehtmlright .= $hookmanager->resPrint;
374 }
375
376 print_barre_liste($titlelist, 0, $_SERVER["PHP_SELF"], $param, $sortfield, $sortorder, '', 0, -1, '', 0, $morehtmlright, '', 0, 1, 0);
377
378 // List of all actions
379 $filters = array();
380 $filters['search_agenda_label'] = $search_agenda_label;
381 $filters['search_rowid'] = $search_rowid;
382 $filters['search_complete'] = $search_complete; // Can be 'na', '0', '100', '50'
383 $filters['search_filtert'] = $search_filtert;
384
385 // TODO Replace this with the same code than into list.php
386 show_actions_done($conf, $langs, $db, $object, null, 0, $actioncode, '', $filters, $sortfield, $sortorder, !empty($object->module) ? $object->module : '');
387 }
388}
389
390// End of page
391llxFooter();
392$db->close();
$id
Support class for third parties, contacts, members, users or resources.
Definition account.php:47
if(! $sortfield) if(! $sortorder) $object
Definition account.php:100
llxFooter($comment='', $zone='private', $disabledoutputofmessages=0)
Empty footer.
Definition wrapper.php:91
if(!defined('NOREQUIRESOC')) if(!defined( 'NOREQUIRETRAN')) if(!defined('NOTOKENRENEWAL')) if(!defined( 'NOREQUIREMENU')) if(!defined('NOREQUIREHTML')) if(!defined( 'NOREQUIREAJAX')) llxHeader($head='', $title='', $help_url='', $target='', $disablejs=0, $disablehead=0, $arrayofjs='', $arrayofcss='', $morequerystring='', $morecssonbody='', $replacemainareaby='', $disablenofollow=0, $disablenoindex=0)
Empty header.
Definition wrapper.php:73
Class to manage standard extra fields.
Class to manage generation of HTML components Only common components must be here.
Class for MyObject.
show_actions_done($conf, $langs, $db, $filterobj, $objcon=null, $noprint=0, $actioncode='', $donetodo='done', $filters=array(), $sortfield='a.datep, a.id', $sortorder='DESC', $module='')
Show html area with actions (done or not, ignore the name of function).
if(!isModEnabled('ai')||!getDolGlobalString('AI_ASSISTANT_ENABLED')) global $conf
The main.inc.php has been included so the following variable are now defined:
dol_print_object_info($object, $usetable=0)
Show information on an object TODO Move this into html.formother.
GETPOSTDATE($prefix, $hourTime='', $gm='auto', $saverestore='')
Helper function that combines values of a dolibarr DatePicker (such as Form\selectDate) for year,...
GETPOSTISARRAY($paramname, $method=0)
Return true if the parameter $paramname is submit from a POST OR GET as an array.
getDolGlobalInt($key, $default=0)
Return a Dolibarr global constant int value.
if(!function_exists( 'dol_getprefix')) dol_include_once($relpath, $classname='')
Make an include_once using default root and alternate root if it fails.
GETPOST($paramname, $check='alphanohtml', $method=0, $filter=null, $options=null, $noreplace=0, $nodefault=0)
Return value of a param into GET or POST supervariable.
getDolDefaultContextPage($s)
Return the default context page string.
GETPOSTINT($paramname, $method=0, $nodefault=0)
Return the value of a $_GET or $_POST supervariable, converted into integer.
GETPOSTISSET($paramname)
Return true if we are in a context of submitting the parameter $paramname from a POST of a form.
getDolGlobalString($key, $default='')
Return a Dolibarr global constant string value.
isModEnabled($module)
Is Dolibarr module enabled.
dol_get_fiche_head($links=array(), $active='', $title='', $notab=0, $picto='', $pictoisfullpath=0, $morehtmlright='', $morecss='', $limittoshow=0, $moretabssuffix='', $dragdropfile=0, $morecssdiv='')
Show tabs of a record.
Definition html.lib.php:540
dolGetButtonTitle($label, $helpText='', $iconClass='fa fa-file', $url='', $id='', $status=1, $params=array())
Function dolGetButtonTitle : this kind of buttons are used in title in list.
dol_get_fiche_end($notab=0)
Return tab footer of a card.
Definition html.lib.php:738
myobjectPrepareHead($object)
Prepare array of tabs for MyObject.
accessforbidden($message='', $printheader=1, $printfooter=1, $showonlymessage=0, $params=null)
Show a message to say access is forbidden and stop program.