[Sommaire] [Imprimer]

   1  <?php
   2  /*****************************************************
   3  * This file is part of Agora, web based content management system.
   4  *
   5  * Agora is free software; you can redistribute it and/or modify
   6  * it under the terms of the GNU General Public License as published by
   7  * the Free Software Foundation; version 2 of the License.
   8  *
   9  * Agora is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12  * GNU General Public License for more details (file "COPYING").
  13  *
  14  * Copyright © Arnaud Martin, Antoine Pitrou et Philippe Rivière.
  15  * List of authors detailed in "copyright_fr.html" file.
  16  * E-mail : agora@sig.premier-ministre.gouv.fr
  17  * Web site : http://www.agora.gouv.fr
  18  *****************************************************/
  19  /*
  20   * @version       $Id$
  21   * $id$
  22   */
  23  include  ("inc.php");
  24  
  25  require_once (dirname(__FILE__). "/include/bd/inc_newsletter_factory.php");
  26  require_once (dirname(__FILE__). "/inc_newsletter_constants.php");
  27  require_once (dirname(__FILE__). "/inc_draw_api.php");
  28  require_once (dirname(__FILE__). "/include/authorization/inc_authorization_factory.php");
  29  
  30  $newsletterMetier = &recuperer_instance_newsletter();
  31  
  32  if (($mod == 'oui') || ($new == "oui")) {
  33      $newsletterMetier->setName($titre);
  34      $newsletterMetier->setComment($commentaire);
  35      $newsletterMetier->setModeration($moderation);
  36      $newsletterMetier->setModeratorEmail($emailModerateur);
  37      $newsletterMetier->setSubscribeSubject($sujetInscription);
  38      $newsletterMetier->setSubscribeText($texteInscription);
  39      $newsletterMetier->setSubject($sujet);
  40      $newsletterMetier->setUnsubscribeSubject($sujetDesinscription);
  41      $newsletterMetier->setUnsubscribeText($texteDesinscription);
  42      $newsletterMetier->setSubjectTag($tagRepetitionSujet);
  43      $newsletterMetier->setHtmlSkeleton($squeletteHTML);
  44      $newsletterMetier->setTextSkeleton($squeletteTexte);
  45      // TODO : verifier que cela correspond a un squelette 
  46      $newsletterMetier->setNbArticles($nbArticles);
  47      if ($new == 'oui') {
  48          $result = $newsletterMetier->create();
  49      }
  50      else {
  51          $newsletterMetier->setId($id_newsletter);
  52          $result = $newsletterMetier->update();
  53      }
  54  }
  55  else {
  56      $result = $newsletterMetier->load($id_newsletter);
  57  }
  58  
  59  $id = $newsletterMetier->getId();
  60  $titre = $newsletterMetier->getName();
  61  $commentaire = $newsletterMetier->getComment();
  62  $moderation = $newsletterMetier->getModeration();
  63  $emailModerateur = $newsletterMetier->getModeratorEmail();
  64  $sujetInscription = $newsletterMetier->getSubscribeSubject();
  65  $texteInscription = $newsletterMetier->getSubscribeText();
  66  $sujet = $newsletterMetier->getSubject();
  67  $sujetDesinscription = $newsletterMetier->getUnsubscribeSubject();
  68  $texteDesinscription = $newsletterMetier->getUnsubscribeText();
  69  $tagRepetitionSujet = $newsletterMetier->getSubjectTag();
  70  $squeletteHTML = $newsletterMetier->getHtmlSkeleton();
  71  $squeletteTexte = $newsletterMetier->getTexteSkeleton();
  72  $nbArticles = $newsletterMetier->getNbArticles();
  73  
  74  if (isset($ChoixSquelette)) {
  75      @header ("Location: ./skeleton_selected.php?id_newsletter=$id");
  76      exit;
  77  }
  78  
  79  if (isset($VisuHTML)) {
  80      $adresse = '../previsualisationNL.php?fondNL=' . $squeletteHTML . '&nl_preview_path=' . $id_newsletter . '/html/';
  81      @header ("Location: $adresse");
  82      exit;
  83  }
  84  
  85  if (isset($VisuTexte)) {
  86      $adresse = 'squelettes_newsletter/' . $id_newsletter . '/texte/' . $squeletteTexte . '.txt';
  87      @header ("Location: $adresse");
  88      exit;
  89  }
  90  
  91  debut_page("&laquo; $titre &raquo;", "administration", "newsletter");
  92  debut_gauche();
  93  debut_boite_info();
  94  
  95  echo "<div align='center'>\n";
  96  echo "<font face='Verdana,Arial,Helvetica,sans-serif' size='1'><b>INFOLETTRE NUM&Eacute;RO&nbsp;:</b></font>\n";
  97  echo "<br><font face='Verdana,Arial,Helvetica,sans-serif' size='6'><b>$id_newsletter</b></font>\n";
  98  icone_horizontale("Retour &agrave; la liste", "newsletter_admin_page.php?retour=nav", "newsletter-24.gif", "rien.gif");
  99  // Ajout Olivier Mansour 
 100  // gestion des authorizations 
 101  $authorization = &recuperer_instance_authorization('configurerLettresInfos', $GLOBALS['connect_id_auteur']);
 102  
 103  if ($authorization->isAuthorizedAction()) {
 104      icone_horizontale("G&eacute;rer les s&eacute;lections d'abonn&eacute;s'", "newsletter_admin_groups.php?id_newsletter=$id", "redacteurs-24.gif", "edit.gif");
 105      icone_horizontale("Gestion des abonn&eacute;s", "newsletter_list_user.php?id_newsletter=$id&non_inscrit=1", "redacteurs-24.gif", "edit.gif");
 106  }
 107  
 108  echo "</div>";
 109  fin_boite_info();
 110  
 111  debut_droite();
 112  debut_cadre_relief ("newsletter-24.gif");
 113  echo "<div style='float: right;'>";
 114  icone("Modifier cette infolettre", "newsletter_admin_edit.php?id_newsletter=$id&retour=nav", "newsletter-24.gif", "edit.gif");
 115  echo "</div>";
 116  gros_titre ($titre);
 117  echo "<br style='clear: both;' />";
 118  echo "<div class='contenu_propre'>";
 119  titre_bloc_contenu (_T("cm_general"));
 120  affiche_bloc_contenu(_T("cm_description"), $commentaire);
 121  affiche_bloc_contenu(_T("cm_moderation"), $modes[$moderation]);
 122  affiche_bloc_contenu(_T("cm_adresse_moderateur"), $emailModerateur, true);
 123  affiche_bloc_contenu(_T("cm_peretition_du_nom"), $tagRepetitionSujet ? 'Répétition du sujet' : 'Pas de répétition du sujet');
 124  titre_bloc_contenu (_T("cm_msg_systeme"));
 125  sous_titre_bloc_contenu (_T("cm_confirmation_inscription"));
 126  affiche_bloc_contenu(_T("cm_sujet_courrier_inscription"), $sujetInscription);
 127  affiche_bloc_contenu(_T("cm_texte_courrier_inscription"), $texteInscription);
 128  sous_titre_bloc_contenu (_T("cm_confirmation_desinscription"));
 129  affiche_bloc_contenu(_T("cm_sujet_courrier_desinscription"), $sujetDesinscription);
 130  affiche_bloc_contenu(_T("cm_texte_desinscription"), $texteDesinscription);
 131  
 132  //Partie concernant la lettre en elle même (squelette html/text, nb article
 133  titre_bloc_contenu (_T("cm_lettres"));
 134  affiche_bloc_contenu(_T("cm_sujet_lettre_envoye"), $sujet);
 135  
 136  if ($squeletteTexte) {
 137      // verif de la presence de ce fichier
 138      if (file_exists(dirname(__FILE__). '/../' . $GLOBALS['dossier_squelettes']. '/' . $squeletteTexte . '.html')) {
 139          affiche_bloc_contenu(_T('skel_texte'), $squeletteTexte);
 140      }
 141      else {
 142          affiche_bloc_contenu(_T('skel_texte'), _T('skel_pas_trouve'));
 143      }
 144  }
 145  else {
 146      affiche_bloc_contenu(_T('skel_texte'), _T('no_skel_texte'));
 147  }
 148  
 149  if ($squeletteHTML) {
 150      if (file_exists(dirname(__FILE__). '/../' . $GLOBALS['dossier_squelettes']. '/' . $squeletteHTML . '.html')) {
 151          affiche_bloc_contenu(_T('skel_html'), $squeletteHTML);
 152      }
 153      else {
 154          affiche_bloc_contenu(_T('skel_html'), _T('skel_pas_trouve'));
 155      }
 156  }
 157  else {
 158      affiche_bloc_contenu(_T('skel_html'), _T('no_skel_html'));
 159  }
 160  
 161  affiche_bloc_contenu(_T('nbr_articles_lettre'), $nbArticles . ' articles');
 162  echo "</div>";
 163  
 164  fin_cadre_relief();
 165  fin_page();
 166  ?>