Subversion Repositories eFlore/Applications.bibliobota

Rev

Rev 18 | Rev 26 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
5 jp_milcent 1 
<?php
2 
/*vim: set expandtab tabstop=4 shiftwidth=4: */
3 
// +------------------------------------------------------------------------------------------------------+
4 
// | PHP version 5.1.1                                                                                    |
5 
// +------------------------------------------------------------------------------------------------------+
6 
// | Copyright (C) 2006 Tela Botanica (accueil@tela-botanica.org)                                         |
7 
// +------------------------------------------------------------------------------------------------------+
8 
// | This file is part of eFlore.                                                                         |
9 
// |                                                                                                      |
10 
// | Foobar is free software; you can redistribute it and/or modify                                       |
11 
// | it under the terms of the GNU General Public License as published by                                 |
12 
// | the Free Software Foundation; either version 2 of the License, or                                    |
13 
// | (at your option) any later version.                                                                  |
14 
// |                                                                                                      |
15 
// | Foobar is distributed in the hope that it will be useful,                                            |
16 
// | but WITHOUT ANY WARRANTY; without even the implied warranty of                                       |
17 
// | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the                                        |
18 
// | GNU General Public License for more details.                                                         |
19 
// |                                                                                                      |
20 
// | You should have received a copy of the GNU General Public License                                    |
21 
// | along with Foobar; if not, write to the Free Software                                                |
22 
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                            |
23 
// +------------------------------------------------------------------------------------------------------+
24 
// CVS : $Id$
25 
/**
26 
* Titre
27 
*
28 
* Description
29 
*
30 
*@package eFlore
31 
*@subpackage ef_fiche
32 
//Auteur original :
33 
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
34 
//Autres auteurs :
35 
*@author        aucun
36 
*@copyright     Tela-Botanica 2000-2006
37 
*@version       $Revision$ $Date$
38 
// +------------------------------------------------------------------------------------------------------+
39 
*/
40 
 
41 
// +------------------------------------------------------------------------------------------------------+
42 
// |                                            ENTETE du PROGRAMME                                       |
43 
// +------------------------------------------------------------------------------------------------------+
44 
/** Inclusion du fichier de configuration de l'application Revue. */
45 
//require_once BB_CHEMIN_APPLI.'bb_revue/configuration/bbre_config.inc.php';
46 
 
47 
// +------------------------------------------------------------------------------------------------------+
48 
// |                                            CORPS du PROGRAMME                                        |
49 
// +------------------------------------------------------------------------------------------------------+
50 
// Initialisation de la variable à retourner
51 
$retour = '';
52 
$retour .= '<!-- BiblioBota - Revue : DEBUT -->'."\n";
8 jp_milcent 53 
$retour .= '<div id="biblio_revue">';
5 jp_milcent 54 
// Titre de la page
8 jp_milcent 55 
$retour .= '<h1>'.'Liste des revues indexées dans la base de données du projet BiblioBota.'.'</h1>';
5 jp_milcent 56 
 
57 
$query_tot =	'SELECT COUNT(*) AS cpt '.
58 
				'FROM '.$GLOBALS['tbl']['collection'].' '.
59 
				'WHERE B_C_CACHER = 0';
60 
$do_query_tot = mysql_query($query_tot) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $query_tot));
61 
$tmp_total = mysql_fetch_object($do_query_tot);
62 
$nb_total = $tmp_total->cpt;
63 
mysql_free_result($do_query_tot);
64 
 
65 
if ($nb_total == 0) {
66 
	$retour .= '<p>'.'Pas encore de revues indexées...'.'</p>'."\n";
67 
} else {
18 jp_milcent 68 
	$aso_revues = array();
5 jp_milcent 69 
    $query =    'SELECT '.$GLOBALS['tbl']['collection'].'.* '.
70 
                'FROM '.$GLOBALS['tbl']['collection'].' '.
71 
                'WHERE B_C_CACHER = 0 '.
72 
                'ORDER BY B_C_NOMCOMPLET ';
73 
	$do_query = mysql_query($query) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $query));
74 
	$nb_results = mysql_num_rows($do_query);
