<?php
// ATTENTION ! Classe compatible uniquement avec nouveau format de bdd du cel //

/**
* PHP Version 5
*
* @category  PHP
* @package   jrest
* @author    David Delon <delon@tela-botanica.org>
* @copyright 2010 Tela-Botanica
* @license   http://www.cecill.info/licences/Licence_CeCILL_V2-fr.txt Licence CECILL
* @version   SVN: <svn_id>
* @link      /doc/
*/

/**
* 
* in=utf8
* out=iso3859
* 
* Liste des Nouvelles observations par departement
* A voir avec David mais ne devrait plus être utilisé 
* ou fait autrement
* 
*/

set_include_path(get_include_path() . PATH_SEPARATOR . dirname(dirname(realpath(__FILE__))) . '/lib');
// la sortie est binaire (xls), mais OLE n'est pas compatible E_ALL en PHP-5.4
error_reporting(error_reporting() ^ E_STRICT);
require_once("lib/OLE.php");
require_once("lib/Spreadsheet/Excel/Writer.php");

class InventoryByDept extends Cel {

	var $extendSpreadsheetProductor;
	
	function InventoryByDept($config) {

		parent::__construct($config);
		
		// Pas d'heritage multiple en php :(
		$this->extendSpreadsheetProductor = new SpreadsheetProductor();
		$this->extendSpreadsheetProductor->initSpreadsheet();   
	}
	
	//TODO : faire une fonction qui prend en paramètre un departement
	function getRessource(){
		
		$requete_obs = "SELECT ce_zone_geo, ce_utilisateur, courriel_utilisateur, ordre, nom_sel, nom_sel_nn, nom_ret, nom_ret_nn, nt, famille, zone_geo, date_observation," .
		    " lieudit, station, milieu, commentaire, transmission  FROM cel_obs ". 
			"WHERE ce_zone_geo != '000null' AND ce_zone_geo != '' AND transmission = 1 AND nt!=0 ORDER BY ce_zone_geo, nom_ret LIMIT 50";

		$resultat_obs = Cel::db()->executerRequete($requete_obs);
        	
    	// Creating a workbook
		$workbook = new Spreadsheet_Excel_Writer();
		$workbook->setVersion(8);
		// Creating a worksheet
		$worksheet = $workbook->addWorksheet('Liste');
		$worksheet->setInputEncoding('utf-8');

        $worksheet->write(0,0,'Departement');
        $worksheet->write(0,1,'Nom saisi');
        $worksheet->write(0,2,'Numero nomenclatural');
        $worksheet->write(0,3,'Nom retenu');
        $worksheet->write(0,4,'Numero nomenclatural nom retenu');
        $worksheet->write(0,5,'Numero taxonomique');
        $worksheet->write(0,6,'Famille');
        $worksheet->write(0,7,'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,'Observateur');

		$i=1;
		
		$observations = array();
		$chercheur_infos_taxon = null;
		if (is_array($resultat_obs)) {
			$observations = &$resultat_obs;
			$chercheur_infos_taxon = new RechercheInfosTaxonBeta($this->config);
		}
		
		foreach ($observations as $obs) {

			$code_departement = $this->convertirCodeZoneGeoVersDepartement($obs['ce_zone_geo']);
			$taxon_deja_vu = $chercheur_infos_taxon->taxonEstPresentDansDepartement($obs['nt'], $code_departement);
			
			if (!$taxon_deja_vu) {								
			 	// Denullifiage   
				foreach($obs as $k=>$v) {
					if (($v=="null") || ($v=="000null")) {
						$obs[$k]="";
					}
					else {
						$obs[$k]=utf8_decode($v);
					}
				} 

				if ($obs['date_observation']!="0000-00-00 00:00:00") {
                	list($year,$month,$day)= explode('-',$obs['date_observation']);
    	            list($day)= explode(' ',$day);
	                $obs['date_observation']=$day."/".$month."/".$year;
    	    	}
        		else {
            	    $obs['date_observation']="00/00/0000";
	        	}

				$worksheet->write($i,0,$code_departement);
				$worksheet->write($i,1,$obs['nom_sel']);
                $worksheet->write($i,2,$obs['nom_sel_nn']);
		        $worksheet->write($i,3,$obs['nom_ret']);
                $worksheet->write($i,4,$obs['nom_ret_nn']);
		        $worksheet->write($i,5,$obs['nt']);
        		$worksheet->write($i,6,$obs['famille']);
                $worksheet->write($i,7,$obs['zone_geo']);
        		$worksheet->write($i,8,$obs['date_observation']);
                $worksheet->write($i,9,$obs['lieudit']);
		        $worksheet->write($i,10,$obs['station']);
		        $worksheet->write($i,11,$obs['milieu']);
        		$worksheet->write($i,12,$obs['commentaire']);
        		$worksheet->write($i,13,$obs['courriel_utilisateur']);
        		
        		$i++;		
			}			
		}
				
		// sending HTTP headers
		$workbook->send('liste.xls');
		$workbook->close();
		
		exit();					
	}	
}

/* +--Fin du code ---------------------------------------------------------------------------------------+
* $Log$
* Revision 1.1  2008-11-13 11:29:12  ddelon
* Reecriture gwt-ext
*
* Revision 1.2  2008-01-30 08:57:28  ddelon
* fin mise en place mygwt
*
* Revision 1.1  2007-06-06 13:31:16  ddelon
* v0.09
*
* Revision 1.3  2007-05-22 12:54:09  ddelon
* Securisation acces utilisateur
*
*
* 
*/
?>