dolibarr  20.0.0-alpha
calendar_agenda.php
Go to the documentation of this file.
1 <?php
2 /* Copyright (C) 2017 Laurent Destailleur <eldy@users.sourceforge.net>
3  * Copyright (C) 2023 Alice Adminson <aadminson@example.com>
4  * Copyright (C) 2024 Frédéric France <frederic.france@free.fr>
5  *
6  * This program is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License as published by
8  * the Free Software Foundation; either version 3 of the License, or
9  * (at your option) any later version.
10  *
11  * This program is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14  * GNU General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public License
17  * along with this program. If not, see <https://www.gnu.org/licenses/>.
18  */
19 
26 // Load Dolibarr environment
27 require '../main.inc.php';
28 
29 require_once DOL_DOCUMENT_ROOT.'/contact/class/contact.class.php';
30 require_once DOL_DOCUMENT_ROOT.'/core/lib/company.lib.php';
31 require_once DOL_DOCUMENT_ROOT.'/core/lib/functions2.lib.php';
32 require_once DOL_DOCUMENT_ROOT.'/bookcal/class/calendar.class.php';
33 require_once DOL_DOCUMENT_ROOT.'/bookcal/lib/bookcal_calendar.lib.php';
34 
35 // Load translation files required by the page
36 $langs->loadLangs(array("agenda", "other"));
37 
38 // Get parameters
39 $id = GETPOSTINT('id');
40 $ref = GETPOST('ref', 'alpha');
41 $action = GETPOST('action', 'aZ09');
42 $cancel = GETPOST('cancel', 'aZ09');
43 $contextpage = GETPOST('contextpage', 'aZ') ? GETPOST('contextpage', 'aZ') : str_replace('_', '', basename(dirname(__FILE__)).basename(__FILE__, '.php')); // To manage different context of search
44 $backtopage = GETPOST('backtopage', 'alpha');
45 
46 if (GETPOST('actioncode', 'array')) {
47  $actioncode = GETPOST('actioncode', 'array', 3);
48  if (!count($actioncode)) {
49  $actioncode = '0';
50  }
51 } else {
52  $actioncode = GETPOST("actioncode", "alpha", 3) ? GETPOST("actioncode", "alpha", 3) : (GETPOST("actioncode") == '0' ? '0' : getDolGlobalString('AGENDA_DEFAULT_FILTER_TYPE_FOR_OBJECT'));
53 }
54 $search_rowid = GETPOST('search_rowid');
55 $search_agenda_label = GETPOST('search_agenda_label');
56 
57 $limit = GETPOSTINT('limit') ? GETPOSTINT('limit') : $conf->liste_limit;
58 $sortfield = GETPOST('sortfield', 'aZ09comma');
59 $sortorder = GETPOST('sortorder', 'aZ09comma');
60 $page = GETPOSTISSET('pageplusone') ? (GETPOSTINT('pageplusone') - 1) : GETPOSTINT("page");
61 if (empty($page) || $page == -1) {
62  $page = 0;
63 } // If $page is not defined, or '' or -1
64 $offset = $limit * $page;
65 $pageprev = $page - 1;
66 $pagenext = $page + 1;
67 if (!$sortfield) {
68  $sortfield = 'a.datep,a.id';
69 }
70 if (!$sortorder) {
71  $sortorder = 'DESC,DESC';
72 }
73 
74 // Initialize technical objects
75 $object = new Calendar($db);
76 $extrafields = new ExtraFields($db);
77 $diroutputmassaction = $conf->bookcal->dir_output.'/temp/massgeneration/'.$user->id;
78 $hookmanager->initHooks(array('calendaragenda', 'globalcard')); // Note that conf->hooks_modules contains array
79 // Fetch optionals attributes and labels
80 $extrafields->fetch_name_optionals_label($object->table_element);
81 
82 // Load object
83 include DOL_DOCUMENT_ROOT.'/core/actions_fetchobject.inc.php'; // Must be include, not include_once // Must be include, not include_once. Include fetch and fetch_thirdparty but not fetch_optionals
84 if ($id > 0 || !empty($ref)) {
85  $upload_dir = $conf->bookcal->multidir_output[!empty($object->entity) ? $object->entity : $conf->entity]."/".$object->id;
86 }
87 
88 // There is several ways to check permission.
89 // Set $enablepermissioncheck to 1 to enable a minimum low level of checks
90 $enablepermissioncheck = 0;
91 if ($enablepermissioncheck) {
92  $permissiontoread = $user->hasRight('bookcal', 'calendar', 'read');
93  $permissiontoadd = $user->hasRight('bookcal', 'calendar', 'write');
94 } else {
95  $permissiontoread = 1;
96  $permissiontoadd = 1;
97 }
98 
99 // Security check (enable the most restrictive one)
100 //if ($user->socid > 0) accessforbidden();
101 //if ($user->socid > 0) $socid = $user->socid;
102 //$isdraft = (($object->status == $object::STATUS_DRAFT) ? 1 : 0);
103 //restrictedArea($user, $object->module, $object->id, $object->table_element, $object->element, 'fk_soc', 'rowid', $isdraft);
104 if (!isModEnabled("bookcal")) {
105  accessforbidden();
106 }
107 if (!$permissiontoread) {
108  accessforbidden();
109 }
110 
111 
112 /*
113  * Actions
114  */
115 
116 $parameters = array('id' => $id);
117 $reshook = $hookmanager->executeHooks('doActions', $parameters, $object, $action); // Note that $action and $object may have been modified by some hooks
118 if ($reshook < 0) {
119  setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
120 }
121 
122 if (empty($reshook)) {
123  // Cancel
124  if (GETPOST('cancel', 'alpha') && !empty($backtopage)) {
125  header("Location: ".$backtopage);
126  exit;
127  }
128 
129  // Purge search criteria
130  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
131  $actioncode = '';
132  $search_agenda_label = '';
133  }
134 }
135 
136 
137 
138 /*
139  * View
140  */
141 
142 $form = new Form($db);
143 
144 if ($object->id > 0) {
145  $title = $langs->trans("Agenda");
146  $help_url = 'EN:Module_Agenda_En|DE:Modul_Terminplanung';
147  llxHeader('', $title, $help_url);
148 
149  if (isModEnabled('notification')) {
150  $langs->load("mails");
151  }
152  $head = calendarPrepareHead($object);
153 
154 
155  print dol_get_fiche_head($head, 'agenda', $langs->trans("Calendar"), -1, $object->picto);
156 
157  // Object card
158  // ------------------------------------------------------------
159  $linkback = '<a href="'.dol_buildpath('/bookcal/calendar_list.php', 1).'?restore_lastsearch_values=1'.(!empty($socid) ? '&socid='.$socid : '').'">'.$langs->trans("BackToList").'</a>';
160 
161  $morehtmlref = '<div class="refidno">';
162  /*
163  // Ref customer
164  $morehtmlref.=$form->editfieldkey("RefCustomer", 'ref_client', $object->ref_client, $object, 0, 'string', '', 0, 1);
165  $morehtmlref.=$form->editfieldval("RefCustomer", 'ref_client', $object->ref_client, $object, 0, 'string', '', null, null, '', 1);
166  // Thirdparty
167  $morehtmlref.='<br>'.$langs->trans('ThirdParty') . ' : ' . (is_object($object->thirdparty) ? $object->thirdparty->getNomUrl(1) : '');
168  // Project
169  if (isModEnabled('project')) {
170  $langs->load("projects");
171  $morehtmlref.='<br>'.$langs->trans('Project') . ' ';
172  if ($permissiontoadd) {
173  if ($action != 'classify') {
174  //$morehtmlref.='<a class="editfielda" href="' . $_SERVER['PHP_SELF'] . '?action=classify&token='.newToken().'&id=' . $object->id . '">' . img_edit($langs->transnoentitiesnoconv('SetProject')) . '</a> : ';
175  }
176  $morehtmlref.=' : ';
177  if ($action == 'classify') {
178  //$morehtmlref.=$form->form_project($_SERVER['PHP_SELF'] . '?id=' . $object->id, $object->socid, $object->fk_project, 'projectid', 0, 0, 1, 1);
179  $morehtmlref.='<form method="post" action="'.$_SERVER['PHP_SELF'].'?id='.$object->id.'">';
180  $morehtmlref.='<input type="hidden" name="action" value="classin">';
181  $morehtmlref.='<input type="hidden" name="token" value="'.newToken().'">';
182  $morehtmlref.=$formproject->select_projects($object->socid, $object->fk_project, 'projectid', $maxlength, 0, 1, 0, 1, 0, 0, '', 1);
183  $morehtmlref.='<input type="submit" class="button valignmiddle" value="'.$langs->trans("Modify").'">';
184  $morehtmlref.='</form>';
185  } else {
186  $morehtmlref.=$form->form_project($_SERVER['PHP_SELF'] . '?id=' . $object->id, $object->socid, $object->fk_project, 'none', 0, 0, 0, 1);
187  }
188  } else {
189  if (!empty($object->fk_project)) {
190  $proj = new Project($db);
191  $proj->fetch($object->fk_project);
192  $morehtmlref .= ': '.$proj->getNomUrl();
193  } else {
194  $morehtmlref .= '';
195  }
196  }
197  }*/
198  $morehtmlref .= '</div>';
199 
200 
201  dol_banner_tab($object, 'ref', $linkback, 1, 'ref', 'ref', $morehtmlref);
202 
203  print '<div class="fichecenter">';
204  print '<div class="underbanner clearboth"></div>';
205 
206  $object->info($object->id);
208 
209  print '</div>';
210 
211  print dol_get_fiche_end();
212 
213 
214 
215  // Actions buttons
216 
217  $objthirdparty = $object;
218  $objcon = new stdClass();
219 
220  $out = '&origin='.urlencode((string) ($object->element.(property_exists($object, 'module') ? '@'.$object->module : ''))).'&originid='.urlencode((string) ($object->id));
221  $urlbacktopage = $_SERVER['PHP_SELF'].'?id='.$object->id;
222  $out .= '&backtopage='.urlencode($urlbacktopage);
223  $permok = $user->hasRight('agenda', 'myactions', 'create');
224  if ((!empty($objthirdparty->id) || !empty($objcon->id)) && $permok) {
225  //$out.='<a href="'.DOL_URL_ROOT.'/comm/action/card.php?action=create';
226  if (get_class($objthirdparty) == 'Societe') {
227  $out .= '&socid='.urlencode((string) ($objthirdparty->id));
228  }
229  $out .= (!empty($objcon->id) ? '&contactid='.urlencode($objcon->id) : '');
230  //$out.=$langs->trans("AddAnAction").' ';
231  //$out.=img_picto($langs->trans("AddAnAction"),'filenew');
232  //$out.="</a>";
233  }
234 
235  $morehtmlright = '';
236 
237  //$messagingUrl = DOL_URL_ROOT.'/societe/messaging.php?socid='.$object->id;
238  //$morehtmlright .= dolGetButtonTitle($langs->trans('ShowAsConversation'), '', 'fa fa-comments imgforviewmode', $messagingUrl, '', 1);
239  //$messagingUrl = DOL_URL_ROOT.'/societe/agenda.php?socid='.$object->id;
240  //$morehtmlright .= dolGetButtonTitle($langs->trans('MessageListViewType'), '', 'fa fa-bars imgforviewmode', $messagingUrl, '', 2);
241 
242  if (isModEnabled('agenda')) {
243  if ($user->hasRight('agenda', 'myactions', 'create') || $user->hasRight('agenda', 'allactions', 'create')) {
244  $morehtmlright .= dolGetButtonTitle($langs->trans('AddAction'), '', 'fa fa-plus-circle', DOL_URL_ROOT.'/comm/action/card.php?action=create'.$out);
245  } else {
246  $morehtmlright .= dolGetButtonTitle($langs->trans('AddAction'), '', 'fa fa-plus-circle', DOL_URL_ROOT.'/comm/action/card.php?action=create'.$out, '', 0);
247  }
248  }
249 
250  /*
251  if (isModEnabled('agenda') && ($user->hasRight('agenda', 'myactions', 'read') || $user->hasRight('agenda', 'allactions', 'read'))) {
252  print '<br>';
253 
254  $param = '&id='.$object->id.(!empty($socid) ? '&socid='.$socid : '');
255  if (!empty($contextpage) && $contextpage != $_SERVER["PHP_SELF"]) {
256  $param .= '&contextpage='.urlencode($contextpage);
257  }
258  if ($limit > 0 && $limit != $conf->liste_limit) {
259  $param .= '&limit='.((int) $limit);
260  }
261 
262  // Try to know count of actioncomm from cache
263  $nbEvent = 0;
264  //require_once DOL_DOCUMENT_ROOT.'/core/lib/memory.lib.php';
265  //$cachekey = 'count_events_myobject_'.$object->id;
266  //$nbEvent = dol_getcache($cachekey);
267  $titlelist = $langs->trans("Actions").(is_numeric($nbEvent) ? '<span class="opacitymedium colorblack paddingleft">('.$nbEvent.')</span>': '');
268  print_barre_liste($titlelist, 0, $_SERVER["PHP_SELF"], '', $sortfield, $sortorder, '', 0, -1, '', 0, $morehtmlright, '', 0, 1, 0);
269 
270  // List of all actions
271  $filters = array();
272  $filters['search_agenda_label'] = $search_agenda_label;
273  $filters['search_rowid'] = $search_rowid;
274 
275  // TODO Replace this with same code than into list.php
276  show_actions_done($conf, $langs, $db, $object, null, 0, $actioncode, '', $filters, $sortfield, $sortorder, property_exists($object, 'module') ? $object->module : '');
277  }
278  */
279 }
280 
281 // End of page
282 llxFooter();
283 $db->close();
if($user->socid > 0) if(! $user->hasRight('accounting', 'chartofaccount')) $object
Definition: card.php:58
if(GETPOST('button_removefilter_x', 'alpha')||GETPOST('button_removefilter.x', 'alpha')||GETPOST('button_removefilter', 'alpha')) if(GETPOST('button_search_x', 'alpha')||GETPOST('button_search.x', 'alpha')||GETPOST('button_search', 'alpha')) if($action=="save" &&empty($cancel)) $help_url
View.
Definition: agenda.php:118
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
calendarPrepareHead($object)
Prepare array of tabs for Calendar.
Class for Calendar.
Class to manage standard extra fields.
Class to manage generation of HTML components Only common components must be here.
if($cancel &&! $id) if($action=='add' &&! $cancel) if($action=='delete') if($id) $form
Actions.
Definition: card.php:143
dol_print_object_info($object, $usetable=0)
Show information on an object TODO Move this into html.formother.
GETPOSTINT($paramname, $method=0)
Return the value of a $_GET or $_POST supervariable, converted into integer.
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.
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.
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.
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 dolibarr global constant string value.
isModEnabled($module)
Is Dolibarr module enabled.
accessforbidden($message='', $printheader=1, $printfooter=1, $showonlymessage=0, $params=null)
Show a message to say access is forbidden and stop program.