* Copyright (C) 2005-2009 Regis Houssin * Copyright (C) 2011 Juanjo Menent * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 3 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . * or see http://www.gnu.org/ */ /** * \file htdocs/core/lib/agenda.lib.php * \brief Set of function for the agenda module */ /** * Show filter form in agenda view * * @param Object $form Form object * @param int $canedit Can edit filter fields * @param int $status Status * @param int $year Year * @param int $month Month * @param int $day Day * @param int $showbirthday Show birthday * @param string $filtera Filter on create by user * @param string $filtert Filter on assigned to user * @param string $filterd Filter of done by user * @param int $pid Product id * @param int $socid Third party id * @param string $action Action string * @param array $showextcals Array with list of external calendars (used to show links to select calendar), or -1 to show no legend * @param string $actioncode Preselected value of actioncode for filter on type * @param int $usergroupid Id of group to filter on users * @return void */ function print_actions_filter($form, $canedit, $status, $year, $month, $day, $showbirthday, $filtera, $filtert, $filterd, $pid, $socid, $action, $showextcals=array(), $actioncode='', $usergroupid='') { global $conf, $user, $langs, $db, $hookmanager; global $begin_h, $end_h, $begin_d, $end_d; // Filters print '
'; print ''; print ''; print ''; print ''; print ''; print ''; print '
'; if (! empty($conf->browser->phone)) print '
'; else print ''; if (! empty($conf->browser->phone)) print '
'; else print '
'; print ''; if ($canedit) { print ''; print ''; /*print ''; print '';*/ include_once DOL_DOCUMENT_ROOT . '/core/class/html.formactions.class.php'; $formactions=new FormActions($db); print ''; print ''; print ''; print ''; } if (! empty($conf->societe->enabled) && $user->rights->societe->lire) { print ''; print ''; } if (! empty($conf->projet->enabled) && $user->rights->projet->lire) { require_once DOL_DOCUMENT_ROOT.'/core/class/html.formprojet.class.php'; $formproject=new FormProjets($db); print ''; print ''; } if ($canedit && $action == 'show_peruser') { // Filter on hours print ''; print ''; print "'; // Filter on days print ''; print ''; print "'; } // Hooks $parameters = array('canedit'=>$canedit, 'pid'=>$pid, 'socid'=>$socid); $reshook = $hookmanager->executeHooks('searchAgendaFrom', $parameters, $object, $action); // Note that $action and $object may have been print '
'; //print $langs->trans("ActionsAskedBy"); //print '  '; //print $form->select_dolusers($filtera, 'userasked', 1, '', ! $canedit); //print '   '.$langs->trans("or") . ' '; print $langs->trans("ActionAffectedTo").'   '; print ''; //print $langs->trans("User"); print $form->select_dolusers($filtert, 'usertodo', 1, '', ! $canedit); if (! empty($conf->use_javascript_ajax)) { include_once DOL_DOCUMENT_ROOT . '/core/lib/ajax.lib.php'; print ajax_combobox('usertodo'); } if (empty($conf->dol_optimize_smallscreen)) print '   '.$langs->trans("or") . ' '; else print '
'; print $langs->trans("Group").'   '; print $form->select_dolgroups($usergroupid, 'usergroup', 1, '', ! $canedit); if (! empty($conf->use_javascript_ajax)) { print ajax_combobox('usergroup'); } print '
'; print $langs->trans("or") . ' ' . $langs->trans("ActionsDoneBy"); print '  '; print $form->select_dolusers($filterd, 'userdone', 1, '', ! $canedit); print '
'; print $langs->trans("Type"); print '  '; print $formactions->select_type_actions($actioncode, "actioncode", '', (empty($conf->global->AGENDA_USE_EVENT_TYPE) ? 1 : 0)); print '
'; print $langs->trans("Status"); print '  '; $formactions->form_select_status_action('formaction',$status,1,'status',1,2); print '
'; print $langs->trans("ThirdParty").'   '; print ''; print $form->select_thirdparty($socid, 'socid'); print '
'; print $langs->trans("Project").'   '; print ''; $formproject->select_projects($socid?$socid:-1, $pid, 'projectid', 64); print '
'.$langs->trans("WorkingTimeRange").'"; print ' - '; print ''; print ' '.$langs->trans("H"); print '
'.$langs->trans("WorkingDaysRange").'"; print ' - '; print ''; print '
'; if (! empty($conf->browser->phone)) print ''; else print '		'; print ''; print '
'; print '
'; print ''; print '
'; print '
'; if (! empty($conf->browser->phone)) print ''; else print '
'; print '
'; // Close fichecenter print '
'; print ''; } /** * Show actions to do array * * @param int $max Max nb of records * @return void */ function show_array_actions_to_do($max=5) { global $langs, $conf, $user, $db, $bc, $socid; $now=dol_now(); include_once DOL_DOCUMENT_ROOT.'/comm/action/class/actioncomm.class.php'; include_once DOL_DOCUMENT_ROOT.'/societe/class/client.class.php'; $sql = "SELECT a.id, a.label, a.datep as dp, a.datep2 as dp2, a.fk_user_author, a.percent,"; $sql.= " c.code, c.libelle,"; $sql.= " s.nom as sname, s.rowid, s.client"; $sql.= " FROM ".MAIN_DB_PREFIX."c_actioncomm as c LEFT JOIN "; $sql.= " ".MAIN_DB_PREFIX."actioncomm as a ON c.id = a.fk_action"; $sql.= " LEFT JOIN ".MAIN_DB_PREFIX."societe as s ON a.fk_soc = s.rowid"; if (!$user->rights->societe->client->voir && !$socid) $sql.= ", ".MAIN_DB_PREFIX."societe_commerciaux as sc"; $sql.= " WHERE a.entity = ".$conf->entity; $sql.= " AND ((a.percent >= 0 AND a.percent < 100) OR (a.percent = -1 AND a.datep2 > '".$db->idate($now)."'))"; if (!$user->rights->societe->client->voir && !$socid) $sql.= " AND s.rowid = sc.fk_soc AND sc.fk_user = " .$user->id; if ($socid) $sql.= " AND s.rowid = ".$socid; $sql.= " ORDER BY a.datep DESC, a.id DESC"; $sql.= $db->plimit($max, 0); $resql=$db->query($sql); if ($resql) { $num = $db->num_rows($resql); print ''; print ''; print ''; $var = true; $i = 0; $staticaction=new ActionComm($db); $customerstatic=new Client($db); while ($i < $num) { $obj = $db->fetch_object($resql); $var=!$var; print ''; $staticaction->type_code=$obj->code; $staticaction->libelle=$obj->label; $staticaction->id=$obj->id; print ''; // print ''; print ''; $datep=$db->jdate($obj->dp); $datep2=$db->jdate($obj->dp2); // Date print '"; // Statut print "\n"; print "\n"; $i++; } print "
'.$langs->trans("LastActionsToDo",$max).''.$langs->trans("FullList").''; print '
'.$staticaction->getNomUrl(1,34).''.dol_trunc($obj->label,22).''; if ($obj->rowid > 0) { $customerstatic->id=$obj->rowid; $customerstatic->name=$obj->sname; $customerstatic->client=$obj->client; print $customerstatic->getNomUrl(1,'',16); } print ''.dol_print_date($datep,'day').' '; $late=0; if ($obj->percent == 0 && $datep && $datep < time()) $late=1; if ($obj->percent == 0 && ! $datep && $datep2 && $datep2 < time()) $late=1; if ($obj->percent > 0 && $obj->percent < 100 && $datep2 && $datep2 < time()) $late=1; if ($obj->percent > 0 && $obj->percent < 100 && ! $datep2 && $datep && $datep < time()) $late=1; if ($late) print img_warning($langs->trans("Late")); print "".$staticaction->LibStatut($obj->percent,3)."

