Subversion Repositories eFlore/Applications.cel

Rev

Rev 423 | Rev 892 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 423 Rev 890
Line 1... Line 1...
1 
<?php
 1 
<?php
2 
/**
 2 
/**
- 
 
 3 
* PHP Version 5
- 
 
 4 
*
- 
 
 5 
* @category  PHP
- 
 
 6 
* @package   jrest
- 
 
 7 
* @author    David Delon <david.delon@clapas.net>
- 
 
 8 
* @copyright 2010 Tela-Botanica
- 
 
 9 
* @license   http://www.cecill.info/licences/Licence_CeCILL_V2-fr.txt Licence CECILL
- 
 
 10 
* @version   SVN: <svn_id>
- 
 
 11 
* @link      /doc/jrest/
- 
 
 12 
*/
Line 3... Line -...
3
- 
 
4 
 David Delon david.delon@clapas.net 2007
 13
5 
 
 - 
 
6 
 Ce logiciel est r�gi par la licence CeCILL soumise au droit fran�ais et
 - 
 
7 
 respectant les principes de diffusion des logiciels libres. Vous pouvez
 - 
 
8 
 utiliser, modifier et/ou redistribuer ce programme sous les conditions
 - 
 
9 
 de la licence CeCILL telle que diffus�e par le CEA, le CNRS et l'INRIA
- 
 
10 
 sur le site "http://www.cecill.info".
 - 
 
11 
 En contrepartie de l'accessibilit� au code source et des droits de copie,
 - 
 
12 
 de modification et de redistribution accord�s par cette licence, il n'est
 - 
 
13 
 offert aux utilisateurs qu'une garantie limit�e.  Pour les m�mes raisons,
 - 
 
14 
 seule une responsabilit� restreinte p�se sur l'auteur du programme,  le
 - 
 
15 
 titulaire des droits patrimoniaux et les conc�dants successifs.
 - 
 
16 
 
 - 
 
17 
 A cet �gard  l'attention de l'utilisateur est attir�e sur les risques
 - 
 
18 
 associ�s au chargement,  � l'utilisation,  � la modification et/ou au
 - 
 
19 
 d�veloppement et � la reproduction du logiciel par l'utilisateur �tant
- 
 
20 
 donn� sa sp�cificit� de logiciel libre, qui peut le rendre complexe �
- 
 
21 
 manipuler et qui le r�serve donc � des d�veloppeurs et des professionnels
 - 
 
22 
 avertis poss�dant  des  connaissances  informatiques approfondies.  Les
 - 
 
23 
 utilisateurs sont donc invit�s � charger  et  tester  l'ad�quation  du
 - 
 
24 
 logiciel � leurs besoins dans des conditions permettant d'assurer la
 - 
 
25 
 s�curit� de leurs syst�mes et ou de leurs donn�es et, plus g�n�ralement,
- 
 
26 
 � l'utiliser et l'exploiter dans les m�mes conditions de s�curit�.
- 
 
27
- 
 
28 
 Le fait que vous puissiez acc�der � cet en-t�te signifie que vous avez
- 
 
29 
 pris connaissance de la licence CeCILL, et que vous en avez accept� les
 14 
/**
30 
 termes.
 - 
 
31
- 
 
32 
 */
 - 
 
33
15 
* Name.php
34
16 
*
35 
 // in : utf8
 17 
* in : utf8
36 
 // out : utf8
 - 
 
37
- 
 
38
- 
 
39 
 /*
 - 
 
40 
 * Name.php
18 
* out : utf8
41 
 *
19 
*
42 
 * Cas d'utilisation :
 20 
* Cas d'utilisation :
43 
 * Service recherche nom retenu depuis un numero nomenclatural pour la BDNFF
 21 
* Service recherche nom retenu depuis un numero nomenclatural pour la BDNFF
44 
 *
22 
*
45 
 * 1 : L'application recoit un numero nomenclatural
 23 
* 1 : L'application recoit un numero nomenclatural
46 
 * 2 : L'application retourne le nom retenu associ�
 24 
* 2 : L'application retourne le nom retenu associé
47 
 */
 - 
 
48
- 
 
49 
 
 25 
