25 require
'../../main.inc.php';
26 require_once DOL_DOCUMENT_ROOT.
'/comm/mailing/class/mailing.class.php';
29 $langs->load(
"mails");
31 $sortfield =
GETPOST(
'sortfield',
'aZ09comma');
32 $sortorder =
GETPOST(
'sortorder',
'aZ09comma');
33 $limit =
GETPOST(
'limit',
'int') ?
GETPOST(
'limit',
'int') : $conf->liste_limit;
34 $optioncss =
GETPOST(
'optioncss',
'alpha');
36 if (empty($page) || $page == -1 ||
GETPOST(
'button_search',
'alpha') ||
GETPOST(
'button_removefilter',
'alpha') || (empty($toselect) && $massaction ===
'0')) {
39 $offset = $limit * $page;
40 $pageprev = $page - 1;
41 $pagenext = $page + 1;
46 $sortfield =
"m.date_creat";
49 $search_all = trim((
GETPOST(
'search_all',
'alphanohtml') !=
'') ?
GETPOST(
'search_all',
'alphanohtml') :
GETPOST(
'sall',
'alphanohtml'));
50 $search_ref =
GETPOST(
"search_ref",
"alpha") ?
GETPOST(
"search_ref",
"alpha") :
GETPOST(
"sref",
"alpha");
51 $filteremail =
GETPOST(
'filteremail',
'alpha');
56 $hookmanager->initHooks(array(
'mailinglist'));
60 $extrafields->fetch_name_optionals_label($object->table_element);
62 $search_array_options = $extrafields->getOptionalsFromPost($object->table_element,
'',
'search_');
65 $fieldstosearchall = array(
70 if (!$user->rights->mailing->lire || (empty($conf->global->EXTERNAL_USERS_ARE_AUTHORIZED) && $user->socid > 0)) {
81 if (
GETPOST(
'cancel',
'alpha')) {
82 $action =
'list'; $massaction =
'';
84 if (!
GETPOST(
'confirmmassaction',
'alpha') && $massaction !=
'presend' && $massaction !=
'confirm_presend') {
88 $parameters = array();
89 $reshook = $hookmanager->executeHooks(
'doActions', $parameters, $object, $action);
94 if (empty($reshook)) {
96 include DOL_DOCUMENT_ROOT.
'/core/actions_changeselectedfields.inc.php';
99 if (
GETPOST(
'button_removefilter_x',
'alpha') ||
GETPOST(
'button_removefilter.x',
'alpha') ||
GETPOST(
'button_removefilter',
'alpha')) {
107 $search_array_options = array();
109 if (
GETPOST(
'button_removefilter_x',
'alpha') ||
GETPOST(
'button_removefilter.x',
'alpha') ||
GETPOST(
'button_removefilter',
'alpha')
110 ||
GETPOST(
'button_search_x',
'alpha') ||
GETPOST(
'button_search.x',
'alpha') ||
GETPOST(
'button_search',
'alpha')) {
129 llxHeader(
'', $langs->trans(
"Mailing"),
'EN:Module_EMailing|FR:Module_Mailing|ES:Módulo_Mailing');
134 $sql =
"SELECT m.rowid, m.titre as title, m.nbemail, m.statut, m.date_creat as datec, m.date_envoi as date_envoi,";
135 $sql .=
" mc.statut as sendstatut";
136 $sql .=
" FROM ".MAIN_DB_PREFIX.
"mailing as m, ".MAIN_DB_PREFIX.
"mailing_cibles as mc";
137 $sql .=
" WHERE m.rowid = mc.fk_mailing AND m.entity = ".$conf->entity;
138 $sql .=
" AND mc.email = '".$db->escape($filteremail).
"'";
140 $sql .=
" AND m.rowid = '".$db->escape($search_ref).
"'";
143 $sql .=
" AND (m.titre like '%".$db->escape($search_all).
"%' OR m.sujet like '%".$db->escape($search_all).
"%' OR m.body like '%".$db->escape($search_all).
"%')";
149 $sortfield =
"m.rowid";
152 $sql =
"SELECT m.rowid, m.titre as title, m.nbemail, m.statut, m.date_creat as datec, m.date_envoi as date_envoi";
153 $sql .=
" FROM ".MAIN_DB_PREFIX.
"mailing as m";
154 $sql .=
" WHERE m.entity = ".$conf->entity;
156 $sql .=
" AND m.rowid = '".$db->escape($search_ref).
"'";
159 $sql .=
" AND (m.titre like '%".$db->escape($search_all).
"%' OR m.sujet like '%".$db->escape($search_all).
"%' OR m.body like '%".$db->escape($search_all).
"%')";
165 $sortfield =
"m.rowid";
169 $sql .= $db->order($sortfield, $sortorder);
171 $nbtotalofrecords =
'';
172 if (empty($conf->global->MAIN_DISABLE_FULL_SCANLIST)) {
173 $resql = $db->query($sql);
174 $nbtotalofrecords = $db->num_rows(
$resql);
175 if (($page * $limit) > $nbtotalofrecords) {
181 $sql .= $db->plimit($limit + 1, $offset);
184 dol_syslog(
"comm/mailing/list.php", LOG_DEBUG);
185 $resql = $db->query($sql);
187 $num = $db->num_rows(
$resql);
189 $title = $langs->trans(
"ListOfEMailings");
191 $title .=
' ('.$langs->trans(
"SentTo", $filteremail).
')';
195 if ($user->rights->mailing->creer) {
196 $newcardbutton .=
dolGetButtonTitle($langs->trans(
'NewMailing'),
'',
'fa fa-plus-circle', DOL_URL_ROOT.
'/comm/mailing/card.php?action=create');
201 $param =
"&search_all=".urlencode($search_all);
202 if (!empty($contextpage) && $contextpage != $_SERVER[
"PHP_SELF"]) {
203 $param .=
'&contextpage='.urlencode($contextpage);
205 if ($limit > 0 && $limit != $conf->liste_limit) {
206 $param .=
'&limit='.urlencode($limit);
209 $param .=
'&filteremail='.urlencode($filteremail);
212 print
'<form method="POST" action="'.$_SERVER[
"PHP_SELF"].
'">';
213 if ($optioncss !=
'') {
214 print
'<input type="hidden" name="optioncss" value="'.$optioncss.
'">';
216 print
'<input type="hidden" name="token" value="'.newToken().
'">';
217 print
'<input type="hidden" name="action" value="list">';
218 print
'<input type="hidden" name="sortfield" value="'.$sortfield.
'">';
219 print
'<input type="hidden" name="sortorder" value="'.$sortorder.
'">';
221 print_barre_liste($title, $page, $_SERVER[
"PHP_SELF"], $param, $sortfield, $sortorder,
'', $num, $nbtotalofrecords,
'object_email', 0, $newcardbutton,
'', $limit, 0, 0, 1);
225 print
'<div class="div-table-responsive">';
226 print
'<table class="tagtable liste'.($moreforfilter ?
" listwithfilterbefore" :
"").
'">'.
"\n";
228 print
'<tr class="liste_titre_filter">';
229 print
'<td class="liste_titre">';
230 print
'<input type="text" class="flat maxwidth50" name="search_ref" value="'.dol_escape_htmltag($search_ref).
'">';
233 print
'<td class="liste_titre">';
234 print
'<input type="text" class="flat maxwidth100 maxwidth50onsmartphone" name="search_all" value="'.dol_escape_htmltag($search_all).
'">';
236 print
'<td class="liste_titre"> </td>';
238 print
'<td class="liste_titre"> </td>';
240 print
'<td class="liste_titre"> </td>';
241 print
'<td class="liste_titre"> </td>';
242 print
'<td class="liste_titre maxwidthsearch">';
243 $searchpicto =
$form->showFilterAndCheckAddButtons(0);
248 print
'<tr class="liste_titre">';
251 print_liste_field_titre(
"DateCreation", $_SERVER[
"PHP_SELF"],
"m.date_creat", $param,
"",
'align="center"', $sortfield, $sortorder);
253 print_liste_field_titre(
"NbOfEMails", $_SERVER[
"PHP_SELF"],
"m.nbemail", $param,
"",
'align="center"', $sortfield, $sortorder);
256 print_liste_field_titre(
"DateLastSend", $_SERVER[
"PHP_SELF"],
"m.date_envoi", $param,
"",
'align="center"', $sortfield, $sortorder);
258 print_liste_field_titre(
"DateSending", $_SERVER[
"PHP_SELF"],
"mc.date_envoi", $param,
"",
'align="center"', $sortfield, $sortorder);
260 print_liste_field_titre(
"Status", $_SERVER[
"PHP_SELF"], ($filteremail ?
"mc.statut" :
"m.statut"), $param,
"",
'class="right"', $sortfield, $sortorder);
261 print_liste_field_titre(
'', $_SERVER[
"PHP_SELF"],
"",
'',
'',
'class="right"', $sortfield, $sortorder,
'maxwidthsearch ');
267 while ($i < min($num, $limit)) {
268 $obj = $db->fetch_object(
$resql);
270 $email->id = $obj->rowid;
271 $email->ref = $obj->rowid;
273 print
'<tr class="oddeven">';
276 print $email->getNomUrl(1);
280 print
'<td class="tdoverflowmax200" title="'.dol_escape_htmltag($obj->title).
'">'.
dol_escape_htmltag($obj->title).
'</td>';
283 print
'<td class="center">';
289 print
'<td class="center nowraponall">';
290 $nbemail = $obj->nbemail;
305 print
'<td align="center" class="nowrap">'.dol_print_date($db->jdate($obj->date_envoi),
'day').
'</td>';
309 print
'<td class="nowrap right">';
311 print $email::libStatutDest($obj->sendstatut, 2);
313 print $email->LibStatut($obj->statut, 5);
327 print
'<tr><td colspan="'.$colspan.
'"><span class="opacitymedium">'.$langs->trans(
"NoRecordFound").
'</td></tr>';