Subversion Repositories Sites.tela-botanica.org

Rev

Blame | Last modification | View Log | RSS feed

<?php

// +--------------------------------------------------------------------------------+
// | annuaire_moteur_fonction.php                                                                               |
// +--------------------------------------------------------------------------------+
// | Copyright (c) 2000 - 2003 Tela Botanica                                                                    |
// +--------------------------------------------------------------------------------+
// | Les fonctions de annuaire_moteur.php                                           |
// +--------------------------------------------------------------------------------+
// | Auteur : Alexandre Granier <alexandre@tela-botanica.org>                                   |
// +--------------------------------------------------------------------------------+
//
// $Id: annuaire_moteur_fonction.php,v 1.1 2005/03/24 08:47:31 alex Exp $


/** function mkengine ()
*
*
*
*       @return
*/

function mkengine()
  {
    global $label_bbota;
    global $nbr_total;
    global $bouton, $HTTP_POST_VARS ;
    $mon_frag = new fragmenteur_session() ;
    
    $mes_vars = array ("recherche", "nom", "ville", "mail" ,"dept", "prenom", "cotisant", "pays", "sort", "T_REPONSE", "lettre","statut") ;
    
    // Deux cas , soit on a cliqué sur rechercher, soit on a cliqué sur un lien
    foreach ($mes_vars as $key=>$value) {
        if (!$bouton) {     // on a cliqué sur un lien
            if (empty($HTTP_POST_VARS[$value])) {
                $$value = $mon_frag->getVariable($value);  
            }
        } else {
            // Si on clique sur le bouton rechercher
            if (empty ($HTTP_POST_VARS[$value])) {
                $$value = "" ;
            } else {
                $$value = $HTTP_POST_VARS[$value] ;
            }
        }
    }
    // Comptage du nombre total de données dans la table (hors CACHER = 1)
    $query = "select count(*) as CPT from ".ANN_ANNUAIRE;
    $result = mysql_query($query) or die("<B>Erreur !</B> $query a échoué...");

  if (mysql_num_rows($result) == 1)
    {
    $tmp_nb = mysql_fetch_object($result);
    $nbr_total = $tmp_nb->CPT;
    if ($nbr_total > 0) $chaine = "parmi $nbr_total données";
    else die("<B>Erreur</B> lors du comptage des structures ($nbr_total trouvées) : $query");
    }
  else die("<B>Erreur</B> lors du comptage des structures : $query");

  mysql_free_result($result);
  // fin comptage

  $ret = "";

  // construction du moteur de str
 
    $ret .= "<form action=\"".$GLOBALS['ann_url']->getURL()."\" method=\"post\">\n";
    $ret .= "<table border=\"0\" cellpadding=\"0\" cellspacing=\"0\" width=\"100%\" summary=\"\">\n";
    $ret .= "<tr class=\"titlePage\"><td colspan=\"2\">".AM_L_TITRE."</td></tr>\n" ;
    $ret .= "<tr class=\"insTitle1\"><td colspan=\"2\">".AM_L_TITRE." $chaine :</td></tr>\n" ;

    // ligne de recherche
    $ret .= "<tr><td colspan=\"2\">\n";
    $ret .= "<table border=\"0\"><tr>\n" ; 
    $ret .= "<td class=\"insLabel\">".AM_L_RECHERCHER." :\n</td>\n<td>";
    $ret .= form_mk_chaineI(stripslashes($recherche), "recherche")."&nbsp;";
    $ret .= "</td><td class=\"insLabel\" colspan=\"4\">".AM_L_PAYS." : \n" ;
    $ret .= "" ;

    // formulaire contenant les pays, avec par défaut soit le pays en cours
    // soit "tous les pays"
    
    $query_pays = "select GC_ID, GC_NAME from gen_COUNTRY where GC_LOCALE='fr'" ;
    $result_pays = mysql_query($query_pays) or die ("Echec de la requete sur gen_COUNTRY") ;
    $ret .= "<select name=\"pays\" class=\"insInputForm\">\n" ;
    $ret .= "<option value=\"tous\">Tous les pays</option>\n" ;
    while ($row_pays = mysql_fetch_object($result_pays)) {
        $ret .= "<option value=\"$row_pays->GC_ID\"" ;
                                if (!empty($pays)) {
                                                if ($pays == $row_pays->GC_ID) $ret .= " selected" ;
                                }
                                $ret .= ">$row_pays->GC_NAME</option>\n" ;
    }
                $ret .= "</select>\n" ;
    $ret .= "</td>\n" ;
  
        $ret .= "<tr>\n";
  $ret .= "<td class=\"insLabel\">".AM_L_NOM." :\n</td><td>";
   $ret .= form_mk_chaineI(stripslashes($nom), "nom")."&nbsp;</td>\n<td class=\"insLabel\">" ;
   $ret .= AM_L_PRENOM."&nbsp;:</td>\n<td>".form_mk_chaineI(stripslashes($prenom), "prenom")."&nbsp;</td>\n<td class=\"insLabel\">" ;
      $ret .= AM_L_VILLE."&nbsp;:</td>\n<td>".form_mk_chaineI(stripslashes($ville), "ville")."&nbsp;</td>" ;
    $ret .= "</tr><tr>\n" ;
    $ret .= "<td class=\"insLabel\">".AM_L_DEPARTEMENT."&nbsp;: </td>\n<td>" ;
    
    // Construction du <select> des départements
    $requete_dpt = "select GFD_ID, GFD_NAME from gen_FRENCH_DPT" ;
    $resultat_dpt = mysql_query($requete_dpt) or die ("Echec de la requete sur gen_FRENCH_DPT<br>".mysql_error()) ;
    $ret .= "<select name=\"dept\" class=\"insInputForm\">\n" ;
    $ret .= "<option value=\"tous\">tous</option>\n" ;
    while ($ligne_dpt = mysql_fetch_object($resultat_dpt)) {
        $ret .= "<option value=\"$ligne_dpt->GFD_ID\"" ;
        if ($dept == $ligne_dpt->GFD_ID) $ret .= " selected" ;
        $ret .= ">$ligne_dpt->GFD_ID - $ligne_dpt->GFD_NAME</option>\n" ;
    }
    $ret .= "</select></td>\n" ;
    
    $ret .= "<td class=\"insLabel\">".AM_L_MAIL."&nbsp;: </td>\n<td>".form_mk_chaineI(stripslashes($mail), "mail")."</td>\n" ;
    $ret .= "<td class=\"insLabel\">".AM_L_COTISANTS." : </td>\n" ;
    $ret .= "<td>".form_mk_select(stripslashes($cotisant), "cotisant")."</td>\n";
    $ret .= "</tr></table>\n";
    $ret .= "</td></tr>\n";
    
    $ret .= "<tr><td><table>\n" ;
    
    
    $ret .= "<tr>\n";

    $ret .= "<td class=\"insLabel\" width=\"60%\">\n";
    $ret .= AM_L_GRP_RES." : </td>" ;
    $grp = array(20, 50, 100) ;
    $ret .= "<td><select name=\"T_REPONSE\" class=\"insInputForm\">\n" ;
    for ($i = 0; $i < count($grp); $i++) {
        $ret .= "<option value=\"".$grp[$i]."\">".$grp[$i]."</option>\n" ;
    }
    $ret .= "</select></td>" ;
    $ret .= "<td class=\"texte_tb\" align=\"right\" width=\"40%\">\n";
    $ret .= "<input type=\"submit\" class=\"texte_tb\" value=\"".AM_L_RECHERCHER."\" name =\"bouton\">\n";
    $ret .= "</td></tr></table>\n</td></tr>\n";
    $ret .= "</table></form>\n";
    return $ret;
}

