Subversion Repositories eFlore/Applications.cel

Rev

Rev 1598 | Rev 1609 | Go to most recent revision | Only display areas with differences | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

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