*/
50 
Class Name extends DBAccessor {
 - 
 
51 
 
 - 
 
52 
 
 - 
 
53 
	var $config;
 - 
 
54
- 
 
55 
	function Name($config) {
 - 
 
56 
 
 - 
 
57 
		$this->config=$config;
 - 
 
58 
	}
 - 
 
Line 59... Line 26...
59
26 
class Name extends Cel {
60 
 
 - 
 
61 
	function getElement($uid){
 - 
 
62 
 
 - 
 
63 
			$value=array();
 - 
 
64
- 
 
65 
			// Num nomenclatural
- 
 
66 
			if (isset($uid[0])) {
 - 
 
67 
				$DB=$this->connectDB($this->config);
 - 
 
68 
			    	      $query = "SELECT DISTINCT en_nom_genre, en_epithete_espece, en_nom_supra_generique, en_epithete_infra_generique,".
- 
 
69 
        	       			"   auteur_bex.enaia_intitule_abrege AS abreviation_auteur_basio_ex ".
 - 
 
70 
        	       			" , auteur_b.enaia_intitule_abrege AS abreviation_auteur_basio ".
 - 
 
71 
        	       			" , auteur_mex.enaia_intitule_abrege AS abreviation_auteur_modif_ex ".
 - 
 
72 
        	       			" , auteur_m.enaia_intitule_abrege AS abreviation_auteur_modif ".
 - 
 
73 
        	       			" , en_epithete_espece, en_epithete_infra_specifique, enrg_abreviation_rang, en_id_nom" .
 - 
 
74 
        	       			" FROM eflore_nom, eflore_nom_rang, eflore_selection_nom a,  " .
 - 
 
75 
        	    			"  	  eflore_naturaliste_intitule_abreviation AS auteur_bex ".
 - 
 
76 
			        	    "   , eflore_naturaliste_intitule_abreviation AS auteur_b ".
 - 
 
77 
        				    "   , eflore_naturaliste_intitule_abreviation AS auteur_mex ".
 - 
 
78 
			        	    "   , eflore_naturaliste_intitule_abreviation AS auteur_m ".
 - 
 
79 
			     " WHERE a.esn_id_nom= '".$uid[0]. "'".
 - 
 
80 
			     " AND a.esn_id_version_projet_taxon = 25 ".
 - 
 
81 
			     " AND en_ce_rang = enrg_id_rang" .
 - 
 
82 
			     " AND en_id_nom = a.esn_id_nom" .
 - 
 
83 
			     " AND en_ce_auteur_basio_ex = auteur_bex.enaia_id_intitule_naturaliste_abrege ".
 - 
 
84 
        	     " AND en_ce_auteur_basio = auteur_b.enaia_id_intitule_naturaliste_abrege  ".
 - 
 
85 
        	     " AND en_ce_auteur_modif_ex = auteur_mex.enaia_id_intitule_naturaliste_abrege ".
- 
 
86 
        	     " AND en_ce_auteur_modif = auteur_m.enaia_id_intitule_naturaliste_abrege ".
 - 
 
87 
			     " AND a.esn_id_version_projet_taxon=en_id_version_projet_nom ";
 - 
 
88
- 
 
89 
			}
 - 
 
90 
			else {
 - 
 
91 
				print "[\"null\"]";
- 
 
Line -... Line 27...
- 
 
 27 
 
- 
 
 28 
	function getElement($uid){
- 
 
 29
- 
 
 30 
		$retour = array("null");
- 
 
 31
- 
 
 32 
		if (isset($uid[0])) {
Line 92... Line -...
92 
            	return ;
 - 
 
93 
			}
 - 
 
94
- 
 
95
- 
 
96 
		    $res =& $DB->query($query);
 - 
 
97
- 
 
98
- 
 
99 
	        if (DB::isError($res)) {
 - 
 
100 
    	        die($res->getMessage());
 - 
 
101 
        	}
 - 
 
102 
 
 - 
 
103 
 
 - 
 
104 
			$value=array("null");
- 
 
105
- 
 
106 
	        while ($row =& $res->fetchrow(DB_FETCHMODE_ASSOC)) {
 - 
 
107 
            	    $value=array(($this->formaterNom($row)));
 - 
 
108 
	       }
 33 
			$chercheur_info_taxon = new RechercheInfosTaxon($this->config);
109
34 
	 		$retour = $chercheur_info_taxon->effectuerRequeteInfosComplementairesEtFormaterNom($uid[0]);
110
- 
 
111
- 
 
112 
			$output = json_encode($value);
 - 
 
113 
			print($output);
 35 
		}
Line 114... Line 36...
114
36
Line 115... Line 37...
115 
 
 37 
		$output = json_encode($retour);
116 
 
 38 
		print($output);
117 
	}
 39 
	}
118
- 
 
119 
	function getRessource(){
 - 
 
120
- 
 
121 
			print "[\"null\"]";
- 
 
122 
            return;
 - 
 
123 
	}
 - 
 
124
- 
 
125
- 
 
126 
	 function formaterNom($rawnom) {
 - 
 
127 
                // Constitution du nom:
 - 
 
128 
                $nom = '';
 - 
 
129 
 
 - 
 
130 
                if ($rawnom['en_nom_supra_generique'] != '') {
 - 
 
131 
                    $nom .= $rawnom['en_nom_supra_generique'];
 - 
 
132 
                } else if ($rawnom['en_epithete_infra_generique'] != '') {
 - 
 
133 
                    $nom .= $rawnom['en_epithete_infra_generique'];
 - 
 
134 
                } else {
 - 
 
135 
                        if ($rawnom['en_nom_genre'] != '') {
 - 
 
136 
                            $nom .=  $rawnom['en_nom_genre'];
- 
 
137 
                        }
 - 
 
138 
                        if ($rawnom['en_epithete_espece']!= '') {
 - 
 
139 
                            $nom .= ' '.$rawnom['en_epithete_espece'];
 - 
 
140 
                        }
 - 
 
141 
                        if ($rawnom['en_epithete_infra_specifique'] != '') {
 - 
 
142 
                                if (!empty($rawnom['enrg_abreviation_rang'])) {
 - 
 
143 
                                        $nom .= ' '.$rawnom['enrg_abreviation_rang'].'';
 - 
 
144 
                                }
 - 
 
145 
                                $nom .= ' '.$rawnom['en_epithete_infra_specifique'];
 40
146 
                        }
 - 
 
147
- 
 
148 
                }
 - 
 
149 
                return $nom .retournerAuteur($rawnom) ;
 - 
 
150 
	 }
 - 
 
151 
}
 - 
 
152 
 
 - 
 
153 
 
 - 
 
154 
	function retournerAuteur($rawnom) {
 - 
 
155 
		$auteurs = '';
 - 
 
156 
		$auteur_basio = '';
 - 
 
157 
		$auteur_modif = '';
 - 
 
158 
		if (!empty($rawnom['abreviation_auteur_basio_ex']) && $rawnom['abreviation_auteur_basio_ex']!='-' )  {
 - 
 
159 
		    $auteur_basio .= $rawnom['abreviation_auteur_basio_ex'];
 - 
 
160 
		    if (!empty($rawnom['abreviation_auteur_basio']) && $rawnom['abreviation_auteur_basio']!='-') {
 - 
 
161 
		        $auteur_basio .= ' ex '.$rawnom['abreviation_auteur_basio'];
 - 
 
162 
		    }
 - 
 
163 
		} else if (!empty($rawnom['abreviation_auteur_basio']) && $rawnom['abreviation_auteur_basio']!='-') {
 - 
 
164 
		    $auteur_basio .= $rawnom['abreviation_auteur_basio'];
 - 
 
165 
		}
 - 
 
166
- 
 
167 
		if (!empty($rawnom['abreviation_auteur_modif_ex']) && $rawnom['abreviation_auteur_modif_ex']!='-') {
 - 
 
168 
		    $auteur_modif .= $rawnom['abreviation_auteur_modif_ex'];
 - 
 
169 
		    if (!empty($rawnom['abreviation_auteur_modif']) && $rawnom['abreviation_auteur_modif']!='-') {
 - 
 
170 
		        $auteur_modif .= ' ex '.$rawnom['abreviation_auteur_modif'];
 - 
 
171 
		    }
 - 
 
172 
		} else if (!empty($rawnom['abreviation_auteur_modif']) && $rawnom['abreviation_auteur_modif']!='-')  {
 - 
 
173 
		    $auteur_modif .= $rawnom['abreviation_auteur_modif'];
 - 
 
174 
		}
 - 
 
175
- 
 
176 
		if (!empty($auteur_modif)) {
 - 
 
177 
		    $auteurs = ' ('.$auteur_basio.') '.$auteur_modif;
 - 
 
178 
		} elseif (!empty($auteur_basio)) {
 - 
 
179 
		    $auteurs = ' '.$auteur_basio;
 41 
	function getRessource(){
180 
		}
 42
181
43 
			print "[\"null\"]";
182 
		return $auteurs ;
 44 
            return;
183 
	}
45 
	}
184 
 
 46 
}
185 
/* +--Fin du code ---------------------------------------------------------------------------------------+
 47 
/* +--Fin du code ---------------------------------------------------------------------------------------+
186 
* $Log$
 - 
 
187 
* Revision 1.3  2008-01-30 08:57:28  ddelon
 48 
* $Log$
188 
* fin mise en place mygwt
 49 
* Revision 1.3  2008-01-30 08:57:28  ddelon
189 
*
 - 
 
190 
* Revision 1.2  2007-05-21 18:13:30  ddelon
 - 
 
191 
* Refactoring et documentation
 - 
 
192 
*
 - 
 
193 
*
50 
* fin mise en place mygwt
194 
*/
 51 
*