mirror of
https://github.com/Dolibarr/dolibarr.git
synced 2025-12-07 10:08:27 +01:00
473 lines
16 KiB
PHP
473 lines
16 KiB
PHP
<?php
|
|
/* Copyright (C) 2014 Florian Henry <florian.henry@open-concept.pro>
|
|
* Copyright (C) 2016 Laurent Destailleur <eldy@uers.sourceforge.net>
|
|
*
|
|
* 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 <http://www.gnu.org/licenses/>.
|
|
*/
|
|
|
|
/**
|
|
* \file htdocs/comm/mailing/advtargetemailing.php
|
|
* \ingroup mailing
|
|
* \brief Page to define emailing targets
|
|
*/
|
|
|
|
if (! defined('NOSTYLECHECK')) define('NOSTYLECHECK','1');
|
|
|
|
require '../../main.inc.php';
|
|
|
|
require_once DOL_DOCUMENT_ROOT . '/comm/mailing/class/mailing.class.php';
|
|
require_once DOL_DOCUMENT_ROOT . '/core/lib/emailing.lib.php';
|
|
require_once DOL_DOCUMENT_ROOT . '/comm/mailing/class/advtargetemailing.class.php';
|
|
require_once DOL_DOCUMENT_ROOT . '/comm/mailing/class/html.formadvtargetemailing.class.php';
|
|
require_once DOL_DOCUMENT_ROOT . '/core/modules/mailings/advthirdparties.modules.php';
|
|
require_once DOL_DOCUMENT_ROOT . '/core/class/html.formcompany.class.php';
|
|
require_once DOL_DOCUMENT_ROOT . '/core/class/html.formother.class.php';
|
|
|
|
// Load translation files required by the page
|
|
$langs->loadLangs(array('mails', 'companies'));
|
|
if (! empty($conf->categorie->enabled)) {
|
|
$langs->load("categories");
|
|
}
|
|
|
|
// Security check
|
|
if (! $user->rights->mailing->lire || $user->societe_id > 0)
|
|
accessforbidden();
|
|
|
|
// Load variable for pagination
|
|
$limit = GETPOST('limit','int')?GETPOST('limit','int'):$conf->liste_limit;
|
|
$sortfield = GETPOST('sortfield','alpha');
|
|
$sortorder = GETPOST('sortorder','alpha');
|
|
$page = GETPOST('page','int');
|
|
if (empty($page) || $page == -1) { $page = 0; } // If $page is not defined, or '' or -1
|
|
$offset = $limit * $page;
|
|
$pageprev = $page - 1;
|
|
$pagenext = $page + 1;
|
|
if (! $sortorder)
|
|
$sortorder = "ASC";
|
|
if (! $sortfield)
|
|
$sortfield = "email";
|
|
|
|
$id = GETPOST('id', 'int');
|
|
$rowid = GETPOST('rowid', 'int');
|
|
$action = GETPOST('action','aZ09');
|
|
$search_nom = GETPOST("search_nom");
|
|
$search_prenom = GETPOST("search_prenom");
|
|
$search_email = GETPOST("search_email");
|
|
$template_id = GETPOST('template_id', 'int');
|
|
|
|
// Do we click on purge search criteria ?
|
|
if (GETPOST('button_removefilter_x','alpha')) {
|
|
$search_nom = '';
|
|
$search_prenom = '';
|
|
$search_email = '';
|
|
}
|
|
$array_query = array ();
|
|
$object = new Mailing($db);
|
|
$advTarget = new AdvanceTargetingMailing($db);
|
|
|
|
if (empty($template_id)) {
|
|
$advTarget->fk_element = $id;
|
|
$advTarget->type_element = 'mailing';
|
|
$result = $advTarget->fetch_by_mailing();
|
|
} else {
|
|
$result = $advTarget->fetch($template_id);
|
|
}
|
|
|
|
if ($result < 0) {
|
|
setEventMessage($advTarget->error, 'errors');
|
|
} else {
|
|
if (! empty($advTarget->id)) {
|
|
$array_query = json_decode($advTarget->filtervalue, true);
|
|
}
|
|
}
|
|
|
|
|
|
/*
|
|
* Actions
|
|
*/
|
|
|
|
if ($action == 'loadfilter') {
|
|
if (! empty($template_id)) {
|
|
$result = $advTarget->fetch($template_id);
|
|
if ($result < 0) {
|
|
setEventMessage($advTarget->error, 'errors');
|
|
} else {
|
|
if (! empty($advTarget->id)) {
|
|
$array_query = json_decode($advTarget->filtervalue, true);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
if ($action == 'add') {
|
|
|
|
$user_contact_query = false;
|
|
|
|
$array_query = array ();
|
|
|
|
// Get extra fields
|
|
|
|
foreach ( $_POST as $key => $value ) {
|
|
// print '$key='.$key.' $value='.$value.'<BR>';
|
|
if (preg_match("/^options_.*(?<!_cnct)$/", $key)) {
|
|
// Special case for start date come with 3 inputs day, month, year
|
|
if (preg_match("/st_dt/", $key)) {
|
|
$dtarr = array ();
|
|
$dtarr = explode('_', $key);
|
|
if (! array_key_exists('options_' . $dtarr[1] . '_st_dt', $array_query)) {
|
|
$array_query['options_' . $dtarr[1] . '_st_dt'] = dol_mktime(0, 0, 0, GETPOST('options_' . $dtarr[1] . '_st_dtmonth', 'int'), GETPOST('options_' . $dtarr[1] . '_st_dtday', 'int'), GETPOST('options_' . $dtarr[1] . '_st_dtyear', 'int'));
|
|
}
|
|
} elseif (preg_match("/end_dt/", $key)) {
|
|
// Special case for end date come with 3 inputs day, month, year
|
|
$dtarr = array ();
|
|
$dtarr = explode('_', $key);
|
|
if (! array_key_exists('options_' . $dtarr[1] . '_end_dt', $array_query)) {
|
|
$array_query['options_' . $dtarr[1] . '_end_dt'] = dol_mktime(0, 0, 0, GETPOST('options_' . $dtarr[1] . '_end_dtmonth', 'int'), GETPOST('options_' . $dtarr[1] . '_end_dtday', 'int'), GETPOST('options_' . $dtarr[1] . '_end_dtyear', 'int'));
|
|
}
|
|
} else {
|
|
$array_query[$key] = GETPOST($key);
|
|
}
|
|
}
|
|
if (preg_match("/^options_.*_cnct/", $key)) {
|
|
$user_contact_query = true;
|
|
// Special case for start date come with 3 inputs day, month, year
|
|
if (preg_match("/st_dt/", $key)) {
|
|
$dtarr = array ();
|
|
$dtarr = explode('_', $key);
|
|
if (! array_key_exists('options_' . $dtarr[1] . '_st_dt' . '_cnct', $array_query)) {
|
|
$array_query['options_' . $dtarr[1] . '_st_dt' . '_cnct'] = dol_mktime(0, 0, 0, GETPOST('options_' . $dtarr[1] . '_st_dtmonth' . '_cnct', 'int'), GETPOST('options_' . $dtarr[1] . '_st_dtday' . '_cnct', 'int'), GETPOST('options_' . $dtarr[1] . '_st_dtyear' . '_cnct', 'int'));
|
|
}
|
|
} elseif (preg_match("/end_dt/", $key)) {
|
|
// Special case for end date come with 3 inputs day, month, year
|
|
$dtarr = array ();
|
|
$dtarr = explode('_', $key);
|
|
if (! array_key_exists('options_' . $dtarr[1] . '_end_dt' . '_cnct', $array_query)) {
|
|
$array_query['options_' . $dtarr[1] . '_end_dt' . '_cnct'] = dol_mktime(0, 0, 0, GETPOST('options_' . $dtarr[1] . '_end_dtmonth' . '_cnct', 'int'), GETPOST('options_' . $dtarr[1] . '_end_dtday' . '_cnct', 'int'), GETPOST('options_' . $dtarr[1] . '_end_dtyear' . '_cnct', 'int'));
|
|
}
|
|
} else {
|
|
$array_query[$key] = GETPOST($key);
|
|
}
|
|
}
|
|
|
|
if (preg_match("/^cust_/", $key)) {
|
|
$array_query[$key] = GETPOST($key);
|
|
}
|
|
|
|
if (preg_match("/^contact_/", $key)) {
|
|
|
|
$array_query[$key] = GETPOST($key);
|
|
|
|
$specials_date_key = array (
|
|
'contact_update_st_dt',
|
|
'contact_update_end_dt',
|
|
'contact_create_st_dt',
|
|
'contact_create_end_dt'
|
|
);
|
|
foreach ( $specials_date_key as $date_key ) {
|
|
if ($key == $date_key) {
|
|
$dt = GETPOST($date_key);
|
|
if (! empty($dt)) {
|
|
$array_query[$key] = dol_mktime(0, 0, 0, GETPOST($date_key . 'month', 'int'), GETPOST($date_key . 'day', 'int'), GETPOST($date_key . 'year', 'int'));
|
|
} else {
|
|
$array_query[$key] = '';
|
|
}
|
|
}
|
|
}
|
|
|
|
if (! empty($array_query[$key])) {
|
|
$user_contact_query = true;
|
|
}
|
|
}
|
|
|
|
if ($array_query['type_of_target'] == 2 || $array_query['type_of_target'] == 4) {
|
|
$user_contact_query = true;
|
|
}
|
|
|
|
if (preg_match("/^type_of_target/", $key)) {
|
|
$array_query[$key] = GETPOST($key);
|
|
}
|
|
}
|
|
|
|
// if ($array_query ['type_of_target'] == 1 || $array_query ['type_of_target'] == 3) {
|
|
$result = $advTarget->query_thirdparty($array_query);
|
|
if ($result < 0) {
|
|
setEventMessage($advTarget->error, 'errors');
|
|
}
|
|
/*} else {
|
|
$advTarget->thirdparty_lines = array ();
|
|
}*/
|
|
|
|
if ($user_contact_query && ($array_query['type_of_target'] == 1 || $array_query['type_of_target'] == 2 || $array_query['type_of_target'] == 4)) {
|
|
$result = $advTarget->query_contact($array_query, 1);
|
|
if ($result < 0) {
|
|
setEventMessage($advTarget->error, 'errors');
|
|
}
|
|
// If use contact but no result use artefact to so not use socid into add_to_target
|
|
if (count($advTarget->contact_lines) == 0) {
|
|
$advTarget->contact_lines = array (
|
|
0
|
|
);
|
|
}
|
|
} else {
|
|
$advTarget->contact_lines = array ();
|
|
}
|
|
|
|
if ((count($advTarget->thirdparty_lines) > 0) || (count($advTarget->contact_lines) > 0)) {
|
|
// Add targets into database
|
|
$obj = new mailing_advthirdparties($db);
|
|
$result = $obj->add_to_target_spec($id, $advTarget->thirdparty_lines, $array_query['type_of_target'], $advTarget->contact_lines);
|
|
} else {
|
|
$result = 0;
|
|
}
|
|
|
|
if ($result > 0) {
|
|
$query_temlate_id = '';
|
|
if (! empty($template_id)) {
|
|
$query_temlate_id = '&template_id=' . $template_id;
|
|
}
|
|
setEventMessages($langs->trans("XTargetsAdded",$result), null, 'mesgs');
|
|
header("Location: " . $_SERVER['PHP_SELF'] . "?id=" . $id . $query_temlate_id);
|
|
exit();
|
|
}
|
|
if ($result == 0) {
|
|
setEventMessage($langs->trans("WarningNoEMailsAdded"), 'warnings');
|
|
}
|
|
if ($result < 0) {
|
|
setEventMessage($obj->error, 'errors');
|
|
}
|
|
}
|
|
|
|
if ($action == 'clear') {
|
|
// Chargement de la classe
|
|
$classname = "MailingTargets";
|
|
$obj = new $classname($db);
|
|
$obj->clear_target($id);
|
|
|
|
header("Location: " . $_SERVER['PHP_SELF'] . "?id=" . $id);
|
|
exit();
|
|
}
|
|
|
|
if ($action == 'savefilter' || $action == 'createfilter') {
|
|
|
|
$template_name = GETPOST('template_name');
|
|
$error = 0;
|
|
|
|
if ($action == 'createfilter' && empty($template_name)) {
|
|
setEventMessage($langs->trans('ErrorFieldRequired', $langs->trans('AdvTgtOrCreateNewFilter')), 'errors');
|
|
$error ++;
|
|
}
|
|
|
|
if (empty($error)) {
|
|
|
|
$array_query = array ();
|
|
|
|
// Get extra fields
|
|
foreach ( $_POST as $key => $value ) {
|
|
if (preg_match("/^options_.*(?<!_cnct)$/", $key)) {
|
|
// Special case for start date come with 3 inputs day, month, year
|
|
if (preg_match("/st_dt/", $key)) {
|
|
$dtarr = array ();
|
|
$dtarr = explode('_', $key);
|
|
if (! array_key_exists('options_' . $dtarr[1] . '_st_dt', $array_query)) {
|
|
$array_query['options_' . $dtarr[1] . '_st_dt'] = dol_mktime(0, 0, 0, GETPOST('options_' . $dtarr[1] . '_st_dtmonth', 'int'), GETPOST('options_' . $dtarr[1] . '_st_dtday', 'int'), GETPOST('options_' . $dtarr[1] . '_st_dtyear', 'int'));
|
|
}
|
|
} elseif (preg_match("/end_dt/", $key)) {
|
|
// Special case for end date come with 3 inputs day, month, year
|
|
$dtarr = array ();
|
|
$dtarr = explode('_', $key);
|
|
if (! array_key_exists('options_' . $dtarr[1] . '_end_dt', $array_query)) {
|
|
$array_query['options_' . $dtarr[1] . '_end_dt'] = dol_mktime(0, 0, 0, GETPOST('options_' . $dtarr[1] . '_end_dtmonth', 'int'), GETPOST('options_' . $dtarr[1] . '_end_dtday', 'int'), GETPOST('options_' . $dtarr[1] . '_end_dtyear', 'int'));
|
|
// print $array_query['options_'.$dtarr[1].'_end_dt'];
|
|
// 01/02/1013=1361228400
|
|
}
|
|
} else {
|
|
$array_query[$key] = GETPOST($key);
|
|
}
|
|
}
|
|
if (preg_match("/^options_.*_cnct/", $key)) {
|
|
// Special case for start date come with 3 inputs day, month, year
|
|
if (preg_match("/st_dt/", $key)) {
|
|
$dtarr = array ();
|
|
$dtarr = explode('_', $key);
|
|
if (! array_key_exists('options_' . $dtarr[1] . '_st_dt' . '_cnct', $array_query)) {
|
|
$array_query['options_' . $dtarr[1] . '_st_dt' . '_cnct'] = dol_mktime(0, 0, 0, GETPOST('options_' . $dtarr[1] . '_st_dtmonth' . '_cnct', 'int'), GETPOST('options_' . $dtarr[1] . '_st_dtday' . '_cnct', 'int'), GETPOST('options_' . $dtarr[1] . '_st_dtyear' . '_cnct', 'int'));
|
|
}
|
|
} elseif (preg_match("/end_dt/", $key)) {
|
|
// Special case for end date come with 3 inputs day, month, year
|
|
$dtarr = array ();
|
|
$dtarr = explode('_', $key);
|
|
if (! array_key_exists('options_' . $dtarr[1] . '_end_dt' . '_cnct', $array_query)) {
|
|
$array_query['options_' . $dtarr[1] . '_end_dt' . '_cnct'] = dol_mktime(0, 0, 0, GETPOST('options_' . $dtarr[1] . '_end_dtmonth' . '_cnct', 'int'), GETPOST('options_' . $dtarr[1] . '_end_dtday' . '_cnct', 'int'), GETPOST('options_' . $dtarr[1] . '_end_dtyear' . '_cnct', 'int'));
|
|
// print $array_query['cnct_options_'.$dtarr[1].'_end_dt'];
|
|
// 01/02/1013=1361228400
|
|
}
|
|
} else {
|
|
$array_query[$key] = GETPOST($key);
|
|
}
|
|
}
|
|
|
|
if (preg_match("/^cust_/", $key)) {
|
|
$array_query[$key] = GETPOST($key);
|
|
}
|
|
|
|
if (preg_match("/^contact_/", $key)) {
|
|
|
|
$array_query[$key] = GETPOST($key);
|
|
|
|
$specials_date_key = array (
|
|
'contact_update_st_dt',
|
|
'contact_update_end_dt',
|
|
'contact_create_st_dt',
|
|
'contact_create_end_dt'
|
|
);
|
|
foreach ( $specials_date_key as $date_key ) {
|
|
if ($key == $date_key) {
|
|
$dt = GETPOST($date_key);
|
|
if (! empty($dt)) {
|
|
$array_query[$key] = dol_mktime(0, 0, 0, GETPOST($date_key . 'month', 'int'), GETPOST($date_key . 'day', 'int'), GETPOST($date_key . 'year', 'int'));
|
|
} else {
|
|
$array_query[$key] = '';
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
if (preg_match("/^type_of_target/", $key)) {
|
|
$array_query[$key] = GETPOST($key);
|
|
}
|
|
}
|
|
$advTarget->filtervalue = json_encode($array_query);
|
|
|
|
if ($action == 'createfilter') {
|
|
$advTarget->name = $template_name;
|
|
$result = $advTarget->create($user);
|
|
if ($result < 0) {
|
|
setEventMessage($advTarget->error, 'errors');
|
|
}
|
|
} elseif ($action == 'savefilter') {
|
|
|
|
$result = $advTarget->update($user);
|
|
if ($result < 0) {
|
|
setEventMessage($advTarget->error, 'errors');
|
|
}
|
|
}
|
|
$template_id = $advTarget->id;
|
|
}
|
|
}
|
|
|
|
if ($action == 'deletefilter') {
|
|
$result = $advTarget->delete($user);
|
|
if ($result < 0) {
|
|
setEventMessage($advTarget->error, 'errors');
|
|
}
|
|
header("Location: " . $_SERVER['PHP_SELF'] . "?id=" . $id);
|
|
exit();
|
|
}
|
|
|
|
if ($action == 'delete') {
|
|
// Ici, rowid indique le destinataire et id le mailing
|
|
$sql = "DELETE FROM " . MAIN_DB_PREFIX . "mailing_cibles WHERE rowid=" . $rowid;
|
|
$resql = $db->query($sql);
|
|
if ($resql) {
|
|
if (! empty($id)) {
|
|
$classname = "MailingTargets";
|
|
$obj = new $classname($db);
|
|
$obj->update_nb($id);
|
|
|
|
header("Location: " . $_SERVER['PHP_SELF'] . "?id=" . $id);
|
|
exit();
|
|
} else {
|
|
header("Location: liste.php");
|
|
exit();
|
|
}
|
|
} else {
|
|
dol_print_error($db);
|
|
}
|
|
}
|
|
|
|
if ($_POST["button_removefilter"]) {
|
|
$search_nom = '';
|
|
$search_prenom = '';
|
|
$search_email = '';
|
|
}
|
|
|
|
|
|
/*
|
|
* View
|
|
*/
|
|
|
|
|
|
llxHeader('', $langs->trans("MailAdvTargetRecipients"));
|
|
|
|
|
|
|
|
$form = new Form($db);
|
|
$formadvtargetemaling = new FormAdvTargetEmailing($db);
|
|
$formcompany = new FormCompany($db);
|
|
$formother = new FormOther($db);
|
|
|
|
if ($object->fetch($id) >= 0) {
|
|
|
|
$head = emailing_prepare_head($object);
|
|
|
|
dol_fiche_head($head, 'advtargets', $langs->trans("Mailing"), 0, 'email');
|
|
|
|
print '<table class="border" width="100%">';
|
|
|
|
$linkback = '<a href="' . DOL_URL_ROOT . '/comm/mailing/liste.php">' . $langs->trans("BackToList") . '</a>';
|
|
|
|
print '<tr><td width="25%">' . $langs->trans("Ref") . '</td>';
|
|
print '<td colspan="3">';
|
|
print $form->showrefnav($object, 'id', $linkback);
|
|
print '</td></tr>';
|
|
|
|
print '<tr><td width="25%">' . $langs->trans("MailTitle") . '</td><td colspan="3">' . $object->titre . '</td></tr>';
|
|
|
|
print '<tr><td width="25%">' . $langs->trans("MailFrom") . '</td><td colspan="3">' . dol_print_email($object->email_from, 0, 0, 0, 0, 1) . '</td></tr>';
|
|
|
|
// Errors to
|
|
print '<tr><td width="25%">' . $langs->trans("MailErrorsTo") . '</td><td colspan="3">' . dol_print_email($object->email_errorsto, 0, 0, 0, 0, 1);
|
|
print '</td></tr>';
|
|
|
|
// Status
|
|
print '<tr><td width="25%">' . $langs->trans("Status") . '</td><td colspan="3">' . $object->getLibStatut(4) . '</td></tr>';
|
|
|
|
// Nb of distinct emails
|
|
print '<tr><td width="25%">';
|
|
print $langs->trans("TotalNbOfDistinctRecipients");
|
|
print '</td><td colspan="3">';
|
|
$nbemail = ($object->nbemail ? $object->nbemail : '0');
|
|
if (! empty($conf->global->MAILING_LIMIT_SENDBYWEB) && $conf->global->MAILING_LIMIT_SENDBYWEB < $nbemail) {
|
|
$text = $langs->trans('LimitSendingEmailing', $conf->global->MAILING_LIMIT_SENDBYWEB);
|
|
print $form->textwithpicto($nbemail, $text, 1, 'warning');
|
|
} else {
|
|
print $nbemail;
|
|
}
|
|
print '</td></tr>';
|
|
|
|
print '</table>';
|
|
|
|
print "</div>";
|
|
|
|
// Show email selectors
|
|
if ($object->statut == 0 && $user->rights->mailing->creer) {
|
|
|
|
include DOL_DOCUMENT_ROOT . '/core/tpl/advtarget.tpl.php';
|
|
|
|
}
|
|
}
|
|
|
|
llxFooter();
|
|
$db->close();
|