} // Action desactivation d'un sous module du module adherent if ($action == 'unset') { $result = dolibarr_del_const($db, $_GET["name"], $conf->entity); if ($result < 0) { dol_print_error($db); } } if (($action == 'testsubscribe' || $action == 'testunsubscribe') && !empty($conf->global->ADHERENT_USE_MAILMAN)) { $email = GETPOST($action . 'email'); if (!isValidEmail($email)) { $langs->load("errors"); setEventMessages($langs->trans("ErrorBadEMail", $email), null, 'errors'); } else { include_once DOL_DOCUMENT_ROOT . '/mailmanspip/class/mailmanspip.class.php'; $mailmanspip = new MailmanSpip($db); $object = new stdClass(); $object->email = $email; $object->pass = $email; /*$object->element='member'; $object->type='Preferred Partners'; */ if ($action == 'testsubscribe') { $result = $mailmanspip->add_to_mailman($object); if ($result < 0) { $error++; setEventMessages($mailmanspip->error, $mailmanspip->errors, 'errors'); } else { setEventMessages($langs->trans("MailmanCreationSuccess"), null); } } if ($action == 'testunsubscribe') {
/** * Function to delete a member from external tools like mailing-list, spip, etc. * * @return int <0 if KO, >0 if OK */ function del_to_abo() { global $conf, $langs; include_once DOL_DOCUMENT_ROOT . '/mailmanspip/class/mailmanspip.class.php'; $mailmanspip = new MailmanSpip($this->db); $err = 0; // mailman if (!empty($conf->global->ADHERENT_USE_MAILMAN)) { $result = $mailmanspip->del_to_mailman($this); if ($result < 0) { if (!empty($mailmanspip->error)) { $this->errors[] = $mailmanspip->error; } $err += 1; } foreach ($mailmanspip->mlremoved_ko as $tmplist => $tmpemail) { $langs->load("errors"); $this->errors[] = $langs->trans("ErrorFailedToRemoveToMailmanList", $tmpemail, $tmplist); } foreach ($mailmanspip->mlremoved_ok as $tmplist => $tmpemail) { $langs->load("mailmanspip"); $this->mesgs[] = $langs->trans("SuccessToRemoveToMailmanList", $tmpemail, $tmplist); } } if ($conf->global->ADHERENT_USE_SPIP && !empty($conf->mailmanspip->enabled)) { $result = $mailmanspip->del_to_spip($this); if ($result < 0) { $this->errors[] = $mailmanspip->error; $err += 1; } } if ($err) { // error return -$err; } else { return 1; } }
if ($user->rights->adherent->supprimer) { print '<a class="butAction" href="' . $_SERVER["PHP_SELF"] . '?id=' . $rowid . '&action=resign">' . $langs->trans("Resiliate") . "</a>\n"; } else { print "<font class=\"butActionRefused\" href=\"#\" title=\"" . dol_escape_htmltag($langs->trans("NotEnoughPermissions")) . "\">" . $langs->trans("Resiliate") . "</font>"; } } // Delete if ($user->rights->adherent->supprimer) { print '<a class="butActionDelete" href="' . $_SERVER["PHP_SELF"] . '?id=' . $object->id . '&action=delete">' . $langs->trans("Delete") . "</a>\n"; } else { print "<font class=\"butActionRefused\" href=\"#\" title=\"" . dol_escape_htmltag($langs->trans("NotEnoughPermissions")) . "\">" . $langs->trans("Delete") . "</font>"; } // Action SPIP if ($conf->mailmanspip->enabled && $conf->global->ADHERENT_USE_SPIP) { include_once DOL_DOCUMENT_ROOT . '/mailmanspip/class/mailmanspip.class.php'; $mailmanspip = new MailmanSpip($db); $isinspip = $mailmanspip->is_in_spip($object); if ($isinspip == 1) { print '<a class="butAction" href="' . $_SERVER["PHP_SELF"] . '?id=$object->id&action=del_spip">' . $langs->trans("DeleteIntoSpip") . "</a>\n"; } if ($isinspip == 0) { print '<a class="butAction" href="' . $_SERVER["PHP_SELF"] . '?id=$object->id&action=add_spip\\">' . $langs->trans("AddIntoSpip") . "</a>\n"; } if ($isinspip == -1) { print '<br><br><font class="error">Failed to connect to SPIP: ' . $object->error . '</font>'; } } } print '</div>'; print end_box(); print "</div>";
$langs->load("bills"); $langs->load("members"); $langs->load("users"); $langs->load('other'); $action = GETPOST('action', 'alpha'); $cancel = GETPOST('cancel'); $backtopage = GETPOST('backtopage', 'alpha'); $confirm = GETPOST('confirm', 'alpha'); $rowid = GETPOST('rowid', 'int'); $typeid = GETPOST('typeid', 'int'); $userid = GETPOST('userid', 'int'); $socid = GETPOST('socid', 'int'); if (!empty($conf->mailmanspip->enabled)) { include_once DOL_DOCUMENT_ROOT . '/mailmanspip/class/mailmanspip.class.php'; $langs->load('mailmanspip'); $mailmanspip = new MailmanSpip($db); } $object = new Adherent($db); $extrafields = new ExtraFields($db); // fetch optionals attributes and labels $extralabels = $extrafields->fetch_name_optionals_label($object->table_element); // Get object canvas (By default, this is not defined, so standard usage of dolibarr) $object->getCanvas($rowid); $canvas = $object->canvas ? $object->canvas : GETPOST("canvas"); $objcanvas = null; if (!empty($canvas)) { require_once DOL_DOCUMENT_ROOT . '/core/class/canvas.class.php'; $objcanvas = new Canvas($db, $action); $objcanvas->getCanvas('adherent', 'membercard', $canvas); } // Security check
/** * Fonction qui supprime l'adherent des abonnements automatiques mailing-list, spip, etc. * TODO Move this into member deletion trigger (trigger of mailmanspip module) * * @return int <0 if KO, >0 if OK */ function del_to_abo() { global $conf; include_once DOL_DOCUMENT_ROOT . '/mailmanspip/class/mailmanspip.class.php'; $mailmanspip = new MailmanSpip($db); $err = 0; // mailman if (!empty($conf->global->ADHERENT_USE_MAILMAN)) { $result = $mailmanspip->del_to_mailman($this); if ($result < 0) { $err += 1; } } if ($conf->global->ADHERENT_USE_SPIP && $conf->mailmanspip->enabled) { $result = $mailmanspip->del_to_spip($this); if ($result < 0) { $err += 1; } } if ($err) { // error return -$err; } else { return 1; } }