mailinglist_mymodule_myobject.modules.php

<?php
/* Copyright (C) 2005-2012 Laurent Destailleur  <eldy@users.sourceforge.net>
 *
 * This file is an example to follow to add your own email selector inside
 * the Dolibarr email tool.
 * Follow instructions given in README file to know what to change to build
 * your own emailing list selector.
 * Code that need to be changed in this file are marked by "CHANGE THIS" tag.
 */
 
include_once DOL_DOCUMENT_ROOT.'/core/modules/mailings/modules_mailings.php';
dol_include_once("/mymodule/class/myobject.class.php");
 
 
class mailing_mailinglist_mymodule_myobject extends MailingTargets
{
  // CHANGE THIS: Put here a name not already used
  public $name = 'mailinglist_mymodule_myobject';
  // CHANGE THIS: Put here a description of your selector module
  public $desc = 'My object emailing target selector';
  // CHANGE THIS: Set to 1 if selector is available for admin users only
  public $require_admin = 0;
 
  public $enabled = 'isModEnabled("mymodule")';
 
  public $require_module = array();
 
  public $picto = 'fa-file';
 
  public $db;
 
 
  public function __construct($db)
  {
    $this->db = $db;
    //$this->enabled = ...
  }
 
 
  public function formFilter()
  {
    global $langs;
    $langs->load("members");
 
    $form = new Form($this->db);
 
    $arraystatus = array(1=>'Option 1', 2=>'Option 2');
 
    $s = '';
    $s .= $langs->trans("Status").': ';
    $s .= '<select name="filter" class="flat">';
    $s .= '<option value="none">&nbsp;</option>';
    foreach ($arraystatus as $status) {
      $s .= '<option value="'.$status.'">'.$status.'</option>';
    }
    $s .= '</select>';
    $s .= '<br>';
 
    return $s;
  }
 
 
  public function url($id)
  {
    return '<a href="'.dol_buildpath('/mymodule/myobject_card.php', 1).'?id='.$id.'">'.img_object('', "generic").'</a>';
  }
 
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function add_to_target($mailing_id)
  {
    // phpcs:enable
    $target = array();
    $j = 0;
 
    $sql = " select rowid as id, label, firstname, lastname";
    $sql .= " from ".MAIN_DB_PREFIX."myobject";
    $sql .= " where email IS NOT NULL AND email <> ''";
    if (GETPOSTISSET('filter') && GETPOST('filter', 'alphanohtml') != 'none') {
      $sql .= " AND status = '".$this->db->escape(GETPOST('filter', 'alphanohtml'))."'";
    }
    $sql .= " ORDER BY email";
 
    // Store recipients in target
    $result = $this->db->query($sql);
    if ($result) {
      $num = $this->db->num_rows($result);
      $i = 0;
 
      dol_syslog("mailinglist_mymodule_myobject.modules.php: mailing ".$num." targets found");
 
      $old = '';
      while ($i < $num) {
        $obj = $this->db->fetch_object($result);
        if ($old != $obj->email) {
          $target[$j] = array(
            'email' => $obj->email,
            'name' => $obj->lastname,
            'id' => $obj->id,
            'firstname' => $obj->firstname,
            'other' => $obj->label,
            'source_url' => $this->url($obj->id),
            'source_id' => $obj->id,
            'source_type' => 'myobject@mymodule'
          );
          $old = $obj->email;
          $j++;
        }
 
        $i++;
      }
    } else {
      dol_syslog($this->db->error());
      $this->error = $this->db->error();
      return -1;
    }
 
    // You must fill the $target array with record like this
    // $target[0]=array('email'=>'email_0','name'=>'name_0','firstname'=>'firstname_0');
    // ...
    // $target[n]=array('email'=>'email_n','name'=>'name_n','firstname'=>'firstname_n');
 
    // Example: $target[0]=array('email'=>'myemail@mydomain.com','name'=>'Doe','firstname'=>'John');
 
    // ----- Your code end here -----
 
    return parent::addTargetsToDatabase($mailing_id, $target);
  }
 
 
  public function getSqlArrayForStats()
  {
    // CHANGE THIS: Optionnal
 
    //var $statssql=array();
    //$this->statssql[0]="SELECT field1 as label, count(distinct(email)) as nb FROM mytable WHERE email IS NOT NULL";
 
    return array();
  }
 
 
  public function getNbOfRecipients($sql = '')
  {
    $sql = "select count(distinct(email)) as nb from ".MAIN_DB_PREFIX."myobject as p where email IS NOT NULL AND email != ''";
 
    $a = parent::getNbOfRecipients($sql);
 
    if ($a < 0) {
      return -1;
    }
    return $a;
  }
}