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();


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


            $worksheet->write(0,0,'Nom saisi');
            $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 Observation');
            $worksheet->write(0,9,'Lieu dit');
            $worksheet->write(0,10,'Station');
            $worksheet->write(0,11,'Milieu');
            $worksheet->write(0,12,'Commentaire');
            $worksheet->write(0,13,'X');
            $worksheet->write(0,14,'Y');
            $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++;
            }

                                // sending HTTP headers
                        $workbook->send('liste.xls');
                        $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
*
*
*
*/


?>