75 
	while ($row = mysql_fetch_object($do_query)) {
18 jp_milcent 76 
		$aso_revue = array();
77 
        $aso_revue['id'] = $row->B_C_CRAI;
21 jp_milcent 78 
        $aso_revue['idlink'] = $row->B_C_LKSTR;
18 jp_milcent 79 
        $aso_revue['nom_complet'] = $row->B_C_NOMCOMPLET;
80 
        $aso_revue['abreviation'] = $row->B_C_ABREGE;
81 
        $aso_revue['date_debut'] = $row->B_C_DATECREATION;
82 
        $aso_revue['suite_de'] = $row->B_C_FAISUITE;
83 
        $aso_revue['date_fin'] = $row->B_C_DATEFIN;
84 
        $aso_revue['periodicite'] = $row->B_C_PERIODICITE;
85 
        $aso_revue['contact_nom'] = $row->B_C_CONTACTNOM;
86 
        $aso_revue['contact_mail'] = $row->B_C_CONTACTMAIL;
87 
        $aso_revue['logo'] = $row->B_C_IMAGE;
88 
        $aso_revue['commentaires'] = $row->B_C_COMMENT;
89 
        $aso_revue['date_maj'] = $row->B_C_MAJFICHE;
21 jp_milcent 90 
		$aso_revue['fasc_nbre'] = 0;
91 
		$aso_revue['fasc_date_premier'] = '';
92 
		$aso_revue['fasc_date_dernier'] = '';
93 
		$aso_revue['fasc_maj_dernier'] = '';
94 
		$aso_revue['fasc_nom_dernier'] = '';
95 
 
96 
		// Construction de l'url de la page contenant les info sur l'organisme:
97 
		$Url = clone $GLOBALS['_BIBLIOBOTA_']['url'];
98 
		$Url->setId(BB_URL_APPLI_ORGA_ID);
99 
		$Url->addQueryString('appli', 'bb_consultation');
100 
		$Url->addQueryString('consultation', 'avancee');
101 
		$Url->addQueryString('coll', $aso_revue['idlink']);
102 
		$aso_revue['url'] = $Url->getUrl();
103 
 
18 jp_milcent 104 
		$aso_fasc_serie = array();
9 jp_milcent 105 
		$query_fasc =	'SELECT '.$GLOBALS['tbl']['fascicule'].'.* '.
18 jp_milcent 106 
	               		'FROM '.$GLOBALS['tbl']['fascicule'].' '.
9 jp_milcent 107 
						'WHERE  B_F_CRAICOLL = "'.$row->B_C_CRAI.'" '.
108 
						'AND B_F_CACHER = 0 '.
109 
						'ORDER BY B_F_CRAISERIE, B_F_NUMERO DESC';
8 jp_milcent 110 
		$do_query_fasc = mysql_query($query_fasc) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $query_fasc));
