2015-12-11 05:08:32 +01:00
#!/usr/bin/env php
2011-01-23 02:00:45 +01:00
< ? php
2011-08-31 12:20:39 +02:00
/*
2016-02-08 12:20:40 +01:00
* Copyright ( C ) 2004 Rodolphe Quiedeville < rodolphe @ quiedeville . org >
* Copyright ( C ) 2005 - 2013 Laurent Destailleur < eldy @ users . sourceforge . net >
* Copyright ( C ) 2005 - 2016 Regis Houssin < regis . houssin @ capnetworks . com >
2005-01-05 12:03:06 +01:00
*
* 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
2013-01-16 15:36:08 +01:00
* the Free Software Foundation ; either version 3 of the License , or
2005-01-05 12:03:06 +01:00
* ( 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
2011-08-01 00:21:57 +02:00
* along with this program . If not , see < http :// www . gnu . org / licenses />.
2005-01-05 12:03:06 +01:00
*/
2005-04-21 01:01:30 +02:00
2005-09-02 23:34:22 +02:00
/**
2009-09-08 16:28:08 +02:00
* \file scripts / emailings / mailing - send . php
2009-05-25 00:11:46 +02:00
* \ingroup mailing
* \brief Script d 'envoi d' un mailing prepare et valide
*/
2005-09-02 23:34:22 +02:00
2005-04-21 01:01:30 +02:00
$sapi_type = php_sapi_name ();
2009-10-22 03:04:23 +02:00
$script_file = basename ( __FILE__ );
2010-03-16 19:46:28 +01:00
$path = dirname ( __FILE__ ) . '/' ;
2009-10-22 03:04:23 +02:00
// Test if batch mode
2005-04-21 01:01:30 +02:00
if ( substr ( $sapi_type , 0 , 3 ) == 'cgi' ) {
2017-10-16 08:47:05 +02:00
echo " Error: You are using PHP for CGI. To execute " . $script_file . " from command line, you must use PHP for CLI mode. \n " ;
2013-06-09 14:40:33 +02:00
exit ( - 1 );
2005-02-15 22:16:10 +01:00
}
2005-09-02 23:34:22 +02:00
if ( ! isset ( $argv [ 1 ]) || ! $argv [ 1 ]) {
2013-04-14 20:15:55 +02:00
print " Usage: " . $script_file . " (ID_MAILING|all) \n " ;
2013-06-09 14:40:33 +02:00
exit ( - 1 );
2005-02-15 22:16:10 +01:00
}
$id = $argv [ 1 ];
2017-05-02 18:21:50 +02:00
if ( isset ( $argv [ 2 ]) || ! empty ( $argv [ 2 ])) $login = $argv [ 2 ];
2015-04-18 16:39:53 +02:00
else $login = '' ;
2005-01-05 12:03:06 +01:00
2009-12-16 11:23:38 +01:00
require_once ( $path . " ../../htdocs/master.inc.php " );
2011-10-24 09:29:17 +02:00
require_once ( DOL_DOCUMENT_ROOT . " /core/class/CMailFile.class.php " );
2017-05-02 18:21:50 +02:00
require_once ( DOL_DOCUMENT_ROOT . " /comm/mailing/class/mailing.class.php " );
2005-08-11 21:23:04 +02:00
2005-01-05 12:03:06 +01:00
2013-05-15 11:24:18 +02:00
// Global variables
$version = DOL_VERSION ;
$error = 0 ;
/*
* Main
*/
@ set_time_limit ( 0 );
2014-07-31 17:35:58 +02:00
print " ***** " . $script_file . " ( " . $version . " ) pid= " . dol_getmypid () . " ***** \n " ;
2013-05-15 11:24:18 +02:00
2016-12-16 13:46:39 +01:00
if ( $conf -> global -> MAILING_LIMIT_SENDBYCLI == '-1' )
{
2017-09-15 13:43:16 +02:00
2016-12-16 13:46:39 +01:00
}
2015-04-18 16:39:53 +02:00
$user = new User ( $db );
// for signature, we use user send as parameter
if ( ! empty ( $login )) $user -> fetch ( '' , $login );
2005-04-21 01:01:30 +02:00
2017-05-02 18:21:50 +02:00
// We get list of emailing id to process
$sql = " SELECT m.rowid " ;
2009-05-25 00:11:46 +02:00
$sql .= " FROM " . MAIN_DB_PREFIX . " mailing as m " ;
2016-02-12 14:27:59 +01:00
$sql .= " WHERE m.statut IN (1,2) " ;
2013-04-14 20:15:55 +02:00
if ( $id != 'all' )
2005-01-05 12:03:06 +01:00
{
2013-04-14 20:15:55 +02:00
$sql .= " AND m.rowid= " . $id ;
$sql .= " LIMIT 1 " ;
2005-01-05 12:03:06 +01:00
}
2005-04-21 01:01:30 +02:00
$resql = $db -> query ( $sql );
if ( $resql )
2005-01-05 12:03:06 +01:00
{
2009-09-08 16:28:08 +02:00
$num = $db -> num_rows ( $resql );
2013-04-14 20:15:55 +02:00
$j = 0 ;
2005-01-05 12:03:06 +01:00
2009-09-08 16:28:08 +02:00
if ( $num )
{
2013-04-14 20:15:55 +02:00
for ( $j = 0 ; $j < $num ; $j ++ )
2009-09-08 16:28:08 +02:00
{
$obj = $db -> fetch_object ( $resql );
2005-04-21 01:01:30 +02:00
2013-04-14 20:15:55 +02:00
dol_syslog ( " Process mailing with id " . $obj -> rowid );
print " Process mailing with id " . $obj -> rowid . " \n " ;
2017-05-02 18:21:50 +02:00
$emailing = new Mailing ( $db );
$emailing -> fetch ( $obj -> rowid );
2017-09-15 13:43:16 +02:00
2017-05-02 18:21:50 +02:00
$id = $emailing -> id ;
$subject = $emailing -> sujet ;
$message = $emailing -> body ;
$from = $emailing -> email_from ;
$replyto = $emailing -> email_replyto ;
$errorsto = $emailing -> email_errorsto ;
2013-04-14 20:15:55 +02:00
// Le message est-il en html
$msgishtml =- 1 ; // Unknown by default
if ( preg_match ( '/[\s\t]*<html>/i' , $message )) $msgishtml = 1 ;
$nbok = 0 ; $nbko = 0 ;
// On choisit les mails non deja envoyes pour ce mailing (statut=0)
// ou envoyes en erreur (statut=-1)
2017-11-21 11:15:33 +01:00
$sql2 = " SELECT mc.rowid, mc.fk_mailing, mc.lastname, mc.firstname, mc.email, mc.other, mc.source_url, mc.source_id, mc.source_type, mc.tag " ;
2013-04-14 20:15:55 +02:00
$sql2 .= " FROM " . MAIN_DB_PREFIX . " mailing_cibles as mc " ;
$sql2 .= " WHERE mc.statut < 1 AND mc.fk_mailing = " . $id ;
2017-10-16 08:47:05 +02:00
if ( $conf -> global -> MAILING_LIMIT_SENDBYCLI > 0 )
{
$sql2 .= " LIMIT " . $conf -> global -> MAILING_LIMIT_SENDBYCLI ;
}
2017-09-15 13:43:16 +02:00
2013-04-14 20:15:55 +02:00
$resql2 = $db -> query ( $sql2 );
if ( $resql2 )
2006-08-06 20:34:37 +02:00
{
2013-04-14 20:15:55 +02:00
$num2 = $db -> num_rows ( $resql2 );
2013-06-05 16:12:07 +02:00
dol_syslog ( " Nb of targets = " . $num2 , LOG_DEBUG );
print " Nb of targets = " . $num2 . " \n " ;
2006-08-06 20:34:37 +02:00
2013-04-14 20:15:55 +02:00
if ( $num2 )
{
$now = dol_now ();
2009-02-18 23:05:21 +01:00
2013-04-14 20:15:55 +02:00
// Positionne date debut envoi
$sqlstartdate = " UPDATE " . MAIN_DB_PREFIX . " mailing SET date_envoi=' " . $db -> idate ( $now ) . " ' WHERE rowid= " . $id ;
$resqlstartdate = $db -> query ( $sqlstartdate );
if ( ! $resqlstartdate )
{
dol_print_error ( $db );
2013-06-05 16:12:07 +02:00
$error ++ ;
2013-04-14 20:15:55 +02:00
}
2007-05-26 17:27:34 +02:00
2013-04-14 20:15:55 +02:00
// Look on each email and sent message
$i = 0 ;
while ( $i < $num2 )
2012-04-04 14:45:48 +02:00
{
2017-09-15 13:43:16 +02:00
// Here code is common with same loop ino card.php
2013-04-14 20:15:55 +02:00
$res = 1 ;
$now = dol_now ();
2017-11-21 11:15:33 +01:00
$obj = $db -> fetch_object ( $resql2 );
2013-04-14 20:15:55 +02:00
// sendto en RFC2822
2017-11-21 11:15:33 +01:00
$sendto = str_replace ( ',' , ' ' , dolGetFirstLastname ( $obj -> firstname , $obj -> lastname ) . " < " . $obj -> email . " > " );
2013-04-14 20:15:55 +02:00
// Make subtsitutions on topic and body
2017-11-21 11:15:33 +01:00
$other = explode ( ';' , $obj -> other );
2016-02-08 12:20:40 +01:00
$tmpfield = explode ( '=' , $other [ 0 ], 2 ); $other1 = ( isset ( $tmpfield [ 1 ]) ? $tmpfield [ 1 ] : $tmpfield [ 0 ]);
2017-10-16 08:47:05 +02:00
$tmpfield = explode ( '=' , $other [ 1 ], 2 ); $other2 = ( isset ( $tmpfield [ 1 ]) ? $tmpfield [ 1 ] : $tmpfield [ 0 ]);
$tmpfield = explode ( '=' , $other [ 2 ], 2 ); $other3 = ( isset ( $tmpfield [ 1 ]) ? $tmpfield [ 1 ] : $tmpfield [ 0 ]);
$tmpfield = explode ( '=' , $other [ 3 ], 2 ); $other4 = ( isset ( $tmpfield [ 1 ]) ? $tmpfield [ 1 ] : $tmpfield [ 0 ]);
$tmpfield = explode ( '=' , $other [ 4 ], 2 ); $other5 = ( isset ( $tmpfield [ 1 ]) ? $tmpfield [ 1 ] : $tmpfield [ 0 ]);
$signature = (( ! empty ( $user -> signature ) && empty ( $conf -> global -> MAIN_MAIL_DO_NOT_USE_SIGN )) ? $user -> signature : '' );
$object = null ; // Not defined with mass emailing
$parameters = array ( 'mode' => 'emailing' );
$substitutionarray = getCommonSubstitutionArray ( $langs , 0 , array ( 'object' , 'objectamount' ), $object ); // Note: On mass emailing, this is null because we don't know object
// Array of possible substitutions (See also file mailing-send.php that should manage same substitutions)
$substitutionarray [ '__ID__' ] = $obj -> source_id ;
$substitutionarray [ '__EMAIL__' ] = $obj -> email ;
$substitutionarray [ '__LASTNAME__' ] = $obj -> lastname ;
$substitutionarray [ '__FIRSTNAME__' ] = $obj -> firstname ;
$substitutionarray [ '__MAILTOEMAIL__' ] = '<a href="mailto:' . $obj -> email . '">' . $obj -> email . '</a>' ;
$substitutionarray [ '__OTHER1__' ] = $other1 ;
$substitutionarray [ '__OTHER2__' ] = $other2 ;
$substitutionarray [ '__OTHER3__' ] = $other3 ;
$substitutionarray [ '__OTHER4__' ] = $other4 ;
$substitutionarray [ '__OTHER5__' ] = $other5 ;
$substitutionarray [ '__USER_SIGNATURE__' ] = $signature ; // Signature is empty when ran from command line or taken from user in parameter)
2017-10-13 10:35:21 +02:00
$substitutionarray [ '__SIGNATURE__' ] = $signature ; // For backward compatibility
2017-10-16 08:47:05 +02:00
$substitutionarray [ '__CHECK_READ__' ] = '<img src="' . DOL_MAIN_URL_ROOT . '/public/emailing/mailing-read.php?tag=' . $obj -> tag . '&securitykey=' . urlencode ( $conf -> global -> MAILING_EMAIL_UNSUBSCRIBE_KEY ) . '" width="1" height="1" style="width:1px;height:1px" border="0"/>' ;
$substitutionarray [ '__UNSUBSCRIBE__' ] = '<a href="' . DOL_MAIN_URL_ROOT . '/public/emailing/mailing-unsubscribe.php?tag=' . $obj -> tag . '&unsuscrib=1&securitykey=' . urlencode ( $conf -> global -> MAILING_EMAIL_UNSUBSCRIBE_KEY ) . '" target="_blank">' . $langs -> trans ( " MailUnsubcribe " ) . '</a>' ;
2017-09-22 14:34:31 +02:00
2017-09-15 13:43:16 +02:00
$onlinepaymentenabled = 0 ;
if ( ! empty ( $conf -> paypal -> enabled )) $onlinepaymentenabled ++ ;
if ( ! empty ( $conf -> paybox -> enabled )) $onlinepaymentenabled ++ ;
if ( ! empty ( $conf -> stripe -> enabled )) $onlinepaymentenabled ++ ;
if ( $onlinepaymentenabled && ! empty ( $conf -> global -> PAYMENT_SECURITY_TOKEN ))
{
$substitutionarray [ '__SECUREKEYPAYMENT__' ] = dol_hash ( $conf -> global -> PAYMENT_SECURITY_TOKEN , 2 );
2017-09-22 14:34:31 +02:00
if ( empty ( $conf -> global -> PAYMENT_SECURITY_TOKEN_UNIQUE ))
{
$substitutionarray [ '__SECUREKEYPAYMENT_MEMBER__' ] = dol_hash ( $conf -> global -> PAYMENT_SECURITY_TOKEN , 2 );
$substitutionarray [ '__SECUREKEYPAYMENT_ORDER__' ] = dol_hash ( $conf -> global -> PAYMENT_SECURITY_TOKEN , 2 );
$substitutionarray [ '__SECUREKEYPAYMENT_INVOICE__' ] = dol_hash ( $conf -> global -> PAYMENT_SECURITY_TOKEN , 2 );
$substitutionarray [ '__SECUREKEYPAYMENT_CONTRACTLINE__' ] = dol_hash ( $conf -> global -> PAYMENT_SECURITY_TOKEN , 2 );
}
else
{
$substitutionarray [ '__SECUREKEYPAYMENT_MEMBER__' ] = dol_hash ( $conf -> global -> PAYMENT_SECURITY_TOKEN . 'membersubscription' . $obj -> source_id , 2 );
$substitutionarray [ '__SECUREKEYPAYMENT_ORDER__' ] = dol_hash ( $conf -> global -> PAYMENT_SECURITY_TOKEN . 'order' . $obj -> source_id , 2 );
$substitutionarray [ '__SECUREKEYPAYMENT_INVOICE__' ] = dol_hash ( $conf -> global -> PAYMENT_SECURITY_TOKEN . 'invoice' . $obj -> source_id , 2 );
$substitutionarray [ '__SECUREKEYPAYMENT_CONTRACTLINE__' ] = dol_hash ( $conf -> global -> PAYMENT_SECURITY_TOKEN . 'contractline' . $obj -> source_id , 2 );
}
2017-09-15 13:43:16 +02:00
}
/* For backward compatibility */
2014-01-15 17:21:13 +01:00
if ( ! empty ( $conf -> paypal -> enabled ) && ! empty ( $conf -> global -> PAYPAL_SECURITY_TOKEN ))
{
$substitutionarray [ '__SECUREKEYPAYPAL__' ] = dol_hash ( $conf -> global -> PAYPAL_SECURITY_TOKEN , 2 );
2017-09-15 13:43:16 +02:00
2014-01-15 17:21:13 +01:00
if ( empty ( $conf -> global -> PAYPAL_SECURITY_TOKEN_UNIQUE )) $substitutionarray [ '__SECUREKEYPAYPAL_MEMBER__' ] = dol_hash ( $conf -> global -> PAYPAL_SECURITY_TOKEN , 2 );
else $substitutionarray [ '__SECUREKEYPAYPAL_MEMBER__' ] = dol_hash ( $conf -> global -> PAYPAL_SECURITY_TOKEN . 'membersubscription' . $obj -> source_id , 2 );
2013-04-14 20:15:55 +02:00
2017-09-15 13:43:16 +02:00
if ( empty ( $conf -> global -> PAYPAL_SECURITY_TOKEN_UNIQUE )) $substitutionarray [ '__SECUREKEYPAYPAL_ORDER__' ] = dol_hash ( $conf -> global -> PAYPAL_SECURITY_TOKEN , 2 );
else $substitutionarray [ '__SECUREKEYPAYPAL_ORDER__' ] = dol_hash ( $conf -> global -> PAYPAL_SECURITY_TOKEN . 'order' . $obj -> source_id , 2 );
if ( empty ( $conf -> global -> PAYPAL_SECURITY_TOKEN_UNIQUE )) $substitutionarray [ '__SECUREKEYPAYPAL_INVOICE__' ] = dol_hash ( $conf -> global -> PAYPAL_SECURITY_TOKEN , 2 );
else $substitutionarray [ '__SECUREKEYPAYPAL_INVOICE__' ] = dol_hash ( $conf -> global -> PAYPAL_SECURITY_TOKEN . 'invoice' . $obj -> source_id , 2 );
if ( empty ( $conf -> global -> PAYPAL_SECURITY_TOKEN_UNIQUE )) $substitutionarray [ '__SECUREKEYPAYPAL_CONTRACTLINE__' ] = dol_hash ( $conf -> global -> PAYPAL_SECURITY_TOKEN , 2 );
else $substitutionarray [ '__SECUREKEYPAYPAL_CONTRACTLINE__' ] = dol_hash ( $conf -> global -> PAYPAL_SECURITY_TOKEN . 'contractline' . $obj -> source_id , 2 );
}
2017-09-22 14:34:31 +02:00
2013-04-14 20:15:55 +02:00
complete_substitutions_array ( $substitutionarray , $langs );
$newsubject = make_substitutions ( $subject , $substitutionarray );
$newmessage = make_substitutions ( $message , $substitutionarray );
$substitutionisok = true ;
// Fabrication du mail
2017-11-21 11:15:33 +01:00
$trackid = 'emailing-' . $obj -> fk_mailing . '-' . $obj -> rowid ;
2013-04-14 20:15:55 +02:00
$mail = new CMailFile (
2017-10-16 08:47:05 +02:00
$newsubject ,
$sendto ,
$from ,
$newmessage ,
array (),
array (),
array (),
'' ,
'' ,
0 ,
$msgishtml ,
$errorsto ,
'' ,
$trackid ,
'' ,
'emailing'
2013-04-14 20:15:55 +02:00
);
if ( $mail -> error )
2012-04-04 14:45:48 +02:00
{
2013-04-14 20:15:55 +02:00
$res = 0 ;
}
if ( ! $substitutionisok )
{
$mail -> error = 'Some substitution failed' ;
$res = 0 ;
2012-04-04 14:45:48 +02:00
}
2012-04-05 21:02:00 +02:00
2013-04-14 20:15:55 +02:00
// Send Email
if ( $res )
{
$res = $mail -> sendfile ();
}
2012-04-05 21:02:00 +02:00
2013-04-14 20:15:55 +02:00
if ( $res )
{
// Mail successful
$nbok ++ ;
dol_syslog ( " ok for emailing id " . $id . " # " . $i . ( $mail -> error ? ' - ' . $mail -> error : '' ), LOG_DEBUG );
2017-05-02 18:21:50 +02:00
// Note: If emailing is 100 000 targets, 100 000 entries are added, so we don't enter events for each target here
// We must union table llx_mailing_taget for event tab OR enter 1 event with a special table link (id of email in event)
// Run trigger
/*
2017-11-21 11:15:33 +01:00
if ( $obj -> source_type == 'contact' )
2017-05-02 18:21:50 +02:00
{
2017-11-21 11:15:33 +01:00
$emailing -> sendtoid = $obj -> source_id ;
2017-05-02 18:21:50 +02:00
}
2017-11-21 11:15:33 +01:00
if ( $obj -> source_type == 'thirdparty' )
2017-05-02 18:21:50 +02:00
{
2017-11-21 11:15:33 +01:00
$emailing -> socid = $obj -> source_id ;
2017-05-02 18:21:50 +02:00
}
// Call trigger
$result = $emailing -> call_trigger ( 'EMAILING_SENTBYMAIL' , $user );
if ( $result < 0 ) $error ++ ;
// End call triggers
*/
2017-09-15 13:43:16 +02:00
2013-04-14 20:15:55 +02:00
$sqlok = " UPDATE " . MAIN_DB_PREFIX . " mailing_cibles " ;
2017-11-21 11:15:33 +01:00
$sqlok .= " SET statut=1, date_envoi=' " . $db -> idate ( $now ) . " ' WHERE rowid= " . $obj -> rowid ;
2013-04-14 20:15:55 +02:00
$resqlok = $db -> query ( $sqlok );
if ( ! $resqlok )
{
dol_print_error ( $db );
2013-06-05 16:12:07 +02:00
$error ++ ;
2013-04-14 20:15:55 +02:00
}
else
{
//if cheack read is use then update prospect contact status
if ( strpos ( $message , '__CHECK_READ__' ) !== false )
{
//Update status communication of thirdparty prospect
2017-11-21 11:15:33 +01:00
$sqlx = " UPDATE " . MAIN_DB_PREFIX . " societe SET fk_stcomm=2 WHERE rowid IN (SELECT source_id FROM " . MAIN_DB_PREFIX . " mailing_cibles WHERE rowid= " . $obj -> rowid . " ) " ;
2014-09-18 21:18:25 +02:00
dol_syslog ( " card.php: set prospect thirdparty status " , LOG_DEBUG );
2013-04-14 20:15:55 +02:00
$resqlx = $db -> query ( $sqlx );
if ( ! $resqlx )
{
dol_print_error ( $db );
2013-06-05 16:12:07 +02:00
$error ++ ;
2013-04-14 20:15:55 +02:00
}
2017-10-16 08:47:05 +02:00
//Update status communication of contact prospect
2017-11-21 11:15:33 +01:00
$sqlx = " UPDATE " . MAIN_DB_PREFIX . " societe SET fk_stcomm=2 WHERE rowid IN (SELECT sc.fk_soc FROM " . MAIN_DB_PREFIX . " socpeople AS sc INNER JOIN " . MAIN_DB_PREFIX . " mailing_cibles AS mc ON mc.rowid= " . $obj -> rowid . " AND mc.source_type = 'contact' AND mc.source_id = sc.rowid) " ;
2014-09-18 21:18:25 +02:00
dol_syslog ( " card.php: set prospect contact status " , LOG_DEBUG );
2013-04-14 20:15:55 +02:00
$resqlx = $db -> query ( $sqlx );
if ( ! $resqlx )
{
dol_print_error ( $db );
$error ++ ;
}
}
2016-02-08 12:20:40 +01:00
2017-10-16 08:47:05 +02:00
if ( ! empty ( $conf -> global -> MAILING_DELAY )) {
sleep ( $conf -> global -> MAILING_DELAY );
}
2015-01-18 16:26:26 +01:00
2013-04-14 20:15:55 +02:00
}
}
else
2012-04-04 14:45:48 +02:00
{
2013-04-14 20:15:55 +02:00
// Mail failed
$nbko ++ ;
dol_syslog ( " error for emailing id " . $id . " # " . $i . ( $mail -> error ? ' - ' . $mail -> error : '' ), LOG_DEBUG );
$sqlerror = " UPDATE " . MAIN_DB_PREFIX . " mailing_cibles " ;
2017-11-21 11:15:33 +01:00
$sqlerror .= " SET statut=-1, date_envoi= " . $db -> idate ( $now ) . " WHERE rowid= " . $obj -> rowid ;
2013-04-14 20:15:55 +02:00
$resqlerror = $db -> query ( $sqlerror );
if ( ! $resqlerror )
{
dol_print_error ( $db );
$error ++ ;
}
2012-04-04 14:45:48 +02:00
}
2013-04-14 20:15:55 +02:00
$i ++ ;
2012-04-04 14:45:48 +02:00
}
}
2013-06-05 16:12:07 +02:00
else
{
$mesg = " Emailing id " . $id . " has no recipient to target " ;
print $mesg . " \n " ;
dol_syslog ( $mesg , LOG_ERR );
2013-04-14 20:15:55 +02:00
}
2009-09-08 16:28:08 +02:00
2013-04-14 20:15:55 +02:00
// Loop finished, set global statut of mail
$statut = 2 ;
if ( ! $nbko ) $statut = 3 ;
2009-09-08 16:28:08 +02:00
2013-04-14 20:15:55 +02:00
$sqlenddate = " UPDATE " . MAIN_DB_PREFIX . " mailing SET statut= " . $statut . " WHERE rowid= " . $id ;
2014-06-12 13:49:05 +02:00
dol_syslog ( " update global status " , LOG_DEBUG );
2013-04-14 20:15:55 +02:00
print " Update status of emailing id " . $id . " to " . $statut . " \n " ;
$resqlenddate = $db -> query ( $sqlenddate );
if ( ! $resqlenddate )
2009-09-08 16:28:08 +02:00
{
dol_print_error ( $db );
2013-04-14 20:15:55 +02:00
$error ++ ;
2009-09-08 16:28:08 +02:00
}
}
2013-04-14 20:15:55 +02:00
else
{
dol_print_error ( $db );
$error ++ ;
}
2009-09-08 16:28:08 +02:00
}
}
2013-04-14 20:15:55 +02:00
else
2009-09-08 16:28:08 +02:00
{
2013-06-05 16:12:07 +02:00
$mesg = " No validated emailing id to send found. " ;
print $mesg . " \n " ;
dol_syslog ( $mesg , LOG_ERR );
2013-04-14 20:15:55 +02:00
$error ++ ;
2009-09-08 16:28:08 +02:00
}
2005-01-05 12:03:06 +01:00
}
else
{
2009-09-08 16:28:08 +02:00
dol_print_error ( $db );
2013-04-14 20:15:55 +02:00
$error ++ ;
2005-01-05 12:03:06 +01:00
}
2013-04-14 20:15:55 +02:00
exit ( $error );
