<?php
// +-------------------------------------------------+
// © 2002-2004 PMB Services / www.sigb.net pmb@sigb.net et contributeurs (voir www.sigb.net)
// +-------------------------------------------------+
// $Id: mail_retard_groupe.inc.php,v 1.6 2009-05-16 11:08:24 dbellamy Exp $

if (stristr($_SERVER['REQUEST_URI'], ".inc.php")) die("no access");

require_once ("$include_path/notice_authors.inc.php");  
require_once ($include_path."/mail.inc.php") ;
require_once ("$class_path/author.class.php");  
require_once ($class_path."/serie.class.php");

if ($id_groupe) {
	
if (!$relance) $relance = 1;	

// popup de mail de retard de prêt
/* reçoit : id_empr et éventuellement cb_doc */

// l'objet du mail
$var = "mailretard_".$relance."objet_group";
eval ("\$objet=\"".$$var."\";");

// la formule de politesse du bas (le signataire)
$var = "mailretard_".$relance."fdp_group";
eval ("\$fdp=\"".$$var."\";");

// le texte après la liste des ouvrages en retard
$var = "mailretard_".$relance."after_list_group";
eval ("\$after_list=\"".$$var."\";");

// le texte avant la liste des ouvrges en retard
$var = "mailretard_".$relance."before_list_group";
eval ("\$before_list=\"".$$var."\";");

// le "Madame, Monsieur," ou tout autre truc du genre "Cher adhérent,"
$var = "mailretard_".$relance."madame_monsieur_group";
eval ("\$madame_monsieur=\"".$$var."\";");

$texte_mail=$madame_monsieur."\r\n\r\n";
$texte_mail.=$before_list."\r\n\r\n";

//requete par rapport à un groupe d'emprunteurs
	$rqt1 = "select empr_id, empr_nom, empr_prenom from empr_groupe, empr, pret where groupe_id='".$id_groupe."' and empr_groupe.empr_id=empr.id_empr and pret.pret_idempr=empr_groupe.empr_id group by empr_id order by empr_nom, empr_prenom";
	$req1 = mysql_query($rqt1) or die($msg['err_sql'].'<br />'.$rqt1.'<br />'.mysql_error());
	
	while ($data1=mysql_fetch_array($req1)) {
		$id_empr=$data1['empr_id'];	
		
		$texte_mail.=$data1['empr_nom']." ".$data1['empr_prenom']."\r\n\r\n";
		
		//Récupération des exemplaires
		$rqt = "select expl_cb from pret, exemplaires where pret_idempr='".$id_empr."' and pret_retour < curdate() and pret_idexpl=expl_id order by pret_date " ;
		$req = mysql_query($rqt) or die('Erreur SQL !<br />'.$rqt.'<br />'.mysql_error()); 

		$i=0;
		while ($data = mysql_fetch_array($req)) {
	
			/* Récupération des infos exemplaires et prêt */
			$requete = "SELECT notices_m.notice_id as m_id, notices_s.notice_id as s_id, expl_cb, pret_date, pret_retour, tdoc_libelle, section_libelle, location_libelle, trim(concat(ifnull(notices_m.tit1,''),ifnull(notices_s.tit1,''),' ',ifnull(bulletin_numero,''), if (mention_date, concat(' (',mention_date,')') ,''))) as tit, ";
			$requete.= " date_format(pret_date, '".$msg["format_date"]."') as aff_pret_date, ";
			$requete.= " date_format(pret_retour, '".$msg["format_date"]."') as aff_pret_retour, ";
			$requete.= " IF(pret_retour>sysdate(),0,1) as retard, notices_m.tparent_id, notices_m.tnvol " ; 
			$requete.= "FROM (((exemplaires LEFT JOIN notices AS notices_m ON expl_notice = notices_m.notice_id ) LEFT JOIN bulletins ON expl_bulletin = bulletins.bulletin_id) LEFT JOIN notices AS notices_s ON bulletin_notice = notices_s.notice_id), docs_type, docs_section, docs_location, pret ";
			$requete.= "WHERE expl_cb='".$data['expl_cb']."' and expl_typdoc = idtyp_doc and expl_section = idsection and expl_location = idlocation and pret_idexpl = expl_id  ";
	
			$res = mysql_query($requete);
			$expl = mysql_fetch_object($res);
	
			$responsabilites=array() ;
			$header_aut = "" ;
			$responsabilites = get_notice_authors(($expl->m_id+$expl->s_id)) ;
			$as = array_search ("0", $responsabilites["responsabilites"]) ;
			if ($as!== FALSE && $as!== NULL) {
				$auteur_0 = $responsabilites["auteurs"][$as] ;
				$auteur = new auteur($auteur_0["id"]);
				$header_aut .= $auteur->isbd_entry;
				} else {
					$aut1_libelle=array();
					$as = array_keys ($responsabilites["responsabilites"], "1" ) ;
					for ($i = 0 ; $i < count($as) ; $i++) {
						$indice = $as[$i] ;
						$auteur_1 = $responsabilites["auteurs"][$indice] ;
						$auteur = new auteur($auteur_1["id"]);
						$aut1_libelle[]= $auteur->isbd_entry;
					}
			
					$header_aut .= implode (", ",$aut1_libelle) ;
					}
			$header_aut ? $auteur=" / ".$header_aut : $auteur="";
	
			// récupération du titre de série
			$tit_serie="";
			if ($expl->tparent_id && $expl->m_id) {
				$parent = new serie($expl->tparent_id);
				$tit_serie = $parent->name;
				if($expl->tnvol)
					$tit_serie .= ', '.$expl->tnvol;
				}
			if($tit_serie) {
				$expl->tit = $tit_serie.'. '.$expl->tit;
				}

			$texte_mail.=$expl->tit.$auteur."\r\n";
			$texte_mail.="    -".$msg[fpdf_date_pret]." : ".$expl->aff_pret_date." ".$msg[fpdf_retour_prevu]." : ".$expl->aff_pret_retour."\r\n";
			$texte_mail.="    -".$expl->location_libelle.": ".$expl->section_libelle." (".$expl->expl_cb.")\r\n\r\n\r\n";
			$i++;
		}
		}
		$texte_mail.="\r\n".$after_list;
		$texte_mail.="\r\n\r\n".$fdp."\r\n\r\n".mail_bloc_adresse();

		/* Récupération du nom, prénom et mail de l'utilisateur */
		$requete="select id_empr, empr_mail, empr_nom, empr_prenom from empr, groupe where empr.id_empr=groupe.resp_groupe and id_groupe=$id_groupe";
				
		$res=mysql_query($requete);
		$coords=mysql_fetch_object($res);

		$headers .= "Content-type: text/plain; charset=".$charset."\n";
	
		$res_envoi=mailpmb($coords->empr_prenom." ".$coords->empr_nom, $coords->empr_mail, $objet,$texte_mail, $biblio_name, $biblio_email,$headers, "", $PMBuseremailbcc, 1);
		
		if ($res_envoi) echo "<center><h3>".sprintf($msg["mail_retard_succeed"],$coords->empr_mail)."</h3><br /><a href=\"\" onClick=\"self.close(); return false;\">".$msg["mail_retard_close"]."</a></center><br /><br />".nl2br($texte_mail);
	else echo "<center><h3>".sprintf($msg["mail_retard_failed"],$coords->empr_mail)."</h3><br /><a href=\"\" onClick=\"self.close(); return false;\">".$msg["mail_retard_close"]."</a></center>";
}

?>
