dolibarr  13.0.2
agenda.php
Go to the documentation of this file.
1 <?php
2 /* Copyright (C) 2001-2007 Rodolphe Quiedeville <rodolphe@quiedeville.org>
3  * Copyright (C) 2005 Brice Davoleau <brice.davoleau@gmail.com>
4  * Copyright (C) 2005-2012 Regis Houssin <regis.houssin@inodbox.com>
5  * Copyright (C) 2006-2015 Laurent Destailleur <eldy@users.sourceforge.net>
6  * Copyright (C) 2007 Patrick Raguin <patrick.raguin@gmail.com>
7  * Copyright (C) 2010 Juanjo Menent <jmenent@2byte.es>
8  * Copyright (C) 2015 Marcos GarcĂ­a <marcosgdf@gmail.com>
9  * Copyright (C) 2018 Florain Henry <florian.henry@open-concept.pro
10  *
11  * This program is free software; you can redistribute it and/or modify
12  * it under the terms of the GNU General Public License as published by
13  * the Free Software Foundation; either version 3 of the License, or
14  * (at your option) any later version.
15  *
16  * This program is distributed in the hope that it will be useful,
17  * but WITHOUT ANY WARRANTY; without even the implied warranty of
18  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
19  * GNU General Public License for more details.
20  *
21  * You should have received a copy of the GNU General Public License
22  * along with this program. If not, see <https://www.gnu.org/licenses/>.
23  */
24 
31 require '../main.inc.php';
32 require_once DOL_DOCUMENT_ROOT.'/contact/class/contact.class.php';
33 require_once DOL_DOCUMENT_ROOT.'/core/lib/functions2.lib.php';
34 require_once DOL_DOCUMENT_ROOT.'/core/lib/resource.lib.php';
35 require_once DOL_DOCUMENT_ROOT.'/resource/class/dolresource.class.php';
36 
37 // Load translation files required by the page
38 $langs->load("companies");
39 
40 // Get parameters
41 $id = GETPOST('id', 'int');
42 $ref = GETPOST('ref', 'alpha');
43 $action = GETPOST('action', 'aZ09');
44 $cancel = GETPOST('cancel', 'aZ09');
45 $backtopage = GETPOST('backtopage', 'alpha');
46 
47 if (GETPOST('actioncode', 'array'))
48 {
49  $actioncode = GETPOST('actioncode', 'array', 3);
50  if (!count($actioncode)) $actioncode = '0';
51 } else {
52  $actioncode = GETPOST("actioncode", "alpha", 3) ?GETPOST("actioncode", "alpha", 3) : (GETPOST("actioncode") == '0' ? '0' : (empty($conf->global->AGENDA_DEFAULT_FILTER_TYPE_FOR_OBJECT) ? '' : $conf->global->AGENDA_DEFAULT_FILTER_TYPE_FOR_OBJECT));
53 }
54 $search_agenda_label = GETPOST('search_agenda_label');
55 
56 $limit = GETPOST('limit', 'int') ?GETPOST('limit', 'int') : $conf->liste_limit;
57 $sortfield = GETPOST("sortfield", 'alpha');
58 $sortorder = GETPOST("sortorder", 'alpha');
59 $page = GETPOSTISSET('pageplusone') ? (GETPOST('pageplusone') - 1) : GETPOST("page", 'int');
60 if (empty($page) || $page == -1) { $page = 0; } // If $page is not defined, or '' or -1
61 $offset = $limit * $page;
62 $pageprev = $page - 1;
63 $pagenext = $page + 1;
64 if (!$sortfield) $sortfield = 'a.datep,a.id';
65 if (!$sortorder) $sortorder = 'DESC,DESC';
66 
67 $object = new DolResource($db);
68 $object->fetch($id, $ref);
69 
70 // Initialize technical objects
71 //$object=new MyObject($db);
72 $extrafields = new ExtraFields($db);
73 $hookmanager->initHooks(array('agendaresource'));
74 
75 // Security check
76 if (!$user->rights->resource->read)
77 {
79 }
80 
81 
82 /*
83  * Actions
84  */
85 
86 $parameters = array('id'=>$id);
87 $reshook = $hookmanager->executeHooks('doActions', $parameters, $object, $action); // Note that $action and $object may have been modified by some hooks
88 if ($reshook < 0) setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
89 
90 if (empty($reshook))
91 {
92  // Cancel
93  if (GETPOST('cancel', 'alpha') && !empty($backtopage))
94  {
95  header("Location: ".$backtopage);
96  exit;
97  }
98 
99  // Purge search criteria
100  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
101  {
102  $actioncode = '';
103  $search_agenda_label = '';
104  }
105 }
106 
107 
108 
109 /*
110  * View
111  */
112 
113 $contactstatic = new Contact($db);
114 $form = new Form($db);
115 
116 if ($object->id > 0)
117 {
118  require_once DOL_DOCUMENT_ROOT.'/core/lib/company.lib.php';
119  require_once DOL_DOCUMENT_ROOT.'/product/class/product.class.php';
120 
121  $langs->load("companies");
122  $picto = 'resource';
123 
124  $title = $langs->trans("Agenda");
125  if (!empty($conf->global->MAIN_HTML_TITLE) && preg_match('/productnameonly/', $conf->global->MAIN_HTML_TITLE) && $object->name) $title = $object->ref." - ".$title;
126  llxHeader('', $title);
127 
128  if (!empty($conf->notification->enabled)) $langs->load("mails");
129  $type = $langs->trans('ResourceSingular');
130 
131  $head = resource_prepare_head($object);
132 
133  $titre = $langs->trans("ResourceSingular");
134  print dol_get_fiche_head($head, 'agenda', $titre, -1, $picto);
135 
136  $linkback = '<a href="'.DOL_URL_ROOT.'/resource/list.php?restore_lastsearch_values=1">'.$langs->trans("BackToList").'</a>';
137 
138  $morehtmlref = '<div class="refidno">';
139  $morehtmlref .= '</div>';
140 
141  $shownav = 1;
142  if ($user->socid && !in_array('resource', explode(',', $conf->global->MAIN_MODULES_FOR_EXTERNAL))) $shownav = 0;
143 
144  dol_banner_tab($object, 'ref', $linkback, 1, 'ref', 'ref', $morehtmlref);
145 
146  print '<div class="fichecenter">';
147  print '<div class="underbanner clearboth"></div>';
148 
149  print '</div>';
150 
152 
153  if (!empty($conf->agenda->enabled) && (!empty($user->rights->agenda->myactions->read) || !empty($user->rights->agenda->allactions->read)))
154  {
155  $param = '&id='.$object->id.'&socid='.$socid;
156  if (!empty($contextpage) && $contextpage != $_SERVER["PHP_SELF"]) $param .= '&contextpage='.urlencode($contextpage);
157  if ($limit > 0 && $limit != $conf->liste_limit) $param .= '&limit='.urlencode($limit);
158 
159  print_barre_liste($langs->trans("ActionsOnResource"), 0, $_SERVER["PHP_SELF"], '', $sortfield, $sortorder, '', 0, -1, '', 0, $morehtmlcenter, '', 0, 1, 1);
160 
161  // List of all actions
162  $filters = array();
163  $filters['search_agenda_label'] = $search_agenda_label;
164 
165  // TODO Replace this with same code than into list.php
166  show_actions_done($conf, $langs, $db, $object, null, 0, $actioncode, '', $filters, $sortfield, $sortorder);
167  }
168 }
169 
170 // End of page
171 llxFooter();
172 $db->close();
GETPOST($paramname, $check= 'alphanohtml', $method=0, $filter=null, $options=null, $noreplace=0)
Return value of a param into GET or POST supervariable.
Class to manage contact/addresses.
show_actions_done($conf, $langs, $db, $filterobj, $objcon= '', $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).
llxHeader()
Empty header.
Definition: wrapper.php:45
resource_prepare_head($object)
Prepare head for tabs.
Class to manage standard extra fields.
setEventMessages($mesg, $mesgs, $style= 'mesgs', $messagekey= '')
Set event messages in dol_events session object.
print_barre_liste($titre, $page, $file, $options= '', $sortfield= '', $sortorder= '', $morehtmlcenter= '', $num=-1, $totalnboflines= '', $picto= 'generic', $pictoisfullpath=0, $morehtmlright= '', $morecss= '', $limit=-1, $hideselectlimit=0, $hidenavigation=0, $pagenavastextinput=0, $morehtmlrightbeforearrow= '')
Print a title with navigation controls for pagination.
Class to manage generation of HTML components Only common components must be here.
GETPOSTISSET($paramname)
Return true if we are in a context of submitting the parameter $paramname.
accessforbidden($message= '', $printheader=1, $printfooter=1, $showonlymessage=0, $params=null)
Show a message to say access is forbidden and stop program Calling this function terminate execution ...
print $_SERVER["PHP_SELF"]
Edit parameters.
dol_get_fiche_head($links=array(), $active= '', $title= '', $notab=0, $picto= '', $pictoisfullpath=0, $morehtmlright= '', $morecss= '', $limittoshow=0, $moretabssuffix= '')
Show tabs of a record.
print
Draft customers invoices.
Definition: index.php:89
dol_get_fiche_end($notab=0)
Return tab footer of a card.
dol_banner_tab($object, $paramid, $morehtml= '', $shownav=1, $fieldid= 'rowid', $fieldref= 'ref', $morehtmlref= '', $moreparam= '', $nodbprefix=0, $morehtmlleft= '', $morehtmlstatus= '', $onlybanner=0, $morehtmlright= '')
Show tab footer of a card.
llxFooter()
Empty footer.
Definition: wrapper.php:59