/** function form_mk_chaineI () Renvoie une balise de type <input>
*
*   @param  string  l'attribut value de la balise
*   @param  string  l'attibut name de la balise
*   @param  string  la classe CSS
*   @return string  HTML
*/
function form_mk_chaineI($value="", $name, $class="insInputForm")
{
    return "<input type=\"text\" size=\"15\" value=\"$value\" name=\"$name\" class=\"$class\">";
}

  function form_mk_select($value="", $name="", $class="insInputForm") {
        $res = "<select name=\"$name\" class=\"$class\">\n" ;
        $res .= "<option value=\"1\"" ;
        if ($value == 1) $res .= " selected" ;
        $res .= ">Cotisants</option>\n" ;
        $res .= "<option value=\"2\"" ;
        if ($value == 2) $res .= " selected" ;
        $res .= ">Non cotisants</option>\n" ;
        $res .= "<option value=\"3\"" ; 
        if ($value == 3 || $value == "") $res .= " selected" ;
        $res .= ">Tous</option>\n" ;
        $res .= "</select>\n" ;
        return $res ;
  }

function mkquery()
{
    // définition des variables globales
        global $lettre ;
        global $bouton, $HTTP_POST_VARS ;
    
    $mon_frag = new fragmenteur_session() ;

        // Requete sur l'annuaire pour extraire le nom, prénom, ville, nom du département (jointure),
        // l'état de la cotisation (jointure) 
        
        // le tableau suivant contient tous les champs de la table annuaire_tela sur lesquels on peut effectuer une recherche
        $fields_annu = array("nom" => "U_NAME", "prenom" => "U_SURNAME" , "mail" => "U_MAIL" , "ville" => "U_CITY",
                        "dept" => "U_FRENCH_DPT", "pays" => "U_COUNTRY"  ) ;

    $mes_vars = array ("recherche", "nom", "ville", "mail" ,"dept", "prenom", "cotisant", "pays", "sort", "T_REPONSE", "lettre","statut") ;

    foreach ($mes_vars as $key=>$value) {
        if (!$bouton) {
            if (empty($HTTP_POST_VARS[$value])) {
                $$value = $mon_frag->getVariable($value);  
            }
        } else {
            $lettre = "" ;
            $mon_frag->setVariable("lettre", "") ;
            $mon_frag->fixerLeDebut(0) ;
            if (empty ($HTTP_POST_VARS[$value])) {
                $$value = "" ;
            } else {
                $$value = $HTTP_POST_VARS[$value] ;
            }
        }
    }
    if ($bouton) $sort = $mon_frag->getVariable("sort") ;


        $queries = "select ".ANN_ANNUAIRE.".*" ;
    $queries .= ", ".ANN_TABLE_PAYS.".GC_NAME ";
        $queries .= "from ".ANN_ANNUAIRE ;
    $queries .= ",".ANN_TABLE_PAYS ;
 
        // Construction en fonction des champs saisies
 
        // juste le champs "rechercher", on regarde partout
        $queries .= " where (" ;
 
        if ($lettre == "") {
        if ($recherche != "") {
            $queries .= "(U_NAME like '%$recherche%'" ; // le premier
                foreach($fields_annu as $key=>$value) {
                                        if ($key == "nom") continue ;
                                                        $queries .= ($key == "pays" ? 
                                    $pays == "tous" ? ")" :
                                    ") and $value = '$pays'" : " or $value like '%$recherche%'") ;      // les autres
                }
                                        
                        } else {

                        // si un ou plusieurs autres champs ont été indiqué, on les rajoute ici

                        $or_flag = false ;
                        foreach($fields_annu as $key=>$valeur) {
                if ($key != "") {
                    if ($key == "pays") {
                        if ($$key == "tous") $queries .= ") and U_COUNTRY like '%'";
                            else $queries .= ") and $valeur like \"%".$$key."%\"" ;
                    } else {
                        if ($key == "dept") {
                            if ($$key != "tous" && isset($HTTP_POST_VARS[$key])) {  
                                $queries .= " and U_FRENCH_DPT=".$$key ;
                                if ($fields_annu["pays"] != "fr") $queries .= " and U_COUNTRY=\"fr\"" ;
                            }
                            
                        } else {
                            if ($or_flag) $queries .= "$valeur like \"%".$$key."%\"" ;
                            else $queries .= "($valeur like \"%".$$key."%\"" ;
                            if ($key != "ville") $queries .= " and " ;
                        }
                    }
                    $or_flag = true ;
                }
                        }
                        // ici le cas ou rien n'a été saisie du tout, on affiche tout
                        if (!$or_flag) {
                                        $queries .= "U_NAME like '%')" ;
                        }
        }
} else {
        if ($lettre == "tous") $lettre = "" ;
        $queries .="U_NAME like '$lettre%'" ;
}
    $queries .= ")" ;
  $queries .= " and ".ANN_ANNUAIRE.".U_COUNTRY=".ANN_TABLE_PAYS.".GC_ID" ;
    if (isset($cotisant) && $cotisant != 3) if ($cotisant == 1) { 
        $queries .= " and ".ANN_ANNUAIRE.".U_COT=$cotisant" ;
    } else {
        $queries .= " and ".ANN_ANNUAIRE.".U_COT=0" ;
    }
    if (isset($nom) && $nom != "") $queries .= " and U_NAME like \"%$nom%\"" ;
    if (isset($prenom) && $prenom != "") $queries .= " and U_SURNAME like \"%$prenom%\"" ;
    if (isset($ville) && $ville != "") $queries .= " and U_CITY like \"%$ville%\"" ;
    if (isset($mail) && $mail != "") $queries .= " and U_MAIL like \"%$mail%\"" ;
  if (isset($sort) && $sort != "") $queries .= " order by $sort" ;
  return $queries;
}
  
