| New file |
|---|
| 0,0 → 1,200 |
|---|
| <?php |
| /** |
| |
| David Delon david.delon@clapas.net 2007 |
| |
| Ce logiciel est régi par la licence CeCILL soumise au droit français et |
| respectant les principes de diffusion des logiciels libres. Vous pouvez |
| utiliser, modifier et/ou redistribuer ce programme sous les conditions |
| de la licence CeCILL telle que diffusée par le CEA, le CNRS et l'INRIA |
| sur le site "http://www.cecill.info". |
| En contrepartie de l'accessibilité au code source et des droits de copie, |
| de modification et de redistribution accordés par cette licence, il n'est |
| offert aux utilisateurs qu'une garantie limitée. Pour les mêmes raisons, |
| seule une responsabilité restreinte pèse sur l'auteur du programme, le |
| titulaire des droits patrimoniaux et les concédants successifs. |
| |
| A cet égard l'attention de l'utilisateur est attirée sur les risques |
| associés au chargement, à l'utilisation, à la modification et/ou au |
| développement et à la reproduction du logiciel par l'utilisateur étant |
| donné sa spécificité de logiciel libre, qui peut le rendre complexe à |
| manipuler et qui le réserve donc à des développeurs et des professionnels |
| avertis possédant des connaissances informatiques approfondies. Les |
| utilisateurs sont donc invités à charger et tester l'adéquation du |
| logiciel à leurs besoins dans des conditions permettant d'assurer la |
| sécurité de leurs systèmes et ou de leurs données et, plus généralement, |
| à l'utiliser et l'exploiter dans les mêmes conditions de sécurité. |
| |
| Le fait que vous puissiez accéder à cet en-tête signifie que vous avez |
| pris connaissance de la licence CeCILL, et que vous en avez accepté les |
| termes. |
| |
| */ |
| |
| |
| // in : utf8 |
| // out : utf8 |
| |
| |
| /* |
| * Name.php |
| * |
| * Cas d'utilisation : |
| * Service recherche nom retenu depuis un numero nomenclatural pour la BDNFF |
| * |
| * 1 : L'application recoit un numero nomenclatural |
| * 2 : L'application retourne le nom retenu associé |
| */ |
| |
| |
| Class Name extends DBAccessor { |
| |
| |
| var $config; |
| |
| function Name($config) { |
| |
| $this->config=$config; |
| } |
| |
| |
| function getElement($uid){ |
| |
| $value=array(); |
| |
| // Num nomenclatural |
| if (isset($uid[0])) { |
| $DB=$this->connectDB($this->config); |
| $query = "SELECT DISTINCT en_nom_genre, en_epithete_espece, en_nom_supra_generique, en_epithete_infra_generique,". |
| " auteur_bex.enaia_intitule_abrege AS abreviation_auteur_basio_ex ". |
| " , auteur_b.enaia_intitule_abrege AS abreviation_auteur_basio ". |
| " , auteur_mex.enaia_intitule_abrege AS abreviation_auteur_modif_ex ". |
| " , auteur_m.enaia_intitule_abrege AS abreviation_auteur_modif ". |
| " , en_epithete_espece, en_epithete_infra_specifique, enrg_abreviation_rang, en_id_nom" . |
| " FROM eflore_nom, eflore_nom_rang, eflore_selection_nom a, " . |
| " eflore_naturaliste_intitule_abreviation AS auteur_bex ". |
| " , eflore_naturaliste_intitule_abreviation AS auteur_b ". |
| " , eflore_naturaliste_intitule_abreviation AS auteur_mex ". |
| " , eflore_naturaliste_intitule_abreviation AS auteur_m ". |
| " WHERE a.esn_id_nom= '".$uid[0]. "'". |
| " AND a.esn_id_version_projet_taxon = 25 ". |
| " AND en_ce_rang = enrg_id_rang" . |
| " AND en_id_nom = a.esn_id_nom" . |
| " AND en_ce_auteur_basio_ex = auteur_bex.enaia_id_intitule_naturaliste_abrege ". |
| " AND en_ce_auteur_basio = auteur_b.enaia_id_intitule_naturaliste_abrege ". |
| " AND en_ce_auteur_modif_ex = auteur_mex.enaia_id_intitule_naturaliste_abrege ". |
| " AND en_ce_auteur_modif = auteur_m.enaia_id_intitule_naturaliste_abrege ". |
| " AND a.esn_id_version_projet_taxon=en_id_version_projet_nom "; |
| |
| } |
| else { |
| print "[\"null\"]"; |
| return ; |
| } |
| |
| |
| $res =& $DB->query($query); |
| |
| |
| if (DB::isError($res)) { |
| die($res->getMessage()); |
| } |
| |
| |
| $value=array("null"); |
| |
| while ($row =& $res->fetchrow(DB_FETCHMODE_ASSOC)) { |
| $value=array(($this->formaterNom($row))); |
| } |
| |
| |
| |
| $json = new Services_JSON(); |
| $output = $json->encode($value); |
| print($output); |
| |
| |
| |
| } |
| |
| function getRessource(){ |
| |
| print "[\"null\"]"; |
| return; |
| } |
| |
| |
| function formaterNom($rawnom) { |
| // Constitution du nom: |
| $nom = ''; |
| |
| if ($rawnom['en_nom_supra_generique'] != '') { |
| $nom .= $rawnom['en_nom_supra_generique']; |
| } else if ($rawnom['en_epithete_infra_generique'] != '') { |
| $nom .= $rawnom['en_epithete_infra_generique']; |
| } else { |
| if ($rawnom['en_nom_genre'] != '') { |
| $nom .= $rawnom['en_nom_genre']; |
| } |
| if ($rawnom['en_epithete_espece']!= '') { |
| $nom .= ' '.$rawnom['en_epithete_espece']; |
| } |
| if ($rawnom['en_epithete_infra_specifique'] != '') { |
| if (!empty($rawnom['enrg_abreviation_rang'])) { |
| $nom .= ' '.$rawnom['enrg_abreviation_rang'].''; |
| } |
| $nom .= ' '.$rawnom['en_epithete_infra_specifique']; |
| } |
| |
| } |
| return $nom .retournerAuteur($rawnom) ; |
| } |
| } |
| |
| |
| function retournerAuteur($rawnom) { |
| $auteurs = ''; |
| $auteur_basio = ''; |
| $auteur_modif = ''; |
| if (!empty($rawnom['abreviation_auteur_basio_ex']) && $rawnom['abreviation_auteur_basio_ex']!='-' ) { |
| $auteur_basio .= $rawnom['abreviation_auteur_basio_ex']; |
| if (!empty($rawnom['abreviation_auteur_basio']) && $rawnom['abreviation_auteur_basio']!='-') { |
| $auteur_basio .= ' ex '.$rawnom['abreviation_auteur_basio']; |
| } |
| } else if (!empty($rawnom['abreviation_auteur_basio']) && $rawnom['abreviation_auteur_basio']!='-') { |
| $auteur_basio .= $rawnom['abreviation_auteur_basio']; |
| } |
| |
| if (!empty($rawnom['abreviation_auteur_modif_ex']) && $rawnom['abreviation_auteur_modif_ex']!='-') { |
| $auteur_modif .= $rawnom['abreviation_auteur_modif_ex']; |
| if (!empty($rawnom['abreviation_auteur_modif']) && $rawnom['abreviation_auteur_modif']!='-') { |
| $auteur_modif .= ' ex '.$rawnom['abreviation_auteur_modif']; |
| } |
| } else if (!empty($rawnom['abreviation_auteur_modif']) && $rawnom['abreviation_auteur_modif']!='-') { |
| $auteur_modif .= $rawnom['abreviation_auteur_modif']; |
| } |
| |
| if (!empty($auteur_modif)) { |
| $auteurs = ' ('.$auteur_basio.') '.$auteur_modif; |
| } elseif (!empty($auteur_basio)) { |
| $auteurs = ' '.$auteur_basio; |
| } |
| |
| return $auteurs ; |
| } |
| |
| /* +--Fin du code ---------------------------------------------------------------------------------------+ |
| * $Log$ |
| * Revision 1.3 2008-01-30 08:57:28 ddelon |
| * fin mise en place mygwt |
| * |
| * Revision 1.2 2007-05-21 18:13:30 ddelon |
| * Refactoring et documentation |
| * |
| * |
| */ |
| |
| |
| |
| |
| ?> |
| Property changes: |
|---|
| Added: svn:executable |
|---|
| +* |
|---|
| \ No newline at end of property |
|---|