Subversion Repositories eFlore/Applications.cel

<?php

// In utf8

// Out iso3859

// Liste des Nouvelles observations par departement

Class InventoryByDept extends DBAccessor {

	var $config;

	var $extendSpreadsheetProductor;

	function InventoryByDept($config) {

		$this->config=$config;

		// Pas d'heritage multiple en php :(

		$this->extendSpreadsheetProductor = new SpreadsheetProductor();

		$this->extendSpreadsheetProductor->initSpreadsheet();

	}

	function getRessource(){

			$DB=$this->connectDB($this->config,'database_cel');

			$query="SELECT id_location, identifiant, ordre, nom_sel, num_nom_sel, nom_ret, num_nom_ret, num_taxon, famille, location, date_observation," .

		           " lieudit, station, milieu, commentaire, transmission  FROM cel_inventory ".

					"where id_location!='000null' and transmission=1 and num_taxon!=0 order by round(id_location), nom_ret";

   		    $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,'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');

    		$DB2=$this->connectDB($this->config);

    		$i=1;

			while ($row =& $res->fetchrow(DB_FETCHMODE_ASSOC)) {

					$query2="SELECT ecd_ce_taxon FROM eflore_zg, eflore_chorologie_donnee WHERE ecd_ce_taxon =".$row['num_taxon']." and ezg_code=".$row['id_location']." and ecd_ce_zone_geo=ezg_id_zone_geo and  ezg_id_projet_zg =ecd_ce_version_projet_zg and ecd_ce_version_projet_taxon=25";

					$res2 =& $DB2->query($query2);

			        if (DB::isError($res2)) {

    		        	die($res2->getMessage());

        			}

					if ($res2->numRows() == 0) {

					 	// 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['id_location']);

    					$worksheet->write($i,1,$row['nom_sel']);

		                $worksheet->write($i,2,$row['num_nom_sel']);

        		        $worksheet->write($i,3,$row['nom_ret']);

		                $worksheet->write($i,4,$row['num_nom_ret']);

        		        $worksheet->write($i,5,$row['num_taxon']);

                		$worksheet->write($i,6,$row['famille']);

		                $worksheet->write($i,7,$row['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['identifiant']);

                		$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

*

*

*

*/

?>