function http_calendrier_messages($annee='', $mois='', $jour='', $heures='', $partie_cal='', $echelle='')
{
$evtm = quete_calendrier_agenda($annee, $mois);
if ($evtm OR !$heures)
$evtm = http_calendrier_agenda($annee, $mois, $jour, $mois, $annee, false, generer_url_ecrire('calendrier'), '', $evtm);
else $evtm= '';
$evtt = http_calendrier_rv(quete_calendrier_taches_annonces(),"annonces")
. http_calendrier_rv(quete_calendrier_taches_pb(),"pb")
. http_calendrier_rv(quete_calendrier_taches_rv(), "rv");
$evtr= '';
if ($heures) {
$date = date("$annee-$mois-$jour");
$datef = "'$date $heures'";
if ($heures = quete_calendrier_interval_rv("'$date'", $datef))
$evtr = http_calendrier_ics_titre($annee,$mois,$jour,generer_url_ecrire('calendrier')) . http_calendrier_ics($annee, $mois, $jour, $echelle, $partie_cal, 90, array('', $heures), '', ' calendrier-msg');
}
return array($evtm, $evtt, $evtr);
}
function exec_affiche_message_dist($id_message, $cherche_auteur, $forcer_dest)
{
$row = sql_fetsel("*", "spip_messages", "id_message=$id_message");
if ($row) {
$id_message = $row['id_message'];
$date_heure = $row["date_heure"];
$date_fin = $row["date_fin"];
$titre = typo($row["titre"]);
$texte = propre($row["texte"]);
$type = $row["type"];
$statut = $row["statut"];
$rv = $row["rv"];
$expediteur = $row['id_auteur'];
$lejour=journum($row['date_heure']);
$lemois = mois($row['date_heure']);
$lannee = annee($row['date_heure']);
$commencer_page = charger_fonction('commencer_page', 'inc');
echo $commencer_page($titre, "accueil", "messagerie");
echo debut_gauche('', true);
if ($rv != 'non')
echo http_calendrier_agenda ($lannee, $lemois, $lejour, $lemois, $lannee,false, generer_url_ecrire('calendrier'));
echo "<br />";
echo http_calendrier_rv(quete_calendrier_taches_annonces(),"annonces");
echo http_calendrier_rv(quete_calendrier_taches_pb(),"pb");
echo http_calendrier_rv(quete_calendrier_taches_rv(), "rv");
if ($rv != "non") {
list ($sh, $ah) = quete_calendrier_interval(quete_calendrier_jour($lannee,$lemois, $lejour));
foreach ($ah as $k => $v)
{
foreach ($v as $l => $e)
{
if (preg_match(",=$id_message$,", $e['URL']))
{
$ah[$k][$l]['CATEGORIES'] = "calendrier-nb";
break;
}
}
}
echo creer_colonne_droite('', true);
echo http_calendrier_ics_titre($lannee,$lemois,$lejour,generer_url_ecrire('calendrier'));
echo http_calendrier_ics($lannee,$lemois, $lejour, '', '', 90, array($sh, $ah), '', ' calendrier-msg');
}
echo debut_droite('', true);
http_affiche_message($id_message, $expediteur, $statut, $type, $texte, $titre, $rv, $date_heure, $date_fin, $cherche_auteur, $forcer_dest);
// reponses et bouton poster message
$discuter = charger_fonction('discuter', 'inc');
echo $discuter($id_message, 'message', 'id_message', "perso");
}
echo fin_gauche(), fin_page();
}
