* Copyright (C) 2019 Frédéric France * * 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 . */ /** * \file htdocs/datapolicy/admin/mailing.php * \ingroup datapolicy * \brief Page called by the setupmail.php page to send agreements by email. */ // Load Dolibarr environment require '../../main.inc.php'; require_once DOL_DOCUMENT_ROOT.'/contact/class/contact.class.php'; require_once DOL_DOCUMENT_ROOT.'/datapolicy/class/datapolicy.class.php'; $idcontact = GETPOST('idc', 'int'); $idcompany = GETPOST('ids', 'int'); $idmember = GETPOST('ida', 'int'); // Security if (!isModEnabled("datapolicy")) { accessforbidden(); } if (!$user->admin) { accessforbidden(); } /* * Actions */ if (!empty($idcontact)) { $contact = new Contact($db); $contact->fetch($idcontact); DataPolicy::sendMailDataPolicyContact($contact); } elseif (!empty($idcompany)) { $company = new Societe($db); $company->fetch($idcompany); DataPolicy::sendMailDataPolicyCompany($company); } elseif (!empty($idmember)) { $member = new Adherent($db); $member->fetch($idmember); DataPolicy::sendMailDataPolicyAdherent($member); } else { $contacts = new DataPolicy($db); // Send email to all contacts where email was not already sent $contacts->getAllContactNotInformed(); $contacts->getAllCompaniesNotInformed(); $contacts->getAllAdherentsNotInformed(); } /* * View */ echo $langs->trans('AllAgreementSend');