New: Ajout du module de s�lection des cibles d'un mailing "pomme" (Tous les utilisateurs Dolibarr).

2005-02-12 17:42:01 +00:00 · 2005-02-12 17:42:01 +00:00 · 03e68d2e30
commit 03e68d2e30
parent 8bda5c7e7d
1 changed files with 95 additions and 0 deletions
--- a/htdocs/includes/modules/mailings/pomme.modules.php
+++ b/htdocs/includes/modules/mailings/pomme.modules.php
@ -0,0 +1,95 @@
+<?php
+/* Copyright (C) 2005 Laurent Destailleur <eldy@users.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 2 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, write to the Free Software
+ * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+ * or see http://www.gnu.org/
+ *
+ * $Id$
+ * $Source$
+ *
+ *
+ * L'utilisation d'adresses de courriers électroniques dans les opérations
+ * de prospection commerciale est subordonnée au recueil du consentement 
+ * préalable des personnes concernées.
+ *
+ * Le dispositif juridique applicable a été introduit par l'article 22 de 
+ * la loi du 21 juin 2004  pour la confiance dans l'économie numérique.
+ *
+ * Les dispositions applicables sont définies par les articles L. 34-5 du 
+ * code des postes et des télécommunications et L. 121-20-5 du code de la 
+ * consommation. L'application du principe du consentement préalable en 
+ * droit français résulte de la transposition de l'article 13 de la Directive 
+ * européenne du 12 juillet 2002 « Vie privée et communications électroniques ». 
+ *
+ */
+
+/**   	\file       htdocs/includes/modules/mailings/pomme.modules.php
+		\ingroup    mailing
+		\brief      Fichier de la classe permettant de générer la liste de destinataires Pomme
+		\version    $Revision$
+*/
+
+include_once DOL_DOCUMENT_ROOT.'/includes/modules/mailings/modules_mailings.php';
+
+
+/**	    \class      mailing_pomme
+		\brief      Classe permettant de générer la liste des destinataires Pomme
+*/
+
+class mailing_pomme extends MailingTargets
+{
+    var $name='DolibarrUsers';                      // Identifiant du module mailing
+    var $desc='Tous les utilisateurs de Dolibarr';  // Libellé utilisé si aucune traduction pour MailingModuleDescXXX ou XXX=name trouvée
+    var $require_module=array();                    // Module mailing actif si modules require_module actifs
+
+    var $db;
+    var $statssql=array();
+
+
+    function mailing_pomme($DB)
+    {
+        global $langs;
+        $langs->load("users");
+        
+        $this->db=$DB;
+
+        // Liste des tableaux des stats espace mailing
+        $this->statssql[0]="SELECT '".$langs->trans("DolibarrUsers")."' label, count(*) nb FROM ".MAIN_DB_PREFIX."user";
+    }
+    
+    function getNbOfRecipients()
+    {
+        // La requete doit retourner: nb
+        $sql  = "SELECT count(distinct(u.email)) nb";
+        $sql .= " FROM ".MAIN_DB_PREFIX."user as u";
+        $sql .= " WHERE u.email IS NOT NULL";
+
+        return parent::getNbOfRecipients($sql); 
+    }
+    
+    function add_to_target($mailing_id)
+    {
+        // La requete doit retourner: email, fk_contact, name, firstname
+        $sql = "SELECT u.email email, null fk_contact, u.name name, u.firstname firstname";
+        $sql .= " FROM ".MAIN_DB_PREFIX."user as u";
+        $sql .= " WHERE u.email IS NOT NULL";
+        $sql .= " ORDER BY u.email";
+
+        return parent::add_to_target($mailing_id, $sql);
+    }
+
+}
+
+?>