mappe per georeferenziazione
Non puoi selezionare più di 25 argomenti Gli argomenti devono iniziare con una lettera o un numero, possono includere trattini ('-') e possono essere lunghi fino a 35 caratteri.

658 righe
30 KiB

2 anni fa
<!-- ======================= DATI CDU START ======================== -->
<?php
// AREA INTERESSATA DALLA PARTICELLA RISPETTO ALLA ZONIZZAZIONE
if(!$query3 = @pg_query("SELECT gid, foglio, numero, ST_AsText(the_geom) AS geometria, ST_Area(the_geom) as area FROM ".$comu_cata." where gid = $cataid;"))
die("ERROR STR2: " . pg_last_error($conn));
while($row3 = pg_fetch_assoc($query3)) {
$_SESSION['THE_GEOM'] = $row3['geometria'];
$foglio = $row3['foglio'];
$area_sezione = $row3['area'];
$particella = $row3['numero'];
$idparticella = $row3['gid'];
// PARTICELLE INTERESSATE
echo "\n\t<tr>\n\t\t<td class='particella' colspan='3'>&nbsp;&nbsp;&nbsp;Foglio {$foglio}&nbsp;&nbsp;e&nbsp;&nbsp;Particella {$particella}</td>\n\t</tr>";
//####### BEGIN RECORD ########
$record_paesaggio[] = "Foglio ".$foglio." - Particella".$particella."\n";
$record_tutela[] = "Foglio ".$foglio." - Particella".$particella."\n";
$record_vincoli[] = "Foglio ".$foglio." - Particella".$particella."\n";
//####### END RECORD ########
// INIZIO DEFINIZIONE DELLA COPERTURA DELLA ZONAZIONE
if(!$query4 = @pg_query("SELECT zon_sigla, zon_descr, ST_Area(the_geom) as areazto, zon_art FROM ".
" (SELECT ST_Intersection(e.the_geom, f.the_geom) as the_geom, e.zon_sigla, e.zon_descr, e.zon_art FROM ".
" (SELECT a.the_geom, a.zon_sigla, a.zon_descr, a.zon_art FROM $comu_prg a inner join ".
" (SELECT the_geom FROM $comu_cata where gid = $idparticella) b on ST_Intersects(a.the_geom, b.the_geom)) e inner join ".
" (SELECT * FROM $comu_cata where gid = $idparticella) f on ST_Intersects(e.the_geom, f.the_geom)) a;"))
die("ERROR STR3: " . pg_last_error($conn));
while($row4 = pg_fetch_assoc($query4)) {
$areazto = $row4['areazto'];
$areazto_percent = round(($areazto/$area_sezione)*100,2);
$areazto_percentuale[] = round(($areazto/$area_sezione)*100,2);
// PARAMETRI DELLA COPERTURA DI PRG
if ($areazto_percent > 80) {
$copertura_zonprg = "Completamente";
}
if ($areazto_percent > 60 AND $areazto_percent < 80) {
$copertura_zonprg = "Per la maggior parte";
}
if ($areazto_percent > 40 AND $areazto_percent < 59) {
$copertura_zonprg = "In parte";
}
if ($areazto_percent > 10 AND $areazto_percent < 39) {
$copertura_zonprg = "In minima parte";
}
$zto_array[] = $row4['zon_sigla']." - ".row4['zon_descr'];
//####### BEGIN RECORD ########
//$record_form[] = row4['zon_descr']."\n";
//####### END RECORD ########
if ($areazto_percent > 10) { //SOGLIA DI VISUALIZZAZIONE SOVRAPPOSIZIONE (20%)
echo "\n\t<tr>\n\t\t<td class='zoning'>Zona di PRG</td>\n\t\t<td class='zoning'>{$row4['zon_sigla']} - {$row4['zon_descr']}</td>\n\t\t<td class='zoning'>&nbsp;&nbsp;&nbsp;{$copertura_zonprg}&nbsp;({$areazto_percent}%)</td>\n\t</tr>";
$ntart[] = $row4['zon_art'];
}
}
// FINE DEFINIZIONE DELLA COPERTURA DELLA ZONAZIONE
// INIZIO DEFINIZIONE DELLA COPERTURA DEI VINCOLI DI PRG
if(!$query5 = @pg_query("SELECT zon_descr, ST_Area(the_geom) as areavinc from ".
" (SELECT ST_Intersection(e.the_geom, f.the_geom) as the_geom, e.zon_descr FROM ".
" (SELECT a.the_geom, a.zon_descr from ".$comu_vincoprg." a inner join ".
" (SELECT the_geom FROM ".$comu_cata." where gid=$idparticella) b on ST_Intersects(a.the_geom, b.the_geom)) e inner join ".
" (SELECT * FROM ".$comu_cata." where gid=$idparticella) f on ST_Intersects(e.the_geom, f.the_geom)) a;"))
die("Error STR4: " . pg_last_error($conn));
$row_query5 = pg_num_rows($query5);
if ($row_query5 > 0) {
while($row5 = pg_fetch_assoc($query5)) {
$area_vinc = $row5['areavinc'];
$areavinc_percent = round(($area_vinc/$area_sezione)*100,2);
// PARAMETRI DELLA COPERTURA DEI VINCOLI
if ($areavinc_percent > 80) {
$copertura_vincprg = "Completamente";
}
if ($areavinc_percent > 60 AND $areavinc_percent < 80) {
$copertura_vincprg = "Per la maggior parte";
}
if ($areavinc_percent > 40 AND $areavinc_percent < 59) {
$copertura_vincprg = "In parte";
}
if ($areavinc_percent > 10 AND $areavinc_percent < 39) {
$copertura_vincprg = "In minima parte";
}
if ($areavinc_percent > 10) { //SOGLIA DI VISUALIZZAZIONE SOVRAPPOSIZIONE (20%)
echo "\n\t<tr>\n\t\t<td class='zoning'>Vincolo di PRG</td>\n\t\t<td class='zoning'>{$row5['zon_descr']}</td>\n\t\t<td class='zoning'>&nbsp;&nbsp;&nbsp;{$copertura_vincprg}&nbsp;({$areavinc_percent}%)</td>\n\t</tr>";
}
}
}
// FINE DEFINIZIONE DELLA COPERTURA DEI VINCOLI DI PRG
// INIZIO DEFINIZIONE DELLA COPERTURA DEI VINCOLI BBCCAA
//DEFINIZIONE conndbESSIONE
if(!$query6 = @pg_query("SELECT art142_a, art142_b, art142_c, art142_f, art142_g, art142_m, art10_arch, art134_a, art134_c, liv_tutela, contesto, nome_conte, ST_Area(the_geom) as areabbccaa FROM ".
" (SELECT ST_Intersection(e.the_geom, f.the_geom) as the_geom, e.art142_a, e.art142_b, e.art142_c, e.art142_f, e.art142_g, e.art142_m, e.art10_arch, e.art134_a, e.art134_c, e.liv_tutela, e.contesto, e.nome_conte FROM ".
" (SELECT a.the_geom, a.art142_a, a.art142_b, a.art142_c, a.art142_f, a.art142_g, a.art142_m, a.art10_arch, a.art134_a, a.art134_c, a.liv_tutela, a.contesto, a.nome_conte FROM dbcarto.regimi_normativi_".strtolower($_SESSION['COMUNE_PROV'])." a inner join ".
" (SELECT ST_GeomFromEWKT('SRID=3004;".$_SESSION['THE_GEOM']."') as the_geom) b on ST_Intersects(a.the_geom, b.the_geom)) e inner join ".
" (SELECT ST_GeomFromEWKT('SRID=3004;".$_SESSION['THE_GEOM']."') as the_geom) f on ST_Intersects(e.the_geom, f.the_geom)) a;"))
die("ERROR STR5: " . pg_last_error($conn));
$row_query6 = pg_num_rows($query6);
if ($row_query6 > 0) {
//echo "####".$row_query6. "####";
while($row6 = pg_fetch_assoc($query6)) {
$area_bbccaa = $row6['areabbccaa'];
$area_bbccaa_percent = round(($area_bbccaa/$area_sezione)*100,2);
// PARAMETRI DELLA COPERTURA DEI VINCOLI
if ($area_bbccaa_percent > 80) {
$copertura_bbccaa = "Completamente";
}
if ($area_bbccaa_percent > 60 AND $area_bbccaa_percent < 80) {
$copertura_bbccaa = "Per la maggior parte";
}
if ($area_bbccaa_percent > 40 AND $area_bbccaa_percent < 59) {
$copertura_bbccaa = "In parte";
}
if ($area_bbccaa_percent > 10 AND $area_bbccaa_percent < 39) {
$copertura_bbccaa = "In minima parte";
}
if ($row6['art142_a'] <> "") {
$art142_a = "<b>Art.142a - Aree tutelate per legge</b>:<br>territori costieri compresi in una fascia di 300m dalla linea di battigia<br>";
}
if ($row6['art142_b'] <> "") {
$art142_b = "<b>Art.142b - Aree tutelate per legge</b>:<br>territori contermini ai laghi in una fascia di 300m dalla linea di battigia<br>";
}
if ($row6['art142_c'] <> "") {
$art142_c = "<b>Art.142c - Aree tutelate per legge</b>:<br>fascia di 150m da fiumi, torrenti e corsi d'acqua<br>";
}
if ($row6['art142_f'] <> "") {
$art142_f = "<b>Art.142f - Aree tutelate per legge</b>:<br>parchi e riserve nazionali o regionali<br>";
}
if ($row6['art142_g'] <> "") {
$art142_g = "<b>Art.142g - Aree tutelate per legge</b>:<br>territori coperti da foreste e da boschi anche percorsi o danneggiati dal fuoco<br>";
}
if ($row6['art142_m'] <> "") {
$art142_m = "<b>Art.142m - Aree tutelate per legge</b>:<br>zone di interesse archeologico<br>";
}
if ($row6['art10_arch'] <> "") {
$art10_arch = "<b>Art.10 - comma 11 L.R. 6 aprile 1996</b>:<br>zona di rispetto dei boschi e delle fasce forestali<br>";
}
if ($row6['art134_a'] <> "") {
$art134_a = "<b>Art.134a - Vincoli Paesaggistici ex L. 1497/39</b><br>";
}
if ($row6['art134_c'] <> "") {
$art134_c = "<b>Art.134c - Codice dei Beni Culturali e del Paesaggio<br>";
}
switch ($row6['liv_tutela']) {
case 1:
$bbccaa = "Livello di tutela 1";
break;
case 2:
$bbccaa = "Livello di tutela 2";
break;
case 3:
$bbccaa = "Livello di tutela 3";
break;
case 4:
$bbccaa = "Livello di tutela 4";
break;
default:
$bbccaa = "";
}
if ($area_bbccaa_percent > 1) { //SOGLIA DI VISUALIZZAZIONE SOVRAPPOSIZIONE (20%)
echo "\n\t<tr>\n\t\t<td class='zoning'>Piano Paesaggistico Regionale</td>\n\t\t<td class='zoning'>{$bbccaa} - Contesto <b>{$row6['contesto']}</b><br>
<b>{$row6['nome_conte']}</b><br>
{$art142_a}{$art142_b}{$art142_c}{$art142_f}{$art142_g}{$art142_m}{$art142_m}{$art134_a}{$art134_c}
</td>\n\t\t<td class='zoning'>&nbsp;&nbsp;&nbsp;{$copertura_bbccaa}&nbsp;({$area_bbccaa_percent}%)</td>\n\t</tr>";
//####### BEGIN RECORD ########
$record_paesaggio[] = $row6['nome_conte']."\n";
$record_tutela[] = $bbccaa."\n";
//####### END RECORD ########
}
}
// FINE DEFINIZIONE DELLA COPERTURA DEI VINCOLI BBCCAA
}
// INIZIO DEFINIZIONE DELLA COPERTURA DEL VINCOLO IDROGEOLOGICO
if(!$query7 = @pg_query("SELECT ST_Area(the_geom) as areaidro from ".
" (SELECT ST_Intersection(e.the_geom, f.the_geom) as the_geom FROM ".
" (SELECT a.the_geom FROM dbcarto.sif_vincolo_idrogeo_sicilia a inner join ".
" (SELECT ST_GeomFromEWKT('SRID=3004;".$_SESSION['THE_GEOM']."') as the_geom) b on ST_Intersects(a.the_geom, b.the_geom)) e inner join ".
" (SELECT ST_GeomFromEWKT('SRID=3004;".$_SESSION['THE_GEOM']."') as the_geom) f on ST_Intersects(e.the_geom, f.the_geom)) a;"))
die("ERROR STR6: " . pg_last_error($conn));
$row_query7 = pg_num_rows($query7);
if ($row_query7 > 0) {
//echo "#### - 7 ".$row_query7. "####";
while($row7 = pg_fetch_assoc($query7)) {
$area_idro = $row7['areaidro'];
$area_idro_percent = round(($area_idro/$area_sezione)*100,2);
// PARAMETRI DELLA COPERTURA DEI VINCOLI
if ($area_idro_percent > 80) {
$copertura_idro = "Completamente";
}
if ($area_idro_percent > 60 AND $area_idro_percent < 80) {
$copertura_idro = "Per la maggior parte";
}
if ($area_idro_percent > 40 AND $area_idro_percent < 59) {
$copertura_idro = "In parte";
}
if ($area_idro_percent > 10 AND $area_idro_percent < 39) {
$copertura_idro = "In minima parte";
}
if ($area_idro_percent > 10) { //SOGLIA DI VISUALIZZAZIONE SOVRAPPOSIZIONE (20%)
echo "\n\t<tr>\n\t\t<td class='zoning'>Vincolo Idrogeologico</td>\n\t\t<td class='zoning'>R.D.L. n° 3267 del 30/12/1923</td>\n\t\t<td class='zoning'>&nbsp;&nbsp;&nbsp;{$copertura_idro}&nbsp;({$area_idro_percent}%)</td>\n\t</tr>";
}
}
}
// FINE DEFINIZIONE DELLA COPERTURA VINCOLO IDROGEOLOGICO
// INIZIO DEFINIZIONE DELLA COPERTURA DEL VINCOLO BOSCHI DL227
if(!$query8 = @pg_query("SELECT ST_Area(the_geom) as areadl227 from ".
" (SELECT ST_Intersection(e.the_geom, f.the_geom) as the_geom FROM ".
" (SELECT a.the_geom FROM dbcarto.cfrs_dl227 a inner join ".
" (SELECT ST_GeomFromEWKT('SRID=3004;".$_SESSION['THE_GEOM']."') as the_geom) b on ST_Intersects(a.the_geom, b.the_geom)) e inner join ".
" (SELECT ST_GeomFromEWKT('SRID=3004;".$_SESSION['THE_GEOM']."') as the_geom) f on ST_Intersects(e.the_geom, f.the_geom)) a;"))
die("ERROR STR7: " . pg_last_error($conn));
$row_query8 = pg_num_rows($query8);
if ($row_query8 > 0) {
//echo "#### - 7 ".$row_query7. "####";
while($row8 = pg_fetch_assoc($query8)) {
$area_dl227 = $row8['areadl227'];
$area_dl227_percent = round(($area_dl227/$area_sezione)*100,2);
// PARAMETRI DELLA COPERTURA DEI VINCOLI
if ($area_dl227_percent > 80) {
$copertura_dl227 = "Completamente";
}
if ($area_dl227_percent > 60 AND $area_dl227_percent < 80) {
$copertura_dl227 = "Per la maggior parte";
}
if ($area_dl227_percent > 40 AND $area_dl227_percent < 59) {
$copertura_dl227 = "In parte";
}
if ($area_dl227_percent > 10 AND $area_dl227_percent < 39) {
$copertura_dl227 = "In minima parte";
}
if ($area_dl227_percent > 10) { //SOGLIA DI VISUALIZZAZIONE SOVRAPPOSIZIONE (20%)
echo "\n\t<tr>\n\t\t<td class='zoning'>Vincolo Boschi</td>\n\t\t<td class='zoning'>&nbsp;&nbsp;Art.2 D.L. 18 maggio 2001, n. 227</td>\n\t\t<td class='zoning'>&nbsp;&nbsp;&nbsp;{$copertura_dl227}&nbsp;({$area_dl227_percent}%)</td>\n\t</tr>";
//####### BEGIN RECORD ########
$record_vincoli[] = "Vincolo Boschi (Art.2 D.L. 18 maggio 2001, n. 227)\n";
//####### END RECORD ########
}
}
}
// FINE DEFINIZIONE DELLA COPERTURA DEL VINCOLO BOSCHI DL227
// INIZIO DEFINIZIONE DELLA COPERTURA DEL VINCOLO BOSCHI LR16
if(!$query8 = @pg_query("SELECT ST_Area(the_geom) as arealr16 from ".
" (SELECT ST_Intersection(e.the_geom, f.the_geom) as the_geom FROM ".
" (SELECT a.the_geom FROM dbcarto.cfrs_lr16 a inner join ".
" (SELECT ST_GeomFromEWKT('SRID=3004;".$_SESSION['THE_GEOM']."') as the_geom) b on ST_Intersects(a.the_geom, b.the_geom)) e inner join ".
" (SELECT ST_GeomFromEWKT('SRID=3004;".$_SESSION['THE_GEOM']."') as the_geom) f on ST_Intersects(e.the_geom, f.the_geom)) a;"))
die("ERROR STR8c: " . pg_last_error($conn));
$row_query8 = pg_num_rows($query8);
if ($row_query8 > 0) {
//echo "#### - 7 ".$row_query7. "####";
while($row8 = pg_fetch_assoc($query8)) {
$area_lr16 = $row8['arealr16'];
$area_lr16_percent = round(($area_lr16/$area_sezione)*100,2);
// PARAMETRI DELLA COPERTURA DEI VINCOLI
if ($area_lr16_percent > 80) {
$copertura_lr16 = "Completamente";
}
if ($area_lr16_percent > 60 AND $area_lr16_percent < 80) {
$copertura_lr16 = "Per la maggior parte";
}
if ($area_lr16_percent > 40 AND $area_lr16_percent < 59) {
$copertura_lr16 = "In parte";
}
if ($area_lr16_percent > 10 AND $area_lr16_percent < 39) {
$copertura_lr16 = "In minima parte";
}
if ($area_lr16_percent > 10) { //SOGLIA DI VISUALIZZAZIONE SOVRAPPOSIZIONE (20%)
echo "\n\t<tr>\n\t\t<td class='zoning'>Vincolo Boschi</td>\n\t\t<td class='zoning'>&nbsp;&nbsp;L.R. 16/96 art. 4</td>\n\t\t<td class='zoning'>&nbsp;&nbsp;&nbsp;{$copertura_lr16}&nbsp;({$area_lr16_percent}%)</td>\n\t</tr>";
//####### BEGIN RECORD ########
$record_vincoli[] = "Vincolo Boschi (L.R. 16/96 art. 4)\n";
//####### END RECORD ########
}
}
}
// FINE DEFINIZIONE DELLA COPERTURA DEL VINCOLO BOSCHI LR16
// INIZIO DEFINIZIONE DELLA COPERTURA SIC-ZPS
if(!$query81 = @pg_query("SELECT codice, denomi, ST_Area(the_geom) as areasiczps from ".
" (SELECT ST_Intersection(e.the_geom, f.the_geom) as the_geom, e.codice, e.denomi FROM ".
" (SELECT a.codice, a.denomi, a.the_geom FROM dbcarto.sic_zps_sicilia a inner join ".
" (SELECT ST_GeomFromEWKT('SRID=3004;".$_SESSION['THE_GEOM']."') as the_geom) b on ST_Intersects(a.the_geom, b.the_geom)) e inner join ".
" (SELECT ST_GeomFromEWKT('SRID=3004;".$_SESSION['THE_GEOM']."') as the_geom) f on ST_Intersects(e.the_geom, f.the_geom)) a;"))
die("ERROR STR8a: " . pg_last_error($conndb));
$row_query81 = pg_num_rows($query81);
if ($row_query81 > 0) {
//echo "#### - 7 ".$row_query7. "####";
while($row81 = pg_fetch_assoc($query81)) {
$area_siczps = $row81['areasiczps'];
$area_siczps_percent = round(($area_siczps/$area_sezione)*100,2);
// PARAMETRI DELLA COPERTURA DEI VINCOLI
if ($$area_siczps_percent > 80) {
$copertura_siczps = "Completamente";
}
if ($area_siczps_percent > 60 AND $area_siczps_percent < 80) {
$copertura_siczps = "Per la maggior parte";
}
if ($area_siczps_percent > 40 AND $area_siczps_percent < 59) {
$copertura_siczps = "In parte";
}
if ($$area_siczps_percent > 10 AND $area_siczps_percent < 39) {
$copertura_siczps = "In minima parte";
}
if ($area_siczps_percent > 10) { //SOGLIA DI VISUALIZZAZIONE SOVRAPPOSIZIONE (20%)
echo "\n\t<tr>\n\t\t<td class='zoning'>SIC - ZPS</td>\n\t\t<td class='zoning'>{$row81['codice']} - {$row81['denominazi']}</td>\n\t\t<td class='zoning'>&nbsp;&nbsp;&nbsp;{$copertura_siczps}&nbsp;({$area_siczps_percent}%)</td>\n\t</tr>";
//####### BEGIN RECORD ########
$record_vincoli[] = "SIC-ZPS (".$row81['codice']."-".$row81['denominazi'].")\n";
//####### END RECORD ########
}
}
}
// FINE DEFINIZIONE DELLA COPERTURA SIC-ZPS
// INIZIO DEFINIZIONE DELLA COPERTURA RISERVE
if(!$query82 = @pg_query("SELECT codice, denom, ST_Area(the_geom) as areariserve from ".
" (SELECT ST_Intersection(e.the_geom, f.the_geom) as the_geom, e.codice, e.denom FROM ".
" (SELECT a.codice, a.denom, a.the_geom FROM dbcarto.riserve_sicilia a inner join ".
" (SELECT ST_GeomFromEWKT('SRID=3004;".$_SESSION['THE_GEOM']."') as the_geom) b on ST_Intersects(a.the_geom, b.the_geom)) e inner join ".
" (SELECT ST_GeomFromEWKT('SRID=3004;".$_SESSION['THE_GEOM']."') as the_geom) f on ST_Intersects(e.the_geom, f.the_geom)) a;"))
die("ERROR STR8b: " . pg_last_error($conndb));
$row_query82 = pg_num_rows($query82);
if ($row_query82 > 0) {
//echo "#### - 7 ".$row_query7. "####";
while($row82 = pg_fetch_assoc($query82)) {
$area_riserva = $row82['areariserve'];
$area_riserva_percent = round(($area_riserva/$area_sezione)*100,2);
// PARAMETRI DELLA COPERTURA DEI VINCOLI
if ($area_riserva_percent > 80) {
$copertura_riserva = "Completamente";
}
if ($area_riserva_percent > 60 AND $area_riserva_percent < 80) {
$copertura_riserva = "Per la maggior parte";
}
if ($area_riserva_percent > 40 AND $area_riserva_percent < 59) {
$copertura_riserva = "In parte";
}
if ($area_riserva_percent > 10 AND $area_riserva_percent < 39) {
$copertura_riserva = "In minima parte";
}
if ($area_riserva_percent > 10) { //SOGLIA DI VISUALIZZAZIONE SOVRAPPOSIZIONE (20%)
echo "\n\t<tr>\n\t\t<td class='zoning'>RISERVE</td>\n\t\t<td class='zoning'>{$row82['codice']} - {$row82['denom']}</td>\n\t\t<td class='zoning'>&nbsp;&nbsp;&nbsp;{$copertura_riserva}&nbsp;({$area_riserva_percent}%)</td>\n\t</tr>";
//####### BEGIN RECORD ########
$record_vincoli[] = "RISERVE (".$row82['codice']."-".$row82['denom'].")\n";
//####### END RECORD ########
}
}
}
// FINE DEFINIZIONE DELLA COPERTURA RISERVE
// INIZIO DEFINIZIONE DELLA COPERTURA PAI IDRO RISCHIO
if(!$query9 = @pg_query("SELECT rischio, ST_Area(the_geom) as area_idro_rischio FROM ".
" (SELECT ST_Intersection(e.the_geom, f.the_geom) as the_geom, e.rischio FROM ".
" (SELECT a.the_geom, a.rischio FROM dbcarto.idro_r a inner join ".
" (SELECT ST_GeomFromEWKT('SRID=3004;".$_SESSION['THE_GEOM']."') as the_geom) b on ST_Intersects(a.the_geom, b.the_geom)) e inner join ".
" (SELECT ST_GeomFromEWKT('SRID=3004;".$_SESSION['THE_GEOM']."') as the_geom) f on ST_Intersects(e.the_geom, f.the_geom)) a;"))
die("ERROR STR9: " . pg_last_error($conndb));
$row_query9 = pg_num_rows($query9);
if ($row_query9 > 0) {
//echo "#### - 7 ".$row_query7. "####";
while($row9 = pg_fetch_assoc($query9)) {
$area_idro_r = $row9['area_idro_rischio'];
$area_idro_r_percent = round(($area_idro_r/$area_sezione)*100,2);
// PARAMETRI DELLA COPERTURA DEI VINCOLI
if ($area_idro_r_percent > 80) {
$copertura_pai_idro_r = "Completamente";
}
if ($area_idro_r_percent > 60 AND $area_idro_r_percent < 80) {
$copertura_pai_idro_r = "Per la maggior parte";
}
if ($area_idro_r_percent > 40 AND $area_idro_r_percent < 59) {
$copertura_pai_idro_r = "In parte";
}
if ($area_idro_r_percent > 10 AND $area_idro_r_percent < 39) {
$copertura_pai_idro_r = "In minima parte";
}
if ($area_idro_r_percent > 10) { //SOGLIA DI VISUALIZZAZIONE SOVRAPPOSIZIONE (20%)
echo "\n\t<tr>\n\t\t<td class='zoning'>P.A.I.</td>\n\t\t<td class='zoning'>Rischio Idraulico - {$row9['rischio']}</td>\n\t\t<td class='zoning'>&nbsp;&nbsp;&nbsp;{$copertura_pai_idro_r}&nbsp;({$area_idro_r_percent}%)</td>\n\t</tr>";
//####### BEGIN RECORD ########
$record_vincoli[] = "P.A.I. (Rischio Idraulico - ".$row9['rischio'].")\n";
//####### END RECORD ########
}
}
}
// FINE DEFINIZIONE DELLA COPERTURA PAI IDRO RISCHIO
// INIZIO DEFINIZIONE DELLA COPERTURA PAI IDRO PERICOLOSITA'
if(!$query10 = @pg_query("SELECT pericolo, ST_Area(the_geom) as area_idro_pericolo FROM ".
" (SELECT ST_Intersection(e.the_geom, f.the_geom) as the_geom, e.pericolo FROM ".
" (SELECT a.the_geom, a.pericolo FROM dbcarto.idro_p_sa a inner join ".
" (SELECT ST_GeomFromEWKT('SRID=3004;".$_SESSION['THE_GEOM']."') as the_geom) b on ST_Intersects(a.the_geom, b.the_geom)) e inner join ".
" (SELECT ST_GeomFromEWKT('SRID=3004;".$_SESSION['THE_GEOM']."') as the_geom) f on ST_Intersects(e.the_geom, f.the_geom)) a;"))
die("ERROR STR10: " . pg_last_error($conndb));
$row_query10 = pg_num_rows($query10);
if ($row_query10 > 0) {
//echo "#### - 7 ".$row_query7. "####";
while($row10 = pg_fetch_assoc($query10)) {
$area_idro_p = $row10['area_idro_pericolo'];
$area_idro_p_percent = round(($area_idro_p/$area_sezione)*100,2);
// PARAMETRI DELLA COPERTURA DEI VINCOLI
if ($area_idro_p_percent > 80) {
$copertura_pai_idro_p = "Completamente";
}
if ($area_idro_p_percent > 60 AND $area_idro_p_percent < 80) {
$copertura_pai_idro_p = "Per la maggior parte";
}
if ($area_idro_p_percent > 40 AND $area_idro_p_percent < 59) {
$copertura_pai_idro_p = "In parte";
}
if ($area_idro_p_percent > 10 AND $area_idro_p_percent < 39) {
$copertura_pai_idro_p = "In minima parte";
}
if ($area_idro_r_percent > 10) { //SOGLIA DI VISUALIZZAZIONE SOVRAPPOSIZIONE (20%)
echo "\n\t<tr>\n\t\t<td class='zoning'>P.A.I.</td>\n\t\t<td class='zoning'>Pericolosità Idraulica - {$row10['pericolo']}</td>\n\t\t<td class='zoning'>&nbsp;&nbsp;&nbsp;{$copertura_pai_idro_p}&nbsp;({$area_idro_p_percent}%)</td>\n\t</tr>";
//####### BEGIN RECORD ########
$record_vincoli[] = "P.A.I. (Pericolosità Idraulica - ".$row10['pericolo'].")\n";
//####### END RECORD ########
}
}
}
// FINE DEFINIZIONE DELLA COPERTURA PAI IDRO RISCHIO
// INIZIO DEFINIZIONE DELLA COPERTURA PAI GEOMORF RISCHIO
if(!$query11 = @pg_query("SELECT rischio, ST_Area(the_geom) as area_geo_rischio FROM ".
" (SELECT ST_Intersection(e.the_geom, f.the_geom) as the_geom, e.rischio FROM ".
" (SELECT a.the_geom, a.rischio FROM dbcarto.geo_rischio a inner join ".
" (SELECT ST_GeomFromEWKT('SRID=3004;".$_SESSION['THE_GEOM']."') as the_geom) b on ST_Intersects(a.the_geom, b.the_geom)) e inner join ".
" (SELECT ST_GeomFromEWKT('SRID=3004;".$_SESSION['THE_GEOM']."') as the_geom) f on ST_Intersects(e.the_geom, f.the_geom)) a;"))
die("ERROR STR10: " . pg_last_error($conndb));
$row_query11 = pg_num_rows($query11);
if ($row_query11 > 0) {
//echo "#### - 7 ".$row_query7. "####";
while($row11 = pg_fetch_assoc($query11)) {
$area_geo_r = $row11['area_geo_rischio'];
$area_geo_r_percent = round(($area_geo_r/$area_sezione)*100,2);
// PARAMETRI DELLA COPERTURA DEI VINCOLI
if ($area_geo_r_percent > 80) {
$copertura_pai_geo_r = "Completamente";
}
if ($area_geo_r_percent > 60 AND $area_geo_r_percent < 80) {
$copertura_pai_geo_r = "Per la maggior parte";
}
if ($area_geo_r_percent > 40 AND $area_geo_r_percent < 59) {
$copertura_pai_geo_r = "In parte";
}
if ($area_geo_r_percent > 10 AND $area_geo_r_percent < 39) {
$copertura_pai_geo_r = "In minima parte";
}
if ($area_geo_r_percent > 10) { //SOGLIA DI VISUALIZZAZIONE SOVRAPPOSIZIONE (20%)
echo "\n\t<tr>\n\t\t<td class='zoning'>P.A.I.</td>\n\t\t<td class='zoning'>Rischio Geomorfologico - {$row11['rischio']}</td>\n\t\t<td class='zoning'>&nbsp;&nbsp;&nbsp;{$copertura_pai_geo_r}&nbsp;({$area_geo_r_percent}%)</td>\n\t</tr>";
//####### BEGIN RECORD ########
$record_vincoli[] = "P.A.I. (Rischio Geomorfologico - ".$row11['rischio'].")\n";
//####### END RECORD ########
}
}
}
// FINE DEFINIZIONE DELLA COPERTURA PAI GEOMORF RISCHIO
// INIZIO DEFINIZIONE DELLA COPERTURA PAI GEOMORF PERICOLOSITA
if(!$query12 = @pg_query("SELECT pericolo, ST_Area(the_geom) as area_geo_pericolo FROM ".
" (SELECT ST_Intersection(e.the_geom, f.the_geom) as the_geom, e.pericolo FROM ".
" (SELECT a.the_geom, a.pericolo FROM dbcarto.geo_p_crolli a inner join ".
" (SELECT ST_GeomFromEWKT('SRID=3004;".$_SESSION['THE_GEOM']."') as the_geom) b on ST_Intersects(a.the_geom, b.the_geom)) e inner join ".
" (SELECT ST_GeomFromEWKT('SRID=3004;".$_SESSION['THE_GEOM']."') as the_geom) f on ST_Intersects(e.the_geom, f.the_geom)) a;"))
die("ERROR STR10: " . pg_last_error($conndb));
$row_query12 = pg_num_rows($query12);
if ($row_query12 > 0) {
//echo "#### - 7 ".$row_query7. "####";
while($row12 = pg_fetch_assoc($query12)) {
$area_geo_p = $row12['area_geo_pericolo'];
$area_geo_p_percent = round(($area_geo_p/$area_sezione)*100,2);
// PARAMETRI DELLA COPERTURA DEI VINCOLI
if ($area_geo_p_percent > 80) {
$copertura_pai_geo_p = "Completamente";
}
if ($area_geo_p_percent > 60 AND $area_geo_p_percent < 80) {
$copertura_pai_geo_r = "Per la maggior parte";
}
if ($area_geo_p_percent > 40 AND $area_geo_p_percent < 59) {
$copertura_pai_geo_p = "In parte";
}
if ($area_geo_p_percent > 10 AND $area_geo_p_percent < 39) {
$copertura_pai_geo_p = "In minima parte";
}
if ($area_geo_p_percent > 10) { //SOGLIA DI VISUALIZZAZIONE SOVRAPPOSIZIONE (20%)
echo "\n\t<tr>\n\t\t<td class='zoning'>P.A.I.</td>\n\t\t<td class='zoning'>Pericolosità Geomorfologica - {$row12['pericolo']}</td>\n\t\t<td class='zoning'>&nbsp;&nbsp;&nbsp;{$copertura_pai_geo_p}&nbsp;({$area_geo_p_percent}%)</td>\n\t</tr>";
//####### BEGIN RECORD ########
$record_vincoli[] = "P.A.I. (Pericolosità Geomorfologica - ".$row12['pericolo'].")\n";
//####### END RECORD ########
}
}
}
// FINE DEFINIZIONE DELLA COPERTURA PAI GEOMORF PERICOLOSITA
// INIZIO DEFINIZIONE DELLA COPERTURA INCENDI
if(!$queryfire = @pg_query("SELECT dat_segn, ST_Area(the_geom) as area_fire FROM ".
" (SELECT ST_Intersection(e.the_geom, f.the_geom) as the_geom, e.dat_segn FROM ".
" (SELECT a.the_geom, a.dat_segn FROM public.incendi a inner join ".
" (SELECT ST_GeomFromEWKT('SRID=3004;".$_SESSION['THE_GEOM']."') as the_geom) b on ST_Intersects(a.the_geom, b.the_geom)) e inner join ".
" (SELECT ST_GeomFromEWKT('SRID=3004;".$_SESSION['THE_GEOM']."') as the_geom) f on ST_Intersects(e.the_geom, f.the_geom)) a;"))
die("ERROR STR10: " . pg_last_error($conndb));
$row_queryfire = pg_num_rows($queryfire);
if ($row_queryfire > 0) {
//echo "#### - 7 ".$row_query7. "####";
while($rowfire = pg_fetch_assoc($queryfire)) {
$area_fire = $rowfire['area_fire'];
$area_fire_percent = round(($area_fire/$area_sezione)*100,2);
// PARAMETRI DELLA COPERTURA DEI VINCOLI
if ($area_fire_percent > 80) {
$copertura_fire = "Completamente";
}
if ($area_fire_percent > 60 AND $area_fire_percent < 80) {
$copertura_fire = "Per la maggior parte";
}
if ($area_fire_percent > 40 AND $area_fire_percent < 59) {
$copertura_fire = "In parte";
}
if ($area_fire_percent > 10 AND $area_fire_percent < 39) {
$copertura_fire = "In minima parte";
}
if ($area_fire_percent > 10) { //SOGLIA DI VISUALIZZAZIONE SOVRAPPOSIZIONE (20%)
echo "\n\t<tr>\n\t\t<td class='zoning'>AREE INCENDIATE</td>\n\t\t<td class='zoning'>Evento del {$rowfire['dat_segn']}</td>\n\t\t<td class='zoning'>&nbsp;&nbsp;&nbsp;{$copertura_fire}&nbsp;({$area_fire_percent}%)</td>\n\t</tr>";
}
}
}
// FINE DEFINIZIONE DELLA COPERTURA INCENDI
// INIZIO DEFINIZIONE DELLA COPERTURA SIN
if(!$querysin = @pg_query("SELECT denominaz, ST_Area(the_geom) as area_sin FROM ".
" (SELECT ST_Intersection(e.the_geom, f.the_geom) as the_geom, e.denominaz FROM ".
" (SELECT a.the_geom, a.denominaz FROM dbcarto.sin_priolo a inner join ".
" (SELECT ST_GeomFromEWKT('SRID=3004;".$_SESSION['THE_GEOM']."') as the_geom) b on ST_Intersects(a.the_geom, b.the_geom)) e inner join ".
" (SELECT ST_GeomFromEWKT('SRID=3004;".$_SESSION['THE_GEOM']."') as the_geom) f on ST_Intersects(e.the_geom, f.the_geom)) a;"))
die("ERROR STR10: " . pg_last_error($conndb));
$row_querysin = pg_num_rows($querysin);
if ($row_querysin > 0) {
//echo "#### - 7 ".$row_query7. "####";
while($rowsin = pg_fetch_assoc($querysin)) {
$area_sin = $rowsin['area_sin'];
$area_sin_percent = round(($area_sin/$area_sezione)*100,2);
// PARAMETRI DELLA COPERTURA DEI VINCOLI
if ($area_sin_percent > 80) {
$copertura_sin = "Completamente";
}
if ($area_sin_percent > 60 AND $area_sin_percent < 80) {
$copertura_sin = "Per la maggior parte";
}
if ($area_sin_percent > 40 AND $area_sin_percent < 59) {
$copertura_sin = "In parte";
}
if ($area_sin_percent > 10 AND $area_sin_percent < 39) {
$copertura_sin = "In minima parte";
}
if ($area_sin_percent > 10) { //SOGLIA DI VISUALIZZAZIONE SOVRAPPOSIZIONE (20%)
echo "\n\t<tr>\n\t\t<td class='zoning'>SIN</td>\n\t\t<td class='zoning'>{$rowsin['denominaz']}</td>\n\t\t<td class='zoning'>&nbsp;&nbsp;&nbsp;{$copertura_sin}&nbsp;({$area_sin_percent}%)</td>\n\t</tr>";
//####### BEGIN RECORD ########
$record_vincoli[] = "SIN (".$rowsin['denominaz'].")\n";
//####### END RECORD ########
}
}
}
// FINE DEFINIZIONE DELLA COPERTURA SIN
}
//pg_close($conndb);
?>
<!-- ======================= DATI CDU STOP ======================== -->