111 
		while ($row_fasc = mysql_fetch_object($do_query_fasc)) {
112 
			if (!isset($aso_fasc_serie[$row_fasc->B_F_CRAISERIE])) {
21 jp_milcent 113 
				$aso_fasc = array();
9 jp_milcent 114 
				$aso_fasc['nbre_fasc'] = 1;
21 jp_milcent 115 
				$aso_fasc['nom_serie'] = $row_fasc->B_F_CRAISERIE;
9 jp_milcent 116 
				$aso_fasc['nom_fin_serie'] = $row_fasc->B_SER_SOUSTITRE;
117 
				$aso_fasc['nom_fin_fasc'] = $row_fasc->B_F_TITRE;
21 jp_milcent 118 
				$aso_fasc_serie[$row_fasc->B_F_CRAISERIE] = $aso_fasc;
8 jp_milcent 119 
			} else {
21 jp_milcent 120 
				$aso_fasc_serie[$row_fasc->B_F_CRAISERIE]['nbre_fasc']++;
8 jp_milcent 121 
			}
21 jp_milcent 122 
			// Nombre de fascicule dans la collection
123 
			$aso_revue['fasc_nbre']++;
124 
			// Calcule de la date du premier fascicule et de la date du dernier
125 
			if (preg_match('/^(\d{4})(?:\.(\d{2})|)$/', $row_fasc->B_F_DATE, $match)) {
126 
				if (isset($match[1]) && $match[1] != '') {
127 
					$annee = $match[1];
128 
					$mois = '01';
129 
					if (isset($match[2]) && $match[2] != '') {
130 
						$mois = $match[2];
131 
					}
132 
					$date = $annee.'-'.$mois;
133 
 
134 
					// Initialisation avec une date.
135 
					if ($aso_fasc_serie[$row_fasc->B_F_CRAISERIE]['nbre_fasc'] == 1) {
136 
						$aso_revue['fasc_date_premier'] = $date;
137 
						$aso_revue['fasc_date_dernier'] = $date;
138 
						$aso_fasc['date_debut'] = $date;
139 
						$aso_fasc['date_fin'] = $date;
140 
					}
141 
 
142 
					// Date premier fascicule dans la série
143 
					if (strcasecmp($date, $aso_fasc_serie[$row_fasc->B_F_CRAISERIE]['date_debut']) < 0) {
144 
						$aso_fasc_serie[$row_fasc->B_F_CRAISERIE]['date_debut'] = $date;
145 
					}
146 
					// Date premier fascicule dans la collection
147 
					//echo $date.'<'.$aso_revue['fasc_date_premier'].'/'.strcasecmp($date, $aso_revue['fasc_date_premier']).'<br>';
148 
					if (strcasecmp($date, $aso_revue['fasc_date_premier']) < 0) {
149 
						//echo $aso_revue['fasc_date_premier'].'<'.$date.'<br>';
150 
						$aso_revue['fasc_date_premier'] = $date;
151 
 
152 
					}
153 
					// Date dernier fascicule dans la série
154 
					if (strcasecmp($date, $aso_fasc_serie[$row_fasc->B_F_CRAISERIE]['date_fin']) > 0) {
155 
						$aso_fasc_serie[$row_fasc->B_F_CRAISERIE]['date_fin'] = $date;
156 
						$aso_revue['fasc_nom_dernier'] = $row_fasc->B_F_TITRE;
157 
						$aso_revue['fasc_maj_dernier'] = $row_fasc->B_F_MAJFICHE;
158 
					}
159 
					// Date dernier fascicule dans la collection
160 
					if (strcasecmp($date, $aso_revue['fasc_date_dernier']) > 0) {
161 
						$aso_revue['fasc_date_dernier'] = $date;
162 
					}
163 
				}
164 
 
165 
			}
8 jp_milcent 166 
		}
18 jp_milcent 167 
		mysql_free_result($do_query_fasc);
8 jp_milcent 168 
		ksort($aso_fasc_serie, SORT_DESC);
18 jp_milcent 169 
		$aso_revue['aso_fasc_serie'] = $aso_fasc_serie;
170 
 
171 
		$query_art =	'SELECT COUNT('.$GLOBALS['tbl']['article'].'.B_A_IDART) AS nbre_article '.
172 
	               		'FROM '.$GLOBALS['tbl']['article'].' '.
173 
						'WHERE B_A_CRAICOLL = "'.$row->B_C_CRAI.'" '.
174 
						'GROUP BY B_A_CRAICOLL';
175 
		//echo $query_art.'<br/>';
176 
		$resultat_art = mysql_query($query_art) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $query_art));
177 
		$ligne_article = mysql_fetch_assoc($resultat_art);
178 
		//echo '<pre>'.print_r($ligne_article, true).'</pre>';
179 
		$aso_revue['nbre_article'] = $ligne_article['nbre_article'];
180 
		$aso_revues[] = $aso_revue;
181 
	}
182 
	mysql_free_result($do_query);
