Subversion Repositories eFlore/Applications.cel

<?php

// In : utf8

// Out : iso8859

// Export vers feuille de calcul d'une selection de releves

Class InventoryExport extends DBAccessor  {

	var $config;

	var $extendSpreadsheetProductor;

	function InventoryExport($config) {

		$this->config=$config;

		// Pas d'heritage multiple en php :(

		$this->extendSpreadsheetProductor = new SpreadsheetProductor();

		$this->extendSpreadsheetProductor->initSpreadsheet();

	}

	function getElement($uid){

		   // Controle detournement utilisateur

		    session_start();

		 	$this->controleUtilisateur($uid[0]);

			$DB=$this->connectDB($this->config,'database_cel');

			$criteres = array() ;

			if(isset($uid[1]))

			{

				$criteres = explode("&", $uid[1]) ;

			}

			$query="SELECT identifiant, ordre, nom_sel, num_nom_sel, nom_ret, num_nom_ret, num_taxon, famille, location, id_location, date_observation," .

		           " lieudit, station, milieu, commentaire, transmission, coord_x, coord_y, ref_geo FROM cel_inventory WHERE identifiant='".$DB->escapeSimple($uid[0])."' AND " ;

			foreach($criteres as $pair)

			{

				$nom_valeur = explode("=",$pair) ;

				if(sizeof($nom_valeur) != 0) {

					if($nom_valeur[0] == 'limite')

					{

						$limite = $DB->escapeSimple($nom_valeur[1]) ;

					}

					elseif($nom_valeur[0] == 'numero_page') {

						$numero_page = $DB->escapeSimple($nom_valeur[1]) ;

					}

					elseif($nom_valeur[0] == 'annee') {

						$query .= "year(date_observation) = '".$DB->escapeSimple($nom_valeur[1])."'" ;

						$query .= ' AND ' ;

					}

					elseif($nom_valeur[0] == 'mois') {

						$query .= "month(date_observation) = '".$DB->escapeSimple($nom_valeur[1])."'" ;

						$query .= ' AND ' ;

					}

					elseif($nom_valeur[0] == 'jour') {

						$query .= "day(date_observation) = '".$DB->escapeSimple($nom_valeur[1])."'" ;

						$query .= ' AND ' ;

					}

                    elseif($nom_valeur[0] == 'mots_cles') {

                        $liste_mc = explode(";",$nom_valeur[1]);

                        $query .= '(' ;

                        foreach($liste_mc as $mot) {

                                if(trim($mot) != '')

                                {

                                  $query .= "mots_cles LIKE '%".$DB->escapeSimple($mot)."%' OR " ;

                                }

                        }

                        $query = rtrim($query,' OR ');

                        $query .= ') AND ' ;

                    }

                    elseif ($nom_valeur[0] == 'nom_taxon') {

                    	$nom_valeur[1] = str_replace("*","%",$nom_valeur[1]);

                    	$query .= "(nom_sel LIKE '%".$DB->escapeSimple($nom_valeur[1]).

									"%' OR identifiant LIKE '%".$DB->escapeSimple($nom_valeur[1]).

									"%' OR ordre LIKE '%".$DB->escapeSimple($nom_valeur[1]).

									"%' OR nom_sel LIKE '%".$DB->escapeSimple($nom_valeur[1]).

									"%' OR num_nom_sel LIKE '%".$DB->escapeSimple($nom_valeur[1]).

									"%' OR nom_ret LIKE '%".$DB->escapeSimple($nom_valeur[1]).

									"%' OR num_nom_ret LIKE '%".$DB->escapeSimple($nom_valeur[1]).

									"%' OR num_taxon LIKE '%".$DB->escapeSimple($nom_valeur[1]).

									"%' OR location LIKE '%".$DB->escapeSimple($nom_valeur[1]).

									"%' OR id_location LIKE '%".$DB->escapeSimple($nom_valeur[1]).

									"%' OR date_observation LIKE '%".$DB->escapeSimple($nom_valeur[1]).

									"%' OR lieudit LIKE '%".$DB->escapeSimple($nom_valeur[1]).

									"%' OR station LIKE '%".$DB->escapeSimple($nom_valeur[1]).

									"%' OR milieu LIKE '%".$DB->escapeSimple($nom_valeur[1]).

									"%' OR commentaire LIKE '%".$DB->escapeSimple($nom_valeur[1]).

									"%' OR transmission LIKE '%".$DB->escapeSimple($nom_valeur[1]).

									"%' OR coord_x LIKE '%".$DB->escapeSimple($nom_valeur[1]).

									"%' OR coord_y LIKE '%".$DB->escapeSimple($nom_valeur[1]).

									"%')";

									//"%' OR famille LIKE '%".$DB->escapeSimple($nom_valeur[1]).

                    }

					else {

						if(trim($nom_valeur[0]) != '')

						{

						$query .= $nom_valeur[0]." = '".$DB->escapeSimple($nom_valeur[1])."'" ;

						$query .= ' AND ' ;

						}

					}

				}

			}

			$query = rtrim($query,' AND ') ;

			$query .=" ORDER BY ordre ";

       	    $res =& $DB->query($query);

			if (DB::isError($res)) {

			     die($res->getMessage());

			}

    	    // Creating a workbook

			$workbook = new Spreadsheet_Excel_Writer();

			$workbook->send('liste.xls');

			// Creating a worksheet

			$worksheet = $workbook->addWorksheet('Liste');

            $worksheet->write(0,0,'Espece');

            $worksheet->write(0,1,'Numero nomenclatural');

            $worksheet->write(0,2,'Nom retenu');

            $worksheet->write(0,3,'Numero nomenclatural nom retenu');

            $worksheet->write(0,4,'Numero taxonomique');

            $worksheet->write(0,5,'Famille');

            $worksheet->write(0,6,'Commune');

            $worksheet->write(0,7,'Identifiant Commune');

            $worksheet->write(0,8,'Date');

            $worksheet->write(0,9,'Lieu-dit');

            $worksheet->write(0,10,'Station');

            $worksheet->write(0,11,'Milieu');

            $worksheet->write(0,12,'Notes');

            $worksheet->write(0,13,'Latitude');

            $worksheet->write(0,14,'Longitude');

            $worksheet->write(0,15,'Referentiel Geographique');

			$i=1;

			 while ($row =& $res->fetchrow(DB_FETCHMODE_ASSOC)) {

			 	// Denullifiage

				foreach($row as $k=>$v) {

					if (($v=="null") || ($v=="000null")) {

						$row[$k]="";

					}

					else {

						$row[$k]=utf8_decode($v);

					}

				}

			  	if ($row['date_observation']!="0000-00-00 00:00:00") {

	                list($year,$month,$day)= split ('-',$row['date_observation']);

    	            list($day)= split (' ',$day);

	                $row['date_observation']=$day."/".$month."/".$year;

	        	}

	        	else {

	                $row['date_observation']="00/00/0000";

	        	}

                $worksheet->write($i,0,$row['nom_sel']);

                $worksheet->write($i,1,$row['num_nom_sel']);

                $worksheet->write($i,2,$row['nom_ret']);

                $worksheet->write($i,3,$row['num_nom_ret']);

                $worksheet->write($i,4,$row['num_taxon']);

                $worksheet->write($i,5,$row['famille']);

                $worksheet->write($i,6,$row['location']);

                $worksheet->write($i,7,$row['id_location']);

                $worksheet->write($i,8,$row['date_observation']);

                $worksheet->write($i,9,$row['lieudit']);

                $worksheet->write($i,10,$row['station']);

                $worksheet->write($i,11,$row['milieu']);

                $worksheet->write($i,12,$row['commentaire']);

                $worksheet->write($i,13,$row['coord_x']);

                $worksheet->write($i,14,$row['coord_y']);

                $worksheet->write($i,15,$row['ref_geo']);

                $i++;

    	    }

			$workbook->close();

			exit();

	}

}

/* +--Fin du code ---------------------------------------------------------------------------------------+

* $Log$

* Revision 1.7  2008-11-13 11:29:12  ddelon

* Reecriture gwt-ext

*

* Revision 1.6  2008-01-30 08:57:28  ddelon

* fin mise en place mygwt

*

* Revision 1.5  2007-06-06 13:31:16  ddelon

* v0.09

*

* Revision 1.4  2007-05-22 12:54:09  ddelon

* Securisation acces utilisateur

*

*

*

*/

?>