"; $db->free($resql); } else { dol_print_error($db); } } /** * Show last actions array * * @param int $max Max nb of records * @return void */ function show_array_last_actions_done($max=5) { global $langs, $conf, $user, $db, $bc, $socid; $now=dol_now(); $sql = "SELECT a.id, a.percent, a.datep as da, a.datep2 as da2, a.fk_user_author, a.label,"; $sql.= " c.code, c.libelle,"; $sql.= " s.rowid, s.nom as sname, s.client"; $sql.= " FROM ".MAIN_DB_PREFIX."c_actioncomm as c LEFT JOIN "; $sql.= " ".MAIN_DB_PREFIX."actioncomm as a ON c.id = a.fk_action "; $sql.= " LEFT JOIN ".MAIN_DB_PREFIX."societe as s ON a.fk_soc = s.rowid"; if (!$user->rights->societe->client->voir && !$socid) $sql.= ", ".MAIN_DB_PREFIX."societe_commerciaux as sc"; $sql.= " WHERE a.entity = ".$conf->entity; $sql.= " AND (a.percent >= 100 OR (a.percent = -1 AND a.datep2 <= '".$db->idate($now)."'))"; if (!$user->rights->societe->client->voir && !$socid) $sql.= " AND s.rowid = sc.fk_soc AND sc.fk_user = " .$user->id; if ($socid) $sql.= " AND s.rowid = ".$socid; $sql .= " ORDER BY a.datep2 DESC"; $sql .= $db->plimit($max, 0); $resql=$db->query($sql); if ($resql) { $num = $db->num_rows($resql); print ''; print ''; print ''; $var = true; $i = 0; $staticaction=new ActionComm($db); $customerstatic=new Societe($db); while ($i < $num) { $obj = $db->fetch_object($resql); $var=!$var; print ''; $staticaction->type_code=$obj->code; $staticaction->libelle=$obj->label; $staticaction->id=$obj->id; print ''; //print ''; print ''; // Date print '"; // Statut print "\n"; print "\n"; $i++; } // TODO Ajouter rappel pour "il y a des contrats a mettre en service" // TODO Ajouter rappel pour "il y a des contrats qui arrivent a expiration" print "
'.$langs->trans("LastDoneTasks",$max).''.$langs->trans("FullList").''; print '
'.$staticaction->getNomUrl(1,34).''.dol_trunc($obj->label,24).''; if ($obj->rowid > 0) { $customerstatic->id=$obj->rowid; $customerstatic->name=$obj->sname; $customerstatic->client=$obj->client; print $customerstatic->getNomUrl(1,'',24); } print ''.dol_print_date($db->jdate($obj->da2),'day'); print "".$staticaction->LibStatut($obj->percent,3)."

