PageRenderTime 79ms CodeModel.GetById 16ms RepoModel.GetById 1ms app.codeStats 0ms

/htdocs/agenda/index.old.php

https://bitbucket.org/speedealing/speedealing
PHP | 1164 lines | 885 code | 116 blank | 163 comment | 270 complexity | e552204f84de3d1f68b07a92c3c48735 MD5 | raw file
Possible License(s): LGPL-3.0, LGPL-2.1, GPL-3.0, MIT

Large files files are truncated, but you can click here to view the full file

    

  1. <?php
    2. 

  2. /* Copyright (C) 2001-2004 Rodolphe Quiedeville <rodolphe@quiedeville.org>
    3. 

  3.  * Copyright (C) 2003      Eric Seigne          <erics@rycks.com>
    4. 

  4.  * Copyright (C) 2004-2012 Laurent Destailleur  <eldy@users.sourceforge.net>
    5. 

  5.  * Copyright (C) 2005-2012 Regis Houssin        <regis.houssin@capnetworks.com>
    6. 

  6.  * Copyright (C) 2011      Juanjo Menent        <jmenent@2byte.es>
    7. 

  7.  * Copyright (C) 2010-2011 Herve Prot           <herve.prot@symeos.com>
    8. 

  8.  *
    9. 

  9.  * This program is free software; you can redistribute it and/or modify
    10. 

  10.  * it under the terms of the GNU General Public License as published by
    11. 

  11.  * the Free Software Foundation; either version 3 of the License, or
    12. 

  12.  * (at your option) any later version.
    13. 

  13.  *
    14. 

  14.  * This program is distributed in the hope that it will be useful,
    15. 

  15.  * but WITHOUT ANY WARRANTY; without even the implied warranty of
    16. 

  16.  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    17. 

  17.  * GNU General Public License for more details.
    18. 

  18.  *
    19. 

  19.  * You should have received a copy of the GNU General Public License
    20. 

  20.  * along with this program. If not, see <http://www.gnu.org/licenses/>.
    21. 

  21.  */
    22. 

  22. 

  23. /**
    24. 

  24.  *  \file       htdocs/comm/action/index.php
    25. 

  25.  *  \ingroup    agenda
    26. 

  26.  *  \brief      Home page of calendar events
    27. 

  27.  */
    28. 

  28. 

  29. require '../../main.inc.php';
    30. 

  30. require_once DOL_DOCUMENT_ROOT.'/societe/class/societe.class.php';
    31. 

  31. require_once DOL_DOCUMENT_ROOT.'/contact/class/contact.class.php';
    32. 

  32. require_once DOL_DOCUMENT_ROOT.'/comm/action/class/actioncomm.class.php';
    33. 

  33. require_once DOL_DOCUMENT_ROOT.'/core/lib/date.lib.php';
    34. 

  34. require_once DOL_DOCUMENT_ROOT.'/core/lib/agenda.lib.php';
    35. 

  35. if (! empty($conf->projet->enabled)) require_once DOL_DOCUMENT_ROOT.'/core/lib/project.lib.php';
    36. 

  36. 

  37. if (! isset($conf->global->AGENDA_MAX_EVENTS_DAY_VIEW)) $conf->global->AGENDA_MAX_EVENTS_DAY_VIEW=3;
    38. 

  38. 

  39. $filter=GETPOST("filter",'',3);
    40. 

  40. $filtera = GETPOST("userasked","int",3)?GETPOST("userasked","int",3):GETPOST("filtera","int",3);
    41. 

  41. $filtert = GETPOST("usertodo","int",3)?GETPOST("usertodo","int",3):GETPOST("filtert","int",3);
    42. 

  42. $filterd = GETPOST("userdone","int",3)?GETPOST("userdone","int",3):GETPOST("filterd","int",3);
    43. 

  43. $showbirthday = empty($conf->use_javascript_ajax)?GETPOST("showbirthday","int"):1;
    44. 

  44. 

  45. 

  46. $sortfield = GETPOST("sortfield",'alpha');
    47. 

  47. $sortorder = GETPOST("sortorder",'alpha');
    48. 

  48. $page = GETPOST("page","int");
    49. 

  49. if ($page == -1) { $page = 0; }
    50. 

  50. $limit = $conf->liste_limit;
    51. 

  51. $offset = $limit * $page;
    52. 

  52. if (! $sortorder) $sortorder="ASC";
    53. 

  53. if (! $sortfield) $sortfield="a.datec";
    54. 

  54. 

  55. // Security check
    56. 

  56. $socid = GETPOST("socid","int",1);
    57. 

  57. if ($user->societe_id) $socid=$user->societe_id;
    58. 

  58. $result = restrictedArea($user, 'agenda', 0, '', 'myactions');
    59. 

  59. 

  60. $canedit=1;
    61. 

  61. if (! $user->rights->agenda->myactions->read) accessforbidden();
    62. 

  62. if (! $user->rights->agenda->allactions->read) $canedit=0;
    63. 

  63. if (! $user->rights->agenda->allactions->read || $filter =='mine')  // If no permission to see all, we show only affected to me
    64. 

  64. {
    65. 

  65.     $filtera=$user->id;
    66. 

  66.     $filtert=$user->id;
    67. 

  67.     $filterd=$user->id;
    68. 

  68. }
    69. 

  69. 

  70. $action=GETPOST('action','alpha');
    71. 

  71. //$year=GETPOST("year");
    72. 

  72. $year=GETPOST("year","int")?GETPOST("year","int"):date("Y");
    73. 

  73. $month=GETPOST("month","int")?GETPOST("month","int"):date("m");
    74. 

  74. $week=GETPOST("week","int")?GETPOST("week","int"):date("W");
    75. 

  75. $day=GETPOST("day","int")?GETPOST("day","int"):0;
    76. 

  76. $actioncode=GETPOST("actioncode","alpha",3);
    77. 

  77. $pid=GETPOST("projectid","int",3);
    78. 

  78. $status=GETPOST("status");
    79. 

  79. $type=GETPOST("type");
    80. 

  80. $maxprint=(isset($_GET["maxprint"])?GETPOST("maxprint"):$conf->global->AGENDA_MAX_EVENTS_DAY_VIEW);
    81. 

  81. 

  82. if (GETPOST('viewcal'))  {
    83. 

  83.     $action='show_month'; $day='';
    84. 

  84. }                                                   // View by month
    85. 

  85. if (GETPOST('viewweek')) {
    86. 

  86.     $action='show_week'; $week=($week?$week:date("W")); $day=($day?$day:date("d"));
    87. 

  87. }  // View by week
    88. 

  88. if (GETPOST('viewday'))  {
    89. 

  89.     $action='show_day'; $day=($day?$day:date("d"));
    90. 

  90. }                                  // View by day
    91. 

  91. 

  92. $langs->load("other");
    93. 

  93. $langs->load("commercial");
    94. 

  94. 

  95. 

  96. 

  97. /*
    98. 

  98.  * Actions
    99. 

  99.  */
    100. 

  100. if (GETPOST("viewlist"))
    101. 

  101. {
    102. 

  102.     $param='';
    103. 

  103.     foreach($_POST as $key => $val)
    104. 

  104.     {
    105. 

  105.         if ($key=='token') continue;
    106. 

  106.         $param.='&'.$key.'='.urlencode($val);
    107. 

  107.     }
    108. 

  108.     //print $param;
    109. 

  109.     header("Location: ".DOL_URL_ROOT.'/comm/action/listactions.php?'.$param);
    110. 

  110.     exit;
    111. 

  111. }
    112. 

  112. 

  113. if ($action=='delete_action')
    114. 

  114. {
    115. 

  115.     $event = new ActionComm($db);
    116. 

  116.     $event->fetch($actionid);
    117. 

  117.     $result=$event->delete();
    118. 

  118. }
    119. 

  119. 

  120. 

  121. 

  122. /*
    123. 

  123.  * View
    124. 

  124.  */
    125. 

  125. 

  126. 

  127. llxHeader('',$langs->trans("Agenda"));
    128. 

  128. 

  129. $form=new Form($db);
    130. 

  130. $companystatic=new Societe($db);
    131. 

  131. $contactstatic=new Contact($db);
    132. 

  132. 

  133. $now=dol_now();
    134. 

  134. 

  135. // Define list of all external calendars
    136. 

  136. $listofextcals=array();
    137. 

  137. if (empty($conf->global->AGENDA_DISABLE_EXT) && $conf->global->AGENDA_EXT_NB > 0)
    138. 

  138. {
    139. 

  139.     $i=0;
    140. 

  140.     while($i < $conf->global->AGENDA_EXT_NB)
    141. 

  141.     {
    142. 

  142.         $i++;
    143. 

  143.         $source='AGENDA_EXT_SRC'.$i;
    144. 

  144.         $name='AGENDA_EXT_NAME'.$i;
    145. 

  145.         $color='AGENDA_EXT_COLOR'.$i;
    146. 

  146.         if (! empty($conf->global->$source) && ! empty($conf->global->$name))
    147. 

  147.         {
    148. 

  148.         	$listofextcals[]=array('src'=>$conf->global->$source,'name'=>$conf->global->$name,'color'=>$conf->global->$color);
    149. 

  149.         }
    150. 

  150.     }
    151. 

  151. }
    152. 

  152. 

  153. 

  154. if (empty($action) || $action=='show_month')
    155. 

  155. {
    156. 

  156.     $prev = dol_get_prev_month($month, $year);
    157. 

  157.     $prev_year  = $prev['year'];
    158. 

  158.     $prev_month = $prev['month'];
    159. 

  159.     $next = dol_get_next_month($month, $year);
    160. 

  160.     $next_year  = $next['year'];
    161. 

  161.     $next_month = $next['month'];
    162. 

  162. 

  163.     $max_day_in_prev_month = date("t",dol_mktime(0,0,0,$prev_month,1,$prev_year));  // Nb of days in previous month
    164. 

  164.     $max_day_in_month = date("t",dol_mktime(0,0,0,$month,1,$year));                 // Nb of days in next month
    165. 

  165.     // tmpday is a negative or null cursor to know how many days before the 1 to show on month view (if tmpday=0 we start on monday)
    166. 

  166.     $tmpday = -date("w",dol_mktime(0,0,0,$month,1,$year))+2;
    167. 

  167.     $tmpday+=((isset($conf->global->MAIN_START_WEEK)?$conf->global->MAIN_START_WEEK:1)-1);
    168. 

  168.     if ($tmpday >= 1) $tmpday -= 7;
    169. 

  169.     // Define firstdaytoshow and lastdaytoshow
    170. 

  170.     $firstdaytoshow=dol_mktime(0,0,0,$prev_month,$max_day_in_prev_month+$tmpday,$prev_year);
    171. 

  171.     $next_day=7-($max_day_in_month+1-$tmpday)%7;
    172. 

  172.     if ($next_day < 6) $next_day+=7;
    173. 

  173.     $lastdaytoshow=dol_mktime(0,0,0,$next_month,$next_day,$next_year);
    174. 

  174. }
    175. 

  175. if ($action=='show_week')
    176. 

  176. {
    177. 

  177.     $prev = dol_get_first_day_week($day, $month, $year);
    178. 

  178.     $prev_year  = $prev['prev_year'];
    179. 

  179.     $prev_month = $prev['prev_month'];
    180. 

  180.     $prev_day   = $prev['prev_day'];
    181. 

  181.     $first_day  = $prev['first_day'];
    182. 

  182. 

  183.     $week = $prev['week'];
    184. 

  184. 

  185.     $day = (int) $day;
    186. 

  186.     $next = dol_get_next_week($day, $week, $month, $year);
    187. 

  187.     $next_year  = $next['year'];
    188. 

  188.     $next_month = $next['month'];
    189. 

  189.     $next_day   = $next['day'];
    190. 

  190. 

  191.     // Define firstdaytoshow and lastdaytoshow
    192. 

  192.     $firstdaytoshow=dol_mktime(0,0,0,$prev_month,$first_day,$prev_year);
    193. 

  193.     $lastdaytoshow=dol_mktime(0,0,0,$next_month,$next_day,$next_year);
    194. 

  194. 

  195.     $max_day_in_month = date("t",dol_mktime(0,0,0,$month,1,$year));
    196. 

  196. 

  197.     $tmpday = $first_day;
    198. 

  198. }
    199. 

  199. if ($action == 'show_day')
    200. 

  200. {
    201. 

  201.     $prev = dol_get_prev_day($day, $month, $year);
    202. 

  202.     $prev_year  = $prev['year'];
    203. 

  203.     $prev_month = $prev['month'];
    204. 

  204.     $prev_day   = $prev['day'];
    205. 

  205.     $next = dol_get_next_day($day, $month, $year);
    206. 

  206.     $next_year  = $next['year'];
    207. 

  207.     $next_month = $next['month'];
    208. 

  208.     $next_day   = $next['day'];
    209. 

  209. 

  210.     // Define firstdaytoshow and lastdaytoshow
    211. 

  211.     $firstdaytoshow=dol_mktime(0,0,0,$prev_month,$prev_day,$prev_year);
    212. 

  212.     $lastdaytoshow=dol_mktime(0,0,0,$next_month,$next_day,$next_year);
    213. 

  213. }
    214. 

  214. //print 'xx'.$prev_year.'-'.$prev_month.'-'.$prev_day;
    215. 

  215. //print 'xx'.$next_year.'-'.$next_month.'-'.$next_day;
    216. 

  216. //print dol_print_date($firstdaytoshow,'day');
    217. 

  217. //print dol_print_date($lastdaytoshow,'day');
    218. 

  218. 

  219. $title=$langs->trans("DoneAndToDoActions");
    220. 

  220. if ($status == 'done') $title=$langs->trans("DoneActions");
    221. 

  221. if ($status == 'todo') $title=$langs->trans("ToDoActions");
    222. 

  222. 

  223. $param='';
    224. 

  224. $region='';
    225. 

  225. if ($status)  $param="&status=".$status;
    226. 

  226. if ($filter)  $param.="&filter=".$filter;
    227. 

  227. if ($filtera) $param.="&filtera=".$filtera;
    228. 

  228. if ($filtert) $param.="&filtert=".$filtert;
    229. 

  229. if ($filterd) $param.="&filterd=".$filterd;
    230. 

  230. if ($socid)   $param.="&socid=".$socid;
    231. 

  231. if ($showbirthday) $param.="&showbirthday=1";
    232. 

  232. if ($pid)     $param.="&projectid=".$pid;
    233. 

  233. if ($actioncode) $param.="&actioncode=".$actioncode;
    234. 

  234. if ($type)   $param.="&type=".$type;
    235. 

  235. if ($action == 'show_day' || $action == 'show_week') $param.='&action='.$action;
    236. 

  236. $param.="&maxprint=".$maxprint;
    237. 

  237. 

  238. // Show navigation bar
    239. 

  239. if (empty($action) || $action=='show_month')
    240. 

  240. {
    241. 

  241.     $nav ="<a href=\"?year=".$prev_year."&amp;month=".$prev_month."&amp;region=".$region.$param."\">".img_previous($langs->trans("Previous"))."</a>\n";
    242. 

  242.     $nav.=" <span id=\"month_name\">".dol_print_date(dol_mktime(0,0,0,$month,1,$year),"%b %Y");
    243. 

  243.     $nav.=" </span>\n";
    244. 

  244.     $nav.="<a href=\"?year=".$next_year."&amp;month=".$next_month."&amp;region=".$region.$param."\">".img_next($langs->trans("Next"))."</a>\n";
    245. 

  245.     $picto='calendar';
    246. 

  246. }
    247. 

  247. if ($action=='show_week')
    248. 

  248. {
    249. 

  249.     $nav ="<a href=\"?year=".$prev_year."&amp;month=".$prev_month."&amp;day=".$prev_day."&amp;region=".$region.$param."\">".img_previous($langs->trans("Previous"))."</a>\n";
    250. 

  250.     $nav.=" <span id=\"month_name\">".dol_print_date(dol_mktime(0,0,0,$month,1,$year),"%Y").", ".$langs->trans("Week")." ".$week;
    251. 

  251.     $nav.=" </span>\n";
    252. 

  252.     $nav.="<a href=\"?year=".$next_year."&amp;month=".$next_month."&amp;day=".$next_day."&amp;region=".$region.$param."\">".img_next($langs->trans("Next"))."</a>\n";
    253. 

  253.     $picto='calendarweek';
    254. 

  254. }
    255. 

  255. if ($action=='show_day')
    256. 

  256. {
    257. 

  257.     $nav ="<a href=\"?year=".$prev_year."&amp;month=".$prev_month."&amp;day=".$prev_day."&amp;region=".$region.$param."\">".img_previous($langs->trans("Previous"))."</a>\n";
    258. 

  258.     $nav.=" <span id=\"month_name\">".dol_print_date(dol_mktime(0,0,0,$month,$day,$year),"daytextshort");
    259. 

  259.     $nav.=" </span>\n";
    260. 

  260.     $nav.="<a href=\"?year=".$next_year."&amp;month=".$next_month."&amp;day=".$next_day."&amp;region=".$region.$param."\">".img_next($langs->trans("Next"))."</a>\n";
    261. 

  261.     $picto='calendarday';
    262. 

  262. }
    263. 

  263. 

  264. // Must be after the nav definition
    265. 

  265. $param.='&year='.$year.'&month='.$month.($day?'&day='.$day:'');
    266. 

  266. //print 'x'.$param;
    267. 

  267. 

  268. 

  269. 

  270. 

  271. $head = calendars_prepare_head('');
    272. 

  272. 

  273. dol_fiche_head($head, 'card', $langs->trans('Events'), 0, $picto);
    274. 

  274. print_actions_filter($form,$canedit,$status,$year,$month,$day,$showbirthday,$filtera,$filtert,$filterd,$pid,$socid,$listofextcals);
    275. 

  275. dol_fiche_end();
    276. 

  276. 

  277. $link='';
    278. 

  278. // Add link to show birthdays
    279. 

  279. if (empty($conf->use_javascript_ajax))
    280. 

  280. {
    281. 

  281. 	$newparam=$param;   // newparam is for birthday links
    282. 

  282.     $newparam=preg_replace('/showbirthday=[0-1]/i','showbirthday='.(empty($showbirthday)?1:0),$newparam);
    283. 

  283.     if (! preg_match('/showbirthday=/i',$newparam)) $newparam.='&showbirthday=1';
    284. 

  284.     $link='<a href="'.$_SERVER['PHP_SELF'];
    285. 

  285.     $link.='?'.$newparam;
    286. 

  286.     $link.='">';
    287. 

  287.     if (empty($showbirthday)) $link.=$langs->trans("AgendaShowBirthdayEvents");
    288. 

  288.     else $link.=$langs->trans("AgendaHideBirthdayEvents");
    289. 

  289.     $link.='</a>';
    290. 

  290. }
    291. 

  291. 

  292. print_fiche_titre($title,$link.' &nbsp; &nbsp; '.$nav, '');
    293. 

  293. 

  294. 

  295. // Get event in an array
    296. 

  296. $eventarray=array();
    297. 

  297. 

  298. $sql = 'SELECT a.id,a.label,';
    299. 

  299. $sql.= ' a.datep,';
    300. 

  300. $sql.= ' a.datep2,';
    301. 

  301. $sql.= ' a.datea,';
    302. 

  302. $sql.= ' a.datea2,';
    303. 

  303. $sql.= ' a.percent,';
    304. 

  304. $sql.= ' a.fk_user_author,a.fk_user_action,a.fk_user_done,';
    305. 

  305. $sql.= ' a.priority, a.fulldayevent, a.location,';
    306. 

  306. $sql.= ' a.fk_soc, a.fk_contact,';
    307. 

  307. $sql.= ' ca.code';
    308. 

  308. $sql.= ' FROM ('.MAIN_DB_PREFIX.'c_actioncomm as ca,';
    309. 

  309. if (! $user->rights->societe->client->voir && ! $socid) $sql.= " ".MAIN_DB_PREFIX."societe_commerciaux as sc,";
    310. 

  310. $sql.= " ".MAIN_DB_PREFIX.'user as u,';
    311. 

  311. $sql.= " ".MAIN_DB_PREFIX."actioncomm as a)";
    312. 

  312. $sql.= ' WHERE a.fk_action = ca.id';
    313. 

  313. $sql.= ' AND a.fk_user_author = u.rowid';
    314. 

  314. $sql.= ' AND a.entity IN ('.getEntity().')';
    315. 

  315. if ($actioncode) $sql.=" AND ca.code='".$db->escape($actioncode)."'";
    316. 

  316. if ($pid) $sql.=" AND a.fk_project=".$db->escape($pid);
    317. 

  317. if (! $user->rights->societe->client->voir && ! $socid) $sql.= " AND a.fk_soc = sc.fk_soc AND sc.fk_user = " .$user->id;
    318. 

  318. if ($user->societe_id) $sql.= ' AND a.fk_soc = '.$user->societe_id; // To limit to external user company
    319. 

  319. if ($action == 'show_day')
    320. 

  320. {
    321. 

  321.     $sql.= " AND (";
    322. 

  322.     $sql.= " (datep BETWEEN '".$db->idate(dol_mktime(0,0,0,$month,$day,$year))."'";
    323. 

  323.     $sql.= " AND '".$db->idate(dol_mktime(23,59,59,$month,$day,$year))."')";
    324. 

  324.     $sql.= " OR ";
    325. 

  325.     $sql.= " (datep2 BETWEEN '".$db->idate(dol_mktime(0,0,0,$month,$day,$year))."'";
    326. 

  326.     $sql.= " AND '".$db->idate(dol_mktime(23,59,59,$month,$day,$year))."')";
    327. 

  327.     $sql.= " OR ";
    328. 

  328.     $sql.= " (datep < '".$db->idate(dol_mktime(0,0,0,$month,$day,$year))."'";
    329. 

  329.     $sql.= " AND datep2 > '".$db->idate(dol_mktime(23,59,59,$month,$day,$year))."')";
    330. 

  330.     $sql.= ')';
    331. 

  331. }
    332. 

  332. else
    333. 

  333. {
    334. 

  334.     // To limit array
    335. 

  335.     $sql.= " AND (";
    336. 

  336.     $sql.= " (datep BETWEEN '".$db->idate(dol_mktime(0,0,0,$month,1,$year)-(60*60*24*7))."'";   // Start 7 days before
    337. 

  337.     $sql.= " AND '".$db->idate(dol_mktime(23,59,59,$month,28,$year)+(60*60*24*10))."')";            // End 7 days after + 3 to go from 28 to 31
    338. 

  338.     $sql.= " OR ";
    339. 

  339.     $sql.= " (datep2 BETWEEN '".$db->idate(dol_mktime(0,0,0,$month,1,$year)-(60*60*24*7))."'";
    340. 

  340.     $sql.= " AND '".$db->idate(dol_mktime(23,59,59,$month,28,$year)+(60*60*24*10))."')";
    341. 

  341.     $sql.= " OR ";
    342. 

  342.     $sql.= " (datep < '".$db->idate(dol_mktime(0,0,0,$month,1,$year)-(60*60*24*7))."'";
    343. 

  343.     $sql.= " AND datep2 > '".$db->idate(dol_mktime(23,59,59,$month,28,$year)+(60*60*24*10))."')";
    344. 

  344.     $sql.= ')';
    345. 

  345. }
    346. 

  346. if ($type) $sql.= " AND ca.id = ".$type;
    347. 

  347. if ($status == 'done') { $sql.= " AND (a.percent = 100 OR (a.percent = -1 AND a.datep2 <= '".$db->idate($now)."'))"; }
    348. 

  348. if ($status == 'todo') { $sql.= " AND ((a.percent >= 0 AND a.percent < 100) OR (a.percent = -1 AND a.datep2 > '".$db->idate($now)."'))"; }
    349. 

  349. if ($filtera > 0 || $filtert > 0 || $filterd > 0)
    350. 

  350. {
    351. 

  351.     $sql.= " AND (";
    352. 

  352.     if ($filtera > 0) $sql.= " a.fk_user_author = ".$filtera;
    353. 

  353.     if ($filtert > 0) $sql.= ($filtera>0?" OR ":"")." a.fk_user_action = ".$filtert;
    354. 

  354.     if ($filterd > 0) $sql.= ($filtera>0||$filtert>0?" OR ":"")." a.fk_user_done = ".$filterd;
    355. 

  355.     $sql.= ")";
    356. 

  356. }
    357. 

  357. // Sort on date
    358. 

  358. $sql.= ' ORDER BY datep';
    359. 

  359. //print $sql;
    360. 

  360. 

  361. dol_syslog("comm/action/index.php sql=".$sql, LOG_DEBUG);
    362. 

  362. $resql=$db->query($sql);
    363. 

  363. if ($resql)
    364. 

  364. {
    365. 

  365.     $num = $db->num_rows($resql);
    366. 

  366.     $i=0;
    367. 

  367.     while ($i < $num)
    368. 

  368.     {
    369. 

  369.         $obj = $db->fetch_object($resql);
    370. 

  370. 

  371.         // Create a new object action
    372. 

  372.         $event=new ActionComm($db);
    373. 

  373.         $event->id=$obj->id;
    374. 

  374.         $event->datep=$db->jdate($obj->datep);      // datep and datef are GMT date
    375. 

  375.         $event->datef=$db->jdate($obj->datep2);
    376. 

  376.         $event->type_code=$obj->code;
    377. 

  377.         $event->libelle=$obj->label;
    378. 

  378.         $event->percentage=$obj->percent;
    379. 

  379.         $event->author->id=$obj->fk_user_author;
    380. 

  380.         $event->usertodo->id=$obj->fk_user_action;
    381. 

  381.         $event->userdone->id=$obj->fk_user_done;
    382. 

  382. 

  383.         $event->priority=$obj->priority;
    384. 

  384.         $event->fulldayevent=$obj->fulldayevent;
    385. 

  385.         $event->location=$obj->location;
    386. 

  386. 

  387.         $event->societe->id=$obj->fk_soc;
    388. 

  388.         $event->contact->id=$obj->fk_contact;
    389. 

  389. 

  390.         // Defined date_start_in_calendar and date_end_in_calendar property
    391. 

  391.         // They are date start and end of action but modified to not be outside calendar view.
    392. 

  392.         if ($event->percentage <= 0)
    393. 

  393.         {
    394. 

  394.             $event->date_start_in_calendar=$event->datep;
    395. 

  395.             if ($event->datef != '' && $event->datef >= $event->datep) $event->date_end_in_calendar=$event->datef;
    396. 

  396.             else $event->date_end_in_calendar=$event->datep;
    397. 

  397.         }
    398. 

  398.         else
    399. 

  399.         {
    400. 

  400.             $event->date_start_in_calendar=$event->datep;
    401. 

  401.             if ($event->datef != '' && $event->datef >= $event->datep) $event->date_end_in_calendar=$event->datef;
    402. 

  402.             else $event->date_end_in_calendar=$event->datep;
    403. 

  403.         }
    404. 

  404.         // Define ponctual property
    405. 

  405.         if ($event->date_start_in_calendar == $event->date_end_in_calendar)
    406. 

  406.         {
    407. 

  407.             $event->ponctuel=1;
    408. 

  408.         }
    409. 

  409. 

  410.         // Check values
    411. 

  411.         if ($event->date_end_in_calendar < $firstdaytoshow ||
    412. 

  412.         $event->date_start_in_calendar > $lastdaytoshow)
    413. 

  413.         {
    414. 

  414.             // This record is out of visible range
    415. 

  415.         }
    416. 

  416.         else
    417. 

  417.         {
    418. 

  418.             if ($event->date_start_in_calendar < $firstdaytoshow) $event->date_start_in_calendar=$firstdaytoshow;
    419. 

  419.             if ($event->date_end_in_calendar > $lastdaytoshow) $event->date_end_in_calendar=$lastdaytoshow;
    420. 

  420. 

  421.             // Add an entry in actionarray for each day
    422. 

  422.             $daycursor=$event->date_start_in_calendar;
    423. 

  423.             $annee = date('Y',$daycursor);
    424. 

  424.             $mois = date('m',$daycursor);
    425. 

  425.             $jour = date('d',$daycursor);
    426. 

  426. 

  427.             // Loop on each day covered by action to prepare an index to show on calendar
    428. 

  428.             $loop=true; $j=0;
    429. 

  429.             $daykey=dol_mktime(0,0,0,$mois,$jour,$annee);
    430. 

  430.             do
    431. 

  431.             {
    432. 

  432.                 //if ($event->id==408) print 'daykey='.$daykey.' '.$event->datep.' '.$event->datef.'<br>';
    433. 

  433. 

  434.                 $eventarray[$daykey][]=$event;
    435. 

  435.                 $j++;
    436. 

  436. 

  437.                 $daykey+=60*60*24;
    438. 

  438.                 if ($daykey > $event->date_end_in_calendar) $loop=false;
    439. 

  439.             }
    440. 

  440.             while ($loop);
    441. 

  441. 

  442.             //print 'Event '.$i.' id='.$event->id.' (start='.dol_print_date($event->datep).'-end='.dol_print_date($event->datef);
    443. 

  443.             //print ' startincalendar='.dol_print_date($event->date_start_in_calendar).'-endincalendar='.dol_print_date($event->date_end_in_calendar).') was added in '.$j.' different index key of array<br>';
    444. 

  444.         }
    445. 

  445.         $i++;
    446. 

  446. 

  447.     }
    448. 

  448. }
    449. 

  449. else
    450. 

  450. {
    451. 

  451.     dol_print_error($db);
    452. 

  452. }
    453. 

  453. 

  454. if ($showbirthday)
    455. 

  455. {
    456. 

  456.     // Add events in array
    457. 

  457.     $sql = 'SELECT sp.rowid, sp.name, sp.firstname, sp.birthday';
    458. 

  458.     $sql.= ' FROM '.MAIN_DB_PREFIX.'socpeople as sp';
    459. 

  459.     $sql.= ' WHERE (priv=0 OR (priv=1 AND fk_user_creat='.$user->id.'))';
    460. 

  460.     $sql.= " AND sp.entity IN (".getEntity('societe', 1).")";
    461. 

  461.     if ($action == 'show_day')
    462. 

  462.     {
    463. 

  463.         $sql.= ' AND MONTH(birthday) = '.$month;
    464. 

  464.         $sql.= ' AND DAY(birthday) = '.$day;
    465. 

  465.     }
    466. 

  466.     else
    467. 

  467.     {
    468. 

  468.         $sql.= ' AND MONTH(birthday) = '.$month;
    469. 

  469.     }
    470. 

  470.     $sql.= ' ORDER BY birthday';
    471. 

  471. 

  472.     dol_syslog("comm/action/index.php sql=".$sql, LOG_DEBUG);
    473. 

  473.     $resql=$db->query($sql);
    474. 

  474.     if ($resql)
    475. 

  475.     {
    476. 

  476.         $num = $db->num_rows($resql);
    477. 

  477.         $i=0;
    478. 

  478.         while ($i < $num)
    479. 

  479.         {
    480. 

  480.             $obj = $db->fetch_object($resql);
    481. 

  481.             $event=new ActionComm($db);
    482. 

  482.             $event->id=$obj->rowid; // We put contact id in action id for birthdays events
    483. 

  483.             $datebirth=dol_stringtotime($obj->birthday,1);
    484. 

  484.             //print 'ee'.$obj->birthday.'-'.$datebirth;
    485. 

  485.             $datearray=dol_getdate($datebirth,true);
    486. 

  486.             $event->datep=dol_mktime(0,0,0,$datearray['mon'],$datearray['mday'],$year,true);    // For full day events, date are also GMT but they wont but converted during output
    487. 

  487.             $event->datef=$event->datep;
    488. 

  488.             $event->type_code='BIRTHDAY';
    489. 

  489.             $event->libelle=$langs->trans("Birthday").' '.$obj->firstname.' '.$obj->name;
    490. 

  490.             $event->percentage=100;
    491. 

  491.             $event->fulldayevent=true;
    492. 

  492. 

  493.             $event->date_start_in_calendar=$event->datep;
    494. 

  494.             $event->date_end_in_calendar=$event->datef;
    495. 

  495.             $event->ponctuel=0;
    496. 

  496. 

  497.             // Add an entry in actionarray for each day
    498. 

  498.             $daycursor=$event->date_start_in_calendar;
    499. 

  499.             $annee = date('Y',$daycursor);
    500. 

  500.             $mois = date('m',$daycursor);
    501. 

  501.             $jour = date('d',$daycursor);
    502. 

  502. 

  503.             $loop=true;
    504. 

  504.             $daykey=dol_mktime(0,0,0,$mois,$jour,$annee);
    505. 

  505.             do
    506. 

  506.             {
    507. 

  507.                 $eventarray[$daykey][]=$event;
    508. 

  508.                 $daykey+=60*60*24;
    509. 

  509.                 if ($daykey > $event->date_end_in_calendar) $loop=false;
    510. 

  510.             }
    511. 

  511.             while ($loop);
    512. 

  512.             $i++;
    513. 

  513.         }
    514. 

  514.     }
    515. 

  515.     else
    516. 

  516.     {
    517. 

  517.         dol_print_error($db);
    518. 

  518.     }
    519. 

  519. }
    520. 

  520. 

  521. if (count($listofextcals))
    522. 

  522. {
    523. 

  523.     require_once DOL_DOCUMENT_ROOT.'/comm/action/class/ical.class.php';
    524. 

  524.     foreach($listofextcals as $extcal)
    525. 

  525.     {
    526. 

  526.         $url=$extcal['src'];    // Example: https://www.google.com/calendar/ical/eldy10%40gmail.com/private-cde92aa7d7e0ef6110010a821a2aaeb/basic.ics
    527. 

  527.         $namecal = $extcal['name'];
    528. 

  528.         $colorcal = $extcal['color'];
    529. 

  529.         //print "url=".$url." namecal=".$namecal." colorcal=".$colorcal;
    530. 

  530.         $ical=new ICal();
    531. 

  531.         $ical->parse($url);
    532. 

  532.         // After this $ical->cal['VEVENT'] contains array of events, $ical->cal['DAYLIGHT'] contains daylight info, $ical->cal['STANDARD'] contains non daylight info, ...
    533. 

  533.         //var_dump($ical->cal); exit;
    534. 

  534.         $icalevents=array();
    535. 

  535.         if (is_array($ical->get_event_list())) $icalevents=array_merge($icalevents,$ical->get_event_list());        // Add $ical->cal['VEVENT']
    536. 

  536.         if (is_array($ical->get_freebusy_list())) $icalevents=array_merge($icalevents,$ical->get_freebusy_list());  // Add $ical->cal['VFREEBUSY']
    537. 

  537. 

  538.         if (count($icalevents)>0)
    539. 

  539.         {
    540. 

  540.             // Duplicate all repeatable events into new entries
    541. 

  541.             $moreicalevents=array();
    542. 

  542.             foreach($icalevents as $icalevent)
    543. 

  543.             {
    544. 

  544.                 if (isset($icalevent['RRULE']) && is_array($icalevent['RRULE'])) //repeatable event
    545. 

  545.                 {
    546. 

  546.                     //if ($event->date_start_in_calendar < $firstdaytoshow) $event->date_start_in_calendar=$firstdaytoshow;
    547. 

  547.                     //if ($event->date_end_in_calendar > $lastdaytoshow) $event->date_end_in_calendar=$lastdaytoshow;
    548. 

  548.                     if ($icalevent['DTSTART;VALUE=DATE']) //fullday event
    549. 

  549.                     {
    550. 

  550.                         $datecurstart=dol_stringtotime($icalevent['DTSTART;VALUE=DATE'],1);
    551. 

  551.                         $datecurend=dol_stringtotime($icalevent['DTEND;VALUE=DATE'],1)-1;  // We remove one second to get last second of day
    552. 

  552.                     }
    553. 

  553.                     else if (is_array($icalevent['DTSTART']) && ! empty($icalevent['DTSTART']['unixtime']))
    554. 

  554.                     {
    555. 

  555.                         $datecurstart=$icalevent['DTSTART']['unixtime'];
    556. 

  556.                         $datecurend=$icalevent['DTEND']['unixtime'];
    557. 

  557.                         if (! empty($ical->cal['DAYLIGHT']['DTSTART']) && $datecurstart)
    558. 

  558.                         {
    559. 

  559.                             //var_dump($ical->cal);
    560. 

  560.                             $tmpcurstart=$datecurstart;
    561. 

  561.                             $tmpcurend=$datecurend;
    562. 

  562.                             $tmpdaylightstart=dol_mktime(0,0,0,1,1,1970,1) + (int) $ical->cal['DAYLIGHT']['DTSTART'];
    563. 

  563.                             $tmpdaylightend=dol_mktime(0,0,0,1,1,1970,1) + (int) $ical->cal['STANDARD']['DTSTART'];
    564. 

  564.                             //var_dump($tmpcurstart);var_dump($tmpcurend); var_dump($ical->cal['DAYLIGHT']['DTSTART']);var_dump($ical->cal['STANDARD']['DTSTART']);
    565. 

  565.                             // Edit datecurstart and datecurend
    566. 

  566.                             if ($tmpcurstart >= $tmpdaylightstart && $tmpcurstart < $tmpdaylightend) $datecurstart-=((int) $ical->cal['DAYLIGHT']['TZOFFSETTO'])*36;
    567. 

  567.                             else $datecurstart-=((int) $ical->cal['STANDARD']['TZOFFSETTO'])*36;
    568. 

  568.                             if ($tmpcurend >= $tmpdaylightstart && $tmpcurstart < $tmpdaylightend) $datecurend-=((int) $ical->cal['DAYLIGHT']['TZOFFSETTO'])*36;
    569. 

  569.                             else $datecurend-=((int) $ical->cal['STANDARD']['TZOFFSETTO'])*36;
    570. 

  570.                         }
    571. 

  571.                         // datecurstart and datecurend are now GMT date
    572. 

  572.                         //var_dump($datecurstart); var_dump($datecurend); exit;
    573. 

  573.                     }
    574. 

  574.                     else
    575. 

  575.                     {
    576. 

  576.                         // Not a recongized record
    577. 

  577.                         dol_syslog("Found a not recognized repeatable record with unknown date start", LOG_ERR);
    578. 

  578.                         continue;
    579. 

  579.                     }
    580. 

  580.                     //print 'xx'.$datecurstart;exit;
    581. 

  581. 

  582.                     $interval=(empty($icalevent['RRULE']['INTERVAL'])?1:$icalevent['RRULE']['INTERVAL']);
    583. 

  583.                     $until=empty($icalevent['RRULE']['UNTIL'])?0:dol_stringtotime($icalevent['RRULE']['UNTIL'],1);
    584. 

  584.                     $maxrepeat=empty($icalevent['RRULE']['COUNT'])?0:$icalevent['RRULE']['COUNT'];
    585. 

  585.                     if ($until && ($until+($datecurend-$datecurstart)) < $firstdaytoshow) continue;  // We discard repeatable event that end before start date to show
    586. 

  586.                     if ($datecurstart > $lastdaytoshow) continue;                                    // We discard repeatable event that start after end date to show
    587. 

  587. 

  588.                     $numofevent=0;
    589. 

  589.                     while (($datecurstart <= $lastdaytoshow) && (empty($maxrepeat) || ($numofevent < $maxrepeat)))
    590. 

  590.                     {
    591. 

  591.                         if ($datecurend >= $firstdaytoshow)    // We add event
    592. 

  592.                         {
    593. 

  593.                             $newevent=$icalevent;
    594. 

  594.                             unset($newevent['RRULE']);
    595. 

  595.                             if ($icalevent['DTSTART;VALUE=DATE'])
    596. 

  596.                             {
    597. 

  597.                                 $newevent['DTSTART;VALUE=DATE']=dol_print_date($datecurstart,'%Y%m%d');
    598. 

  598.                                 $newevent['DTEND;VALUE=DATE']=dol_print_date($datecurend+1,'%Y%m%d');
    599. 

  599.                             }
    600. 

  600.                             else
    601. 

  601.                             {
    602. 

  602.                                 $newevent['DTSTART']=$datecurstart;
    603. 

  603.                                 $newevent['DTEND']=$datecurend;
    604. 

  604.                             }
    605. 

  605.                             $moreicalevents[]=$newevent;
    606. 

  606.                         }
    607. 

  607.                         // Jump on next occurence
    608. 

  608.                         $numofevent++;
    609. 

  609.                         $savdatecurstart=$datecurstart;
    610. 

  610.                         if ($icalevent['RRULE']['FREQ']=='DAILY')
    611. 

  611.                         {
    612. 

  612.                             $datecurstart=dol_time_plus_duree($datecurstart, $interval, 'd');
    613. 

  613.                             $datecurend=dol_time_plus_duree($datecurend, $interval, 'd');
    614. 

  614.                         }
    615. 

  615.                         if ($icalevent['RRULE']['FREQ']=='WEEKLY')
    616. 

  616.                         {
    617. 

  617.                             $datecurstart=dol_time_plus_duree($datecurstart, $interval, 'w');
    618. 

  618.                             $datecurend=dol_time_plus_duree($datecurend, $interval, 'w');
    619. 

  619.                         }
    620. 

  620.                         elseif ($icalevent['RRULE']['FREQ']=='MONTHLY')
    621. 

  621.                         {
    622. 

  622.                             $datecurstart=dol_time_plus_duree($datecurstart, $interval, 'm');
    623. 

  623.                             $datecurend=dol_time_plus_duree($datecurend, $interval, 'm');
    624. 

  624.                         }
    625. 

  625.                         elseif ($icalevent['RRULE']['FREQ']=='YEARLY')
    626. 

  626.                         {
    627. 

  627.                             $datecurstart=dol_time_plus_duree($datecurstart, $interval, 'y');
    628. 

  628.                             $datecurend=dol_time_plus_duree($datecurend, $interval, 'y');
    629. 

  629.                         }
    630. 

  630.                         // Test to avoid infinite loop ($datecurstart must increase)
    631. 

  631.                         if ($savdatecurstart >= $datecurstart)
    632. 

  632.                         {
    633. 

  633.                             dol_syslog("Found a rule freq ".$icalevent['RRULE']['FREQ']." not managed by dolibarr code. Assume 1 week frequency.", LOG_ERR);
    634. 

  634.                             $datecurstart+=3600*24*7;
    635. 

  635.                             $datecurend+=3600*24*7;
    636. 

  636.                         }
    637. 

  637.                     }
    638. 

  638.                 }
    639. 

  639.             }
    640. 

  640.             $icalevents=array_merge($icalevents,$moreicalevents);
    641. 

  641. 

  642.             // Loop on each entry into cal file to know if entry is qualified and add an ActionComm into $eventarray
    643. 

  643.             foreach($icalevents as $icalevent)
    644. 

  644.             {
    645. 

  645.                 //print $icalevent['SUMMARY'].'->'.var_dump($icalevent).'<br>';exit;
    646. 

  646.                 if (! empty($icalevent['RRULE'])) continue;    // We found a repeatable event. It was already split into unitary events, so we discard general rule.
    647. 

  647. 

  648.                 // Create a new object action
    649. 

  649.                 $event=new ActionComm($db);
    650. 

  650.                 $addevent = false;
    651. 

  651.                 if (isset($icalevent['DTSTART;VALUE=DATE'])) // fullday event
    652. 

  652.                 {
    653. 

  653.                     // For full day events, date are also GMT but they wont but converted using tz during output
    654. 

  654.                     $datestart=dol_stringtotime($icalevent['DTSTART;VALUE=DATE'],1);
    655. 

  655.                     $dateend=dol_stringtotime($icalevent['DTEND;VALUE=DATE'],1)-1;  // We remove one second to get last second of day
    656. 

  656.                     //print 'x'.$datestart.'-'.$dateend;exit;
    657. 

  657.                     //print dol_print_date($dateend,'dayhour','gmt');
    658. 

  658.                     $event->fulldayevent=true;
    659. 

  659.                     $addevent=true;
    660. 

  660.                 }
    661. 

  661.                 elseif (!is_array($icalevent['DTSTART'])) // not fullday event (DTSTART is not array)
    662. 

  662.                 {
    663. 

  663.                     $datestart=$icalevent['DTSTART'];
    664. 

  664.                     $dateend=$icalevent['DTEND'];
    665. 

  665.                     $addevent=true;
    666. 

  666.                 }
    667. 

  667. 

  668.                 if ($addevent)
    669. 

  669.                 {
    670. 

  670.                     $event->id=$icalevent['UID'];
    671. 

  671.                     $event->icalname=$namecal;
    672. 

  672.                     $event->icalcolor=$colorcal;
    673. 

  673.                     $usertime=0;    // We dont modify date because we want to have date into memory datep and datef stored as GMT date. Compensation will be done during output.
    674. 

  674.                     $event->datep=$datestart+$usertime;
    675. 

  675.                     $event->datef=$dateend+$usertime;
    676. 

  676.                     $event->type_code="ICALEVENT";
    677. 

  677. 

  678.                     if($icalevent['SUMMARY']) $event->libelle=$icalevent['SUMMARY'];
    679. 

  679.                     elseif($icalevent['DESCRIPTION']) $event->libelle=dol_nl2br($icalevent['DESCRIPTION'],1);
    680. 

  680.                     else $event->libelle = $langs->trans("ExtSiteNoLabel");
    681. 

  681. 

  682.                     $event->date_start_in_calendar=$event->datep;
    683. 

  683. 

  684.                     if ($event->datef != '' && $event->datef >= $event->datep) $event->date_end_in_calendar=$event->datef;
    685. 

  685.                     else $event->date_end_in_calendar=$event->datep;
    686. 

  686. 

  687.                     // Define ponctual property
    688. 

  688.                     if ($event->date_start_in_calendar == $event->date_end_in_calendar)
    689. 

  689.                     {
    690. 

  690.                         $event->ponctuel=1;
    691. 

  691.                         //print 'x'.$datestart.'-'.$dateend;exit;
    692. 

  692.                     }
    693. 

  693. 

  694.                     // Add event into $eventarray if date range are ok.
    695. 

  695.                     if ($event->date_end_in_calendar < $firstdaytoshow || $event->date_start_in_calendar > $lastdaytoshow)
    696. 

  696.                     {
    697. 

  697.                         //print 'x'.$datestart.'-'.$dateend;exit;
    698. 

  698.                         //print 'x'.$datestart.'-'.$dateend;exit;
    699. 

  699.                         //print 'x'.$datestart.'-'.$dateend;exit;
    700. 

  700.                         // This record is out of visible range
    701. 

  701.                     }
    702. 

  702.                     else
    703. 

  703.                     {
    704. 

  704.                         if ($event->date_start_in_calendar < $firstdaytoshow) $event->date_start_in_calendar=$firstdaytoshow;
    705. 

  705.                         if ($event->date_end_in_calendar > $lastdaytoshow) $event->date_end_in_calendar=$lastdaytoshow;
    706. 

  706. 

  707.                         // Add an entry in actionarray for each day
    708. 

  708.                         $daycursor=$event->date_start_in_calendar;
    709. 

  709.                         $annee = date('Y',$daycursor);
    710. 

  710.                         $mois = date('m',$daycursor);
    711. 

  711.                         $jour = date('d',$daycursor);
    712. 

  712. 

  713.                         // Loop on each day covered by action to prepare an index to show on calendar
    714. 

  714.                         $loop=true; $j=0;
    715. 

  715.                         // daykey must be date that represent day box in calendar so must be a user time
    716. 

  716.                         $daykey=dol_mktime(0,0,0,$mois,$jour,$annee);
    717. 

  717.                         $daykeygmt=dol_mktime(0,0,0,$mois,$jour,$annee,true,0);
    718. 

  718.                         do
    719. 

  719.                         //print 'x'.$datestart.'-'.$dateend;exit;
    720. 

  720.                         {
    721. 

  721.                             //if ($event->fulldayevent) print dol_print_date($daykeygmt,'dayhour','gmt').'-'.dol_print_date($daykey,'dayhour','gmt').'-'.dol_print_date($event->date_end_in_calendar,'dayhour','gmt').' ';
    722. 

  722.                             $eventarray[$daykey][]=$event;
    723. 

  723.                             $daykey+=60*60*24;  $daykeygmt+=60*60*24;   // Add one day
    724. 

  724.                             if (($event->fulldayevent ? $daykeygmt : $daykey) > $event->date_end_in_calendar) $loop=false;
    725. 

  725.                         }
    726. 

  726.                         while ($loop);
    727. 

  727.                     }
    728. 

  728.                 }
    729. 

  729.             }
    730. 

  730.         }
    731. 

  731.     }
    732. 

  732. }
    733. 

  733. 

  734. $maxnbofchar=18;
    735. 

  735. $cachethirdparties=array();
    736. 

  736. $cachecontacts=array();
    737. 

  737. 

  738. // Define theme_datacolor array
    739. 

  739. $color_file = DOL_DOCUMENT_ROOT."/theme/".$conf->theme."/graph-color.php";
    740. 

  740. if (is_readable($color_file))
    741. 

  741. {
    742. 

  742.     include_once $color_file;
    743. 

  743. }
    744. 

  744. if (! is_array($theme_datacolor)) $theme_datacolor=array(array(120,130,150), array(200,160,180), array(190,190,220));
    745. 

  745. 

  746. 

  747. if (empty($action) || $action == 'show_month')      // View by month
    748. 

  748. {
    749. 

  749.     $newparam=$param;   // newparam is for birthday links
    750. 

  750.     $newparam=preg_replace('/showbirthday=/i','showbirthday_=',$newparam);	// To avoid replacement when replace day= is done
    751. 

  751.     $newparam=preg_replace('/action=show_month&?/i','',$newparam);
    752. 

  752.     $newparam=preg_replace('/action=show_week&?/i','',$newparam);
    753. 

  753.     $newparam=preg_replace('/day=[0-9]+&?/i','',$newparam);
    754. 

  754.     $newparam=preg_replace('/month=[0-9]+&?/i','',$newparam);
    755. 

  755.     $newparam=preg_replace('/year=[0-9]+&?/i','',$newparam);
    756. 

  756.     $newparam=preg_replace('/showbirthday_=/i','showbirthday=',$newparam);	// Restore correct parameter
    757. 

  757.     echo '<table width="100%" class="nocellnopadd">';
    758. 

  758.     echo ' <tr class="liste_titre">';
    759. 

  759.     $i=0;
    760. 

  760.     while ($i < 7)
    761. 

  761.     {
    762. 

  762.         echo '  <td align="center">'.$langs->trans("Day".(($i+(isset($conf->global->MAIN_START_WEEK)?$conf->global->MAIN_START_WEEK:1)) % 7))."</td>\n";
    763. 

  763.         $i++;
    764. 

  764.     }
    765. 

  765.     echo " </tr>\n";
    766. 

  766. 

  767.     $todayarray=dol_getdate($now,'fast');
    768. 

  768.     $todaytms=dol_mktime(0, 0, 0, $todayarray['mon'], $todayarray['mday'], $todayarray['year']);
    769. 

  769. 

  770.     // In loops, tmpday contains day nb in current month (can be zero or negative for days of previous month)
    771. 

  771.     //var_dump($eventarray);
    772. 

  772.     //print $tmpday;
    773. 

  773.     for ($iter_week = 0; $iter_week < 6 ; $iter_week++)
    774. 

  774.     {
    775. 

  775.         echo " <tr>\n";
    776. 

  776.         for ($iter_day = 0; $iter_day < 7; $iter_day++)
    777. 

  777.         {
    778. 

  778.             /* Show days before the beginning of the current month (previous month)  */
    779. 

  779.             if ($tmpday <= 0)
    780. 

  780.             {
    781. 

  781.                 $style='cal_other_month cal_past';
    782. 

  782.                 echo '  <td class="'.$style.'" width="14%" valign="top"  nowrap="nowrap">';
    783. 

  783.                 show_day_events($db, $max_day_in_prev_month + $tmpday, $prev_month, $prev_year, $month, $style, $eventarray, $maxprint, $maxnbofchar, $newparam);
    784. 

  784.                 echo "  </td>\n";
    785. 

  785.             }
    786. 

  786.             /* Show days of the current month */
    787. 

  787.             elseif ($tmpday <= $max_day_in_month)
    788. 

  788.             {
    789. 

  789.                 $curtime = dol_mktime(0, 0, 0, $month, $tmpday, $year);
    790. 

  790. 

  791.                 $style='cal_current_month';
    792. 

  792.                 $today=0;
    793. 

  793.                 if ($todayarray['mday']==$tmpday && $todayarray['mon']==$month && $todayarray['year']==$year) $today=1;
    794. 

  794.                 if ($today) $style='cal_today';
    795. 

  795.                 if ($curtime < $todaytms) $style.=' cal_past';
    796. 

  796. 

  797.                 echo '  <td class="'.$style.'" width="14%" valign="top"  nowrap="nowrap">';
    798. 

  798.                 show_day_events($db, $tmpday, $month, $year, $month, $style, $eventarray, $maxprint, $maxnbofchar, $newparam);
    799. 

  799.                 echo "  </td>\n";
    800. 

  800.             }
    801. 

  801.             /* Show days after the current month (next month) */
    802. 

  802.             else
    803. 

  803.             {
    804. 

  804.                 $style='cal_other_month';
    805. 

  805.                 echo '  <td class="'.$style.'" width="14%" valign="top"  nowrap="nowrap">';
    806. 

  806.                 show_day_events($db, $tmpday - $max_day_in_month, $next_month, $next_year, $month, $style, $eventarray, $maxprint, $maxnbofchar, $newparam);
    807. 

  807.                 echo "</td>\n";
    808. 

  808.             }
    809. 

  809.             $tmpday++;
    810. 

  810.         }
    811. 

  811.         echo " </tr>\n";
    812. 

  812.     }
    813. 

  813.     echo "</table>\n";
    814. 

  814. }
    815. 

  815. elseif ($action == 'show_week') // View by week
    816. 

  816. {
    817. 

  817.     $newparam=$param;   // newparam is for birthday links
    818. 

  818.     $newparam=preg_replace('/showbirthday=/i','showbirthday_=',$newparam);	// To avoid replacement when replace day= is done
    819. 

  819.     $newparam=preg_replace('/action=show_month&?/i','',$newparam);
    820. 

  820.     $newparam=preg_replace('/action=show_week&?/i','',$newparam);
    821. 

  821.     $newparam=preg_replace('/day=[0-9]+&?/i','',$newparam);
    822. 

  822.     $newparam=preg_replace('/month=[0-9]+&?/i','',$newparam);
    823. 

  823.     $newparam=preg_replace('/year=[0-9]+&?/i','',$newparam);
    824. 

  824.     $newparam=preg_replace('/showbirthday_=/i','showbirthday=',$newparam);	// Restore correct parameter
    825. 

  825.     echo '<table width="100%" class="nocellnopadd">';
    826. 

  826.     echo ' <tr class="liste_titre">';
    827. 

  827.     $i=0;
    828. 

  828.     while ($i < 7)
    829. 

  829.     {
    830. 

  830.         echo '  <td align="center">'.$langs->trans("Day".(($i+(isset($conf->global->MAIN_START_WEEK)?$conf->global->MAIN_START_WEEK:1)) % 7))."</td>\n";
    831. 

  831.         $i++;
    832. 

  832.     }
    833. 

  833.     echo " </tr>\n";
    834. 

  834. 

  835.     // In loops, tmpday contains day nb in current month (can be zero or negative for days of previous month)
    836. 

  836.     //var_dump($eventarray);
    837. 

  837.     //print $tmpday;
    838. 

  838. 

  839.     echo " <tr>\n";
    840. 

  840. 

  841.     for($iter_day = 0; $iter_day < 7; $iter_day++)
    842. 

  842.     {
    843. 

  843.         if(($tmpday <= $max_day_in_month))
    844. 

  844.         {
    845. 

  845.             // Show days of the current week
    846. 

  846.             $curtime = dol_mktime(0, 0, 0, $month, $tmpday, $year);
    847. 

  847. 

  848.             $style='cal_current_month';
    849. 

  849.             $today=0;
    850. 

  850.             $todayarray=dol_getdate($now,'fast');
    851. 

  851.             if ($todayarray['mday']==$tmpday && $todayarray['mon']==$month && $todayarray['year']==$year) $today=1;
    852. 

  852.             if ($today) $style='cal_today';
    853. 

  853. 

  854.             echo '  <td class="'.$style.'" width="14%" valign="top"  nowrap="nowrap">';
    855. 

  855.             show_day_events($db, $tmpday, $month, $year, $month, $style, $eventarray, 0, $maxnbofchar, $newparam, 1, 300);
    856. 

  856.             echo "  </td>\n";
    857. 

  857.         }
    858. 

  858.         else
    859. 

  859.         {
    860. 

  860.             $style='cal_current_month';
    861. 

  861.             echo '  <td class="'.$style.'" width="14%" valign="top"  nowrap="nowrap">';
    862. 

  862.             show_day_events($db, $tmpday - $max_day_in_month, $next_month, $next_year, $month, $style, $eventarray, 0, $maxnbofchar, $newparam, 1, 300);
    863. 

  863.             echo "</td>\n";
    864. 

  864.         }
    865. 

  865.         $tmpday++;
    866. 

  866.     }
    867. 

  867.     echo " </tr>\n";
    868. 

  868. 

  869.     echo "</table>\n";
    870. 

  870. }
    871. 

  871. else    // View by day
    872. 

  872. {
    873. 

  873.     $newparam=$param;   // newparam is for birthday links
    874. 

  874.     $newparam=preg_replace('/action=show_month&?/i','',$newparam);
    875. 

  875.     $newparam=preg_replace('/action=show_week&?/i','',$newparam);
    876. 

  876.     // Code to show just one day
    877. 

  877.     $style='cal_current_month';
    878. 

  878.     $today=0;
    879. 

  879.     $todayarray=dol_getdate($now,'fast');
    880. 

  880.     if ($todayarray['mday']==$day && $todayarray['mon']==$month && $todayarray['year']==$year) $today=1;
    881. 

  881.     if ($today) $style='cal_today';
    882. 

  882. 

  883.     $timestamp=dol_mktime(12,0,0,$month,$day,$year);
    884. 

  884.     $arraytimestamp=dol_getdate($timestamp);
    885. 

  885.     echo '<table width="100%" class="nocellnopadd">';
    886. 

  886.     echo ' <tr class="liste_titre">';
    887. 

  887.     echo '  <td align="center">'.$langs->trans("Day".$arraytimestamp['wday'])."</td>\n";
    888. 

  888.     echo " </tr>\n";
    889. 

  889.     echo " <tr>\n";
    890. 

  890.     echo '  <td class="'.$style.'" width="14%" valign="top"  nowrap="nowrap">';
    891. 

  891.     $maxnbofchar=80;
    892. 

  892.     show_day_events($db, $day, $month, $year, $month, $style, $eventarray, 0, $maxnbofchar, $newparam, 1, 300);
    893. 

  893.     echo "</td>\n";
    894. 

  894.     echo " </tr>\n";
    895. 

  895.     echo '</table>';
    896. 

  896. }
    897. 

  897. 

  898. 

  899. $db->close();
    900. 

  900. 

  901. /* TODO Export
    902. 

  902.  print '
    903. 

  903. <a href="" id="actionagenda_ical_link"><img src="'.DOL_URL_ROOT.'/theme/common/ical.gif" border="0"/></a>
    904. 

  904. <a href="" id="actionagenda_vcal_link"><img src="'.DOL_URL_ROOT.'/theme/common/vcal.gif" border="0"/></a>
    905. 

  905. <a href="" id="actionagenda_rss_link"><img src="'.DOL_URL_ROOT.'/theme/common/rss.gif"  border="0"/></a>
    906. 

    907. 

  907. <script>
    908. 

  908. $("#actionagenda_rss_link").attr("href","/public/agenda/agendaexport.php?format=rss&type=ActionAgenda&exportkey=dolibarr&token="+getToken()+"&status="+getStatus()+"&userasked="+getUserasked()+"&usertodo="+getUsertodo()+"&userdone="+getUserdone()+"&year="+getYear()+"&month="+getMonth()+"&day="+getDay()+"&showbirthday="+getShowbirthday()+"&action="+getAction()+"&projectid="+getProjectid()+"");
    909. 

  909. $("#actionagenda_ical_link").attr("href","/public/agenda/agendaexport.php?format=ical&type=ActionAgenda&exportkey=dolibarr&token="+getToken()+"&status="+getStatus()+"&userasked="+getUserasked()+"&usertodo="+getUsertodo()+"&userdone="+getUserdone()+"&year="+getYear()+"&month="+getMonth()+"&day="+getDay()+"&showbirthday="+getShowbirthday()+"&action="+getAction()+"&projectid="+getProjectid()+"");
    910. 

  910. $("#actionagenda_vcal_link").attr("href","/public/agenda/agendaexport.php?format=vcal&type=ActionAgenda&exportkey=dolibarr&token="+getToken()+"&status="+getStatus()+"&userasked="+getUserasked()+"&usertodo="+getUsertodo()+"&userdone="+getUserdone()+"&year="+getYear()+"&month="+getMonth()+"&day="+getDay()+"&showbirthday="+getShowbirthday()+"&action="+getAction()+"&projectid="+getProjectid()+"");
    911. 

  911. </script>
    912. 

  912. ';
    913. 

  913. */
    914. 

  914. 

  915. llxFooter();
    916. 

  916. 

  917. 

  918. /**
    919. 

  919.  * Show event of a particular day
    920. 

  920.  *
    921. 

  921.  * @param	DoliDB	$db              Database handler
    922. 

  922.  * @param   int		$day             Day
    923. 

  923.  * @param   int		$month           Month
    924. 

  924.  * @param   int		$year            Year
    925. 

  925.  * @param   int		$monthshown      Current month shown in calendar view
    926. 

  926.  * @param   string	$style           Style to use for this day
    927. 

  927.  * @param   array	&$eventarray     Array of events
    928. 

  928.  * @param   int		$maxprint        Nb of actions to show each day on month view (0 means no limit)
    929. 

  929.  * @param   int		$maxnbofchar     Nb of characters to show for event line
    930. 

  930.  * @param   string	$newparam        Parameters on current URL
    931. 

  931.  * @param   int		$showinfo        Add extended information (used by day view)
    932. 

  932.  * @param   int		$minheight       Minimum height for each event. 60px by default.
    933. 

  933.  * @return	void
    934. 

  934.  */
    935. 

  935. function show_day_events($db, $day, $month, $year, $monthshown, $style, &$eventarray, $maxprint=0, $maxnbofchar=16, $newparam='', $showinfo=0, $minheight=60)
    936. 

  936. {
    937. 

  937.     global $user, $conf, $langs;
    938. 

  938.     global $filter, $filtera, $filtert, $filterd, $status;
    939. 

  939.     global $theme_datacolor;
    940. 

  940.     global $cachethirdparties, $cachecontacts;
    941. 

  941. 

  942.     print '<div id="dayevent_'.sprintf("%04d",$year).sprintf("%02d",$month).sprintf("%02d",$day).'" class="dayevent">'."\n";
    943. 

  943.     $curtime = dol_mktime(0, 0, 0, $month, $day, $year);
    944. 

  944.     print '<table class="nobordernopadding" width="100%">';
    945. 

  945.     print '<tr style="background: #EEEEEE"><td align="left" nowrap="nowrap">';
    946. 

  946.     print '<a href="'.DOL_URL_ROOT.'/comm/action/index.php?';
    947. 

  947.     print 'action=show_day&day='.str_pad($day, 2, "0", STR_PAD_LEFT).'&month='.str_pad($month, 2, "0", STR_PAD_LEFT).'&year='.$year;
    948. 

  948.     print $newparam;
    949. 

  949.     //.'&month='.$month.'&year='.$year;
    950. 

  950.     print '">';
    951. 

  951.     if ($showinfo) print dol_print_date($curtime,'daytext');
    952. 

  952.     else print dol_print_date($curtime,'%d');
    953. 

  953.     print '</a>';
    954. 

  954.     print '</td><td align="right" nowrap="nowrap">';
    955. 

  955.     if ($user->rights->agenda->myactions->create || $user->rights->agenda->allactions->create)
    956. 

  956.     {
    957. 

  957.         //$param='month='.$monthshown.'&year='.$year;
    958. 

  958.         $hourminsec='100000';
    959. 

  959.         print '<a href="'.DOL_URL_ROOT.'/comm/action/fiche.php?action=create&datep='.sprintf("%04d%02d%02d",$year,$month,$day).$hourminsec.'&backtopage='.urlencode($_SERVER["PHP_SELF"].($newparam?'?'.$newparam:'')).'">';
    960. 

  960.         print img_picto($langs->trans("NewAction"),'edit_add.png');
    961. 

  961.         print '</a>';
    962. 

  962.     }
    963. 

  963.     print '</td></tr>';
    964. 

  964.     print '<tr height="'.$minheight.'"><td valign="top" colspan="2" nowrap="nowrap">';
    965. 

  965. 

  966.     //$curtime = dol_mktime (0, 0, 0, $month, $day, $year);
    967. 

  967.     $i=0; $nummytasks=0; $numother=0; $numbirthday=0; $numical=0; $numicals=array();
    968. 

  968.     $ymd=sprintf("%04d",$year).sprintf("%02d",$month).sprintf("%02d",$day);
    969. 

  969. 

  970.     foreach ($eventarray as $daykey => $notused)
    971. 

  971.     {
    972. 

  972.         $annee = date('Y',$daykey);
    973. 

  973.         $mois = date('m',$daykey);
    974. 

  974.         $jour = date('d',$daykey);
    975. 

  975.         if ($day==$jour && $month==$mois && $year==$annee)
    976. 

  976.         {
    977. 

  977.             foreach ($eventarray[$daykey] as $index => $event)
    978. 

  978.             {
    979. 

  979.                 if ($i < $maxprint || $maxprint == 0 || ! empty($conf->global->MAIN_JS_SWITCH_AGENDA))
    980. 

  980.                 {
    981. 

  981.                     $ponct=($event->date_start_in_calendar == $event->date_end_in_calendar);
    982. 

  982. 

  983.                     // Define $color and $cssclass of event
    984. 

  984.                     $color=-1; $cssclass=''; $colorindex=-1;
    985. 

  985.                     if ($event->author->id == $user->id || $event->usertodo->id == $user->id || $event->userdone->id == $user->id) { $nummytasks++; $colorindex=1; $cssclass='family_mytasks'; }
    986. 

  986.                     else if ($event->type_code == 'ICALEVENT') { $numical++; $numicals[dol_string_nospecial($event->icalname)]++; $color=$event->icalcolor; $cssclass=($event->icalname?'family_'.dol_string_nospecial($event->icalname):'family_other'); }
    987. 

  987.                     else if ($event->type_code == 'BIRTHDAY')  { $numbirthday++; $colorindex=2; $cssclass='family_birthday'; }
    988. 

  988.                     else { $numother++; $colorindex=2; $cssclass='family_other'; }
    989. 

  989.                     if ($color == -1) $color=sprintf("%02x%02x%02x",$theme_datacolor[$colorindex][0],$theme_datacolor[$colorindex][1],$theme_datacolor[$colorindex][2]);
    990. 

  990.                     $cssclass=$cssclass.' '.$cssclass.'_day_'.$ymd;
    991. 

  991. 

  992.                     // Show rect of event
    993. 

  993.                     print '<div id="event_'.$ymd.'_'.$i.'" class="event '.$cssclass.'">';
    994. 

  994.                     print '<table class="cal_event" style="background: #'.$color.'; -moz-border-radius:4px;" width="100%"><tr>';
    995. 

  995.                     print '<td nowrap="nowrap">';
    996. 

  996.                     if ($event->type_code == 'BIRTHDAY') // It's a birthday
    997. 

  997.                     {
    998. 

  998.                         print $event->getNomUrl(1,$maxnbofchar,'cal_event','birthday','contact');
    999. 

  999.                     }
    1000. 

  1000.                     if ($event->type_code != 'BIRTHDAY')
    1001. 

  1001.                     {
    1002. 

  1002.                         // Picto
    1003. 

  1003.                         if (empty($event->fulldayevent))
    1004. 

  1004.                         {
    1005. 

  1005.                             //print $event->getNomUrl(2).' ';
    1006. 

  1006.                         }
    1007. 

  1007. 

  1008.                         // Date
    1009. 

  1009.                         if (empty($event->fulldayevent))
    1010. 

  1010.                         {
    1011. 

  1011.                             //print '<strong>';
    1012. 

  1012.                             $daterange='';
    1013. 

  1013. 

  1014.                             // Show hours (start ... end)
    1015. 

  1015.                             $tmpyearstart  = date('Y',$event->date_start_in_calendar);
    1016. 

  1016.                             $tmpmonthstart = date('m',$event->date_start_in_calendar);
    1017. 

  1017.                             $tmpdaystart   = date('d',$event->date_start_in_calendar);
    1018. 

  1018.                             $tmpyearend    = date('Y',$event->date_end_in_calendar);
    1019. 

  1019.                             $tmpmonthend   = date('m',$event->date_end_in_calendar);
    1020. 

  1020.                             $tmpdayend     = date('d',$event->date_end_in_calendar);
    1021. 

  1021.                             // Hour start
    1022. 

  1022.                             if ($tmpyearstart == $annee && $tmpmonthstart == $mois && $tmpdaystart == $jour)
    1023. 

  1023.                             {
    1024. 

  1024.                                 $daterange.=dol_print_date($event->date_start_in_calendar,'%H:%M');
    1025. 

  1025.                                 if ($event->date_end_in_calendar && $event->date_start_in_calendar != $event->date_end_in_calendar)
    1026. 

  1026.                                 {
    1027. 

  1027.                                     if ($tmpyearstart == $tmpyearend && $tmpmonthstart == $tmpmonthend && $tmpdaystart == $tmpdayend)
    1028. 

  1028.                                     $daterange.='-';
    1029. 

  1029.                                     //else
    1030. 

  1030.                                     //print '...';
    1031. 

  1031.                                 }
    1032. 

  1032.                             }
    1033. 

  1033.                             if ($event->date_end_in_calendar && $event->date_start_in_calendar != $event->date_end_in_calendar)
    1034. 

  1034.                             {
    1035. 

  1035.                                 if ($tmpyearstart != $tmpyearend || $tmpmonthstart != $tmpmonthend || $tmpdaystart != $tmpdayend)
    1036. 

  1036.                                 {
    1037. 

  1037.                                     $daterange.='...';
    1038. 

  1038.                                 }
    1039. 

  1039.                             }
    1040. 

  1040.                             // Hour end
    1041. 

  1041.                             if ($event->date_end_in_calendar && $event->date_start_in_calendar != $event->date_end_in_calendar)
    1042. 

  1042.                             {
    1043. 

  1043.                                 if ($tmpyearend == $annee && $tmpmonthend == $mois && $tmpdayend == $jour)
    1044. 

  1044.                                 $daterange.=dol_print_date($event->date_end_in_calendar,'%H:%M');
    1045. 

  1045.                             }
    1046. 

  1046.                             //print $daterange;
    1047. 

  1047.                             if ($event->type_code != 'ICALEVENT')
    1048. 

  1048.                             {
    1049. 

  1049.                                 $savlabel=$event->libelle;
    1050. 

  1050.                                 $event->libelle=$daterange;
    1051. 

  1051.                                 print $event->getNomUrl(0);
    1052. 

  1052.                                 $event->libelle=$savlabel;
    1053. 

  1053.                             }
    1054. 

  1054.                             else
    1055. 

  1055.                             {
    1056. 

  1056.                                 print $daterange;
    1057. 

  1057.                             }
    1058. 

  1058.                             //print '</strong> ';
    1059. 

  1059.                             print "<br>\n";
    1060. 

  1060.                         }
    1061. 

  1061.                         else
    1062. 

  1062.                         {
    1063. 

  1063.                             if ($showinfo)
    1064. 

  1064.                             {
    1065. 

  1065.                                 print $langs->trans("EventOnFullDay")."<br>\n";
    1066. 

  1066.                             }
    1067. 

  1067.                         }
    1068. 

  1068. 

  1069.                         // Show title
    1070. 

  1070.                         if ($event->type_code == 'ICALEVENT') print dol_trunc($event->libelle,$maxnbofchar);
    1071. 

  1071.                         else print $event->getNomUrl(0,$maxnbofchar,'cal_event');
    1072. 

  1072. 

  1073.                         if ($event->type_code == 'ICALEVENT') print '<br>('.dol_trunc($event->icalname,$maxnbofchar).')';
    1074. 

  1074. 

  1075.                    …
    1076.

Large files files are truncated, but you can click here to view the full file