183 
	if ($GLOBALS['_GEN_commun']['info_application']->affichage_type == 'tableau') {
184 
		$o = 1;
185 
		$retour .= '<table id="liste_biblio_revue" class="table_bordure" summary="Tableau résumant les informations sur les revues indexées dans la base de données du projet BiblioBota.">'."\n";
186 
		$retour .= '<thead><tr>'.
187 
				'<th>Collection</th>'.
21 jp_milcent 188 
				'<th>Date début (collection)</th>'.
189 
				'<th>Date fin (collection)</th>'.
18 jp_milcent 190 
				'<th title="Nombre de fascicules pour la collection, toutes séries confondues">Nombre fascicules</th>'.
191 
				'<th title="Nombre d\'articles pour la collection, toutes séries et fascicules confondues">Nombre d\'articles</th>'.
192 
				'<th>Périodicité</th>'.
193 
				'<th>Contact</th>'.
21 jp_milcent 194 
				'<th title="Nom du dernier fascicule indexée dans la dernière série">Dernier fascicule</th>'.
195 
				'<th title="Date de publication du dernier fascicule indexée dans la dernière série">Date dernier fascicule</th>'.
18 jp_milcent 196 
				'</tr></thead>'."\n";
197 
		$retour .= '<tbody>';
198 
		foreach ($aso_revues as $revue) {
199 
			$retour .= '<tr>';
200 
			$retour .= '<th>';
201 
		    if ($revue['nom_complet'] != '') {
21 jp_milcent 202 
	            $retour .= 	'<h5 class="bbre_titre">'.
203 
	            				'<a href="'.$revue['url'].'">'.
204 
	            					$revue['nom_complet'].
205 
	            				'</a>'.
206 
							'</h5>';
18 jp_milcent 207 
	            if ($revue['suite_de'] != '') {
208 
					$retour .= '<p><span class="bb_intitule">Fait suite à : </span>'.$revue['suite_de'].'</p>';
209 
				}
210 
				if ($revue['abreviation'] != '') {
211 
					$retour .= '<p><span class="bb_intitule">Abréviation : </span>'.$revue['abreviation'].'</p>';
212 
				}
213 
	            if ($revue['commentaires'] != '') {
214 
	            	$retour .= '<p>'.$revue['commentaires'].'</p>';
215 
	        	}
216 
	            if ($revue['logo'] != '') {
217 
	            	$retour .= '<img class="bbre_couverture" src="'.BB_CHEMIN_IMAGES_ILLUSTRATION.$revue['logo'].'" alt="Couverture de la revue '.$revue['nom_complet'].'"/>';
218 
	        	}
219 
	        	$retour .= '<p class="texte_inactif">Id. coll. : '.$revue['id'].' - Mise à jour : '.date('d/m/Y', $revue['date_maj']).'</p>';
21 jp_milcent 220 
			} else {
221 
				$retour .= '?';
8 jp_milcent 222 
			}
18 jp_milcent 223 
	        $retour .= '</th>';
224 
			$retour .= '<td>';
225 
			if ($revue['date_debut'] != '') {
226 
				$retour .= $revue['date_debut'];
21 jp_milcent 227 
			} else {
228 
				$retour .= '?';
9 jp_milcent 229 
			}
18 jp_milcent 230 
			$retour .= '</td>';
231 
			$retour .= '<td>';
232 
			if ($revue['date_fin'] != '') {
233 
				$retour .= $revue['date_fin'];
21 jp_milcent 234 
			} else {
235 
				$retour .= '?';
18 jp_milcent 236 
			}
237 
			$retour .= '</td>';
238 
			$retour .= '<td>';
21 jp_milcent 239 
			if ($revue['fasc_nbre'] != '') {
240 
				$retour .= $revue['fasc_nbre'];
18 jp_milcent 241 
			} else {
242 
				$retour .= 0;
243 
			}
244 
			$retour .= '</td>';
245 
			$retour .= '<td>';
246 
			if ($revue['nbre_article'] != '') {
247 
				$retour .= $revue['nbre_article'];
248 
			} else {
249 
				$retour .= 0;
250 
			}
251 
			$retour .= '</td>';
252 
			$retour .= '<td>';
253 
			if ($revue['periodicite'] != '') {
254 
				$retour .= $revue['periodicite'];
21 jp_milcent 255 
			} else {
256 
				$retour .= '?';
18 jp_milcent 257 
			}
258 
			$retour .= '</td>';
259 
			$retour .= '<td>';
260 
			if ($revue['contact_nom'] != '') {
261 
				if ($contact_mail != '') {
262 
					$retour .= '<a href="mailto:'.$revue['contact_mail'].'">'.$revue['contact_nom'].'</a>';
263 
				} else {
264 
					$retour .= $revue['contact_nom'];
265 
				}
21 jp_milcent 266 
			} else {
267 
				$retour .= '?';
18 jp_milcent 268 
			}
269 
			$retour .= '</td>';
270 
			$retour .= '<td>';
21 jp_milcent 271 
			if ($revue['fasc_nom_dernier'] != '') {
272 
				$retour .= $revue['fasc_nom_dernier'];
273 
			} else {
274 
				$retour .= '?';
275 
			}
18 jp_milcent 276 
			$retour .= '</td>';
277 
			$retour .= '<td>';
21 jp_milcent 278 
			if ($revue['fasc_date_dernier'] != '') {
279 
				$retour .= '<p>'.donnerDateConviviale($revue['fasc_date_dernier']).'</p>';
280 
				$retour .= '<p class="texte_inactif">Mise à jour : '.date('d/m/Y', $revue['fasc_maj_dernier']).'</p>';
281 
 
282 
			} else {
283 
				$retour .= '?';
284 
			}
18 jp_milcent 285 
			$retour .= '</td>';
286 
			$retour .= '</tr>'."\n";
287 
	        $o++;
5 jp_milcent 288 
		}
18 jp_milcent 289 
		$retour .= '</tbody>'."\n";
290 
		$retour .= '</table>'."\n";
291 
	} else {
292 
		$o = 1;
293 
		$retour .= '<ul id="liste_biblio_revue">'."\n";
21 jp_milcent 294 
		$nbre_revue_sans_article = 0;
18 jp_milcent 295 
		foreach ($aso_revues as $revue) {
21 jp_milcent 296 
			if ($revue['nbre_article'] != '' && $revue['nbre_article'] > 0) {
297 
				$retour .= '<li>';
298 
				if ($revue['nom_complet'] != '') {
299 
		            $retour .= 	'<h5 class="bbre_titre">'.
300 
		            				'<a href="'.$revue['url'].'">'.
301 
		            					$revue['nom_complet'].
302 
		            				'</a>'.
303 
								'.</h5>';
304 
				}
305 
				if ($revue['periodicite'] != '') {
306 
					$retour .= ' '.$revue['periodicite'].'.';
307 
				} else {
308 
					$retour .= ' Périodicité inconnue';
309 
				}
310 
				$retour .= ' De ';
311 
				if ($revue['fasc_date_premier'] != '') {
312 
					$retour .= donnerDateConviviale($revue['fasc_date_premier']);
313 
				} else {
314 
					$retour .= '?';
315 
				}
316 
				$retour .= ' à ';
317 
				if ($revue['fasc_date_dernier'] != '') {
318 
					$retour .= donnerDateConviviale($revue['fasc_date_dernier']).'. ';
319 
				} else {
320 
					$retour .= '?. ';
321 
				}
322 
				if ($revue['fasc_nbre'] != '') {
323 
					$retour .= $revue['fasc_nbre'];
324 
				} else {
325 
					$retour .= 0;
326 
				}
327 
				$retour .= ' fascicules et ';
328 
				if ($revue['nbre_article'] != '') {
329 
					$retour .= $revue['nbre_article'];
330 
				} else {
331 
					$retour .= 0;
332 
				}
333 
				$retour .= ' articles indexés.';
334 
				$o++;
335 
				$retour .= '</li>'."\n";
5 jp_milcent 336 
			} else {
21 jp_milcent 337 
				$nbre_revue_sans_article++;
5 jp_milcent 338 
			}
339 
		}
21 jp_milcent 340 
		$retour .= '<li>';
341 
		$retour .= 'Nombre de revue dont aucun article n\'est indexé dans la base : '.$nbre_revue_sans_article;
342 
		$retour .= '</li>'."\n";
18 jp_milcent 343 
		$retour .= '</ul>'."\n";
344 
	}
