+
+
+
+
+ TIPO |
+ DESTINAZIONE |
+ COPERTURA |
+
+
+
+
+";
+ $foglio = $row3['foglio'];
+ $area_sezione = $row3['area'];
+ $particella = $row3['numero'];
+ $idparticella = $row3['id'];
+
+// PARTICELLE INTERESSATE
+echo "\n\t\n\t\t| Foglio {$foglio} e Particella {$particella} | \n\t ";
+
+//####### 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
+ $query_zoning = "SELECT a.descdest, ST_AREA(ST_intersection(a.geom, b.geom)) AS areazto FROM (SELECT descdest, geom FROM public.zoning_stir) a, (SELECT ST_GeomFromEWKT('SRID=25833;".$_SESSION['geom']."') as geom) b WHERE ST_Intersects (a.geom,b.geom)";
+ $result_query_zoning = pg_query($conn, $query_zoning) or die('Query query_zoning failied');
+
+ if (pg_num_rows($result_query_zoning) > 0) {
+ while($row4 = pg_fetch_assoc($result_query_zoning)) {
+ $areazto_percent = round(($row4['areazto']/$area_sezione)*100,2);
+
+ //$zto_array[] = $row4['zon_sigla']." - ".row4['zon_descr'];
+
+ //####### BEGIN RECORD ########
+ //$record_form[] = row4['zon_descr']."\n";
+ //####### END RECORD ########
+
+ if ($areazto_percent > 1) {
+ echo "\n\t\n\t\t| Zona di PRG | \n\t\t{$row4['descdest']} | \n\t\t ({$areazto_percent}%) | \n\t ";
+ //$ntart[] = $row4['zon_art'];
+
+ }}}
+// FINE DEFINIZIONE DELLA COPERTURA DELLA ZONAZIONE
+
+
+// INIZIO DEFINIZIONE DELLA COPERTURA DEI VINCOLI DI PRG
+ $query_prgvincoli = "SELECT a.zon_descr, ST_AREA(ST_intersection(a.geom, b.geom)) AS areavinc FROM (SELECT zon_descr, geom FROM ".strtolower($_SESSION['COMUNE_PROV']).".vincoli) a, (SELECT ST_GeomFromEWKT('SRID=25833;".$_SESSION['geom']."') as geom) b WHERE ST_Intersects (a.geom,b.geom)";
+ $result_query_prgvincoli = pg_query($conn, $query_prgvincoli) or die('Query query_prgvincoli failied');
+
+ if (pg_num_rows($result_query_prgvincoli) > 0) {
+ while($row5 = pg_fetch_assoc($result_query_prgvincoli)) {
+ $areavinc_percent = round(($row5['areavinc']/$area_sezione)*100,2);
+
+ if ($areavinc_percent > 10) {
+ echo "\n\t\n\t\t| Vincolo di PRG | \n\t\t{$row5['zon_descr']} | \n\t\t ({$areavinc_percent}%) | \n\t ";
+ }
+ }
+ }
+// FINE DEFINIZIONE DELLA COPERTURA DEI VINCOLI DI PRG
+
+// INIZIO DEFINIZIONE DELLA COPERTURA DEI VINCOLI BBCCAA
+ $query_regimi = "SELECT a.pl, a.liv_tutela, a.contesto, ST_AREA(ST_intersection(a.geom, b.geom)) AS areabbccaa FROM (SELECT pl, liv_tutela, contesto, geom FROM ".strtolower($_SESSION['COMUNE_PROV']).".regimi_normativi) a, (SELECT ST_GeomFromEWKT('SRID=25833;".$_SESSION['geom']."') as geom) b WHERE ST_Intersects (a.geom,b.geom)";
+ $result_query_regimi = pg_query($conn, $query_regimi) or die('Query query_regimi failied');
+
+ if (pg_num_rows($result_query_regimi) > 0) {
+ while($row6 = pg_fetch_assoc($result_query_regimi)) {
+ $area_bbccaa_percent = round(($row6['areabbccaa']/$area_sezione)*100,2);
+
+ 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) {
+ echo "\n\t\n\t\tPiano Paesaggistico Regionale
Regimi Normativi | \n\t\tPaesaggio locale {$row6['pl']}
{$bbccaa} - Contesto {$row6['contesto']}
+ {$row6['contesto']} | \n\t\t ({$area_bbccaa_percent}%) | \n\t ";
+
+ //####### BEGIN RECORD ########
+ $record_paesaggio[] = "Paesaggio Locale: ".$row6['pl']." Contesto: ".$row6['contesto']."\n";
+ $record_tutela[] = $bbccaa."\n";
+ //####### END RECORD ########
+ }}}
+// FINE DEFINIZIONE DELLA COPERTURA DEI VINCOLI BBCCAA
+
+
+
+if ($_SESSION['COMUNE_PROV'] == 'TP') {
+
+ // INIZIO DEFINIZIONE DELLA COPERTURA REGIMI NORMATIVI TP1
+ $query_regimi_tp1 = "SELECT a.regime_nor, a.denominazi, a.codice, ST_AREA(ST_intersection(a.geom, b.geom)) AS areatp1 FROM (SELECT regime_nor, denominazi, codice, geom FROM ".strtolower($_SESSION['COMUNE_PROV']).".regimi_normativi_tp1) a, (SELECT ST_GeomFromEWKT('SRID=25833;".$_SESSION['geom']."') as geom) b WHERE ST_Intersects (a.geom,b.geom)";
+ $result_query_regimi_tp1 = pg_query($conn, $query_regimi_tp1) or die('Query query_regimi_tp1 failied');
+
+ if (pg_num_rows($result_query_regimi_tp1) > 0) {
+ while($row6 = pg_fetch_assoc($result_query_regimi_tp1)) {
+ $area_bbccaa_percent = round(($row6['areatp1']/$area_sezione)*100,2);
+
+ if ($area_bbccaa_percent > 1) {
+ echo "\n\t\n\t\tPiano Paesaggistico Regionale
Regimi Normativi (Ambito 1) | \n\t\tDenominazione {$row6['denominazi']}
Codice {$row6['codice']} - Reg. Norm. {$row6['regime_nor']}
+ {$row6['contesto']} | \n\t\t ({$area_bbccaa_percent}%) | \n\t ";
+
+ //####### BEGIN RECORD ########
+ $record_paesaggio[] = "Denominazione: ".$row6['denominazi']." Codice: ".$row6['codice']."\n";
+ //####### END RECORD ########
+ }}}
+ // FINE DEFINIZIONE DELLA COPERTURA REGIMI NORMATIVI TP1
+
+ // INIZIO DEFINIZIONE DELLA COPERTURA FASCIA COSTA
+ $query_costa = "SELECT ST_AREA(ST_intersection(a.geom, b.geom)) AS area_costa FROM (SELECT geom FROM ".strtolower($_SESSION['COMUNE_PROV']).".fascia_rispetto_costa) a, (SELECT ST_GeomFromEWKT('SRID=25833;".$_SESSION['geom']."') as geom) b WHERE ST_Intersects (a.geom,b.geom)";
+ $result_query_costa = pg_query($conn, $query_costa) or die('Query query_costa failied');
+
+ if (pg_num_rows($result_query_costa) > 0) {
+ while($row6bb = pg_fetch_assoc($result_query_costa)) {
+ $area_v_percent = round(($row6bb['area_costa']/$area_sezione)*100,2);
+
+ if ($area_v_percent > 1) {
+ echo "\n\t\n\t\tPiano Paesaggistico Regionale
Regimi Normativi (Ambito 1) | \n\t\tFascia di rispetto della costa - art. 54 NdA | \n\t\t ({$area_v_percent}%) | \n\t ";
+
+ //####### BEGIN RECORD ########
+ $record_vincoli[] = "Fascia di rispetto della costa - art. 54 NdA\n";
+ //####### BEGIN RECORD ########
+ }}}
+ // FINE DEFINIZIONE DELLA COPERTURA FASCIA COSTA
+
+ // INIZIO DEFINIZIONE DELLA COPERTURA AREA RECUPERO
+ $query_recupero = "SELECT ST_AREA(ST_intersection(a.geom, b.geom)) AS area_recupero FROM (SELECT geom FROM ".strtolower($_SESSION['COMUNE_PROV']).".area_recupero) a, (SELECT ST_GeomFromEWKT('SRID=25833;".$_SESSION['geom']."') as geom) b WHERE ST_Intersects (a.geom,b.geom)";
+ $result_query_recupero = pg_query($conn, $query_recupero) or die('Query query_recupero failied');
+
+ if (pg_num_rows($result_query_recupero) > 0) {
+ while($row6cc = pg_fetch_assoc($result_query_recupero)) {
+ $area_v_percent = round(($row6cc['area_recupero']/$area_sezione)*100,2);
+
+ if ($area_v_percent > 1) {
+ echo "\n\t\n\t\tPiano Paesaggistico Regionale
Regimi Normativi (Ambito 1) | \n\t\tArea di recupero - art. 51 NdA | \n\t\t ({$area_v_percent}%) | \n\t ";
+
+ //####### BEGIN RECORD ########
+ $record_vincoli[] = "Area di recupero - art. 51 NdA\n";
+ //####### BEGIN RECORD ########
+ }}}
+ // FINE DEFINIZIONE DELLA COPERTURA AREA RECUPERO
+
+}
+
+
+// INIZIO DEFINIZIONE DELLA COPERTURA V_1497
+ $query_v_1497 = "SELECT ST_AREA(ST_intersection(a.geom, b.geom)) AS area_v_1497 FROM (SELECT geom FROM ".strtolower($_SESSION['COMUNE_PROV']).".v_1497) a, (SELECT ST_GeomFromEWKT('SRID=25833;".$_SESSION['geom']."') as geom) b WHERE ST_Intersects (a.geom,b.geom)";
+ $result_query_v_1497 = pg_query($conn, $query_v_1497) or die('Query query_v_1497 failied');
+
+ if (pg_num_rows($result_query_v_1497) > 0) {
+ while($row6a = pg_fetch_assoc($result_query_v_1497)) {
+ $area_v_percent = round(($row6a['area_v_1497']/$area_sezione)*100,2);
+
+ if ($area_v_percent > 1) {
+ echo "\n\t\n\t\t| BENI PAESAGGISTICI | \n\t\tArea tutelata (art.136, D.lgs.42/04) | \n\t\t ({$area_v_percent}%) | \n\t ";
+
+ //####### BEGIN RECORD ########
+ $record_vincoli[] = "Area tutelata (art.136, D.lgs.42/04)\n";
+ //####### BEGIN RECORD ########
+ }}}
+// FINE DEFINIZIONE DELLA COPERTURA V_1497
+
+// INIZIO DEFINIZIONE DELLA COPERTURA V_ARCHEO
+ $query_v_archeo = "SELECT ST_AREA(ST_intersection(a.geom, b.geom)) AS area_v_archeo FROM (SELECT geom FROM ".strtolower($_SESSION['COMUNE_PROV']).".v_archeo) a, (SELECT ST_GeomFromEWKT('SRID=25833;".$_SESSION['geom']."') as geom) b WHERE ST_Intersects (a.geom,b.geom)";
+ $result_query_v_archeo = pg_query($conn, $query_v_archeo) or die('Query query_v_archeo failied');
+
+ if (pg_num_rows($result_query_v_archeo) > 0) {
+ while($row6b = pg_fetch_assoc($result_query_v_archeo)) {
+ $area_v_archeo_percent = round(($row6b['area_v_archeo']/$area_sezione)*100,2);
+
+ if ($area_v_archeo_percent > 1) {
+ echo "\n\t\n\t\t| BENI PAESAGGISTICI | \n\t\tVincolo Archeologico (art.10, D.lgs.42/04) | \n\t\t ({$area_v_archeo_percent}%) | \n\t ";
+
+ //####### BEGIN RECORD ########
+ $record_vincoli[] = "Vincolo Archeologico (art.10, D.lgs.42/04)\n";
+ //####### BEGIN RECORD ########
+
+ }}}
+// FINE DEFINIZIONE DELLA COPERTURA V_ARCHEO
+
+
+// INIZIO DEFINIZIONE DELLA COPERTURA V_BOSCHI
+ /* */
+ $query_v_boschi = "SELECT ST_AREA(ST_intersection(a.geom, b.geom)) AS area_v_boschi FROM (SELECT geom FROM ".strtolower($_SESSION['COMUNE_PROV']).".v_boschi) a, (SELECT ST_GeomFromEWKT('SRID=25833;".$_SESSION['geom']."') as geom) b WHERE ST_Intersects (a.geom,b.geom)";
+ $result_query_v_boschi = pg_query($conn, $query_v_boschi) or die('Query query_v_boschi failied');
+
+ if (pg_num_rows($result_query_v_boschi) > 0) {
+ while($row6c = pg_fetch_assoc($result_query_v_boschi)) {
+ $area_v_boschi_percent = round(($row6c['area_v_boschi']/$area_sezione)*100,2);
+
+ if ($area_v_boschi_percent > 1) {
+ echo "\n\t\n\t\t| BENI PAESAGGISTICI | \n\t\tAree boscate (art.142, lett. g, D.lgs.42/04) | \n\t\t ({$area_v_boschi_percent}%) | \n\t ";
+
+ //####### BEGIN RECORD ########
+ $record_vincoli[] = "Aree boscate (art.142, lett. g, D.lgs.42/04)\n";
+ //####### BEGIN RECORD ########
+
+ }}}
+
+// FINE DEFINIZIONE DELLA COPERTURA V_BOSCHI
+
+
+// INIZIO DEFINIZIONE DELLA COPERTURA V_COSTA
+ $query_v_costa = "SELECT ST_AREA(ST_intersection(a.geom, b.geom)) AS area_v_costa FROM (SELECT geom FROM ".strtolower($_SESSION['COMUNE_PROV']).".v_costa) a, (SELECT ST_GeomFromEWKT('SRID=25833;".$_SESSION['geom']."') as geom) b WHERE ST_Intersects (a.geom,b.geom)";
+ //echo $query_v_costa."
";
+ $result_query_v_costa = pg_query($conn, $query_v_costa) or die('Query query_v_costa failied');
+
+ if (pg_num_rows($result_query_v_costa) > 0) {
+ while($row6d = pg_fetch_assoc($result_query_v_costa)) {
+ $area_v_percent = round(($row6d['area_v_costa']/$area_sezione)*100,2);
+
+ if ($area_v_percent > 1) {
+ echo "\n\t\n\t\t| BENI PAESAGGISTICI | \n\t\tAree costa 300m (art.142, lett.a, D.lgs. 42/04) | \n\t\t ({$area_v_percent}%) | \n\t ";
+
+ //####### BEGIN RECORD ########
+ $record_vincoli[] = "Aree costa 300m (art.142, lett.a, D.lgs. 42/04)\n";
+ //####### BEGIN RECORD ########
+
+ }}}
+// FINE DEFINIZIONE DELLA COPERTURA V_COSTA
+
+
+// INIZIO DEFINIZIONE DELLA COPERTURA V_FIUMI
+ $query_v_fiumi = "SELECT ST_AREA(ST_intersection(a.geom, b.geom)) AS area_v_fiumi FROM (SELECT geom FROM ".strtolower($_SESSION['COMUNE_PROV']).".v_fiumi) a, (SELECT ST_GeomFromEWKT('SRID=25833;".$_SESSION['geom']."') as geom) b WHERE ST_Intersects (a.geom,b.geom)";
+ $result_query_v_fiumi = pg_query($conn, $query_v_fiumi) or die('Query query_v_fiumi failied');
+
+ if (pg_num_rows($result_query_v_fiumi) > 0) {
+ while($row6e = pg_fetch_assoc($result_query_v_fiumi)) {
+ $area_v_percent = round(($row6e['area_v_fiumi']/$area_sezione)*100,2);
+
+ if ($area_v_percent > 1) {
+ echo "\n\t\n\t\t| BENI PAESAGGISTICI | \n\t\tAree fiumi 150m (art.142, lett. c, D.lgs.42/04) | \n\t\t ({$area_v_percent}%) | \n\t ";
+
+ //####### BEGIN RECORD ########
+ $record_vincoli[] = "Aree fiumi 150m (art.142, lett. c, D.lgs.42/04)\n";
+ //####### BEGIN RECORD ########
+
+ }}}
+// FINE DEFINIZIONE DELLA COPERTURA V_FIUMI
+
+
+// INIZIO DEFINIZIONE DELLA COPERTURA V_INTERESSE_ARCHEO
+ $query_v_interesse_archeo = "SELECT ST_AREA(ST_intersection(a.geom, b.geom)) AS area_v_interesse_archeo FROM (SELECT geom FROM ".strtolower($_SESSION['COMUNE_PROV']).".v_interesse_archeo) a, (SELECT ST_GeomFromEWKT('SRID=25833;".$_SESSION['geom']."') as geom) b WHERE ST_Intersects (a.geom,b.geom)";
+ $result_query_v_interesse_archeo = pg_query($conn, $query_v_interesse_archeo) or die('Query query_v_interesse_archeo failied');
+
+ if (pg_num_rows($result_query_v_interesse_archeo) > 0) {
+ while($row6f = pg_fetch_assoc($result_query_v_interesse_archeo)) {
+ $area_v_percent = round(($row6f['area_v_interesse_archeo']/$area_sezione)*100,2);
+
+ if ($area_v_percent > 1) {
+ echo "\n\t\n\t\t| BENI PAESAGGISTICI | \n\t\tAree di interesse archeologico (art.142, lett. m, D.lgs.42/04) | \n\t\t ({$area_v_percent}%) | \n\t ";
+
+ //####### BEGIN RECORD ########
+ $record_vincoli[] = "Aree di interesse archeologico (art.142, lett. m, D.lgs.42/04)\n";
+ //####### BEGIN RECORD ########
+
+ }}}
+// FINE DEFINIZIONE DELLA COPERTURA V_INTERESSE_ARCHEO
+
+
+// INIZIO DEFINIZIONE DELLA COPERTURA V_LAGHI
+ $query_v_laghi = "SELECT ST_AREA(ST_intersection(a.geom, b.geom)) AS area_v_laghi FROM (SELECT geom FROM ".strtolower($_SESSION['COMUNE_PROV']).".v_laghi) a, (SELECT ST_GeomFromEWKT('SRID=25833;".$_SESSION['geom']."') as geom) b WHERE ST_Intersects (a.geom,b.geom)";
+ $result_query_v_laghi = pg_query($conn, $query_v_laghi) or die('Query query_v_laghi failied');
+
+ if (pg_num_rows($result_query_v_laghi) > 0) {
+ while($row6g = pg_fetch_assoc($result_query_v_laghi)) {
+ $area_v_percent = round(($row6g['area_v_laghi']/$area_sezione)*100,2);
+
+ if ($area_v_percent > 1) {
+ echo "\n\t\n\t\t| BENI PAESAGGISTICI | \n\t\tAree laghi 300m (art.142, lett. b, D.lgs. 42/04) | \n\t\t ({$area_v_percent}%) | \n\t ";
+
+ //####### BEGIN RECORD ########
+ $record_vincoli[] = "Aree laghi 300m (art.142, lett. b, D.lgs. 42/04)\n";
+ //####### BEGIN RECORD ########
+ }}}
+// FINE DEFINIZIONE DELLA COPERTURA V_LAGHI
+
+
+// INIZIO DEFINIZIONE DELLA COPERTURA V_LETTERA_C
+ $query_v_lettera_c = "SELECT ST_AREA(ST_intersection(a.geom, b.geom)) AS area_v_lettera_c FROM (SELECT geom FROM ".strtolower($_SESSION['COMUNE_PROV']).".v_lettera_c) a, (SELECT ST_GeomFromEWKT('SRID=25833;".$_SESSION['geom']."') as geom) b WHERE ST_Intersects (a.geom,b.geom)";
+ $result_query_v_lettera_c = pg_query($conn, $query_v_lettera_c) or die('Query query_v_lettera_c failied');
+
+ if (pg_num_rows($result_query_v_lettera_c) > 0) {
+ while($row6h = pg_fetch_assoc($result_query_v_lettera_c)) {
+ $area_v = $row6h['area_v_lettera_c'];
+ $area_v_percent = round(($area_v/$area_sezione)*100,2);
+
+ if ($area_v_percent > 1) {
+ echo "\n\t\n\t\t| BENI PAESAGGISTICI | \n\t\tAree tutelate (art.134, lett. c, D.lgs. 42/04) | \n\t\t ({$area_v_percent}%) | \n\t ";
+
+ //####### BEGIN RECORD ########
+ $record_vincoli[] = "Aree tutelate (art.134, lett. c, D.lgs. 42/04)\n";
+ //####### BEGIN RECORD ########
+ }}}
+// FINE DEFINIZIONE DELLA COPERTURA V_LETTERA_C
+
+
+// INIZIO DEFINIZIONE DELLA COPERTURA V_RISERVE
+ $query_v_riserve = "SELECT ST_AREA(ST_intersection(a.geom, b.geom)) AS area_v_riserve FROM (SELECT geom FROM ".strtolower($_SESSION['COMUNE_PROV']).".v_riserve) a, (SELECT ST_GeomFromEWKT('SRID=25833;".$_SESSION['geom']."') as geom) b WHERE ST_Intersects (a.geom,b.geom)";
+ $result_query_v_riserve = pg_query($conn, $query_v_riserve) or die('Query query_v_riserve failied');
+
+ if (pg_num_rows($result_query_v_riserve) > 0) {
+ while($row6i = pg_fetch_assoc($result_query_v_riserve)) {
+ $area_v = $row6i['area_v_riserve'];
+ $area_v_percent = round(($area_v/$area_sezione)*100,2);
+
+ if ($area_v_percent > 1) {
+ echo "\n\t\n\t\t| BENI PAESAGGISTICI | \n\t\tAree riserve regionali (art.142, lett. f, D.lgs.42/04) | \n\t\t ({$area_v_percent}%) | \n\t ";
+
+ //####### BEGIN RECORD ########
+ $record_vincoli[] = "Aree riserve regionali (art.142, lett. f, D.lgs.42/04)\n";
+ //####### BEGIN RECORD ########
+ }}}
+// FINE DEFINIZIONE DELLA COPERTURA V_RISERVE
+
+// INIZIO DEFINIZIONE DELLA COPERTURA V_PARCHI
+ $query_v_parchi = "SELECT ST_AREA(ST_intersection(a.geom, b.geom)) AS area_v_parchi FROM (SELECT geom FROM ".strtolower($_SESSION['COMUNE_PROV']).".v_parchi) a, (SELECT ST_GeomFromEWKT('SRID=25833;".$_SESSION['geom']."') as geom) b WHERE ST_Intersects (a.geom,b.geom)";
+ $result_query_v_parchi = pg_query($conn, $query_v_parchi) or die('Query query_v_parchi failied');
+
+ if (pg_num_rows($result_query_v_parchi) > 0) {
+ while($row6l = pg_fetch_assoc($result_query_v_parchi)) {
+ $area_v_percent = round(($row6l['area_v_parchi']/$area_sezione)*100,2);
+
+ if ($area_v_percent > 1) {
+ echo "\n\t\n\t\t| BENI PAESAGGISTICI | \n\t\tParchi regionali (art.142, lett. f, D.lgs.42/04)
{$row6l['denom']} | \n\t\t ({$area_v_percent}%) | \n\t ";
+
+ //####### BEGIN RECORD ########
+ $record_vincoli[] = "Parchi regionali (art.142, lett. f, D.lgs.42/04)\n";
+ //####### BEGIN RECORD ########
+ }}}
+// FINE DEFINIZIONE DELLA COPERTURA V_PARCHI
+
+
+// INIZIO DEFINIZIONE DELLA COPERTURA V_1200
+ $query_v_1200 = "SELECT ST_AREA(ST_intersection(a.geom, b.geom)) AS area_v_1200 FROM (SELECT geom FROM ".strtolower($_SESSION['COMUNE_PROV']).".v_1200) a, (SELECT ST_GeomFromEWKT('SRID=25833;".$_SESSION['geom']."') as geom) b WHERE ST_Intersects (a.geom,b.geom)";
+ $result_query_v_1200 = pg_query($conn, $query_v_1200) or die('Query query_v_1200 failied');
+
+ if (pg_num_rows($result_query_v_1200) > 0) {
+ while($row6m = pg_fetch_assoc($result_query_v_1200)) {
+ $area_v_percent = round(($row6m['area_v_1200']/$area_sezione)*100,2);
+
+ if ($area_v_percent > 1) {
+ echo "\n\t\n\t\t| BENI PAESAGGISTICI | \n\t\tAree al di sopra di 1200 (art.142, lett. d, D.lgs.42/04) | \n\t\t ({$area_v_percent}%) | \n\t ";
+
+ //####### BEGIN RECORD ########
+ $record_vincoli[] = "Aree al di sopra di 1200 (art.142, lett. d, D.lgs.42/04)\n";
+ //####### BEGIN RECORD ########
+ }}}
+// FINE DEFINIZIONE DELLA COPERTURA V_1200
+
+// INIZIO DEFINIZIONE DELLA COPERTURA V_VULCANO
+ $query_v_vulcano = "SELECT ST_AREA(ST_intersection(a.geom, b.geom)) AS area_vulcano FROM (SELECT geom FROM ".strtolower($_SESSION['COMUNE_PROV']).".v_vulcano) a, (SELECT ST_GeomFromEWKT('SRID=25833;".$_SESSION['geom']."') as geom) b WHERE ST_Intersects (a.geom,b.geom)";
+ $result_query_v_vulcano = pg_query($conn, $query_v_vulcano) or die('Query query_v_vulcano failied');
+
+ if (pg_num_rows($result_query_v_vulcano) > 0) {
+ while($row6m = pg_fetch_assoc($result_query_v_vulcano)) {
+ $area_v_percent = round(($row6m['area_vulcano']/$area_sezione)*100,2);
+
+ if ($area_v_percent > 1) {
+ echo "\n\t\n\t\t| BENI PAESAGGISTICI | \n\t\tVincolo area vulcano | \n\t\t ({$area_v_percent}%) | \n\t ";
+
+ //####### BEGIN RECORD ########
+ $record_vincoli[] = "Vincolo area vulcano\n";
+ //####### BEGIN RECORD ########
+ }}}
+// FINE DEFINIZIONE DELLA COPERTURA V_VULCANO
+
+
+// INIZIO DEFINIZIONE DELLA COPERTURA DEL VINCOLO IDROGEOLOGICO
+ $query_v_idrogeol = "SELECT ST_AREA(ST_intersection(a.geom, b.geom)) AS areaidro FROM (SELECT geom FROM rscarto.sif_vincolo_idrogeo_sicilia) a, (SELECT ST_GeomFromEWKT('SRID=25833;".$_SESSION['geom']."') as geom) b WHERE ST_Intersects (a.geom,b.geom)";
+ $result_query_v_idrogeol = pg_query($conn, $query_v_idrogeol) or die('Query query_v_idrogeol failied');
+
+ if (pg_num_rows($result_query_v_idrogeol) > 0) {
+ while($row7 = pg_fetch_assoc($result_query_v_idrogeol)) {
+ $area_idro_percent = round(($row7['areaidro']/$area_sezione)*100,2);
+
+ if ($area_idro_percent > 1) {
+ echo "\n\t\n\t\t| Vincolo Idrogeologico | \n\t\tR.D.L. n° 3267 del 30/12/1923 | \n\t\t ({$area_idro_percent}%) | \n\t ";
+
+ //####### BEGIN RECORD ########
+ $record_vincoli[] = "Vincolo Idrogeologico (R.D.L. n° 3267 del 30/12/1923)\n";
+ //####### BEGIN RECORD ########
+
+ }}}
+// FINE DEFINIZIONE DELLA COPERTURA VINCOLO IDROGEOLOGICO
+
+
+// INIZIO DEFINIZIONE DELLA COPERTURA DEL VINCOLO BOSCHI DL227
+ /* */
+ $query_dl227 = "SELECT ST_AREA(ST_intersection(a.geom, b.geom)) AS areadl227 FROM (SELECT geom FROM ".strtolower($_SESSION['COMUNE_PROV']).".sif_dl227) a, (SELECT ST_GeomFromEWKT('SRID=25833;".$_SESSION['geom']."') as geom) b WHERE ST_Intersects (a.geom,b.geom)";
+ $result_query_dl227 = pg_query($conn, $query_dl227) or die('Query query_dl227 failied');
+
+ if (pg_num_rows($result_query_dl227) > 0) {
+ while($row72 = pg_fetch_assoc($result_query_dl227)) {
+ $area_dl227_percent = round(($row72['areadl227']/$area_sezione)*100,2);
+
+ if ($area_dl227_percent > 1) {
+ echo "\n\t\n\t\t| Vincolo Boschi | \n\t\t Art.2 D.L. 18 maggio 2001, n. 227 | \n\t\t ({$area_dl227_percent}%) | \n\t ";
+
+ //####### 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
+ /* */
+ $query_lr16 = "SELECT ST_AREA(ST_intersection(a.geom, b.geom)) AS arealr16 FROM (SELECT geom FROM ".strtolower($_SESSION['COMUNE_PROV']).".sif_lr16) a, (SELECT ST_GeomFromEWKT('SRID=25833;".$_SESSION['geom']."') as geom) b WHERE ST_Intersects (a.geom,b.geom)";
+ $result_query_lr16 = pg_query($conn, $query_lr16) or die('Query query_lr16 failied');
+
+ if (pg_num_rows($result_query_lr16) > 0) {
+ while($row8 = pg_fetch_assoc($result_query_lr16)) {
+ $area_lr16_percent = round(($row8['arealr16']/$area_sezione)*100,2);
+
+ if ($area_lr16_percent > 1) {
+ echo "\n\t\n\t\t| Vincolo Boschi | \n\t\t L.R. 16/96 art. 4 | \n\t\t {$copertura_lr16} ({$area_lr16_percent}%) | \n\t ";
+
+ //####### 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
+ $query_siczps = "SELECT a.denom, ST_AREA(ST_intersection(a.geom, b.geom)) AS areasiczps FROM (SELECT denom, geom FROM rscarto.sic_zps) a, (SELECT ST_GeomFromEWKT('SRID=25833;".$_SESSION['geom']."') as geom) b WHERE ST_Intersects (a.geom,b.geom)";
+ $result_query_siczps = pg_query($conn, $query_siczps) or die('Query query_siczps failied');
+
+ if (pg_num_rows($result_query_siczps) > 0) {
+ while($row81 = pg_fetch_assoc($result_query_siczps)) {
+ $area_siczps_percent = round(($row81['areasiczps']/$area_sezione)*100,2);
+
+ if ($area_siczps_percent > 1) {
+ echo "\n\t\n\t\t| SIC - ZPS | \n\t\t{$row81['codice']} - {$row81['denom']} | \n\t\t ({$area_siczps_percent}%) | \n\t ";
+
+ //####### BEGIN RECORD ########
+ $record_vincoli[] = "SIC-ZPS (".$row81['codice']."-".$row81['denom'].")\n";
+ //####### END RECORD ########
+ }}}
+// FINE DEFINIZIONE DELLA COPERTURA SIC-ZPS
+
+
+// INIZIO DEFINIZIONE DELLA COPERTURA RISERVE
+ $query_riserve = "SELECT a.denom, ST_AREA(ST_intersection(a.geom, b.geom)) AS areariserve FROM (SELECT denom, geom FROM rscarto.riserve_sicilia) a, (SELECT ST_GeomFromEWKT('SRID=25833;".$_SESSION['geom']."') as geom) b WHERE ST_Intersects (a.geom,b.geom)";
+ $result_query_riserve = pg_query($conn, $query_riserve) or die('Query query_riserve failied');
+
+ if (pg_num_rows($result_query_riserve) > 0) {
+ while($row82 = pg_fetch_assoc($result_query_riserve)) {
+ $area_riserva_percent = round(($row82['areariserve']/$area_sezione)*100,2);
+
+ if ($area_riserva_percent > 1) {
+ echo "\n\t\n\t\t| RISERVE | \n\t\t{$row82['codice']} - {$row82['denom']} | \n\t\t ({$area_riserva_percent}%) | \n\t ";
+
+ //####### BEGIN RECORD ########
+ $record_vincoli[] = "RISERVE (".$row82['codice']."-".$row82['denom'].")\n";
+ //####### END RECORD ########
+ }}}
+// FINE DEFINIZIONE DELLA COPERTURA RISERVE
+
+
+// INIZIO DEFINIZIONE DELLA COPERTURA PAI IDRO RISCHIO
+ $query_idro_rischio = "SELECT a.rischio, ST_AREA(ST_intersection(a.geom, b.geom)) AS area_idro_rischio FROM (SELECT rischio, geom FROM rscarto.pai_idr_r) a, (SELECT ST_GeomFromEWKT('SRID=25833;".$_SESSION['geom']."') as geom) b WHERE ST_Intersects (a.geom,b.geom)";
+ $result_query_idro_rischio = pg_query($conn, $query_idro_rischio) or die('Query query_idro_rischio failied');
+
+ if (pg_num_rows($result_query_idro_rischio) > 0) {
+ while($row9 = pg_fetch_assoc($result_query_idro_rischio)) {
+ $area_idro_r_percent = round(($row9['area_idro_rischio']/$area_sezione)*100,2);
+
+ if ($area_idro_r_percent > 1) {
+ echo "\n\t\n\t\t| P.A.I. | \n\t\tRischio Idraulico - {$row9['rischio']} | \n\t\t ({$area_idro_r_percent}%) | \n\t ";
+
+ //####### 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'
+ $query_idro_pericolo = "SELECT a.pericolo, ST_AREA(ST_intersection(a.geom, b.geom)) AS area_idro_pericolo FROM (SELECT pericolo, geom FROM rscarto.pai_idr_p_sa) a, (SELECT ST_GeomFromEWKT('SRID=25833;".$_SESSION['geom']."') as geom) b WHERE ST_Intersects (a.geom,b.geom)";
+ $result_query_idro_pericolo = pg_query($conn, $query_idro_pericolo) or die('Query query_idro_pericolo failied');
+
+ if (pg_num_rows($result_query_idro_pericolo) > 0) {
+ while($row10 = pg_fetch_assoc($result_query_idro_pericolo)) {
+ $area_idro_p_percent = round(($row10['area_idro_pericolo']/$area_sezione)*100,2);
+
+ if ($area_idro_r_percent > 1) {
+ echo "\n\t\n\t\t| P.A.I. | \n\t\tPericolosità Idraulica - {$row10['pericolo']} | \n\t\t ({$area_idro_p_percent}%) | \n\t ";
+
+ //####### 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
+ $query_geo_rischio = "SELECT a.rischio, ST_AREA(ST_intersection(a.geom, b.geom)) AS area_geo_rischio FROM (SELECT rischio, geom FROM rscarto.pai_geo_rischio) a, (SELECT ST_GeomFromEWKT('SRID=25833;".$_SESSION['geom']."') as geom) b WHERE ST_Intersects (a.geom,b.geom)";
+ $result_query_geo_rischio = pg_query($conn, $query_geo_rischio) or die('Query query_geo_rischio failied');
+
+ if (pg_num_rows($result_query_geo_rischio) > 0) {
+ while($row11 = pg_fetch_assoc($result_query_geo_rischio)) {
+ $area_geo_r_percent = round(($row11['area_geo_rischio']/$area_sezione)*100,2);
+
+ if ($area_geo_r_percent > 10) {
+ echo "\n\t\n\t\t| P.A.I. | \n\t\tRischio Geomorfologico - {$row11['rischio']} | \n\t\t ({$area_geo_r_percent}%) | \n\t ";
+
+ //####### 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
+ $query_geo_pericolo = "SELECT a.pericolo, ST_AREA(ST_intersection(a.geom, b.geom)) AS area_geo_pericolo FROM (SELECT pericolo, geom FROM rscarto.pai_geo_peric) a, (SELECT ST_GeomFromEWKT('SRID=25833;".$_SESSION['geom']."') as geom) b WHERE ST_Intersects (a.geom,b.geom)";
+ $result_query_geo_pericolo = pg_query($conn, $query_geo_pericolo) or die('Query query_geo_pericolo failied');
+
+ if (pg_num_rows($result_query_geo_pericolo) > 0) {
+ while($row12 = pg_fetch_assoc($result_query_geo_pericolo)) {
+ $area_geo_p_percent = round(($row12['area_geo_pericolo']/$area_sezione)*100,2);
+
+ if ($area_geo_p_percent > 1) {
+ echo "\n\t\n\t\t| P.A.I. | \n\t\tPericolosità Geomorfologica - {$row12['pericolo']} | \n\t\t ({$area_geo_p_percent}%) | \n\t ";
+
+ //####### 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 SIN
+ $query_sin = "SELECT a.denominaz, ST_AREA(ST_intersection(a.geom, b.geom)) AS area_sin FROM (SELECT denominaz, geom FROM rscarto.sin) a, (SELECT ST_GeomFromEWKT('SRID=25833;".$_SESSION['geom']."') as geom) b WHERE ST_Intersects (a.geom,b.geom)";
+ $result_query_sin = pg_query($conn, $query_sin) or die('Query query_sin failied');
+
+ if (pg_num_rows($result_query_sin) > 0) {
+ while($rowsin = pg_fetch_assoc($result_query_sin)) {
+ $area_sin_percent = round(($rowsin['area_sin']/$area_sezione)*100,2);
+
+ if ($area_sin_percent > 1) {
+ echo "\n\t\n\t\t| SIN | \n\t\tSito di Interesse Nazionale | \n\t\t ({$area_sin_percent}%) | \n\t ";
+
+ //####### BEGIN RECORD ########
+ $record_vincoli[] = "SIN (Sito di Interesse Nazionale)\n";
+ //####### END RECORD ########
+
+ }}}
+
+// FINE DEFINIZIONE DELLA COPERTURA SIN
+
+}
+
+//pg_close($conn);
+?>
+
+
+
+
+ |
+
+
+ 
+ 
+ 
+ 
+ 
+ 
+ 
+ 
