No HTML Output!


SET LINES = 999999 -*SET BYDISPLAY = ON SET ASNAMES = ON SET HOLDLIST = PRINTONLY SET NODATA = '-' SET PAGE-NUM = NOPAGE SET EMPTYREPORT = ON SET CENT-ZERO = ON -SET &VLA_WFSNAME = '/ibi_apps/WFServlet?IBIF_ex'; -SET &VLA_APPNAME = '/approot/semarnat'; -SET &VLA_CONNECTION = 'DGEIAWF.BADESNIARN'; -SET &VLA_USERDB = 'DGEIAMOD.'; -SET &VTOTAL1 = 'ON TABLE COLUMN-TOTAL AS TOTAL'; -SET &VTOTAL2 = 'ON TABLE NOTOTAL'; -SET &VTOTAL3 = 'ON TABLE COLUMN-TOTAL AS Nacional'; -SET &VTOTAL4 = 'ON TABLE COLUMN-TOTAL AS AÑO'; -* ===== > VARIABLES DE SEGURIDAD -* ===== > DEBERAN SER DECLARADAS EN LAS JSPs. -DEFAULT &FUN_USER = 'dgeia_mce'; -DEFAULT &FUN_PASS = 'dgeia_mce'; -SET &VL_SEGURIDAD = '&' || 'IBIC_user=' || dgeia_mce || '&' || 'IBIC_pass=' || dgeia_mce || '&' || 'FUN_USER=' || dgeia_mce || '&' || 'FUN_PASS=' || dgeia_mce; -SET &VL_SEGUENT = '&' || 'IBIC_user=' || dgeia_mce || '&' || 'IBIC_pass=' || dgeia_mce; -*-TYPE &L_SEGURIDAD -* ===== > FORMATO INICIAL DE REPORTE -DEFAULT &PTA_SALIDA = 'HTML'; -DEFAULT &VAL_FORMAT = 'HTML'; -DEFAULT &VUNID = ''; -DEFAULT &VUNID2 = ''; -DEFAULT &VL_NTS = ''; -DEFAULT &VL_VAR = ''; -DEFAULT &VL_FTS = ''; -DEFAULT &REP=''; -DEFAULT &VG_ENC=''; -DEFAULT &VUNID = ''; -DEFAULT &VHEIG = 500; -DEFAULT &REP2 = ''; -DEFAULT &VTIT = ''; -DEFAULT &VL_FTE1= ''; -DEFAULT &VL_FTE2= ''; -DEFAULT &VL_FTE3= ''; -DEFAULT &VL_FTE4= ''; -DEFAULT &VL_NOTA1 = ''; -DEFAULT &VL_NOTA2 = ''; -DEFAULT &VL_NOTA3 = ''; -DEFAULT &VL_NOTA4 = ''; -SET &VL_WHERE = 'WHERE IDVARIABLE EQ ' | '''' | '9999999999' | '''' ; -*INCLUDE MCE_UNIDADES_R1 -SET &VBOL = 2; -*SET &VL_WHERE = 'WHERE IDVARIABLE EQ ' | '''' | 'III_5_1_2_5' | '''' | ' OR IDVARIABLE EQ ' | '''' | 'III_5_1_2_2' | '''' ; -SET &VL_NOTA1 = 'Superficie de cobertura vegetal, cartas INEGI<br><br>Las cifras se obtuvieron a partir de las Cartas de Uso del Suelo y Vegetación Series I a VI, indicadas en la fuente. La serie VI, con datos referidos al año 2014, es la más reciente disponible (revisión: Octubre, 2019).<br>Los datos del año 1976 se presentan con la clasificación original usada en la Serie I, que fue modificada en las siguientes Cartas, por esa razón pueden existir diferencias poco intuitivas entre las cifras de 1976 y las series siguientes (por ejemplo, matorral sarcocaule); así como falta de continuidad en algunas categorías (por ejemplo, bosque bajo abierto). Por esa razón, las comparaciones temporales deben hacerse con precaución.'; -SET &VL_NOTA2 = 'Superficie de cobertura vegetal primaria, cartas INEGI.<br><br>No se cuenta con una referencia clara sobre la distribución original de la vegetación. Sin embargo, la información que se presenta es el resultado de la revisión de literatura especializada y de información recabada en campo con lo que se puede suponer la extensión de la vegetación en épocas pasadas. El INEGI, además, utilizó la interpretación analógica de imágenes de satélite para presentar, en el año 2000, la Carta de Vegetación Primaria a escala 1:1 000 000, para toda la República Mexicana.'; -SET &VL_NOTA3 = ''; -SET &VL_NOTA4 = ''; -SET &VL_FTE1 = 'Secretaría de Medio Ambiente y Recursos Naturales, Dirección General de Estadística e Información Ambiental, 2018, con base en:'; -SET &VL_FTE2 = 'INEGI, Carta de Vegetación Primaria, Escala 1:1 000 000, México, 2001, INEGI, Carta de Uso del Suelo y Vegetación Serie I (1968-1986), Escala 1:250 000, México, 2003. INEGI, Carta de Uso del Suelo y Vegetación Serie II [re-estructurada] (1993), Escala 1:250 000, México, 2004. INEGI, Carta de Uso del Suelo y Vegetación Serie III (2002), Escala 1:250 000 (Continuo Nacional) México, 2005. INEGI, Carta de Uso del Suelo y Vegetación Serie IV (2007), Escala 1:250 000, México, 2009. INEGI. Carta de Uso del Suelo y Vegetación, Serie V (2011), Escala 1: 250 000. México. 2013. INEGI, Conjunto de datos vectoriales de uso del suelo y vegetación, Serie VI (2014), Escala 1:250 000 (Conjunto Nacional), México, 2017.'; -SET &VL_FTE3 = ''; -SET &VL_FTE4 = ''; -INCLUDE MCE_NOTAS_FUENTES_R5 -* = > ========================================================================= -* = > SEMARNAT 2007. -* = > NOMBRE FEX: mce_notas_fuentes_R5.fex -* = > DESCRIPCION: Hoja de estilos WebFOCUS -* = > CREO: ARTURO MONDRAGÓN MONTES DE OCA. FECHA: 09-NOV-2007. -* = > MODIFICO: ARTURO MONDRAGÓN MONTES DE OCA. FECHA: 16-NOV-2007. -* = > ========================================================================= -IF 2 EQ 1 AND (HTML EQ 'PDF' OR HTML EQ 'EXL2K') OR 2 EQ 2 THEN GOTO ETNF1 ELSE ETNNF1; -ETNF1 -IF 2 EQ 1 THEN GOTO ETNTAS1 ELSE ETNNTAS1; -ETNNTAS1 -IF HTML EQ 'PDF' THEN GOTO ETFPDF ELSE ETFNPDF; -ETFNPDF -IF Superficie de cobertura vegetal, cartas INEGI<br><br>Las cifras se obtuvieron a partir de las Cartas de Uso del Suelo y Vegetación Series I a VI, indicadas en la fuente. La serie VI, con datos referidos al año 2014, es la más reciente disponible (revisión: Octubre, 2019).<br>Los datos del año 1976 se presentan con la clasificación original usada en la Serie I, que fue modificada en las siguientes Cartas, por esa razón pueden existir diferencias poco intuitivas entre las cifras de 1976 y las series siguientes (por ejemplo, matorral sarcocaule); así como falta de continuidad en algunas categorías (por ejemplo, bosque bajo abierto). Por esa razón, las comparaciones temporales deben hacerse con precaución. NE '' AND Superficie de cobertura vegetal, cartas INEGI<br><br>Las cifras se obtuvieron a partir de las Cartas de Uso del Suelo y Vegetación Series I a VI, indicadas en la fuente. La serie VI, con datos referidos al año 2014, es la más reciente disponible (revisión: Octubre, 2019).<br>Los datos del año 1976 se presentan con la clasificación original usada en la Serie I, que fue modificada en las siguientes Cartas, por esa razón pueden existir diferencias poco intuitivas entre las cifras de 1976 y las series siguientes (por ejemplo, matorral sarcocaule); así como falta de continuidad en algunas categorías (por ejemplo, bosque bajo abierto). Por esa razón, las comparaciones temporales deben hacerse con precaución. NE ' ' AND Superficie de cobertura vegetal, cartas INEGI<br><br>Las cifras se obtuvieron a partir de las Cartas de Uso del Suelo y Vegetación Series I a VI, indicadas en la fuente. La serie VI, con datos referidos al año 2014, es la más reciente disponible (revisión: Octubre, 2019).<br>Los datos del año 1976 se presentan con la clasificación original usada en la Serie I, que fue modificada en las siguientes Cartas, por esa razón pueden existir diferencias poco intuitivas entre las cifras de 1976 y las series siguientes (por ejemplo, matorral sarcocaule); así como falta de continuidad en algunas categorías (por ejemplo, bosque bajo abierto). Por esa razón, las comparaciones temporales deben hacerse con precaución. NE ' ' AND Superficie de cobertura vegetal primaria, cartas INEGI.<br><br>No se cuenta con una referencia clara sobre la distribución original de la vegetación. Sin embargo, la información que se presenta es el resultado de la revisión de literatura especializada y de información recabada en campo con lo que se puede suponer la extensión de la vegetación en épocas pasadas. El INEGI, además, utilizó la interpretación analógica de imágenes de satélite para presentar, en el año 2000, la Carta de Vegetación Primaria a escala 1:1 000 000, para toda la República Mexicana. NE '' AND Superficie de cobertura vegetal primaria, cartas INEGI.<br><br>No se cuenta con una referencia clara sobre la distribución original de la vegetación. Sin embargo, la información que se presenta es el resultado de la revisión de literatura especializada y de información recabada en campo con lo que se puede suponer la extensión de la vegetación en épocas pasadas. El INEGI, además, utilizó la interpretación analógica de imágenes de satélite para presentar, en el año 2000, la Carta de Vegetación Primaria a escala 1:1 000 000, para toda la República Mexicana. NE ' ' AND Superficie de cobertura vegetal primaria, cartas INEGI.<br><br>No se cuenta con una referencia clara sobre la distribución original de la vegetación. Sin embargo, la información que se presenta es el resultado de la revisión de literatura especializada y de información recabada en campo con lo que se puede suponer la extensión de la vegetación en épocas pasadas. El INEGI, además, utilizó la interpretación analógica de imágenes de satélite para presentar, en el año 2000, la Carta de Vegetación Primaria a escala 1:1 000 000, para toda la República Mexicana. NE ' ' AND NE '' AND NE ' ' AND NE ' ' AND NE '' AND NE ' ' AND NE ' ' THEN GOTO ETQ01 ELSE ETQ02; -ETQ02 -IF Superficie de cobertura vegetal, cartas INEGI<br><br>Las cifras se obtuvieron a partir de las Cartas de Uso del Suelo y Vegetación Series I a VI, indicadas en la fuente. La serie VI, con datos referidos al año 2014, es la más reciente disponible (revisión: Octubre, 2019).<br>Los datos del año 1976 se presentan con la clasificación original usada en la Serie I, que fue modificada en las siguientes Cartas, por esa razón pueden existir diferencias poco intuitivas entre las cifras de 1976 y las series siguientes (por ejemplo, matorral sarcocaule); así como falta de continuidad en algunas categorías (por ejemplo, bosque bajo abierto). Por esa razón, las comparaciones temporales deben hacerse con precaución. NE '' AND Superficie de cobertura vegetal, cartas INEGI<br><br>Las cifras se obtuvieron a partir de las Cartas de Uso del Suelo y Vegetación Series I a VI, indicadas en la fuente. La serie VI, con datos referidos al año 2014, es la más reciente disponible (revisión: Octubre, 2019).<br>Los datos del año 1976 se presentan con la clasificación original usada en la Serie I, que fue modificada en las siguientes Cartas, por esa razón pueden existir diferencias poco intuitivas entre las cifras de 1976 y las series siguientes (por ejemplo, matorral sarcocaule); así como falta de continuidad en algunas categorías (por ejemplo, bosque bajo abierto). Por esa razón, las comparaciones temporales deben hacerse con precaución. NE ' ' AND Superficie de cobertura vegetal, cartas INEGI<br><br>Las cifras se obtuvieron a partir de las Cartas de Uso del Suelo y Vegetación Series I a VI, indicadas en la fuente. La serie VI, con datos referidos al año 2014, es la más reciente disponible (revisión: Octubre, 2019).<br>Los datos del año 1976 se presentan con la clasificación original usada en la Serie I, que fue modificada en las siguientes Cartas, por esa razón pueden existir diferencias poco intuitivas entre las cifras de 1976 y las series siguientes (por ejemplo, matorral sarcocaule); así como falta de continuidad en algunas categorías (por ejemplo, bosque bajo abierto). Por esa razón, las comparaciones temporales deben hacerse con precaución. NE ' ' AND Superficie de cobertura vegetal primaria, cartas INEGI.<br><br>No se cuenta con una referencia clara sobre la distribución original de la vegetación. Sin embargo, la información que se presenta es el resultado de la revisión de literatura especializada y de información recabada en campo con lo que se puede suponer la extensión de la vegetación en épocas pasadas. El INEGI, además, utilizó la interpretación analógica de imágenes de satélite para presentar, en el año 2000, la Carta de Vegetación Primaria a escala 1:1 000 000, para toda la República Mexicana. NE '' AND Superficie de cobertura vegetal primaria, cartas INEGI.<br><br>No se cuenta con una referencia clara sobre la distribución original de la vegetación. Sin embargo, la información que se presenta es el resultado de la revisión de literatura especializada y de información recabada en campo con lo que se puede suponer la extensión de la vegetación en épocas pasadas. El INEGI, además, utilizó la interpretación analógica de imágenes de satélite para presentar, en el año 2000, la Carta de Vegetación Primaria a escala 1:1 000 000, para toda la República Mexicana. NE ' ' AND Superficie de cobertura vegetal primaria, cartas INEGI.<br><br>No se cuenta con una referencia clara sobre la distribución original de la vegetación. Sin embargo, la información que se presenta es el resultado de la revisión de literatura especializada y de información recabada en campo con lo que se puede suponer la extensión de la vegetación en épocas pasadas. El INEGI, además, utilizó la interpretación analógica de imágenes de satélite para presentar, en el año 2000, la Carta de Vegetación Primaria a escala 1:1 000 000, para toda la República Mexicana. NE ' ' AND NE '' AND NE ' ' AND NE ' ' THEN GOTO ETQ03 ELSE ETQ04; -ETQ04 -IF Superficie de cobertura vegetal, cartas INEGI<br><br>Las cifras se obtuvieron a partir de las Cartas de Uso del Suelo y Vegetación Series I a VI, indicadas en la fuente. La serie VI, con datos referidos al año 2014, es la más reciente disponible (revisión: Octubre, 2019).<br>Los datos del año 1976 se presentan con la clasificación original usada en la Serie I, que fue modificada en las siguientes Cartas, por esa razón pueden existir diferencias poco intuitivas entre las cifras de 1976 y las series siguientes (por ejemplo, matorral sarcocaule); así como falta de continuidad en algunas categorías (por ejemplo, bosque bajo abierto). Por esa razón, las comparaciones temporales deben hacerse con precaución. NE '' AND Superficie de cobertura vegetal, cartas INEGI<br><br>Las cifras se obtuvieron a partir de las Cartas de Uso del Suelo y Vegetación Series I a VI, indicadas en la fuente. La serie VI, con datos referidos al año 2014, es la más reciente disponible (revisión: Octubre, 2019).<br>Los datos del año 1976 se presentan con la clasificación original usada en la Serie I, que fue modificada en las siguientes Cartas, por esa razón pueden existir diferencias poco intuitivas entre las cifras de 1976 y las series siguientes (por ejemplo, matorral sarcocaule); así como falta de continuidad en algunas categorías (por ejemplo, bosque bajo abierto). Por esa razón, las comparaciones temporales deben hacerse con precaución. NE ' ' AND Superficie de cobertura vegetal, cartas INEGI<br><br>Las cifras se obtuvieron a partir de las Cartas de Uso del Suelo y Vegetación Series I a VI, indicadas en la fuente. La serie VI, con datos referidos al año 2014, es la más reciente disponible (revisión: Octubre, 2019).<br>Los datos del año 1976 se presentan con la clasificación original usada en la Serie I, que fue modificada en las siguientes Cartas, por esa razón pueden existir diferencias poco intuitivas entre las cifras de 1976 y las series siguientes (por ejemplo, matorral sarcocaule); así como falta de continuidad en algunas categorías (por ejemplo, bosque bajo abierto). Por esa razón, las comparaciones temporales deben hacerse con precaución. NE ' ' AND Superficie de cobertura vegetal primaria, cartas INEGI.<br><br>No se cuenta con una referencia clara sobre la distribución original de la vegetación. Sin embargo, la información que se presenta es el resultado de la revisión de literatura especializada y de información recabada en campo con lo que se puede suponer la extensión de la vegetación en épocas pasadas. El INEGI, además, utilizó la interpretación analógica de imágenes de satélite para presentar, en el año 2000, la Carta de Vegetación Primaria a escala 1:1 000 000, para toda la República Mexicana. NE '' AND Superficie de cobertura vegetal primaria, cartas INEGI.<br><br>No se cuenta con una referencia clara sobre la distribución original de la vegetación. Sin embargo, la información que se presenta es el resultado de la revisión de literatura especializada y de información recabada en campo con lo que se puede suponer la extensión de la vegetación en épocas pasadas. El INEGI, además, utilizó la interpretación analógica de imágenes de satélite para presentar, en el año 2000, la Carta de Vegetación Primaria a escala 1:1 000 000, para toda la República Mexicana. NE ' ' AND Superficie de cobertura vegetal primaria, cartas INEGI.<br><br>No se cuenta con una referencia clara sobre la distribución original de la vegetación. Sin embargo, la información que se presenta es el resultado de la revisión de literatura especializada y de información recabada en campo con lo que se puede suponer la extensión de la vegetación en épocas pasadas. El INEGI, además, utilizó la interpretación analógica de imágenes de satélite para presentar, en el año 2000, la Carta de Vegetación Primaria a escala 1:1 000 000, para toda la República Mexicana. NE ' ' THEN GOTO ETQ05 ELSE ETQ06; -ETQ05 TABLE FILE MCE_R_VAR_NOTAS SUM IDVARIABLE NOPRINT COMPUTE CNOTA1/A3000 = 'Superficie de cobertura vegetal, cartas INEGI<br><br>Las cifras se obtuvieron a partir de las Cartas de Uso del Suelo y Vegetación Series I a VI, indicadas en la fuente. La serie VI, con datos referidos al año 2014, es la más reciente disponible (revisión: Octubre, 2019).<br>Los datos del año 1976 se presentan con la clasificación original usada en la Serie I, que fue modificada en las siguientes Cartas, por esa razón pueden existir diferencias poco intuitivas entre las cifras de 1976 y las series siguientes (por ejemplo, matorral sarcocaule); así como falta de continuidad en algunas categorías (por ejemplo, bosque bajo abierto). Por esa razón, las comparaciones temporales deben hacerse con precaución.'; AS ' ' OVER COMPUTE CNOTA2/A3000 = 'Superficie de cobertura vegetal primaria, cartas INEGI.<br><br>No se cuenta con una referencia clara sobre la distribución original de la vegetación. Sin embargo, la información que se presenta es el resultado de la revisión de literatura especializada y de información recabada en campo con lo que se puede suponer la extensión de la vegetación en épocas pasadas. El INEGI, además, utilizó la interpretación analógica de imágenes de satélite para presentar, en el año 2000, la Carta de Vegetación Primaria a escala 1:1 000 000, para toda la República Mexicana.'; AS '' -GOTO ETQ08; -ETQ08 -IF HTML EQ 'EXL2K' THEN GOTO ETFEXC ELSE ETFNEXC; -ETFNEXC ON TABLE SET STYLE * UNITS=CM, SQUEEZE=ON, ORIENTATION=PORTRAIT, PAGECOLOR=RGB(255 255 255),$ TYPE=REPORT, GRID=ON, FONT='Open Sans', SIZE=9, COLOR='BLACK', BACKCOLOR=RGB(255 255 255), STYLE=NORMAL,$ -ETBRING TYPE=DATA, FONT='Open Sans', SIZE=9, BACKCOLOR=( 'WHITE' RGB(222 222 222) ),$ TYPE=TITLE, FONT='Open Sans', SIZE=9, COLOR='WHITE', BACKCOLOR='GRAY', STYLE=BOLD, $ TYPE=HEADING, OBJECT=TEXT, FONT='Open Sans', COLOR='GRAY', STYLE=BOLD,$ TYPE=REPORT, COLUMN=N2, SQUEEZE=10.00000,$ TYPE=REPORT, COLUMN=N3, SQUEEZE=23.00000,$ ENDSTYLE -NOENTRAPDF2 -IF HTML EQ 'HTML' THEN GOTO ETFHTM2 ELSE ETFNHTM2; -ETFHTM2 ON TABLE HOLD AS 'HTMNOTA' FORMAT HTMTABLE -GOTO BRING3; -BRING3 END -GOTO BRINFT; -BRINFT TABLE FILE MCE_R_VAR_FUENTES SUM ID_FUENTE NOPRINT COMPUTE C_FTE1/A800 = ''; AS 'NOMBREPUBLICACION' COMPUTE C_FTE2/A800 = ''; AS 'NOMBRESITIOINTERNET' COMPUTE C_FTE3/A400 = ''; AS 'NOMBRESISTINFO' COMPUTE FUENTE2/A830='Secretaría de Medio Ambiente y Recursos Naturales, Dirección General de Estadística e Información Ambiental, 2018, con base en:'; COMPUTE FUENTE3/A830='INEGI, Carta de Vegetación Primaria, Escala 1:1 000 000, México, 2001, INEGI, Carta de Uso del Suelo y Vegetación Serie I (1968-1986), Escala 1:250 000, México, 2003. INEGI, Carta de Uso del Suelo y Vegetación Serie II [re-estructurada] (1993), Escala 1:250 000, México, 2004. INEGI, Carta de Uso del Suelo y Vegetación Serie III (2002), Escala 1:250 000 (Continuo Nacional) México, 2005. INEGI, Carta de Uso del Suelo y Vegetación Serie IV (2007), Escala 1:250 000, México, 2009. INEGI. Carta de Uso del Suelo y Vegetación, Serie V (2011), Escala 1: 250 000. México. 2013. INEGI, Conjunto de datos vectoriales de uso del suelo y vegetación, Serie VI (2014), Escala 1:250 000 (Conjunto Nacional), México, 2017.'; COMPUTE FUENTE4/A830=' '; COMPUTE FUENTE5/A830=' '; COMPUTE C_CONT/I11 = 1; WHERE 1 EQ 1 ON TABLE HOLD AS HTFTE01 END -IF HTML EQ 'PDF' THEN GOTO ETFPDF2 ELSE ETFNPDF2; -ETFNPDF2 -IF Secretaría de Medio Ambiente y Recursos Naturales, Dirección General de Estadística e Información Ambiental, 2018, con base en: NE '' AND Secretaría de Medio Ambiente y Recursos Naturales, Dirección General de Estadística e Información Ambiental, 2018, con base en: NE ' ' AND Secretaría de Medio Ambiente y Recursos Naturales, Dirección General de Estadística e Información Ambiental, 2018, con base en: NE ' ' AND INEGI, Carta de Vegetación Primaria, Escala 1:1 000 000, México, 2001, INEGI, Carta de Uso del Suelo y Vegetación Serie I (1968-1986), Escala 1:250 000, México, 2003. INEGI, Carta de Uso del Suelo y Vegetación Serie II [re-estructurada] (1993), Escala 1:250 000, México, 2004. INEGI, Carta de Uso del Suelo y Vegetación Serie III (2002), Escala 1:250 000 (Continuo Nacional) México, 2005. INEGI, Carta de Uso del Suelo y Vegetación Serie IV (2007), Escala 1:250 000, México, 2009. INEGI. Carta de Uso del Suelo y Vegetación, Serie V (2011), Escala 1: 250 000. México. 2013. INEGI, Conjunto de datos vectoriales de uso del suelo y vegetación, Serie VI (2014), Escala 1:250 000 (Conjunto Nacional), México, 2017. NE '' AND INEGI, Carta de Vegetación Primaria, Escala 1:1 000 000, México, 2001, INEGI, Carta de Uso del Suelo y Vegetación Serie I (1968-1986), Escala 1:250 000, México, 2003. INEGI, Carta de Uso del Suelo y Vegetación Serie II [re-estructurada] (1993), Escala 1:250 000, México, 2004. INEGI, Carta de Uso del Suelo y Vegetación Serie III (2002), Escala 1:250 000 (Continuo Nacional) México, 2005. INEGI, Carta de Uso del Suelo y Vegetación Serie IV (2007), Escala 1:250 000, México, 2009. INEGI. Carta de Uso del Suelo y Vegetación, Serie V (2011), Escala 1: 250 000. México. 2013. INEGI, Conjunto de datos vectoriales de uso del suelo y vegetación, Serie VI (2014), Escala 1:250 000 (Conjunto Nacional), México, 2017. NE ' ' AND INEGI, Carta de Vegetación Primaria, Escala 1:1 000 000, México, 2001, INEGI, Carta de Uso del Suelo y Vegetación Serie I (1968-1986), Escala 1:250 000, México, 2003. INEGI, Carta de Uso del Suelo y Vegetación Serie II [re-estructurada] (1993), Escala 1:250 000, México, 2004. INEGI, Carta de Uso del Suelo y Vegetación Serie III (2002), Escala 1:250 000 (Continuo Nacional) México, 2005. INEGI, Carta de Uso del Suelo y Vegetación Serie IV (2007), Escala 1:250 000, México, 2009. INEGI. Carta de Uso del Suelo y Vegetación, Serie V (2011), Escala 1: 250 000. México. 2013. INEGI, Conjunto de datos vectoriales de uso del suelo y vegetación, Serie VI (2014), Escala 1:250 000 (Conjunto Nacional), México, 2017. NE ' ' AND NE '' AND NE ' ' AND NE ' ' AND NE '' AND NE ' ' AND NE ' ' THEN GOTO ETQ09 ELSE ETQ10; -ETQ10 -IF Secretaría de Medio Ambiente y Recursos Naturales, Dirección General de Estadística e Información Ambiental, 2018, con base en: NE '' AND Secretaría de Medio Ambiente y Recursos Naturales, Dirección General de Estadística e Información Ambiental, 2018, con base en: NE ' ' AND Secretaría de Medio Ambiente y Recursos Naturales, Dirección General de Estadística e Información Ambiental, 2018, con base en: NE ' ' AND INEGI, Carta de Vegetación Primaria, Escala 1:1 000 000, México, 2001, INEGI, Carta de Uso del Suelo y Vegetación Serie I (1968-1986), Escala 1:250 000, México, 2003. INEGI, Carta de Uso del Suelo y Vegetación Serie II [re-estructurada] (1993), Escala 1:250 000, México, 2004. INEGI, Carta de Uso del Suelo y Vegetación Serie III (2002), Escala 1:250 000 (Continuo Nacional) México, 2005. INEGI, Carta de Uso del Suelo y Vegetación Serie IV (2007), Escala 1:250 000, México, 2009. INEGI. Carta de Uso del Suelo y Vegetación, Serie V (2011), Escala 1: 250 000. México. 2013. INEGI, Conjunto de datos vectoriales de uso del suelo y vegetación, Serie VI (2014), Escala 1:250 000 (Conjunto Nacional), México, 2017. NE '' AND INEGI, Carta de Vegetación Primaria, Escala 1:1 000 000, México, 2001, INEGI, Carta de Uso del Suelo y Vegetación Serie I (1968-1986), Escala 1:250 000, México, 2003. INEGI, Carta de Uso del Suelo y Vegetación Serie II [re-estructurada] (1993), Escala 1:250 000, México, 2004. INEGI, Carta de Uso del Suelo y Vegetación Serie III (2002), Escala 1:250 000 (Continuo Nacional) México, 2005. INEGI, Carta de Uso del Suelo y Vegetación Serie IV (2007), Escala 1:250 000, México, 2009. INEGI. Carta de Uso del Suelo y Vegetación, Serie V (2011), Escala 1: 250 000. México. 2013. INEGI, Conjunto de datos vectoriales de uso del suelo y vegetación, Serie VI (2014), Escala 1:250 000 (Conjunto Nacional), México, 2017. NE ' ' AND INEGI, Carta de Vegetación Primaria, Escala 1:1 000 000, México, 2001, INEGI, Carta de Uso del Suelo y Vegetación Serie I (1968-1986), Escala 1:250 000, México, 2003. INEGI, Carta de Uso del Suelo y Vegetación Serie II [re-estructurada] (1993), Escala 1:250 000, México, 2004. INEGI, Carta de Uso del Suelo y Vegetación Serie III (2002), Escala 1:250 000 (Continuo Nacional) México, 2005. INEGI, Carta de Uso del Suelo y Vegetación Serie IV (2007), Escala 1:250 000, México, 2009. INEGI. Carta de Uso del Suelo y Vegetación, Serie V (2011), Escala 1: 250 000. México. 2013. INEGI, Conjunto de datos vectoriales de uso del suelo y vegetación, Serie VI (2014), Escala 1:250 000 (Conjunto Nacional), México, 2017. NE ' ' AND NE '' AND NE ' ' AND NE ' ' THEN GOTO ETQ11 ELSE ETQ12; -ETQ12 -IF Secretaría de Medio Ambiente y Recursos Naturales, Dirección General de Estadística e Información Ambiental, 2018, con base en: NE '' AND Secretaría de Medio Ambiente y Recursos Naturales, Dirección General de Estadística e Información Ambiental, 2018, con base en: NE ' ' AND Secretaría de Medio Ambiente y Recursos Naturales, Dirección General de Estadística e Información Ambiental, 2018, con base en: NE ' ' AND INEGI, Carta de Vegetación Primaria, Escala 1:1 000 000, México, 2001, INEGI, Carta de Uso del Suelo y Vegetación Serie I (1968-1986), Escala 1:250 000, México, 2003. INEGI, Carta de Uso del Suelo y Vegetación Serie II [re-estructurada] (1993), Escala 1:250 000, México, 2004. INEGI, Carta de Uso del Suelo y Vegetación Serie III (2002), Escala 1:250 000 (Continuo Nacional) México, 2005. INEGI, Carta de Uso del Suelo y Vegetación Serie IV (2007), Escala 1:250 000, México, 2009. INEGI. Carta de Uso del Suelo y Vegetación, Serie V (2011), Escala 1: 250 000. México. 2013. INEGI, Conjunto de datos vectoriales de uso del suelo y vegetación, Serie VI (2014), Escala 1:250 000 (Conjunto Nacional), México, 2017. NE '' AND INEGI, Carta de Vegetación Primaria, Escala 1:1 000 000, México, 2001, INEGI, Carta de Uso del Suelo y Vegetación Serie I (1968-1986), Escala 1:250 000, México, 2003. INEGI, Carta de Uso del Suelo y Vegetación Serie II [re-estructurada] (1993), Escala 1:250 000, México, 2004. INEGI, Carta de Uso del Suelo y Vegetación Serie III (2002), Escala 1:250 000 (Continuo Nacional) México, 2005. INEGI, Carta de Uso del Suelo y Vegetación Serie IV (2007), Escala 1:250 000, México, 2009. INEGI. Carta de Uso del Suelo y Vegetación, Serie V (2011), Escala 1: 250 000. México. 2013. INEGI, Conjunto de datos vectoriales de uso del suelo y vegetación, Serie VI (2014), Escala 1:250 000 (Conjunto Nacional), México, 2017. NE ' ' AND INEGI, Carta de Vegetación Primaria, Escala 1:1 000 000, México, 2001, INEGI, Carta de Uso del Suelo y Vegetación Serie I (1968-1986), Escala 1:250 000, México, 2003. INEGI, Carta de Uso del Suelo y Vegetación Serie II [re-estructurada] (1993), Escala 1:250 000, México, 2004. INEGI, Carta de Uso del Suelo y Vegetación Serie III (2002), Escala 1:250 000 (Continuo Nacional) México, 2005. INEGI, Carta de Uso del Suelo y Vegetación Serie IV (2007), Escala 1:250 000, México, 2009. INEGI. Carta de Uso del Suelo y Vegetación, Serie V (2011), Escala 1: 250 000. México. 2013. INEGI, Conjunto de datos vectoriales de uso del suelo y vegetación, Serie VI (2014), Escala 1:250 000 (Conjunto Nacional), México, 2017. NE ' ' THEN GOTO ETQ13 ELSE ETQ14; -ETQ13 TABLE FILE HTFTE01 SUM FUENTE2 AS ' ' OVER FUENTE3 AS '' BY C_CONT NOPRINT -*WHERE FUENTE2 NE MISSING AND FUENTE2 NE ' ' AND FUENTE2 NE ' ' -GOTO ETQ16 -ETQ16 -IF HTML EQ 'EXL2K' THEN GOTO ETFEXC2 ELSE ETFNEXC2; -ETFNEXC2 ON TABLE SET STYLE * UNITS=CM, SQUEEZE=ON, ORIENTATION=PORTRAIT, PAGECOLOR=RGB(255 255 255),$ TYPE=REPORT, GRID=ON, FONT='Open Sans', SIZE=9, COLOR='BLACK', BACKCOLOR=RGB(255 255 255), STYLE=NORMAL,$ -ETBRING2 TYPE=DATA, FONT='Open Sans', SIZE=9, BACKCOLOR=( 'WHITE' RGB(222 222 222) ),$ TYPE=TITLE, FONT='Open Sans', SIZE=9, COLOR='WHITE', BACKCOLOR='GRAY', STYLE=BOLD, $ TYPE=HEADING, OBJECT=TEXT, FONT='Open Sans', COLOR='GRAY', STYLE=BOLD,$ TYPE=REPORT, COLUMN=N2, SQUEEZE=33.0000,$ ENDSTYLE -IF HTML EQ 'HTML' THEN GOTO ETFHTM3 ELSE ETFNHTM3; -ETFHTM3 ON TABLE HOLD AS 'HTMFTE' FORMAT HTMTABLE -GOTO BRING4; -BRING4 END -ETNNF1 -GOTO BRINFT2; -BRINFT2 -SET &REP = 'D3_BIODIV01_09_R1'; -SET &VAL_FORMAT = 'HTML'; -SET &VL_URL = '/ibi_apps/WFServlet?IBIF_ex=' | D3_BIODIV01_09_R1 | '&' | 'VL_FORMAT=' | HTML; -SET &VL_SEGURIDAD = '&' || 'IBIC_user=' || dgeia_mce || '&' || 'IBIC_pass=' || dgeia_mce || '&' || 'FUN_USER=' || dgeia_mce || '&' || 'FUN_PASS=' || dgeia_mce; -SET &VL_URL = /ibi_apps/WFServlet?IBIF_ex=D3_BIODIV01_09_R1&VL_FORMAT=HTML | &IBIC_user=dgeia_mce&IBIC_pass=dgeia_mce&FUN_USER=dgeia_mce&FUN_PASS=dgeia_mce; -TYPE /ibi_apps/WFServlet?IBIF_ex=D3_BIODIV01_09_R1&VL_FORMAT=HTML&IBIC_user=dgeia_mce&IBIC_pass=dgeia_mce&FUN_USER=dgeia_mce&FUN_PASS=dgeia_mce /ibi_apps/WFServlet?IBIF_ex=D3_BIODIV01_09_R1&VL_FORMAT=HTML&IBIC_user=dgeia_mce&IBIC_pass=dgeia_mce&FUN_USER=dgeia_mce&FUN_PASS=dgeia_mce -SET &REP2 = 'D3_BIODIV01_09'; -INCLUDE MCE_TITULO -* = > ========================================================================= -* = > SEMARNAT 2007. -* = > NOMBRE FEX: mce_titulo.fex -* = > DESCRIPCION: Título de Reportes -* = > CREO: CESAR ARTEAGA PLANCARTE. FECHA: 30-OCT-2007. -* = > MODIFICO: -* = > ========================================================================= TABLE FILE MCE_ADMIN_REP_CAT PRINT NOMBREREPORTE WHERE NOMBREFEX EQ 'D3_BIODIV01_09' ON TABLE HOLD AS HTIT FORMAT ALPHA END -RUN 0 NUMBER OF RECORDS IN TABLE= 1111 LINES= 1 0 HTML FILE SAVED ... 0 NUMBER OF RECORDS IN TABLE= 1554 LINES= 1 0 NUMBER OF RECORDS IN TABLE= 1 LINES= 1 0 HTML FILE SAVED ... 0 NUMBER OF RECORDS IN TABLE= 1 LINES= 1 -*-EXIT ? HOLD HTIT -READ HTIT &VTIT.A255 -SET &VG_ENC = EDIT(000094Uso de Suelo y vegetación en México: Vegetación potencial primaria y en el periodo 1976 - 2014 ,$$$$$$9999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999); -*-SET &VG_ENC = 'DIAGNÓSTICO DE LAS REGIONES HIDROLÓGICAS PRIORITARIAS '; -SET &VHEIG = '500' -INCLUDE D3_BIODIV01_09_R1 -* = > ========================================================================= -* = > SEMARNAT 2012. -* = > NOMBRE FEX: d3_biodiv01_09_R1.fex -* = > DESCRIPCION: Hoja de estilos WebFOCUS -* = > CREO: ADALBERTO GALVAN FLORES. FECHA: 21-MAYO-2012. -* = > MODIFICO: -* = > ========================================================================= -DEFAULT &VL_FORMAT = 'HTML'; -INCLUDE MCE_SETS_FX00 -* = > ========================================================================= -* = > SEMARNAT 2007. -* = > NOMBRE FEX: dgeia_sets_fx00.fex -* = > DESCRIPCION: Contiene valores por defaul y variables de configuracion. -* = > CREO: César Arteaga Plancarte. FECHA: 14-SEP-2007. -* = > MODIFICO: -* = > ========================================================================= -* ===== > VARIABLES DE ENTORNO -SET &ECHO = ALL; SET LINES = 999999 -*SET BYDISPLAY = ON SET ASNAMES = ON SET HOLDLIST = PRINTONLY SET NODATA = '-' SET PAGE-NUM = NOPAGE SET EMPTYREPORT = ON SET CENT-ZERO = ON -SET &VLA_WFSNAME = '/ibi_apps/WFServlet?IBIF_ex'; -SET &VLA_APPNAME = '/approot/semarnat'; -SET &VLA_CONNECTION = 'DGEIAWF.BADESNIARN'; -SET &VLA_USERDB = 'DGEIAMOD.'; -SET &VTOTAL1 = 'ON TABLE COLUMN-TOTAL AS TOTAL'; -SET &VTOTAL2 = 'ON TABLE NOTOTAL'; -SET &VTOTAL3 = 'ON TABLE COLUMN-TOTAL AS Nacional'; -SET &VTOTAL4 = 'ON TABLE COLUMN-TOTAL AS AÑO'; -* ===== > VARIABLES DE SEGURIDAD -* ===== > DEBERAN SER DECLARADAS EN LAS JSPs. -DEFAULT &FUN_USER = 'dgeia_mce'; -DEFAULT &FUN_PASS = 'dgeia_mce'; -SET &VL_SEGURIDAD = '&' || 'IBIC_user=' || dgeia_mce || '&' || 'IBIC_pass=' || dgeia_mce || '&' || 'FUN_USER=' || dgeia_mce || '&' || 'FUN_PASS=' || dgeia_mce; -SET &VL_SEGUENT = '&' || 'IBIC_user=' || dgeia_mce || '&' || 'IBIC_pass=' || dgeia_mce; -*-TYPE &L_SEGURIDAD -* ===== > FORMATO INICIAL DE REPORTE -DEFAULT &PTA_SALIDA = 'HTML'; -DEFAULT &VAL_FORMAT = 'HTML'; -DEFAULT &VUNID = ''; -DEFAULT &VUNID2 = ''; -DEFAULT &VL_NTS = ''; -DEFAULT &VL_VAR = ''; -DEFAULT &VL_FTS = ''; -DEFAULT &REP=''; -DEFAULT &VG_ENC=''; -DEFAULT &VUNID = ''; -DEFAULT &VHEIG = 500; -DEFAULT &REP2 = ''; -DEFAULT &VTIT = ''; -DEFAULT &VL_FTE1= ''; -DEFAULT &VL_FTE2= ''; -DEFAULT &VL_FTE3= ''; -DEFAULT &VL_FTE4= ''; -DEFAULT &VL_NOTA1 = ''; -DEFAULT &VL_NOTA2 = ''; -DEFAULT &VL_NOTA3 = ''; -DEFAULT &VL_NOTA4 = ''; -TYPE HTML HTML -SET &PTA_SALIDA = HTML; -SET &PTAOUT = HTML; -SET &REP2 = 'D3_BIODIV01_09'; -SET &REP3 = 'D3_BIODIV01_09_R2'; -INCLUDE MCE_TITULO -* = > ========================================================================= -* = > SEMARNAT 2007. -* = > NOMBRE FEX: mce_titulo.fex -* = > DESCRIPCION: Título de Reportes -* = > CREO: CESAR ARTEAGA PLANCARTE. FECHA: 30-OCT-2007. -* = > MODIFICO: -* = > ========================================================================= TABLE FILE MCE_ADMIN_REP_CAT PRINT NOMBREREPORTE WHERE NOMBREFEX EQ 'D3_BIODIV01_09' ON TABLE HOLD AS HTIT FORMAT ALPHA END -RUN 0DEFINITION OF HOLD FILE: HTIT 0FIELDNAME ALIAS FORMAT NOMBREREPORTE E01 A255V 0 NUMBER OF RECORDS IN TABLE= 1 LINES= 1 -*-EXIT ? HOLD HTIT -READ HTIT &VTIT.A255 -SET &VG_ENC = EDIT(000094Uso de Suelo y vegetación en México: Vegetación potencial primaria y en el periodo 1976 - 2014 ,$$$$$$9999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999); -SET &VG_ENCABEZADO = '"' | EDIT(000094Uso de Suelo y vegetación en México: Vegetación potencial primaria y en el periodo 1976 - 2014 ,$$$$$$99999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999999) | '"'; -SET &VL_WHERE = 'WHERE IDVARIABLE EQ ' | '''' | '999999999' | '''' ; -SET &VUNID = '(hectáreas)'; -SET &VEUNID = '"' | (hectáreas) | '"'; -*-SET &VG_ENCABEZADO = '"DURACIÓN Y ATENCIÓN DE INCENDIOS FORESTALES"'; -*SET &VL_WHERE = 'WHERE IDVARIABLE EQ ' | '''' | 'III_5_1_2_5' | '''' | ' OR IDVARIABLE EQ ' | '''' | 'III_5_1_2_2' | '''' ; JOIN MCE_R_D3_BIODIV01_09.MCE_R_D3_BIODIV01_09.IDECOSISTEMACARTA IN MCE_R_D3_BIODIV01_09 TO UNIQUE MCE_VECOSISTEMACARTA.MCE_VECOSISTEMACARTA.IDECOSISTEMACARTA IN MCE_VECOSISTEMACARTA AS J0 END JOIN MCE_R_D3_BIODIV01_09.MCE_R_D3_BIODIV01_09.IDANIO IN MCE_R_D3_BIODIV01_09 TO UNIQUE MCE_VANIO.MCE_VANIO.IDANIO IN MCE_VANIO AS J1 END DEFINE FILE MCE_R_D3_BIODIV01_09 ORD/D20.2 = IF IDECOSISTEMACARTA EQ 16 THEN 1 ELSE IF IDECOSISTEMACARTA EQ 23 THEN 15 ELSE IF IDECOSISTEMACARTA EQ 21 THEN 16 ELSE IF IDECOSISTEMACARTA EQ 67 THEN 32 ELSE IF IDECOSISTEMACARTA EQ 10 THEN 33 ELSE IF IDECOSISTEMACARTA EQ 2 THEN 74.5 ELSE IF IDECOSISTEMACARTA EQ 17 THEN 79.2 ELSE IF IDECOSISTEMACARTA EQ 33 THEN 79.3 ELSE IF IDECOSISTEMACARTA EQ 34 THEN 81 ELSE IF IDECOSISTEMACARTA EQ 35 THEN 82 ELSE IF IDECOSISTEMACARTA EQ 49 THEN 83 ELSE IF IDECOSISTEMACARTA EQ 68 THEN 84 ELSE IF IDECOSISTEMACARTA EQ 38 THEN 85 ELSE IF IDECOSISTEMACARTA EQ 41 THEN 86 ELSE IF IDECOSISTEMACARTA EQ 50 THEN 87 ELSE IF IDECOSISTEMACARTA EQ 37 THEN 88 ELSE IF IDECOSISTEMACARTA EQ 36 THEN 89 ELSE IF IDECOSISTEMACARTA EQ 45 THEN 90 ELSE IF IDECOSISTEMACARTA EQ 5 THEN 91 ELSE IF IDECOSISTEMACARTA EQ 15 THEN 92 ELSE IF IDECOSISTEMACARTA EQ 51 THEN 93 ELSE IF IDECOSISTEMACARTA EQ 52 THEN 94 ELSE IF IDECOSISTEMACARTA EQ 57 THEN 95 ELSE IF IDECOSISTEMACARTA EQ 62 THEN 97 ELSE IF IDECOSISTEMACARTA EQ 32 THEN 99 ELSE IF IDECOSISTEMACARTA EQ 53 THEN 100 ELSE IF IDECOSISTEMACARTA EQ 54 THEN 101 ELSE IF IDECOSISTEMACARTA EQ 55 THEN 102 ELSE IF IDECOSISTEMACARTA EQ 56 THEN 103 ELSE IF IDECOSISTEMACARTA EQ 58 THEN 104 ELSE IF IDECOSISTEMACARTA EQ 61 THEN 105 ELSE IF IDECOSISTEMACARTA EQ 63 THEN 106 ELSE IF IDECOSISTEMACARTA EQ 39 THEN 107 ELSE IF IDECOSISTEMACARTA EQ 40 THEN 108 ELSE IF IDECOSISTEMACARTA EQ 70 THEN 109 ELSE IF IDECOSISTEMACARTA EQ 71 THEN 110 ELSE IF IDECOSISTEMACARTA EQ 73 THEN 111 ELSE IF IDECOSISTEMACARTA EQ 3 THEN 112 ELSE IF IDECOSISTEMACARTA EQ 1 THEN 999 ELSE IF IDECOSISTEMACARTA EQ 42 THEN 89 ELSE IF IDECOSISTEMACARTA EQ 58 THEN 104 ELSE IF IDECOSISTEMACARTA EQ 63 THEN 103 ELSE IF IDECOSISTEMACARTA EQ 59 THEN 95.5 ELSE IF IDECOSISTEMACARTA EQ 64 THEN 97.5 ELSE IDECOSISTEMACARTA; VAR/D20=III_5_1_2_5; END TABLE FILE MCE_R_D3_BIODIV01_09 SUM III_5_1_2_2/D20 AS '' BY ORD NOPRINT BY NOMBREECOSISTEMACARTA AS 'Tipo de vegetación' BY VAR AS 'Potencial' ACROSS IDANIO NOPRINT ACROSS NOMBREANIO AS '' -INCLUDE WHERE_ANIO 0 ERROR AT OR NEAR LINE 1 IN PROCEDURE WHERE_ANIO (FOC295) A VALUE IS MISSING FOR: &NOMBREANIO