"; $db->free($resql); } else { dol_print_error($db); } } /** * Prepare array with list of tabs * * @return array Array of tabs to show */ function agenda_prepare_head() { global $langs, $conf, $user; $h = 0; $head = array(); $head[$h][0] = DOL_URL_ROOT."/admin/agenda_other.php"; $head[$h][1] = $langs->trans("Miscellaneous"); $head[$h][2] = 'other'; $h++; $head[$h][0] = DOL_URL_ROOT."/admin/agenda.php"; $head[$h][1] = $langs->trans("AutoActions"); $head[$h][2] = 'autoactions'; $h++; $head[$h][0] = DOL_URL_ROOT."/admin/agenda_xcal.php"; $head[$h][1] = $langs->trans("ExportCal"); $head[$h][2] = 'xcal'; $h++; $head[$h][0] = DOL_URL_ROOT."/admin/agenda_extsites.php"; $head[$h][1] = $langs->trans("ExtSites"); $head[$h][2] = 'extsites'; $h++; complete_head_from_modules($conf,$langs,null,$head,$h,'agenda_admin'); $head[$h][0] = DOL_URL_ROOT."/admin/agenda_extrafields.php"; $head[$h][1] = $langs->trans("ExtraFields"); $head[$h][2] = 'attributes'; $h++; complete_head_from_modules($conf,$langs,null,$head,$h,'agenda_admin','remove'); return $head; } /** * Prepare array with list of tabs * * @param object $object Object related to tabs * @return array Array of tabs to show */ function actions_prepare_head($object) { global $langs, $conf, $user; $h = 0; $head = array(); $head[$h][0] = DOL_URL_ROOT.'/comm/action/fiche.php?id='.$object->id; $head[$h][1] = $langs->trans("CardAction"); $head[$h][2] = 'card'; $h++; if (! empty($conf->global->AGENDA_USE_SEVERAL_CONTACTS)) { $head[$h][0] = DOL_URL_ROOT.'/comm/action/contact.php?id='.$object->id; $head[$h][1] = $langs->trans("Contacts"); $head[$h][2] = 'contact'; $h++; } // Attached files require_once DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php'; $upload_dir = $conf->agenda->dir_output . "/" . $object->id; $nbFiles = count(dol_dir_list($upload_dir,'files',0,'','(\.meta|_preview\.png)$')); $head[$h][0] = DOL_URL_ROOT.'/comm/action/document.php?id='.$object->id; $head[$h][1] = $langs->trans("Documents"); if($nbFiles > 0) $head[$h][1].= ' ('.$nbFiles.')'; $head[$h][2] = 'documents'; $h++; $head[$h][0] = DOL_URL_ROOT.'/comm/action/info.php?id='.$object->id; $head[$h][1] = $langs->trans('Info'); $head[$h][2] = 'info'; $h++; complete_head_from_modules($conf,$langs,$object,$head,$h,'action'); complete_head_from_modules($conf,$langs,$object,$head,$h,'action','remove'); return $head; } /** * Define head array for tabs of agenda setup pages * * @param string $param Parameters to add to url * @return array Array of head */ function calendars_prepare_head($param) { global $langs, $conf, $user; $h = 0; $head = array(); $head[$h][0] = DOL_URL_ROOT.'/comm/action/index.php?action=show_month'.($param?'&'.$param:''); $head[$h][1] = $langs->trans("ViewCal"); $head[$h][2] = 'cardmonth'; $h++; $head[$h][0] = DOL_URL_ROOT.'/comm/action/index.php?action=show_week'.($param?'&'.$param:''); $head[$h][1] = $langs->trans("ViewWeek"); $head[$h][2] = 'cardweek'; $h++; //$paramday=$param; //if (preg_match('/&month=\d+/',$paramday) && ! preg_match('/&day=\d+/',$paramday)) $paramday.='&day=1'; $head[$h][0] = DOL_URL_ROOT.'/comm/action/index.php?action=show_day'.($param?'&'.$param:''); $head[$h][1] = $langs->trans("ViewDay"); $head[$h][2] = 'cardday'; $h++; $head[$h][0] = DOL_URL_ROOT.'/comm/action/peruser.php'.($param?'?'.$param:''); $head[$h][1] = $langs->trans("ViewPerUser"); $head[$h][2] = 'cardperuser'; $h++; $head[$h][0] = DOL_URL_ROOT.'/comm/action/listactions.php'.($param?'?'.$param:''); $head[$h][1] = $langs->trans("ViewList"); $head[$h][2] = 'cardlist'; $h++; $object=new stdClass(); // Show more tabs from modules // Entries must be declared in modules descriptor with line // $this->tabs = array('entity:+tabname:Title:@mymodule:/mymodule/mypage.php?id=__ID__'); to add new tab // $this->tabs = array('entity:-tabname); to remove a tab complete_head_from_modules($conf,$langs,$object,$head,$h,'agenda'); complete_head_from_modules($conf,$langs,$object,$head,$h,'agenda','remove'); return $head; }