Subversion Repositories eFlore/Applications.cel

Rev

Rev 862 | Go to most recent revision | Only display areas with differences | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 862 Rev 867
1
<?php
1
<?php
2
/*
2
/**
3
 * Created on 24 août 2011
3
* PHP Version 5
4
 *
4
*  
5
 * To change the template for this generated file go to
5
* Classe de recherche d'informations sur un taxon donné
-
 
6
*
-
 
7
* @category  PHP
-
 
8
* @package   jrest
-
 
9
* @author    david <david@tela-botania.org>
-
 
10
* @copyright 2010 Tela-Botanica
6
 * Window - Preferences - PHPeclipse - PHP - Code Templates
11
* @license   http://www.cecill.info/licences/Licence_CeCILL_V2-fr.txt Licence CECILL
-
 
12
* @version   SVN: <svn_id>
-
 
13
* @link      /doc/jrest/
7
 */
14
*/
8
 
-
 
9
class RechercheInfosTaxon extends Cel {
15
class RechercheInfosTaxon extends Cel {
10
 
16
 
11
	function rechercherInformationsComplementaires($numNom) {
17
	function rechercherInformationsComplementaires($numNom) {
12
 
-
 
13
		$DB=$this->connectDB($this->config);
-
 
14
 
18
 
15
		$query = "SELECT DISTINCT en_nom_genre, en_epithete_espece, en_nom_supra_generique, en_epithete_infra_generique,".
19
		$requete_infos_complementaires = "SELECT DISTINCT en_nom_genre, en_epithete_espece, en_nom_supra_generique, en_epithete_infra_generique,".
16
			     	       			"   auteur_bex.enaia_intitule_abrege AS abreviation_auteur_basio_ex ".
20
			     	       			"   auteur_bex.enaia_intitule_abrege AS abreviation_auteur_basio_ex ".
17
        	       			" , auteur_b.enaia_intitule_abrege AS abreviation_auteur_basio ".
21
        	       			" , auteur_b.enaia_intitule_abrege AS abreviation_auteur_basio ".
18
        	       			" , auteur_mex.enaia_intitule_abrege AS abreviation_auteur_modif_ex ".
22
        	       			" , auteur_mex.enaia_intitule_abrege AS abreviation_auteur_modif_ex ".
19
        	       			" , auteur_m.enaia_intitule_abrege AS abreviation_auteur_modif ".
23
        	       			" , auteur_m.enaia_intitule_abrege AS abreviation_auteur_modif ".
20
			     " , en_epithete_espece, en_epithete_infra_specifique, enrg_abreviation_rang, b.esn_id_taxon, b.esn_id_nom" .
24
			     " , en_epithete_espece, en_epithete_infra_specifique, enrg_abreviation_rang, b.esn_id_taxon, b.esn_id_nom" .
21
			     " FROM eflore_nom, eflore_nom_rang," .
25
			     " FROM eflore_nom, eflore_nom_rang," .
22
			       			"  	  eflore_naturaliste_intitule_abreviation AS auteur_bex ".
26
			       			"  	  eflore_naturaliste_intitule_abreviation AS auteur_bex ".
23
        	       			"   , eflore_naturaliste_intitule_abreviation AS auteur_b ".
27
        	       			"   , eflore_naturaliste_intitule_abreviation AS auteur_b ".
24
        	       			"   , eflore_naturaliste_intitule_abreviation AS auteur_mex ".
28
        	       			"   , eflore_naturaliste_intitule_abreviation AS auteur_mex ".
25
        	       			"   , eflore_naturaliste_intitule_abreviation AS auteur_m ".
29
        	       			"   , eflore_naturaliste_intitule_abreviation AS auteur_m ".
26
			     " ,eflore_selection_nom a, eflore_selection_nom b".
30
			     " ,eflore_selection_nom a, eflore_selection_nom b".
27
			     " WHERE a.esn_id_nom= ".$numNom.
31
			     " WHERE a.esn_id_nom= ".$numNom.
28
			     " AND a.esn_id_version_projet_taxon = 25 ".
32
			     " AND a.esn_id_version_projet_taxon = 25 ".
29
			     " AND a.esn_id_taxon=b.esn_id_taxon ".
33
			     " AND a.esn_id_taxon=b.esn_id_taxon ".
30
			     " AND b.esn_ce_statut=3 ".
34
			     " AND b.esn_ce_statut=3 ".
31
			     " AND a.esn_id_version_projet_taxon=b.esn_id_version_projet_taxon" .
35
			     " AND a.esn_id_version_projet_taxon=b.esn_id_version_projet_taxon" .
32
			     " AND en_ce_rang = enrg_id_rang" .
36
			     " AND en_ce_rang = enrg_id_rang" .
33
			     " AND en_id_nom = b.esn_id_nom" .
37
			     " AND en_id_nom = b.esn_id_nom" .
34
			     " AND en_ce_auteur_basio_ex = auteur_bex.enaia_id_intitule_naturaliste_abrege ".
38
			     " AND en_ce_auteur_basio_ex = auteur_bex.enaia_id_intitule_naturaliste_abrege ".
35
       			 " AND en_ce_auteur_basio = auteur_b.enaia_id_intitule_naturaliste_abrege  ".
39
       			 " AND en_ce_auteur_basio = auteur_b.enaia_id_intitule_naturaliste_abrege  ".
36
       			 " AND en_ce_auteur_modif_ex = auteur_mex.enaia_id_intitule_naturaliste_abrege ".
40
       			 " AND en_ce_auteur_modif_ex = auteur_mex.enaia_id_intitule_naturaliste_abrege ".
37
        	     " AND en_ce_auteur_modif = auteur_m.enaia_id_intitule_naturaliste_abrege ".
41
        	     " AND en_ce_auteur_modif = auteur_m.enaia_id_intitule_naturaliste_abrege ".
38
			     " AND a.esn_id_version_projet_taxon=en_id_version_projet_nom ";
42
			     " AND a.esn_id_version_projet_taxon=en_id_version_projet_nom ";
-
 
43
 
39
 
-
 
40
 
-
 
41
	   $res =& $DB->query($query);
-
 
42
 
-
 
43
 
-
 
44
        if (DB::isError($res)) {
-
 
45
	        die($res->getMessage());
-
 
46
    	}
44
		$resultat_infos_complementaires = $this->requeter($requete_infos_complementaires);
47
 
-
 
48
    		// Nom retenu, Num Nomen nom retenu, Num Taxon,
-
 
49
										// Famille
45
 
50
 
46
		// Nom retenu, Num Nomen nom retenu, Num Taxon, Famille
-
 
47
		$value=array('Nom_Retenu'=>"",'Num_Nom_Retenu'=>"0",'Num_Taxon'=>"0",'Famille'=>"");
51
		$value=array('Nom_Retenu'=>"",'Num_Nom_Retenu'=>"0",'Num_Taxon'=>"0",'Famille'=>"");
48
 
52
 
49
        if (is_array($resultat_infos_complementaires)) {
53
	        while ($row =& $res->fetchrow(DB_FETCHMODE_ASSOC)) {
50
		    foreach($resultat_infos_complementaires as $row) {
54
	        	$fam=$this->rechercherFamille($row['esn_id_taxon'],$DB);
51
		        	$fam=$this->rechercherFamille($row['esn_id_taxon']);
55
        	while (($fam['en_ce_rang']!='fin') && ($fam['en_ce_rang'] !=120)) {
52
	        	while (($fam['en_ce_rang']!='fin') && ($fam['en_ce_rang'] !=120)) {
56
	        	$fam=$this->rechercherFamille($fam['etr_id_taxon_2'],$DB);
53
		        	$fam=$this->rechercherFamille($fam['etr_id_taxon_2']);
57
        	}
54
	        	}
58
        	if ($fam['en_ce_rang']==120) {
55
	        	if ($fam['en_ce_rang']==120) {
59
        		$famille=$fam['en_nom_supra_generique'];
56
	        		$famille=$fam['en_nom_supra_generique'];
60
        	}
57
	        	}
61
        	else {
58
	        	else {
62
        		$famille="Famille inconnue";
-
 
63
        	}
59
	        		$famille="Famille inconnue";
64
        	$value=array('Nom_Retenu'=>$this->formaterNom($row),'Num_Nom_Retenu'=>$row['esn_id_nom'],'Num_Taxon'=>$row['esn_id_taxon'],'Famille'=>$famille);
60
	        	}
65
 
61
	        	$value=array('Nom_Retenu'=>$this->formaterNom($row),'Num_Nom_Retenu'=>$row['esn_id_nom'],'Num_Taxon'=>$row['esn_id_taxon'],'Famille'=>$famille);
66
 
62
		    }
67
	    }
63
        }
68
 
64
 
69
	    return $value;
65
	    return $value;
70
 
66
 
71
	}
67
	}
72
	
68
	
73
	function rechercherInformationsComplementairesSurNom($nom_saisi) {
69
	function rechercherInformationsComplementairesSurNom($nom_saisi) {
74
		
70
				
75
		$DB=$this->connectDB($this->config);
-
 
76
		
-
 
77
		$value = array();
71
		$value = array();
78
		
72
		
79
		if($nom_saisi != null && $nom_saisi != "") { 
73
		if($nom_saisi != null && $nom_saisi != "") { 
80
		
74
		
81
			$query = 'SELECT * FROM eflore_nom_intitule '.
75
			$requete_infos_comp_sur_nom = 'SELECT * FROM eflore_nom_intitule '.
82
			'WHERE eni_id_categorie_format = 3 AND '.
76
			'WHERE eni_id_categorie_format = 3 AND '.
83
			'eni_id_version_projet_nom = 25 AND '.
77
			'eni_id_version_projet_nom = 25 AND '.
84
			'(eni_id_valeur_format = 3 OR eni_id_valeur_format = 4) AND '.
78
			'(eni_id_valeur_format = 3 OR eni_id_valeur_format = 4) AND '.
85
			'eni_intitule_nom LIKE "'.$nom_saisi.'%" '.
79
			'eni_intitule_nom LIKE "'.$nom_saisi.'%" '.
86
			'ORDER BY LENGTH(eni_intitule_nom)';
80
			'ORDER BY LENGTH(eni_intitule_nom)';
87
			
81
			
88
			$res =& $DB->query($query);
-
 
89
			    
82
			$resultat_infos_comp_sur_nom = $this->executer($requete_infos_comp_sur_nom);
90
			    
-
 
91
	        if (DB::isError($res)) {
-
 
92
    	        die($res->getMessage());
-
 
93
        	}
83
			    
94
        	
84
	        if (is_array($resultat_infos_comp_sur_nom)) {        	
95
	        while ($row =& $res->fetchrow(DB_FETCHMODE_ASSOC)) {
85
		        foreach ($resultat_infos_comp_sur_nom as $ligne) {
96
	        	$value[]=array($row['eni_id_nom'], $row['eni_intitule_nom']);
86
		        	$value[]=array($ligne['eni_id_nom'], $ligne['eni_intitule_nom']); 	    
97
    	    
87
		        }
98
	        }
88
	        }
99
		}
89
		}
100
	                
90
	                
101
		return $value;
91
		return $value;
102
	}
92
	}
103
 
93
 
104
	function formaterNom($rawnom) {
94
	function formaterNom($rawnom) {
105
 
95
 
106
        // Constitution du nom:
96
        // Constitution du nom:
107
        $nom = '';
97
        $nom = '';
108
 
98
 
109
        if ($rawnom['en_nom_supra_generique'] != '') {
99
        if ($rawnom['en_nom_supra_generique'] != '') {
110
            $nom .= $rawnom['en_nom_supra_generique'];
100
            $nom .= $rawnom['en_nom_supra_generique'];
111
        } else if ($rawnom['en_epithete_infra_generique'] != '') {
101
        } else if ($rawnom['en_epithete_infra_generique'] != '') {
112
            $nom .= $rawnom['en_epithete_infra_generique'];
102
            $nom .= $rawnom['en_epithete_infra_generique'];
113
        } else {
103
        } else {
114
                if ($rawnom['en_nom_genre'] != '') {
104
                if ($rawnom['en_nom_genre'] != '') {
115
                    $nom .=  $rawnom['en_nom_genre'];
105
                    $nom .=  $rawnom['en_nom_genre'];
116
                }
106
                }
117
                if ($rawnom['en_epithete_espece']!= '') {
107
                if ($rawnom['en_epithete_espece']!= '') {
118
                    $nom .= ' '.$rawnom['en_epithete_espece'];
108
                    $nom .= ' '.$rawnom['en_epithete_espece'];
119
                }
109
                }
120
                if ($rawnom['en_epithete_infra_specifique'] != '') {
110
                if ($rawnom['en_epithete_infra_specifique'] != '') {
121
                        if (!empty($rawnom['enrg_abreviation_rang'])) {
111
                        if (!empty($rawnom['enrg_abreviation_rang'])) {
122
                                $nom .= ' '.$rawnom['enrg_abreviation_rang'].'';
112
                                $nom .= ' '.$rawnom['enrg_abreviation_rang'].'';
123
                        }
113
                        }
124
                        $nom .= ' '.$rawnom['en_epithete_infra_specifique'];
114
                        $nom .= ' '.$rawnom['en_epithete_infra_specifique'];
125
                }
115
                }
126
 
116
 
127
        }
117
        }
128
 
118
 
129
        return $nom .$this->retournerAuteur($rawnom) ;
119
        return $nom .$this->retournerAuteur($rawnom) ;
130
 
-
 
131
 	}
120
 	}
132
 
-
 
133
 
121
 
134
	function rechercherFamille($taxon,&$DB) {
122
	function rechercherFamille($taxon) {
135
	
123
	
136
		$row=array();
124
		$row=array();
137
	
125
	
138
		$query="SELECT DISTINCT en_ce_rang, etr_id_taxon_2, en_id_nom, en_nom_supra_generique ".
126
		$requete_famille = "SELECT DISTINCT en_ce_rang, etr_id_taxon_2, en_id_nom, en_nom_supra_generique ".
139
		" FROM eflore_taxon_relation, eflore_selection_nom, eflore_nom ".
127
		" FROM eflore_taxon_relation, eflore_selection_nom, eflore_nom ".
140
		" WHERE etr_id_taxon_1 = ".$taxon.
128
		" WHERE etr_id_taxon_1 = ".$taxon.
141
		" AND etr_id_version_projet_taxon_1 = 25 ".
129
		" AND etr_id_version_projet_taxon_1 = 25 ".
142
		" AND etr_id_categorie_taxon = 3 ".
130
		" AND etr_id_categorie_taxon = 3 ".
143
		" AND etr_id_valeur_taxon = 3 ".
131
		" AND etr_id_valeur_taxon = 3 ".
144
		" AND esn_id_taxon =  etr_id_taxon_2 ".
132
		" AND esn_id_taxon =  etr_id_taxon_2 ".
145
		" AND esn_ce_statut = 3 ".
133
		" AND esn_ce_statut = 3 ".
146
		" AND esn_id_version_projet_taxon = etr_id_version_projet_taxon_1 ".
134
		" AND esn_id_version_projet_taxon = etr_id_version_projet_taxon_1 ".
147
		" AND en_id_nom = esn_id_nom ".
135
		" AND en_id_nom = esn_id_nom ".
148
		" AND esn_id_version_projet_taxon=en_id_version_projet_nom  ";
136
		" AND esn_id_version_projet_taxon=en_id_version_projet_nom  ";
149
		$res =& $DB->query($query);
-
 
150
	
137
		
151
		if (DB::isError($res)) {
-
 
152
	         die($res->getMessage());
138
		$resultat_recherche_famille = $this->requeter($requete_famille);
153
	   	}
-
 
154
	
139
	
155
		if ($row =& $res->fetchrow(DB_FETCHMODE_ASSOC)) {
-
 
156
			return $row;
-
 
157
	    }
-
 
158
	    else {
140
		if (!is_array($resultat_recherche_famille) || count($resultat_recherche_famille) == 0) {	
159
	    	$row['en_ce_rang']='fin';
-
 
160
	    	return $row;
141
	    	$row['en_ce_rang']='fin';
-
 
142
	    }
161
	    }
143
	
162
	
144
		return $row;
163
	}
145
	}
164
 
146
 
165
 
147
 
166
 
148
 
167
	function retournerAuteur($rawnom) {
149
	function retournerAuteur($rawnom) {
168
		$auteurs = '';
150
		$auteurs = '';
169
		$auteur_basio = '';
151
		$auteur_basio = '';
170
		$auteur_modif = '';
152
		$auteur_modif = '';
171
		if (!empty($rawnom['abreviation_auteur_basio_ex']) && $rawnom['abreviation_auteur_basio_ex']!='-' )  {
153
		if (!empty($rawnom['abreviation_auteur_basio_ex']) && $rawnom['abreviation_auteur_basio_ex']!='-' )  {
172
		    $auteur_basio .= $rawnom['abreviation_auteur_basio_ex'];
154
		    $auteur_basio .= $rawnom['abreviation_auteur_basio_ex'];
173
		    if (!empty($rawnom['abreviation_auteur_basio']) && $rawnom['abreviation_auteur_basio']!='-') {
155
		    if (!empty($rawnom['abreviation_auteur_basio']) && $rawnom['abreviation_auteur_basio']!='-') {
174
		        $auteur_basio .= ' ex '.$rawnom['abreviation_auteur_basio'];
156
		        $auteur_basio .= ' ex '.$rawnom['abreviation_auteur_basio'];
175
		    }
157
		    }
176
		} else if (!empty($rawnom['abreviation_auteur_basio']) && $rawnom['abreviation_auteur_basio']!='-') {
158
		} else if (!empty($rawnom['abreviation_auteur_basio']) && $rawnom['abreviation_auteur_basio']!='-') {
177
		    $auteur_basio .= $rawnom['abreviation_auteur_basio'];
159
		    $auteur_basio .= $rawnom['abreviation_auteur_basio'];
178
		}
160
		}
179
 
161
 
180
		if (!empty($rawnom['abreviation_auteur_modif_ex']) && $rawnom['abreviation_auteur_modif_ex']!='-') {
162
		if (!empty($rawnom['abreviation_auteur_modif_ex']) && $rawnom['abreviation_auteur_modif_ex']!='-') {
181
		    $auteur_modif .= $rawnom['abreviation_auteur_modif_ex'];
163
		    $auteur_modif .= $rawnom['abreviation_auteur_modif_ex'];
182
		    if (!empty($rawnom['abreviation_auteur_modif']) && $rawnom['abreviation_auteur_modif']!='-') {
164
		    if (!empty($rawnom['abreviation_auteur_modif']) && $rawnom['abreviation_auteur_modif']!='-') {
183
		        $auteur_modif .= ' ex '.$rawnom['abreviation_auteur_modif'];
165
		        $auteur_modif .= ' ex '.$rawnom['abreviation_auteur_modif'];
184
		    }
166
		    }
185
		} else if (!empty($rawnom['abreviation_auteur_modif']) && $rawnom['abreviation_auteur_modif']!='-')  {
167
		} else if (!empty($rawnom['abreviation_auteur_modif']) && $rawnom['abreviation_auteur_modif']!='-')  {
186
		    $auteur_modif .= $rawnom['abreviation_auteur_modif'];
168
		    $auteur_modif .= $rawnom['abreviation_auteur_modif'];
187
		}
169
		}
188
 
170
 
189
		if (!empty($auteur_modif)) {
171
		if (!empty($auteur_modif)) {
190
		    $auteurs = ' ('.$auteur_basio.') '.$auteur_modif;
172
		    $auteurs = ' ('.$auteur_basio.') '.$auteur_modif;
191
		} elseif (!empty($auteur_basio)) {
173
		} elseif (!empty($auteur_basio)) {
192
		    $auteurs = ' '.$auteur_basio;
174
		    $auteurs = ' '.$auteur_basio;
193
		}
175
		}
194
 
176
 
195
		return $auteurs ;
177
		return $auteurs ;
196
	}
178
	}
197
}
179
}
198
?>
180
?>