5 jp_milcent 345 
}
8 jp_milcent 346 
$retour .= '</div>';
5 jp_milcent 347 
$retour .= '<!-- BiblioBota - Revue : FIN -->'."\n";
348 
$sortie .= $retour;
349 
 
21 jp_milcent 350 
 
351 
function fomaterDate($date) {
352 
 
353 
}
5 jp_milcent 354 
/* +--Fin du code ----------------------------------------------------------------------------------------+
355 
*
356 
* $Log$
21 jp_milcent 357 
* Revision 1.5  2007/01/02 17:45:16  jp_milcent
358 
* Ajout d'un affichage simplifié.
359 
*
18 jp_milcent 360 
* Revision 1.4  2006/09/12 16:13:05  jp_milcent
361 
* Ajout de nouvelles informations à la liste des revues.
362 
*
9 jp_milcent 363 
* Revision 1.3  2006/07/28 12:46:47  jp_milcent
364 
* Début modification de l'interface de l'appli revue.
365 
*
8 jp_milcent 366 
* Revision 1.2  2006/05/29 14:19:07  jp_milcent
367 
* Ajout d'une classe css à l'image de la couverture de la revue.
368 
* Correction du chemin d'accés à l'image.
369 
*
6 jp_milcent 370 
* Revision 1.1  2006/05/23 16:20:50  jp_milcent
371 
* Ajout de l'application affichant la liste des revues disponibles dans la base de données de BiblioBota.
5 jp_milcent 372 
*
6 jp_milcent 373 
*
5 jp_milcent 374 
* +-- Fin du code ----------------------------------------------------------------------------------------+
375 
*/
376 
?>