Subversion Repositories eFlore/Applications.cel

Rev

Go to most recent revision | Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
416 aurelien 1
<?php
904 aurelien 2
// ATTENTION ! Classe compatible uniquement avec nouveau format de bdd du cel //
416 aurelien 3
 
904 aurelien 4
/**
5
* PHP Version 5
6
*
7
* @category  PHP
8
* @package   jrest
9
* @author    David Delon <delon@tela-botanica.org>
10
* @copyright 2010 Tela-Botanica
11
* @license   http://www.cecill.info/licences/Licence_CeCILL_V2-fr.txt Licence CECILL
12
* @version   SVN: <svn_id>
13
* @link      /doc/
14
*/
416 aurelien 15
 
904 aurelien 16
/**
17
*
18
* in=utf8
19
* out=iso3859
20
*
21
* Liste des Nouvelles observations par departement
22
* A voir avec David mais ne devrait plus être utilisé
23
* ou fait autrement
24
*
25
*/
26
class InventoryByDept extends Cel {
416 aurelien 27
 
28
	var $extendSpreadsheetProductor;
29
 
30
	function InventoryByDept($config) {
31
 
904 aurelien 32
		parent::__construct($config);
33
 
416 aurelien 34
		// Pas d'heritage multiple en php :(
35
		$this->extendSpreadsheetProductor = new SpreadsheetProductor();
904 aurelien 36
		$this->extendSpreadsheetProductor->initSpreadsheet();
416 aurelien 37
	}
38
 
905 aurelien 39
	//TODO : faire une fonction qui prend en paramètre un departement
416 aurelien 40
	function getRessource(){
41
 
904 aurelien 42
		$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," .
43
		    " lieudit, station, milieu, commentaire, transmission  FROM cel_obs ".
44
			"WHERE ce_zone_geo != '000null' AND ce_zone_geo != '' AND transmission = 1 AND nt!=0 ORDER BY ce_zone_geo, nom_ret LIMIT 50";
45
 
46
		$resultat_obs = $this->executerRequete($requete_obs);
416 aurelien 47
 
904 aurelien 48
    	// Creating a workbook
49
		$workbook = new Spreadsheet_Excel_Writer();
50
		// Creating a worksheet
51
		$worksheet = $workbook->addWorksheet('Liste');
52
 
53
        $worksheet->write(0,0,'Departement');
54
        $worksheet->write(0,1,'Nom saisi');
55
        $worksheet->write(0,2,'Numero nomenclatural');
56
        $worksheet->write(0,3,'Nom retenu');
57
        $worksheet->write(0,4,'Numero nomenclatural nom retenu');
58
        $worksheet->write(0,5,'Numero taxonomique');
59
        $worksheet->write(0,6,'Famille');
60
        $worksheet->write(0,7,'Commune');
61
        $worksheet->write(0,8,'Date Observation');
62
        $worksheet->write(0,9,'Lieu dit');
63
        $worksheet->write(0,10,'Station');
64
        $worksheet->write(0,11,'Milieu');
65
        $worksheet->write(0,12,'Commentaire');
66
        $worksheet->write(0,13,'Observateur');
67
 
68
		$i=1;
416 aurelien 69
 
904 aurelien 70
		$observations = array();
71
		$chercheur_infos_taxon = null;
72
		if (is_array($resultat_obs)) {
73
			$observations = &$resultat_obs;
74
			$chercheur_infos_taxon = new RechercheInfosTaxon($this->config);
75
		}
76
 
77
		foreach ($observations as $obs) {
416 aurelien 78
 
904 aurelien 79
			$code_departement = $this->convertirCodeZoneGeoVersDepartement($obs['ce_zone_geo']);
80
			$taxon_deja_vu = $chercheur_infos_taxon->taxonEstPresentDansDepartement($obs['nt'], $code_departement);
81
 
82
			if (!$taxon_deja_vu) {
83
			 	// Denullifiage
84
				foreach($obs as $k=>$v) {
85
					if (($v=="null") || ($v=="000null")) {
86
						$obs[$k]="";
87
					}
88
					else {
89
						$obs[$k]=utf8_decode($v);
90
					}
91
				}
416 aurelien 92
 
904 aurelien 93
				if ($obs['date_observation']!="0000-00-00 00:00:00") {
996 aurelien 94
                	list($year,$month,$day)= explode('-',$obs['date_observation']);
95
    	            list($day)= explode(' ',$day);
904 aurelien 96
	                $obs['date_observation']=$day."/".$month."/".$year;
97
    	    	}
98
        		else {
99
            	    $obs['date_observation']="00/00/0000";
100
	        	}
416 aurelien 101
 
904 aurelien 102
				$worksheet->write($i,0,$code_departement);
103
				$worksheet->write($i,1,$obs['nom_sel']);
104
                $worksheet->write($i,2,$obs['nom_sel_nn']);
105
		        $worksheet->write($i,3,$obs['nom_ret']);
106
                $worksheet->write($i,4,$obs['nom_ret_nn']);
107
		        $worksheet->write($i,5,$obs['nt']);
108
        		$worksheet->write($i,6,$obs['famille']);
109
                $worksheet->write($i,7,$obs['zone_geo']);
110
        		$worksheet->write($i,8,$obs['date_observation']);
111
                $worksheet->write($i,9,$obs['lieudit']);
112
		        $worksheet->write($i,10,$obs['station']);
113
		        $worksheet->write($i,11,$obs['milieu']);
114
        		$worksheet->write($i,12,$obs['commentaire']);
115
        		$worksheet->write($i,13,$obs['courriel_utilisateur']);
116
 
117
        		$i++;
118
			}
119
		}
120
 
121
		// sending HTTP headers
122
		$workbook->send('liste.xls');
123
		$workbook->close();
416 aurelien 124
 
904 aurelien 125
		exit();
126
	}
416 aurelien 127
}
128
 
129
/* +--Fin du code ---------------------------------------------------------------------------------------+
130
* $Log$
131
* Revision 1.1  2008-11-13 11:29:12  ddelon
132
* Reecriture gwt-ext
133
*
134
* Revision 1.2  2008-01-30 08:57:28  ddelon
135
* fin mise en place mygwt
136
*
137
* Revision 1.1  2007-06-06 13:31:16  ddelon
138
* v0.09
139
*
140
* Revision 1.3  2007-05-22 12:54:09  ddelon
141
* Securisation acces utilisateur
142
*
143
*
144
*
145
*/
904 aurelien 146
?>