function mkresu()
{
    global $HTTP_HOST, $SCRIPT_URL, $SCRIPT_NAME, $bouton ;
  
    $mon_frag = new fragmenteur_session() ;
    $mon_frag->setURL($GLOBALS['ann_url']->getURL()) ;
    if ($bouton) $mon_frag->fixerLeDebut(0) ;
    $requete = mkquery() ;

    // Deux requetes, une avec tous les resultats, l'autre avec les résultats affichés
    $result_total = mysql_query($requete) or print ("Echec de la requete <br>$requete<br>".mysql_error()) ;
    
    // Affichage de la requete 
    $ret_req = "<tr class=\"texte_tb\"><td><br><b>La requete : </b><br>$requete".
                    " limit ".$mon_frag->lireLeDebut().",".$mon_frag->lireLePas()."</td></tr>\n" ;
    
    
    $result_final = mysql_query($requete." limit ".$mon_frag->lireLeDebut().",".$mon_frag->lireLePas()) or print (mysql_error());
    $nbr_final = mysql_num_rows($result_total) ;
    mysql_free_result($result_total) ;
//    cxt_addVariable(AM_BD_BOTA, AM_BD_LINK, "requete_mail_tous", $requete) ;
    $_SESSION['requete_mail_tous'] = $requete ;
    $ret = "<div><table><tr>" ;
    
    for ($i = 65 ; $i <91 ; $i++) {
        $ret .= "\t<td><a href=\"".$GLOBALS['ann_url']->getURL()."&lettre=";    
        $ret .= chr($i)."\">";
        $ret .= chr($i) ;
        $ret .= "</a></td>\n";
        }

    $ret .= "<td>&nbsp;&nbsp;<a href=\"".$GLOBALS['ann_url']->getURL()."&lettre=tous\">".AM_L_TOUS."</a></td>\n" ;
    $ret .= "<tr></table></div>\n" ;
    $ret .= "<div>".$mon_frag->affNbRes($nbr_final).'</div>' ;
    $ret .= "<div>".$mon_frag->fragmente($nbr_final)."</div>\n" ;
    if ($nbr_final != 0) {
        $ret .= "<div><table>\n";
        $ret .= "<tr class=\"insTitle1\"><td nowrap><a href=\"".$GLOBALS['ann_url']->getURL()."&amp;sort=U_NAME\">Identit&eacute;</a></td>\n";
        $ret .= "<td><a href=\"".$GLOBALS['ann_url']->getURL()."&amp;sort=U_MAIL\">Adresse mail</a></td>\n" ;
        $ret .= "<td><a href=\"".$GLOBALS['ann_url']->getURL()."&amp;sort=U_CITY\">".AM_L_VILLE."</a></td>\n" ;
        $ret .= "<td>Pays ou Dpt (fr)</td>\n" ;
        $ret .= "<td><a href=\"".$GLOBALS['ann_url']->getURL()."&amp;sort=U_COT\">".AM_L_COTISANTS."</a></td></tr>\n" ;

        $cotisant = array( "non", "oui") ;

 $pair = true ;  // pour afficher une ligne de résultat coloré, l'autre non

  while ($row = mysql_fetch_object($result_final))
    {
    $ret .= "<tr class=\"texte_tb2\"";
    if ($pair) {
            $ret .= " bgcolor=\"\"" ;
            $pair = false ;
            } else {
            $pair = true ;
            }
    $ret .= ">" ;
    $ret .= "\n<td nowrap>";
    $urlPop = $GLOBALS['ann_url']->getURL()."&amp;u_id=$row->U_ID";
    $ret .= "<a href=\"$urlPop\">" ;
    $ret .= $row->U_NAME." ".$row->U_SURNAME ;
    $ret .= "</a></td>\n ";
    $ret .= "<td><a href=\"mailto:$row->U_MAIL\">$row->U_MAIL</a></td>\n" ;
    $ret .= "<td>$row->U_CITY</td>" ;
    if ($row->U_COUNTRY != 'fr') {
                $ret .= "<td>$row->GC_NAME</td>" ;
                } else {
        $req_dpt = "select GFD_NAME from ".ANN_TABLE_DEPARTEMENT.",".ANN_ANNUAIRE." where ".ANN_ANNUAIRE.".U_ID=$row->U_ID" ;
        $req_dpt .= " and ".ANN_ANNUAIRE.".U_FRENCH_DPT=".ANN_TABLE_DEPARTEMENT.".GFD_ID" ;
        $resultat_dpt = mysql_query($req_dpt) or die ("Echec de la requete sur ".ANN_TABLE_DEPARTEMENT."<br>".mysql_error()) ;
        $ligne_dpt = mysql_fetch_object($resultat_dpt) ;
                $ret .= "<td>$ligne_dpt->GFD_NAME</td>" ;
                }
    $ret .= "<td>".$cotisant[$row->U_COT]."</td></tr>\n" ;
    }

    $ret .= "</table></div>\n" ;
    $ret .= "<div>".$mon_frag->fragmente($nbr_final)."</div>\n" ;
    $ret .= "<div><a href=\"".$GLOBALS['ann_url']->getURL()."&amp;action=".ANN_MAIL_TOUS."\">".AM_L_MAIL_SELECTION."</a></div>\n" ;
    }
    // $ret .= $ret_req ;
  return $ret;
}

/** function presa_mk_blkline ()    insere des lignes vides du type <tr><td>&nbsp;</td></tr>
*
*
*   @param  integer nombre de ligne à insérer
*       @return string  HTML
*/

function presa_mk_blkline ($nombre) {
    $res = "" ;
    for ($i = 0; $i < $nombre; $i++) {
        $res .= "<tr><td>&nbsp;</td></tr>\n" ;
    }
    return $res ;
}

?>