31 require
'../../main.inc.php';
32 require_once DOL_DOCUMENT_ROOT.
'/contact/class/contact.class.php';
33 require_once DOL_DOCUMENT_ROOT.
'/comm/action/class/actioncomm.class.php';
34 require_once DOL_DOCUMENT_ROOT.
'/core/lib/date.lib.php';
35 require_once DOL_DOCUMENT_ROOT.
'/core/lib/agenda.lib.php';
36 require_once DOL_DOCUMENT_ROOT.
'/core/class/extrafields.class.php';
38 include_once DOL_DOCUMENT_ROOT.
'/core/class/html.formactions.class.php';
41 $langs->loadLangs(array(
"users",
"companies",
"agenda",
"commercial",
"other",
"orders",
"bills"));
44 $action =
GETPOST(
'action',
'aZ09');
45 $massaction =
GETPOST(
'massaction',
'alpha');
46 $confirm =
GETPOST(
'confirm',
'alpha');
47 $cancel =
GETPOST(
'cancel',
'alpha');
48 $toselect =
GETPOST(
'toselect',
'array');
49 $contextpage =
GETPOST(
'contextpage',
'aZ') ?
GETPOST(
'contextpage',
'aZ') :
'actioncommlist';
50 $optioncss =
GETPOST(
'optioncss',
'alpha');
53 $disabledefaultvalues =
GETPOST(
'disabledefaultvalues',
'int');
55 $mode =
GETPOST(
'mode',
'aZ09');
56 if (empty($mode) && preg_match(
'/show_/', $action)) {
59 $resourceid =
GETPOST(
"search_resourceid",
"int") ?
GETPOST(
"search_resourceid",
"int") :
GETPOST(
"resourceid",
"int");
60 $pid =
GETPOST(
"search_projectid",
'int', 3) ?
GETPOST(
"search_projectid",
'int', 3) :
GETPOST(
"projectid",
'int', 3);
61 $search_status = (
GETPOST(
"search_status",
'aZ09') !=
'') ?
GETPOST(
"search_status",
'aZ09') :
GETPOST(
"status",
'aZ09');
62 $type =
GETPOST(
'search_type',
'alphanohtml') ?
GETPOST(
'search_type',
'alphanohtml') :
GETPOST(
'type',
'alphanohtml');
64 $month =
GETPOST(
"month",
'int');
68 if (
GETPOST(
'search_actioncode',
'array')) {
69 $actioncode =
GETPOST(
'search_actioncode',
'array', 3);
70 if (!count($actioncode)) {
74 $actioncode =
GETPOST(
"search_actioncode",
"alpha", 3) ?
GETPOST(
"search_actioncode",
"alpha", 3) : (
GETPOST(
"search_actioncode") ==
'0' ?
'0' : ((empty($conf->global->AGENDA_DEFAULT_FILTER_TYPE) || $disabledefaultvalues) ?
'' : $conf->global->AGENDA_DEFAULT_FILTER_TYPE));
78 $search_id =
GETPOST(
'search_id',
'alpha');
79 $search_title =
GETPOST(
'search_title',
'alpha');
80 $search_note =
GETPOST(
'search_note',
'alpha');
83 $datestart_dtstart =
dol_mktime(0, 0, 0,
GETPOST(
'datestart_dtstartmonth',
'int'),
GETPOST(
'datestart_dtstartday',
'int'),
GETPOST(
'datestart_dtstartyear',
'int'),
'tzuserrel');
84 $datestart_dtend =
dol_mktime(23, 59, 59,
GETPOST(
'datestart_dtendmonth',
'int'),
GETPOST(
'datestart_dtendday',
'int'),
GETPOST(
'datestart_dtendyear',
'int'),
'tzuserrel');
85 $dateend_dtstart =
dol_mktime(0, 0, 0,
GETPOST(
'dateend_dtstartmonth',
'int'),
GETPOST(
'dateend_dtstartday',
'int'),
GETPOST(
'dateend_dtstartyear',
'int'),
'tzuserrel');
86 $dateend_dtend =
dol_mktime(23, 59, 59,
GETPOST(
'dateend_dtendmonth',
'int'),
GETPOST(
'dateend_dtendday',
'int'),
GETPOST(
'dateend_dtendyear',
'int'),
'tzuserrel');
87 if ($search_status ==
'' && !
GETPOSTISSET(
'search_status')) {
88 $search_status = ((empty($conf->global->AGENDA_DEFAULT_FILTER_STATUS) || $disabledefaultvalues) ?
'' : $conf->global->AGENDA_DEFAULT_FILTER_STATUS);
91 $mode = (empty($conf->global->AGENDA_DEFAULT_VIEW) ?
'show_month' : $conf->global->AGENDA_DEFAULT_VIEW);
94 $filter =
GETPOST(
"search_filter",
'alpha', 3) ?
GETPOST(
"search_filter",
'alpha', 3) :
GETPOST(
"filter",
'alpha', 3);
95 $filtert =
GETPOST(
"search_filtert",
"int", 3) ?
GETPOST(
"search_filtert",
"int", 3) :
GETPOST(
"filtert",
"int", 3);
96 $usergroup =
GETPOST(
"search_usergroup",
"int", 3) ?
GETPOST(
"search_usergroup",
"int", 3) :
GETPOST(
"usergroup",
"int", 3);
97 $showbirthday = empty($conf->use_javascript_ajax) ? (
GETPOST(
"search_showbirthday",
"int") ?
GETPOST(
"search_showbirthday",
"int") :
GETPOST(
"showbirthday",
"int")) : 1;
101 $hookmanager->initHooks(array(
'agendalist'));
106 $extrafields->fetch_name_optionals_label($object->table_element);
108 $search_array_options = $extrafields->getOptionalsFromPost($object->table_element,
'',
'search_');
110 if (empty($filtert) && empty($conf->global->AGENDA_ALL_CALENDARS)) {
111 $filtert = $user->id;
115 $limit =
GETPOST(
'limit',
'int') ?
GETPOST(
'limit',
'int') : $conf->liste_limit;
116 $sortfield =
GETPOST(
'sortfield',
'aZ09comma');
117 $sortorder =
GETPOST(
'sortorder',
'aZ09comma');
119 if (empty($page) || $page < 0 ||
GETPOST(
'button_search',
'alpha') ||
GETPOST(
'button_removefilter',
'alpha')) {
123 $offset = $limit * $page;
125 $sortorder =
"DESC,DESC";
126 if ($search_status ==
'todo') {
127 $sortorder =
"DESC,DESC";
131 $sortfield =
"a.datep,a.id";
132 if ($search_status ==
'todo') {
133 $sortfield =
"a.datep,a.id";
140 $socid = $user->socid;
147 if (!$user->hasRight(
'agenda',
'myactions',
'read')) {
150 if (!$user->hasRight(
'agenda',
'allactions',
'read')) {
153 if (!$user->hasRight(
'agenda',
'allactions',
'read') || $filter ==
'mine') {
154 $filtert = $user->id;
157 $arrayfields = array(
158 'a.id'=>array(
'label'=>
"Ref",
'checked'=>1),
159 'owner'=>array(
'label'=>
"Owner",
'checked'=>1),
160 'c.libelle'=>array(
'label'=>
"Type",
'checked'=>1),
161 'a.label'=>array(
'label'=>
"Title",
'checked'=>1),
162 'a.note'=>array(
'label'=>
'Description',
'checked'=>0),
163 'a.datep'=>array(
'label'=>
"DateStart",
'checked'=>1),
164 'a.datep2'=>array(
'label'=>
"DateEnd",
'checked'=>1),
165 's.nom'=>array(
'label'=>
"ThirdParty",
'checked'=>1),
166 'a.fk_contact'=>array(
'label'=>
"Contact",
'checked'=>0),
167 'a.fk_element'=>array(
'label'=>
"LinkedObject",
'checked'=>1,
'enabled'=>(!empty($conf->global->AGENDA_SHOW_LINKED_OBJECT))),
168 'a.datec'=>array(
'label'=>
'DateCreation',
'checked'=>0,
'position'=>510),
169 'a.tms'=>array(
'label'=>
'DateModification',
'checked'=>0,
'position'=>520),
170 'a.percent'=>array(
'label'=>
"Status",
'checked'=>1,
'position'=>1000)
173 include DOL_DOCUMENT_ROOT.
'/core/tpl/extrafields_list_array_fields.tpl.php';
179 if ($user->socid && $socid) {
188 if (
GETPOST(
'cancel',
'alpha')) {
195 if (is_array($_POST)) {
196 foreach ($_POST as $key => $val) {
197 $param .=
'&'.$key.
'='.urlencode($val);
201 header(
"Location: ".DOL_URL_ROOT.
'/comm/action/index.php?'.$param);
205 $parameters = array(
'id'=>$socid);
206 $reshook = $hookmanager->executeHooks(
'doActions', $parameters, $object, $action);
212 include DOL_DOCUMENT_ROOT.
'/core/actions_changeselectedfields.inc.php';
214 if (
GETPOST(
'button_removefilter_x',
'alpha') ||
GETPOST(
'button_removefilter.x',
'alpha') ||
GETPOST(
'button_removefilter',
'alpha')) {
219 $datestart_dtstart =
'';
220 $datestart_dtend =
'';
221 $dateend_dtstart =
'';
232 $search_array_options = array();
235 if (empty($reshook) && !empty($massaction)) {
238 switch ($massaction) {
239 case 'set_all_events_to_todo':
243 case 'set_all_events_to_in_progress':
247 case 'set_all_events_to_finished':
252 if (isset($percent)) {
253 foreach ($toselect as $toselectid) {
254 $result = $object->updatePercent($toselectid, $percent);
264 if (empty($reshook)) {
265 $objectclass =
'ActionComm';
266 $objectlabel =
'Events';
269 $permissiontodelete = $user->rights->agenda->allactions->delete;
270 $permissiontoadd = $user->hasRight(
'agenda',
'myactions',
'create');
271 include DOL_DOCUMENT_ROOT.
'/core/actions_massactions.inc.php';
279 $userstatic =
new User($db);
283 $societestatic =
new Societe($db);
284 $contactstatic =
new Contact($db);
287 $nav .=
$form->selectDate($dateselect,
'dateselect', 0, 0, 1,
'', 1, 0);
288 $nav .=
' <input type="submit" name="submitdateselect" class="button" value="'.$langs->trans(
"Refresh").
'">';
292 $help_url =
'EN:Module_Agenda_En|FR:Module_Agenda|ES:M&omodulodulo_Agenda|DE:Modul_Terminplanung';
293 $title = $langs->trans(
"Agenda");
297 $listofextcals = array();
300 if (!empty($contextpage) && $contextpage != $_SERVER[
"PHP_SELF"]) {
301 $param .=
'&contextpage='.urlencode($contextpage);
303 if ($limit > 0 && $limit != $conf->liste_limit) {
304 $param .=
'&limit='.((int) $limit);
306 if ($actioncode !=
'') {
307 if (is_array($actioncode)) {
308 foreach ($actioncode as $str_action) {
309 $param .=
"&search_actioncode[]=".urlencode($str_action);
312 $param .=
"&search_actioncode=".urlencode($actioncode);
315 if ($resourceid > 0) {
316 $param .=
"&search_resourceid=".urlencode($resourceid);
318 if ($search_status !=
'') {
319 $param .=
"&search_status=".urlencode($search_status);
322 $param .=
"&search_filter=".urlencode($filter);
325 $param .=
"&search_filtert=".urlencode($filtert);
327 if ($usergroup > 0) {
328 $param .=
"&search_usergroup=".urlencode($usergroup);
331 $param .=
"&search_socid=".urlencode($socid);
334 $param .=
"&search_showbirthday=1";
337 $param .=
"&search_projectid=".urlencode($pid);
340 $param .=
"&search_type=".urlencode($type);
342 if ($search_id !=
'') {
343 $param .=
'&search_title='.urlencode($search_id);
345 if ($search_title !=
'') {
346 $param .=
'&search_title='.urlencode($search_title);
348 if ($search_note !=
'') {
349 $param .=
'&search_note='.urlencode($search_note);
351 if (
GETPOST(
'datestartday_dtstart',
'int')) {
352 $param .=
'&datestartday_dtstart='.GETPOST(
'datestartday_dtstart',
'int');
354 if (
GETPOST(
'datestartmonth_dtstart',
'int')) {
355 $param .=
'&datestartmonth_dtstart='.GETPOST(
'datestartmonth_dtstart',
'int');
357 if (
GETPOST(
'datestartyear_dtstart',
'int')) {
358 $param .=
'&datestartyear_dtstart='.GETPOST(
'datestartyear_dtstart',
'int');
360 if (
GETPOST(
'datestartday_dtend',
'int')) {
361 $param .=
'&datestartday_dtend='.GETPOST(
'datestartday_dtend',
'int');
363 if (
GETPOST(
'datestartmonth_dtend',
'int')) {
364 $param .=
'&datestartmonth_dtend='.GETPOST(
'datestartmonth_dtend',
'int');
366 if (
GETPOST(
'datestartyear_dtend',
'int')) {
367 $param .=
'&datestartyear_dtend='.GETPOST(
'datestartyear_dtend',
'int');
369 if (
GETPOST(
'dateendday_dtstart',
'int')) {
370 $param .=
'&dateendday_dtstart='.GETPOST(
'dateendday_dtstart',
'int');
372 if (
GETPOST(
'dateendmonth_dtstart',
'int')) {
373 $param .=
'&dateendmonth_dtstart='.GETPOST(
'dateendmonth_dtstart',
'int');
375 if (
GETPOST(
'dateendyear_dtstart',
'int')) {
376 $param .=
'&dateendyear_dtstart='.GETPOST(
'dateendyear_dtstart',
'int');
378 if (
GETPOST(
'dateendday_dtend',
'int')) {
379 $param .=
'&dateendday_dtend='.GETPOST(
'dateendday_dtend',
'int');
381 if (
GETPOST(
'dateendmonth_dtend',
'int')) {
382 $param .=
'&dateendmonth_dtend='.GETPOST(
'dateendmonth_dtend',
'int');
384 if (
GETPOST(
'dateendyear_dtend',
'int')) {
385 $param .=
'&dateendyear_dtend='.GETPOST(
'dateendyear_dtend',
'int');
387 if ($optioncss !=
'') {
388 $param .=
'&optioncss='.urlencode($optioncss);
391 include DOL_DOCUMENT_ROOT.
'/core/tpl/extrafields_list_search_param.tpl.php';
393 $paramnoactionodate = $param;
396 $arrayofmassactions = array(
397 'set_all_events_to_todo' => $langs->trans(
"SetAllEventsToTodo"),
398 'set_all_events_to_in_progress' => $langs->trans(
"SetAllEventsToInProgress"),
399 'set_all_events_to_finished' => $langs->trans(
"SetAllEventsToFinished"),
401 if ($user->rights->agenda->allactions->delete) {
402 $arrayofmassactions[
'predelete'] =
img_picto(
'',
'delete',
'class="pictofixedwidth"').$langs->trans(
"Delete");
404 if (
isModEnabled(
'category') && $user->hasRight(
'agenda',
'myactions',
'create')) {
405 $arrayofmassactions[
'preaffecttag'] =
img_picto(
'',
'category',
'class="pictofixedwidth"').$langs->trans(
"AffectTag");
407 if (
GETPOST(
'nomassaction',
'int') || in_array($massaction, array(
'presend',
'predelete',
'preaffecttag'))) {
408 $arrayofmassactions = array();
410 $massactionbutton =
$form->selectMassAction(
'', $arrayofmassactions);
413 if ($usergroup > 0) {
416 $sql .=
" s.nom as societe, s.rowid as socid, s.client, s.email as socemail,";
417 $sql .=
" a.id, a.code, a.label, a.note, a.datep as dp, a.datep2 as dp2, a.fulldayevent, a.location,";
418 $sql .=
" a.fk_user_author, a.fk_user_action,";
419 $sql .=
" a.fk_contact, a.note, a.percent as percent,";
420 $sql .=
" a.fk_element, a.elementtype, a.datec, a.tms as datem,";
421 $sql .=
" c.code as type_code, c.libelle as type_label, c.color as type_color, c.type as type_type, c.picto as type_picto,";
422 $sql .=
" sp.lastname, sp.firstname, sp.email, sp.phone, sp.address, sp.phone as phone_pro, sp.phone_mobile, sp.phone_perso, sp.fk_pays as country_id";
425 if (!empty($extrafields->attributes[$object->table_element][
'label'])) {
426 foreach ($extrafields->attributes[$object->table_element][
'label'] as $key => $val) {
427 $sql .= ($extrafields->attributes[$object->table_element][
'type'][$key] !=
'separate' ?
", ef.".$key.
" as options_".$key :
'');
432 $parameters = array();
433 $reshook = $hookmanager->executeHooks(
'printFieldListSelect', $parameters, $object, $action);
434 $sql .= $hookmanager->resPrint;
438 $sql .=
" FROM ".MAIN_DB_PREFIX.
"actioncomm as a";
439 $sql .=
" LEFT JOIN ".MAIN_DB_PREFIX.
"actioncomm_extrafields as ef ON (a.id = ef.fk_object)";
440 if (empty($user->rights->societe->client->voir) && !$socid) {
441 $sql .=
" LEFT JOIN ".MAIN_DB_PREFIX.
"societe_commerciaux as sc ON a.fk_soc = sc.fk_soc";
443 $sql .=
" LEFT JOIN ".MAIN_DB_PREFIX.
"societe as s ON a.fk_soc = s.rowid";
444 $sql .=
" LEFT JOIN ".MAIN_DB_PREFIX.
"socpeople as sp ON a.fk_contact = sp.rowid";
445 $sql .=
" ,".MAIN_DB_PREFIX.
"c_actioncomm as c";
447 if ($resourceid > 0) {
448 $sql .=
", ".MAIN_DB_PREFIX.
"element_resources as r";
451 if ($filtert > 0 || $usergroup > 0) {
452 $sql .=
", ".MAIN_DB_PREFIX.
"actioncomm_resources as ar";
454 if ($usergroup > 0) {
455 $sql .=
" LEFT JOIN ".MAIN_DB_PREFIX.
"usergroup_user as ugu ON ugu.fk_user = ar.fk_element";
457 $sql .=
" WHERE c.id = a.fk_action";
458 $sql .=
' AND a.entity IN ('.getEntity(
'agenda').
')';
460 if (!empty($actioncode)) {
461 if (empty($conf->global->AGENDA_USE_EVENT_TYPE)) {
462 if ($actioncode ==
'AC_NON_AUTO') {
463 $sql .=
" AND c.type != 'systemauto'";
464 } elseif ($actioncode ==
'AC_ALL_AUTO') {
465 $sql .=
" AND c.type = 'systemauto'";
467 if ($actioncode ==
'AC_OTH') {
468 $sql .=
" AND c.type != 'systemauto'";
470 if ($actioncode ==
'AC_OTH_AUTO') {
471 $sql .=
" AND c.type = 'systemauto'";
475 if ($actioncode ==
'AC_NON_AUTO') {
476 $sql .=
" AND c.type != 'systemauto'";
477 } elseif ($actioncode ==
'AC_ALL_AUTO') {
478 $sql .=
" AND c.type = 'systemauto'";
480 if (is_array($actioncode)) {
481 $sql .=
" AND c.code IN (".$db->sanitize(
"'".implode(
"','", $actioncode).
"'", 1).
")";
483 $sql .=
" AND c.code IN (".$db->sanitize(
"'".implode(
"','", explode(
',', $actioncode)).
"'", 1).
")";
488 if ($resourceid > 0) {
489 $sql .=
" AND r.element_type = 'action' AND r.element_id = a.id AND r.resource_id = ".((int) $resourceid);
492 $sql .=
" AND a.fk_project=".((int) $pid);
494 if (empty($user->rights->societe->client->voir) && !$socid) {
495 $sql .=
" AND (a.fk_soc IS NULL OR sc.fk_user = ".((int) $user->id).
")";
498 $sql .=
" AND s.rowid = ".((int) $socid);
501 if ($filtert > 0 || $usergroup > 0) {
502 $sql .=
" AND ar.fk_actioncomm = a.id AND ar.element_type='user'";
505 $sql .=
" AND c.id = ".((int) $type);
507 if ($search_status ==
'0') {
508 $sql .=
" AND a.percent = 0";
510 if ($search_status ==
'na') {
511 $sql .=
" AND a.percent = -1";
513 if ($search_status ==
'50') {
514 $sql .=
" AND (a.percent > 0 AND a.percent < 100)";
516 if ($search_status ==
'100') {
517 $sql .=
" AND a.percent = 100";
519 if ($search_status ==
'done') {
520 $sql .=
" AND (a.percent = 100)";
522 if ($search_status ==
'todo') {
523 $sql .=
" AND (a.percent >= 0 AND a.percent < 100)";
535 if ($filtert > 0 || $usergroup > 0) {
538 $sql .=
"(ar.fk_element = ".((int) $filtert).
" OR (ar.fk_element IS NULL AND a.fk_user_action = ".((int) $filtert).
"))";
540 if ($usergroup > 0) {
541 $sql .= ($filtert > 0 ?
" OR " :
"").
" ugu.fk_usergroup = ".((
int) $usergroup);
547 if ($dateselect > 0) {
548 $sql .=
" AND ((a.datep2 >= '".$db->idate($dateselect).
"' AND a.datep <= '".$db->idate($dateselect + 3600 * 24 - 1).
"') OR (a.datep2 IS NULL AND a.datep > '".$db->idate($dateselect - 3600).
"' AND a.datep <= '".$db->idate($dateselect + 3600 * 24 - 1).
"'))";
550 if ($datestart_dtstart > 0) {
551 $sql .=
" AND a.datep >= '".$db->idate($datestart_dtstart).
"'";
553 if ($datestart_dtend > 0) {
554 $sql .=
" AND a.datep <= '".$db->idate($datestart_dtend).
"'";
556 if ($dateend_dtstart > 0) {
557 $sql .=
" AND a.datep2 >= '".$db->idate($dateend_dtstart).
"'";
559 if ($dateend_dtend > 0) {
560 $sql .=
" AND a.datep2 <= '".$db->idate($dateend_dtend).
"'";
564 include DOL_DOCUMENT_ROOT.
'/core/tpl/extrafields_list_search_sql.tpl.php';
567 $parameters = array();
568 $reshook = $hookmanager->executeHooks(
'printFieldListWhere', $parameters, $object, $action);
569 $sql .= $hookmanager->resPrint;
572 $nbtotalofrecords =
'';
575 $sqlforcount = preg_replace(
'/^'.preg_quote($sqlfields,
'/').
'/',
'SELECT COUNT(*) as nbtotalofrecords',
$sql);
576 $sqlforcount = preg_replace(
'/GROUP BY .*$/',
'', $sqlforcount);
577 $resql = $db->query($sqlforcount);
579 $objforcount = $db->fetch_object($resql);
580 $nbtotalofrecords = $objforcount->nbtotalofrecords;
585 if (($page * $limit) > $nbtotalofrecords) {
593 $sql .= $db->order($sortfield, $sortorder);
595 $sql .= $db->plimit($limit + 1, $offset);
598 $resql = $db->query(
$sql);
604 $num = $db->num_rows($resql);
606 $arrayofselected = is_array($toselect) ? $toselect : array();
609 $newtitle =
'<div class="nowrap clear inline-block minheight30">';
610 $newtitle .=
'<input type="checkbox" id="check_mytasks" name="check_mytasks" checked disabled> '.$langs->trans(
"LocalAgenda").
' ';
611 $newtitle .=
'</div>';
614 $tabactive =
'cardlist';
618 print
'<form method="POST" id="searchFormList" class="listactionsfilter" action="'.$_SERVER[
"PHP_SELF"].
'">'.
"\n";
620 if ($optioncss !=
'') {
621 print
'<input type="hidden" name="optioncss" value="'.$optioncss.
'">';
623 print
'<input type="hidden" name="token" value="'.newToken().
'">';
624 print
'<input type="hidden" name="formfilteraction" id="formfilteraction" value="list">';
625 print
'<input type="hidden" name="sortfield" value="'.$sortfield.
'">';
626 print
'<input type="hidden" name="sortorder" value="'.$sortorder.
'">';
627 print
'<input type="hidden" name="type" value="'.$type.
'">';
631 $nav .=
'<input type="hidden" name="search_filter" value="'.$filter.
'">';
634 $nav .=
'<input type="hidden" name="search_showbirthday" value="1">';
646 $parameters = array();
647 $reshook = $hookmanager->executeHooks(
'addCalendarChoice', $parameters, $object, $action);
648 if (empty($reshook)) {
649 $s .= $hookmanager->resPrint;
650 } elseif ($reshook > 1) {
651 $s = $hookmanager->resPrint;
653 $viewyear = is_object($object) ?
dol_print_date($object->datep,
'%Y') :
'';
654 $viewmonth = is_object($object) ?
dol_print_date($object->datep,
'%m') :
'';
655 $viewday = is_object($object) ?
dol_print_date($object->datep,
'%d') :
'';
657 $viewmode .=
'<a class="btnTitle btnTitleSelected reposition" href="'.DOL_URL_ROOT.
'/comm/action/list.php?mode=show_list&restore_lastsearch_values=1'.$paramnoactionodate.
'">';
659 $viewmode .=
img_picto($langs->trans(
"List"),
'object_calendarlist',
'class="imgforviewmode pictoactionview block"');
661 $viewmode .=
'<span class="valignmiddle text-plus-circle btnTitle-label hideonsmartphone">'.$langs->trans(
"ViewList").
'</span></a>';
663 $viewmode .=
'<a class="btnTitle reposition" href="'.DOL_URL_ROOT.
'/comm/action/index.php?mode=show_month&year='.$viewyear.
'&month='.$viewmonth.
'&day='.$viewday.$paramnoactionodate.
'">';
665 $viewmode .=
img_picto($langs->trans(
"ViewCal"),
'object_calendarmonth',
'class="pictoactionview block"');
667 $viewmode .=
'<span class="valignmiddle text-plus-circle btnTitle-label hideonsmartphone">'.$langs->trans(
"ViewCal").
'</span></a>';
669 $viewmode .=
'<a class="btnTitle reposition" href="'.DOL_URL_ROOT.
'/comm/action/index.php?mode=show_week&year='.$viewyear.
'&month='.$viewmonth.
'&day='.$viewday.$paramnoactionodate.
'">';
671 $viewmode .=
img_picto($langs->trans(
"ViewWeek"),
'object_calendarweek',
'class="pictoactionview block"');
673 $viewmode .=
'<span class="valignmiddle text-plus-circle btnTitle-label hideonsmartphone">'.$langs->trans(
"ViewWeek").
'</span></a>';
675 $viewmode .=
'<a class="btnTitle reposition" href="'.DOL_URL_ROOT.
'/comm/action/index.php?mode=show_day&year='.$viewyear.
'&month='.$viewmonth.
'&day='.$viewday.$paramnoactionodate.
'">';
677 $viewmode .=
img_picto($langs->trans(
"ViewDay"),
'object_calendarday',
'class="pictoactionview block"');
679 $viewmode .=
'<span class="valignmiddle text-plus-circle btnTitle-label hideonsmartphone">'.$langs->trans(
"ViewDay").
'</span></a>';
681 $viewmode .=
'<a class="btnTitle reposition marginrightonly" href="'.DOL_URL_ROOT.
'/comm/action/peruser.php?mode=show_peruser&year='.$viewyear.
'&month='.$viewmonth.
'&day='.$viewday.$paramnoactionodate.
'">';
683 $viewmode .=
img_picto($langs->trans(
"ViewPerUser"),
'object_calendarperuser',
'class="pictoactionview block"');
685 $viewmode .=
'<span class="valignmiddle text-plus-circle btnTitle-label hideonsmartphone">'.$langs->trans(
"ViewPerUser").
'</span></a>';
687 $viewmode .=
'<span class="marginrightonly"></span>';
690 $parameters = array();
691 $reshook = $hookmanager->executeHooks(
'addCalendarView', $parameters, $object, $action);
692 if (empty($reshook)) {
693 $viewmode .= $hookmanager->resPrint;
694 } elseif ($reshook > 1) {
695 $viewmode = $hookmanager->resPrint;
700 $newparam =
'&month='.str_pad($month, 2,
"0", STR_PAD_LEFT).
'&year='.$tmpforcreatebutton[
'year'];
705 $url = DOL_URL_ROOT.
'/comm/action/card.php?action=create';
706 $url .=
'&datep='.sprintf(
"%04d%02d%02d", $tmpforcreatebutton[
'year'], $tmpforcreatebutton[
'mon'], $tmpforcreatebutton[
'mday']).$hourminsec;
707 $url .=
'&backtopage='.urlencode($_SERVER[
"PHP_SELF"].($newparam ?
'?'.$newparam :
''));
709 $newcardbutton =
dolGetButtonTitle($langs->trans(
'AddAction'),
'',
'fa fa-plus-circle', $url,
'', $user->rights->agenda->myactions->create || $user->hasRight(
'agenda',
'allactions',
'create'));
711 $param .=
'&mode='.$mode;
713 print_barre_liste($langs->trans(
"Agenda"), $page, $_SERVER[
"PHP_SELF"], $param, $sortfield, $sortorder, $massactionbutton, $num, -1 * $nbtotalofrecords,
'object_action', 0, $nav.$newcardbutton,
'', $limit, 0, 0, 1, $viewmode);
718 include DOL_DOCUMENT_ROOT.
'/core/tpl/massactions_pre.tpl.php';
722 $varpage = empty($contextpage) ? $_SERVER[
"PHP_SELF"] : $contextpage;
723 $selectedfields =
$form->multiSelectArrayWithCheckbox(
'selectedfields', $arrayfields, $varpage,
getDolGlobalString(
'MAIN_CHECKBOX_LEFT_COLUMN'));
724 if ($massactionbutton) {
725 $selectedfields .=
$form->showCheckAddButtons(
'checkforselect', 1);
729 print
'<div class="liste_titre liste_titre_bydiv centpercent">';
730 print_actions_filter(
$form, $canedit, $search_status, $year, $month, $day, $showbirthday, 0, $filtert, 0, $pid, $socid, $action, -1, $actioncode, $usergroup,
'', $resourceid);
733 print
'<div class="div-table-responsive">';
734 print
'<table class="tagtable liste'.($moreforfilter ?
" listwithfilterbefore" :
"").
'">'.
"\n";
736 print
'<tr class="liste_titre_filter">';
739 print
'<td class="liste_titre" align="middle">';
740 $searchpicto =
$form->showFilterButtons(
'left');
744 if (!empty($arrayfields[
'a.id'][
'checked'])) {
745 print
'<td class="liste_titre"><input type="text" class="maxwidth50" name="search_id" value="'.$search_id.
'"></td>';
747 if (!empty($arrayfields[
'owner'][
'checked'])) {
748 print
'<td class="liste_titre"></td>';
750 if (!empty($arrayfields[
'c.libelle'][
'checked'])) {
751 print
'<td class="liste_titre"></td>';
753 if (!empty($arrayfields[
'a.label'][
'checked'])) {
754 print
'<td class="liste_titre"><input type="text" class="maxwidth75" name="search_title" value="'.$search_title.
'"></td>';
756 if (!empty($arrayfields[
'a.note'][
'checked'])) {
757 print
'<td class="liste_titre"><input type="text" class="maxwidth75" name="search_note" value="'.$search_note.
'"></td>';
759 if (!empty($arrayfields[
'a.datep'][
'checked'])) {
760 print
'<td class="liste_titre nowraponall" align="center">';
761 print
'<div class="nowrap">';
762 print
$form->selectDate($datestart_dtstart,
'datestart_dtstart', 0, 0, 1,
'', 1, 0, 0,
'',
'',
'',
'', 1,
'', $langs->trans(
'From'),
'tzuserrel');
764 print
'<div class="nowrap">';
765 print
$form->selectDate($datestart_dtend,
'datestart_dtend', 0, 0, 1,
'', 1, 0, 0,
'',
'',
'',
'', 1,
'', $langs->trans(
'To'),
'tzuserrel');
769 if (!empty($arrayfields[
'a.datep2'][
'checked'])) {
770 print
'<td class="liste_titre nowraponall" align="center">';
771 print
'<div class="nowrap">';
772 print
$form->selectDate($dateend_dtstart,
'dateend_dtstart', 0, 0, 1,
'', 1, 0, 0,
'',
'',
'',
'', 1,
'', $langs->trans(
'From'),
'tzuserrel');
774 print
'<div class="nowrap">';
775 print
$form->selectDate($dateend_dtend,
'dateend_dtend', 0, 0, 1,
'', 1, 0, 0,
'',
'',
'',
'', 1,
'', $langs->trans(
'To'),
'tzuserrel');
779 if (!empty($arrayfields[
's.nom'][
'checked'])) {
780 print
'<td class="liste_titre"></td>';
782 if (!empty($arrayfields[
'a.fk_contact'][
'checked'])) {
783 print
'<td class="liste_titre"></td>';
785 if (!empty($arrayfields[
'a.fk_element'][
'checked'])) {
786 print
'<td class="liste_titre"></td>';
790 include DOL_DOCUMENT_ROOT.
'/core/tpl/extrafields_list_search_input.tpl.php';
793 $parameters = array(
'arrayfields'=>$arrayfields);
794 $reshook = $hookmanager->executeHooks(
'printFieldListOption', $parameters);
795 print $hookmanager->resPrint;
797 if (!empty($arrayfields[
'a.datec'][
'checked'])) {
798 print
'<td class="liste_titre"></td>';
800 if (!empty($arrayfields[
'a.tms'][
'checked'])) {
801 print
'<td class="liste_titre"></td>';
803 if (!empty($arrayfields[
'a.percent'][
'checked'])) {
804 print
'<td class="liste_titre right parentonrightofpage">';
805 $formactions->form_select_status_action(
'formaction', $search_status, 1,
'search_status', 1, 2,
'search_status width100 onrightofpage');
810 print
'<td class="liste_titre" align="middle">';
811 $searchpicto =
$form->showFilterButtons();
817 $totalarray = array();
818 $totalarray[
'nbfield'] = 0;
822 print
'<tr class="liste_titre">';
824 print_liste_field_titre($selectedfields, $_SERVER[
"PHP_SELF"],
"",
'',
'',
'align="center"', $sortfield, $sortorder,
'maxwidthsearch ');
826 if (!empty($arrayfields[
'a.id'][
'checked'])) {
827 print_liste_field_titre($arrayfields[
'a.id'][
'label'], $_SERVER[
"PHP_SELF"],
"a.id", $param,
"",
"", $sortfield, $sortorder);
828 $totalarray[
'nbfield']++;
830 if (!empty($arrayfields[
'owner'][
'checked'])) {
831 print_liste_field_titre($arrayfields[
'owner'][
'label'], $_SERVER[
"PHP_SELF"],
"", $param,
"",
"", $sortfield, $sortorder);
832 $totalarray[
'nbfield']++;
834 if (!empty($arrayfields[
'c.libelle'][
'checked'])) {
835 print_liste_field_titre($arrayfields[
'c.libelle'][
'label'], $_SERVER[
"PHP_SELF"],
"c.libelle", $param,
"",
"", $sortfield, $sortorder);
836 $totalarray[
'nbfield']++;
838 if (!empty($arrayfields[
'a.label'][
'checked'])) {
839 print_liste_field_titre($arrayfields[
'a.label'][
'label'], $_SERVER[
"PHP_SELF"],
"a.label", $param,
"",
"", $sortfield, $sortorder);
840 $totalarray[
'nbfield']++;
842 if (!empty($arrayfields[
'a.note'][
'checked'])) {
843 print_liste_field_titre($arrayfields[
'a.note'][
'label'], $_SERVER[
"PHP_SELF"],
"a.note", $param,
"",
"", $sortfield, $sortorder);
844 $totalarray[
'nbfield']++;
847 if (!empty($arrayfields[
'a.datep'][
'checked'])) {
848 print_liste_field_titre($arrayfields[
'a.datep'][
'label'], $_SERVER[
"PHP_SELF"],
"a.datep,a.id", $param,
'',
'align="center"', $sortfield, $sortorder);
849 $totalarray[
'nbfield']++;
851 if (!empty($arrayfields[
'a.datep2'][
'checked'])) {
852 print_liste_field_titre($arrayfields[
'a.datep2'][
'label'], $_SERVER[
"PHP_SELF"],
"a.datep2", $param,
'',
'align="center"', $sortfield, $sortorder);
853 $totalarray[
'nbfield']++;
855 if (!empty($arrayfields[
's.nom'][
'checked'])) {
856 print_liste_field_titre($arrayfields[
's.nom'][
'label'], $_SERVER[
"PHP_SELF"],
"s.nom", $param,
"",
"", $sortfield, $sortorder);
857 $totalarray[
'nbfield']++;
859 if (!empty($arrayfields[
'a.fk_contact'][
'checked'])) {
860 print_liste_field_titre($arrayfields[
'a.fk_contact'][
'label'], $_SERVER[
"PHP_SELF"],
"", $param,
"",
"", $sortfield, $sortorder);
861 $totalarray[
'nbfield']++;
863 if (!empty($arrayfields[
'a.fk_element'][
'checked'])) {
864 print_liste_field_titre($arrayfields[
'a.fk_element'][
'label'], $_SERVER[
"PHP_SELF"],
"", $param,
"",
"", $sortfield, $sortorder);
865 $totalarray[
'nbfield']++;
868 include DOL_DOCUMENT_ROOT.
'/core/tpl/extrafields_list_search_title.tpl.php';
870 $parameters = array(
'arrayfields'=>$arrayfields,
'param'=>$param,
'sortfield'=>$sortfield,
'sortorder'=>$sortorder);
871 $reshook = $hookmanager->executeHooks(
'printFieldListTitle', $parameters);
872 print $hookmanager->resPrint;
874 if (!empty($arrayfields[
'a.datec'][
'checked'])) {
875 print_liste_field_titre($arrayfields[
'a.datec'][
'label'], $_SERVER[
"PHP_SELF"],
"a.datec,a.id", $param,
"",
'align="center"', $sortfield, $sortorder);
876 $totalarray[
'nbfield']++;
878 if (!empty($arrayfields[
'a.tms'][
'checked'])) {
879 print_liste_field_titre($arrayfields[
'a.tms'][
'label'], $_SERVER[
"PHP_SELF"],
"a.tms,a.id", $param,
"",
'align="center"', $sortfield, $sortorder);
880 $totalarray[
'nbfield']++;
883 if (!empty($arrayfields[
'a.percent'][
'checked'])) {
884 print_liste_field_titre(
"Status", $_SERVER[
"PHP_SELF"],
"a.percent", $param,
"",
'align="center"', $sortfield, $sortorder);
885 $totalarray[
'nbfield']++;
888 print_liste_field_titre($selectedfields, $_SERVER[
"PHP_SELF"],
"",
'',
'',
'align="center"', $sortfield, $sortorder,
'maxwidthsearch ');
890 $totalarray[
'nbfield']++;
894 $delay_warning = $conf->global->MAIN_DELAY_ACTIONS_TODO * 24 * 60 * 60;
895 $today_start_time =
dol_mktime(0, 0, 0, date(
'm', $now), date(
'd', $now), date(
'Y', $now));
897 require_once DOL_DOCUMENT_ROOT.
'/comm/action/class/cactioncomm.class.php';
899 $arraylist = $caction->liste_array(1,
'code',
'', (empty($conf->global->AGENDA_USE_EVENT_TYPE) ? 1 : 0),
'', 1);
900 $contactListCache = array();
907 $imaxinloop = ($limit ? min($num, $limit) : $num);
908 $cache_user_list = array();
909 while ($i < $imaxinloop) {
910 $obj = $db->fetch_object($resql);
916 $object->setVarsFromFetchObj($obj);
919 if (!empty($conf->global->AGENDA_ALWAYS_HIDE_AUTO) && $obj->type_code ==
'AC_OTH_AUTO') {
924 $actionstatic->id = $obj->id;
925 $actionstatic->ref = $obj->id;
926 $actionstatic->code = $obj->code;
927 $actionstatic->type_code = $obj->type_code;
928 $actionstatic->type_label = $obj->type_label;
929 $actionstatic->type_picto = $obj->type_picto;
930 $actionstatic->type_color = $obj->type_color;
931 $actionstatic->label = $obj->label;
932 $actionstatic->location = $obj->location;
934 $actionstatic->datep = $db->jdate($obj->dp);
935 $actionstatic->percentage = $obj->percent;
936 $actionstatic->authorid = $obj->fk_user_author;
937 $actionstatic->userownerid = $obj->fk_user_action;
941 if (!empty($arrayfields[
'a.fk_contact'][
'checked'])) {
942 $actionstatic->fetchResources();
946 if ($obj->fk_user_action > 0 && !isset($cache_user_list[$obj->fk_user_action])) {
947 $userstatic =
new User($db);
948 $res = $userstatic->fetch($obj->fk_user_action);
950 $cache_user_list[$obj->fk_user_action] = $userstatic;
955 $event_owner_style =
'';
957 if ($cache_user_list[$obj->fk_user_action]->color !=
'') {
958 $event_owner_style .=
'border-left: #' . $cache_user_list[$obj->fk_user_action]->color .
' 5px solid;';
962 $event_more_class =
'';
963 $event_start_date_css =
'';
964 $event_end_date_css =
'';
965 $event_start_date_time = $actionstatic->datep;
966 if ($event_start_date_time > $now) {
968 $event_more_class =
'event-future';
969 $event_start_date_css = $event_end_date_css = $event_more_class;
971 if ($obj->fulldayevent == 1) {
972 $today_start_date_time = $today_start_time;
974 $today_start_date_time = $now;
978 $event_end_date_time = $db->jdate($obj->dp2);
979 if ($event_end_date_time !=
null && $event_end_date_time < $today_start_date_time) {
981 $event_more_class =
'event-past';
982 } elseif ($event_end_date_time ==
null && $event_start_date_time < $today_start_date_time) {
984 $event_more_class =
'event-past';
987 $event_more_class =
'event-current';
989 $event_start_date_css = $event_end_date_css = $event_more_class;
991 $event_start_date_css = $event_end_date_css = $event_more_class;
993 print
'<tr class="oddeven' . ($event_more_class !=
'' ?
' '.$event_more_class :
'') .
'">';
996 print
'<td class="nowrap center">';
997 if ($massactionbutton || $massaction) {
999 if (in_array($obj->id, $arrayofselected)) {
1002 print
'<input id="cb'.$obj->id.
'" class="flat checkforselect" type="checkbox" name="toselect[]" value="'.$obj->id.
'"'.($selected ?
' checked="checked"' :
'').
'>';
1007 if (!empty($arrayfields[
'a.id'][
'checked'])) {
1008 print
'<td class="nowraponall">';
1009 print $actionstatic->getNomUrl(1, -1);
1014 if (!empty($arrayfields[
'owner'][
'checked'])) {
1016 print
'<td class="tdoverflowmax150">';
1017 if ($obj->fk_user_action > 0 && !isset($cache_user_list[$obj->fk_user_action])) {
1018 $userstatic =
new User($db);
1019 $res = $userstatic->fetch($obj->fk_user_action);
1021 $cache_user_list[$obj->fk_user_action] = $userstatic;
1024 if (isset($cache_user_list[$obj->fk_user_action])) {
1025 print $cache_user_list[$obj->fk_user_action]->getNomUrl(-1);
1033 if (!empty($arrayfields[
'c.libelle'][
'checked'])) {
1034 print
'<td class="nowraponall">';
1035 print $actionstatic->getTypePicto();
1036 $labeltype = $obj->type_code;
1037 if (empty($conf->global->AGENDA_USE_EVENT_TYPE) && empty($arraylist[$labeltype])) {
1038 $labeltype =
'AC_OTH';
1040 if (preg_match(
'/^TICKET_MSG/', $actionstatic->code)) {
1041 $labeltype = $langs->trans(
"Message");
1043 if (!empty($arraylist[$labeltype])) {
1044 $labeltype = $arraylist[$labeltype];
1046 if ($obj->type_code ==
'AC_OTH_AUTO' && ($obj->type_code != $obj->code) && $labeltype && !empty($arraylist[$obj->code])) {
1047 $labeltype .=
' - '.$arraylist[$obj->code];
1055 if (!empty($arrayfields[
'a.label'][
'checked'])) {
1056 print
'<td class="tdoverflowmax200" title="'.dol_escape_htmltag($actionstatic->label).
'">';
1057 print $actionstatic->label;
1062 if (!empty($arrayfields[
'a.note'][
'checked'])) {
1063 print
'<td class="tdoverflowonsmartphone">';
1065 print
$form->textwithtooltip(
dol_trunc($text, 48), $actionstatic->note_private);
1069 $formatToUse = $obj->fulldayevent ?
'day' :
'dayhour';
1072 if (!empty($arrayfields[
'a.datep'][
'checked'])) {
1073 print
'<td class="center nowraponall'.($event_start_date_css ?
' '.$event_start_date_css :
'').
'"><span>';
1074 if (empty($obj->fulldayevent)) {
1075 print
dol_print_date($db->jdate($obj->dp), $formatToUse,
'tzuserrel');
1078 print
dol_print_date($db->jdate($obj->dp), $formatToUse, ($tzforfullday ? $tzforfullday :
'tzuserrel'));
1082 if ($actionstatic->hasDelay() && $actionstatic->percentage >= 0 && $actionstatic->percentage < 100 ) {
1092 if (!empty($arrayfields[
'a.datep2'][
'checked'])) {
1093 print
'<td class="center nowraponall'.($event_end_date_css ?
' '.$event_end_date_css :
'').
'"><span>';
1094 if (empty($obj->fulldayevent)) {
1095 print
dol_print_date($db->jdate($obj->dp2), $formatToUse,
'tzuserrel');
1098 print
dol_print_date($db->jdate($obj->dp2), $formatToUse, ($tzforfullday ? $tzforfullday :
'tzuserrel'));
1105 if (!empty($arrayfields[
's.nom'][
'checked'])) {
1106 print
'<td class="tdoverflowmax150">';
1107 if ($obj->socid > 0) {
1108 $societestatic->id = $obj->socid;
1109 $societestatic->client = $obj->client;
1110 $societestatic->name = $obj->societe;
1111 $societestatic->email = $obj->socemail;
1113 print $societestatic->getNomUrl(1,
'', 28);
1121 if (!empty($arrayfields[
'a.fk_contact'][
'checked'])) {
1122 print
'<td class="tdoverflowmax100">';
1124 if (!empty($actionstatic->socpeopleassigned)) {
1125 $contactList = array();
1126 foreach ($actionstatic->socpeopleassigned as $socpeopleassigned) {
1127 if (!isset($contactListCache[$socpeopleassigned[
'id']])) {
1130 if ($contact->fetch($socpeopleassigned[
'id']) > 0) {
1131 $contactListCache[$socpeopleassigned[
'id']] = $contact->getNomUrl(1,
'', 0);
1132 $contactList[] = $contact->getNomUrl(1,
'', 0);
1136 $contactList[] = $contactListCache[$socpeopleassigned[
'id']];
1139 if (!empty($contactList)) {
1140 print implode(
', ', $contactList);
1142 } elseif ($obj->fk_contact > 0) {
1143 $contactstatic->id = $obj->fk_contact;
1144 $contactstatic->email = $obj->email;
1145 $contactstatic->lastname = $obj->lastname;
1146 $contactstatic->firstname = $obj->firstname;
1147 $contactstatic->phone_pro = $obj->phone_pro;
1148 $contactstatic->phone_mobile = $obj->phone_mobile;
1149 $contactstatic->phone_perso = $obj->phone_perso;
1150 $contactstatic->country_id = $obj->country_id;
1151 print $contactstatic->getNomUrl(1,
'', 0);
1159 if (!empty($arrayfields[
'a.fk_element'][
'checked'])) {
1160 print
'<td class="tdoverflowmax150">';
1162 if ($obj->fk_element > 0 && !empty($obj->elementtype)) {
1163 include_once DOL_DOCUMENT_ROOT.
'/core/lib/functions2.lib.php';
1172 include DOL_DOCUMENT_ROOT.
'/core/tpl/extrafields_list_print_fields.tpl.php';
1174 $parameters = array(
'arrayfields'=>$arrayfields,
'obj'=>$obj,
'i'=>$i,
'totalarray'=>&$totalarray);
1175 $reshook = $hookmanager->executeHooks(
'printFieldListValue', $parameters);
1176 print $hookmanager->resPrint;
1179 if (!empty($arrayfields[
'a.datec'][
'checked'])) {
1181 print
'<td align="center" class="nowrap">'.dol_print_date($db->jdate($obj->datec),
'dayhour',
'tzuserrel').
'</td>';
1184 if (!empty($arrayfields[
'a.tms'][
'checked'])) {
1185 print
'<td align="center" class="nowrap">'.dol_print_date($db->jdate($obj->datem),
'dayhour',
'tzuserrel').
'</td>';
1187 if (!empty($arrayfields[
'a.percent'][
'checked'])) {
1189 $datep = $db->jdate($obj->dp);
1190 print
'<td align="center" class="nowrap">'.$actionstatic->LibStatut($obj->percent, 5, 0, $datep).
'</td>';
1194 print
'<td class="nowrap center">';
1195 if ($massactionbutton || $massaction) {
1197 if (in_array($obj->id, $arrayofselected)) {
1200 print
'<input id="cb'.$obj->id.
'" class="flat checkforselect" type="checkbox" name="toselect[]" value="'.$obj->id.
'"'.($selected ?
' checked="checked"' :
'').
'>';
1211 print
'<tr><td colspan="'.$totalarray[
'nbfield'].
'"><span class="opacitymedium">'.$langs->trans(
"NoRecordFound").
'</span></td></tr>';
1215 print
'</table>'.
"\n";
1216 print
'</div>'.
"\n";
1218 print
'</form>'.
"\n";