//Autres auteurs : *@author Jean-Pascal MILCENT *@copyright Tela-Botanica 2000-2004 *@version $Revision: 1.2 $ $Date: 2007-02-13 18:06:41 $ // +------------------------------------------------------------------------------------------------------+ */ // +------------------------------------------------------------------------------------------------------+ // | ENTETE du PROGRAMME | // +------------------------------------------------------------------------------------------------------+ // +------------------------------------------------------------------------------------------------------+ // | CORPS du PROGRAMME | // +------------------------------------------------------------------------------------------------------+ // DEBUT COLLECTION $tableau['args'] = '&arg_0=str%3D'.$tableau['coll'].'&arg_1=coll%3D'.$tableau['coll']. '&arg_2=book%3D'.$tableau['coll'].'&arg_3=media%3D'.$tableau['coll']; // Proposition d'édition /* if ($var_biblio['open_proposer_collection'] == 1) { $sortie .= CreateNavigBiblio('add', 'coll', 'un périodique', '', 1, $tableau); } */ // Récupèration du nom de la structure $querybis = 'SELECT '.$tbl['str'].'.B_S_NOM '. 'FROM '.$tbl['str'].' WHERE '.$tbl['str'].'.B_S_IDSTR = '.$tableau['coll']; $do_querybis = mysql_query($querybis) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $querybis)); $nbbis = mysql_num_rows($do_querybis); // Gestion des messages d'erreurs if ($nbbis == 1) { $rowbis = mysql_fetch_object($do_querybis); $get_nom = $rowbis->B_S_NOM; } else { $sortie .= '

'.'Erreur !!'.' - '.$nbbis.' données trouvées pour la structure source.

'."\n"; } mysql_free_result ($do_querybis); // Affichage du titre de la page $sortie .= '

'.$get_nom.' : Périodiques'.'

'."\n"; // Recherche des périodiques $query = 'SELECT '.$tbl['collection'].'.*, '.$tbl['str'].'.B_S_NOM '. 'FROM '.$tbl['collection'].', '.$tbl['str'].' '. 'WHERE '.$tbl['collection'].'.B_C_LKSTR = "'.$tableau['coll'].'" '. 'AND '.$tbl['collection'].'.B_C_LKSTR = '.$tbl['str'].'.B_S_IDSTR '. 'AND B_C_CACHER = 0 '. 'ORDER BY B_C_CRAI'; $do_query = mysql_query($query) or die(BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), $query)); $nb = mysql_num_rows($do_query); // Pour savoir à quelle collection on en est $ktest = 1; if ($nb > 1) { $pluriel = 's'; } else { $pluriel = ''; } $sortie .= '

'.$nb.' '.'périodique'.$pluriel.' trouvé'.$pluriel.'.'.'

'."\n"; if ($nb == 0) { $sortie .= '

'.'Aucun périodique indexé.'.'

'."\n"; } else { // Il y a des resultats : on affiche les collections (périodiques) de la structure. $sortie .= ''."\n"; } mysql_free_result($do_query); /* +--Fin du code ----------------------------------------------------------------------------------------+ * * $Log: not supported by cvs2svn $ * Revision 1.1 2005/11/23 10:22:25 jp_milcent * Ajout au dépot de l'application BiblioBota. * Elle doit à terme migrer dans eFlore. * * Revision 1.3 2005/08/18 10:43:15 jpm * Correction chemin. * * Revision 1.2 2005/05/17 10:10:08 jpm * Correction des bogues avant mise en ligne du site v4. * * Revision 1.1 2004/09/16 12:06:31 jpm * Décomposition du fichier information en plusieurs fichiers. * * * +-- Fin du code ----------------------------------------------------------------------------------------+ */ ?>