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
984 aurelien 2
// ATTENTION ! Classe compatible uniquement avec nouveau format de bdd du cel //
3
 
907 aurelien 4
/**
5
* PHP Version 5
6
*
7
* @category  PHP
8
* @package   jrest
9
* @author    David Delon <david@tela-botania.org>
10
* @author    Aurélien Peronnet <aurelien@tela-botania.org>
11
* @copyright 2010 Tela-Botanica
12
* @license   http://www.cecill.info/licences/Licence_CeCILL_V2-fr.txt Licence CECILL
13
* @version   SVN: <svn_id>
14
* @link      /doc/jrest/
15
*/
416 aurelien 16
 
907 aurelien 17
/**
18
* in:utf8
19
* out:iso8859
20
*
21
* Export vers feuille de calcul d'une selection de releves
22
*
23
*/
1606 raphael 24
 
25
set_include_path(get_include_path() . PATH_SEPARATOR . dirname(dirname(realpath(__FILE__))) . '/lib');
26
// la sortie est binaire (xls), mais OLE n'est pas compatible E_ALL en PHP-5.4
27
error_reporting(error_reporting() ^ E_STRICT);
28
require_once("lib/OLE.php");
29
require_once("lib/Spreadsheet/Excel/Writer.php");
30
 
907 aurelien 31
class InventoryExport extends Cel  {
416 aurelien 32
 
907 aurelien 33
	private $extendSpreadsheetProductor;
416 aurelien 34
 
35
	function InventoryExport($config) {
36
 
907 aurelien 37
		parent::__construct($config);
416 aurelien 38
 
39
		$this->extendSpreadsheetProductor = new SpreadsheetProductor();
40
		$this->extendSpreadsheetProductor->initSpreadsheet();
41
	}
42
 
43
	function getElement($uid){
44
 
45
		   // Controle detournement utilisateur
624 aurelien 46
		 	$this->controleUtilisateur($uid[0]);
416 aurelien 47
 
1297 aurelien 48
			$criteres = $_GET;
907 aurelien 49
			$chercheur_observations = new RechercheObservation($this->config);
416 aurelien 50
 
51
    	    // Creating a workbook
52
			$workbook = new Spreadsheet_Excel_Writer();
53
 
540 david 54
			$workbook->send('liste.xls');
55
 
416 aurelien 56
			// Creating a worksheet
57
			$worksheet = $workbook->addWorksheet('Liste');
624 aurelien 58
 
59
            $worksheet->write(0,0,'Espece');
416 aurelien 60
            $worksheet->write(0,1,'Numero nomenclatural');
61
            $worksheet->write(0,2,'Nom retenu');
62
            $worksheet->write(0,3,'Numero nomenclatural nom retenu');
63
            $worksheet->write(0,4,'Numero taxonomique');
64
            $worksheet->write(0,5,'Famille');
1527 aurelien 65
            $worksheet->write(0,6,'Referentiel taxonomique');
66
            $worksheet->write(0,7,'Commune');
67
            $worksheet->write(0,8,'Identifiant Commune');
68
            $worksheet->write(0,9,'Date');
69
            $worksheet->write(0,10,'Lieu-dit');
70
            $worksheet->write(0,11,'Station');
71
            $worksheet->write(0,12,'Milieu');
72
            $worksheet->write(0,13,'Notes');
73
            $worksheet->write(0,14,'Latitude');
74
            $worksheet->write(0,15,'Longitude');
75
            $worksheet->write(0,16,'Referentiel Geographique');
76
            $worksheet->write(0,17,'Ordre');
77
            $worksheet->write(0,18,'Identifiant');
907 aurelien 78
 
79
            $numero_page = isset($criteres['numero_page']) ? $criteres['numero_page'] : 0;
1398 aurelien 80
            $limite = isset($criteres['limite']) ? $criteres['limite'] : 0;
416 aurelien 81
 
907 aurelien 82
			$observations = $chercheur_observations->rechercherObservations($uid[0], $criteres, $numero_page, $limite);
1571 aurelien 83
			$ids_obs = array();
84
			$indices_lignes_obs = array();
85
 
416 aurelien 86
			$i=1;
1571 aurelien 87
			foreach ($observations as &$obs) {
416 aurelien 88
 
1598 raphael 89
				$obs = $this->denullifierTableauValeurCel($obs);
1571 aurelien 90
				$ids_obs[] = $obs['id_observation'];
91
				$indices_lignes_obs[$obs['id_observation']] = $i;
92
 
907 aurelien 93
			  	if ($obs['date_observation'] != "0000-00-00 00:00:00") {
94
	                $obs['date_observation'] = $this->formaterDate($obs['date_observation']);
416 aurelien 95
	        	}
96
	        	else {
907 aurelien 97
	                $obs['date_observation']="00/00/0000";
416 aurelien 98
	        	}
99
 
907 aurelien 100
                $worksheet->write($i,0,$obs['nom_sel']);
101
                $worksheet->write($i,1,$obs['nom_sel_nn']);
102
                $worksheet->write($i,2,$obs['nom_ret']);
103
                $worksheet->write($i,3,$obs['nom_ret_nn']);
104
                $worksheet->write($i,4,$obs['nt']);
105
                $worksheet->write($i,5,$obs['famille']);
1527 aurelien 106
                $worksheet->write($i,6,$obs['nom_referentiel']);
107
                $worksheet->write($i,7,$obs['zone_geo']);
108
                $worksheet->write($i,8,$this->convertirCodeZoneGeoVersDepartement($obs['ce_zone_geo']));
109
                $worksheet->write($i,9,$obs['date_observation']);
110
                $worksheet->write($i,10,$obs['lieudit']);
111
                $worksheet->write($i,11,$obs['station']);
112
                $worksheet->write($i,12,$obs['milieu']);
113
                $worksheet->write($i,13,$obs['commentaire']);
114
                $worksheet->write($i,14,$obs['latitude']);
115
                $worksheet->write($i,15,$obs['longitude']);
116
                $worksheet->write($i,16,$obs['geodatum']);
117
                $worksheet->write($i,17,$obs['ordre']);
118
                $worksheet->write($i,18,$obs['id_observation']);
416 aurelien 119
                $i++;
120
    	    }
1571 aurelien 121
 
122
    	    $indice_dernier_champ_supp = 19;
123
    	    $indices_champs_supp = array();
124
    	    $gestion_champs_etendus = new GestionChampsEtendus($this->config, 'obs');
125
    	    $champs_supp_par_obs = $gestion_champs_etendus->consulterParLots($ids_obs);
126
 
127
    	    foreach($champs_supp_par_obs as $id_obs => &$champs_supp) {
128
	    	    foreach($champs_supp as  &$champ_etendu) {
129
	    	    	$cle = $champ_etendu->cle;
130
	    	    	$label = $champ_etendu->label;
131
	    	    	$valeur = $champ_etendu->valeur;
132
	    	    	if(!isset($indices_champs_supp[$cle])) {
133
	    	    		$indices_champs_supp[$cle] = $indice_dernier_champ_supp;
134
	    	    		$worksheet->write(0, $indice_dernier_champ_supp, utf8_decode($label));
135
	    	    		$indice_dernier_champ_supp++;
136
	    	    	}
137
	    	    	$num_ligne_obs = $indices_lignes_obs[$id_obs];
138
	    	    	$worksheet->write($num_ligne_obs,$indices_champs_supp[$cle],utf8_decode($valeur));
139
	    	    }
140
    	    }
141
 
416 aurelien 142
			$workbook->close();
143
			exit();
144
	}
145
}
146
/* +--Fin du code ---------------------------------------------------------------------------------------+
147
* $Log$
148
* Revision 1.7  2008-11-13 11:29:12  ddelon
149
* Reecriture gwt-ext
150
*
151
* Revision 1.6  2008-01-30 08:57:28  ddelon
152
* fin mise en place mygwt
153
*
154
* Revision 1.5  2007-06-06 13:31:16  ddelon
155
* v0.09
156
*
157
* Revision 1.4  2007-05-22 12:54:09  ddelon
158
* Securisation acces utilisateur
159
*/
907 aurelien 160
?>