* Tema : TRABAJO PRESIDENCIAL HACIA LOS ESTADOS * Fecha : 13 AGOSTO 1999 * Path : ZED10899 * Lugar : REPUBLICA MEXICANA * Alcance : NACIONAL *** VERSION SEGUN EL TIEMPO ***** HORITA=substr(str(HORAINI),3,2) IF VAL(HORITA)<15.OR.(VAL(HORITA)>29.AND.VAL(HORITA)<45) REPL VER WITH 1 ELSE REPL VER WITH 2 ENDIF *** DO MASCARA @ 02, 2 say 'G.-En general, ¨cree usted que el pa¡s ha mejorado o ha empeorado' @ 03, 2 say ' en los £ltimos a¤os?' @ 05, 2 say ' (1) Ha mejorado' @ 06, 2 say ' (2) S¡gue igual de bien (ESPONTµNEA)' @ 07, 2 say ' (3) S¡gue igual de mal (ESPONTµNEA)' @ 08, 2 say ' (4) Ha empeorado' @ 09, 2 say ' (5) Ns/Nc' GET PG RANGE 1,5 READ if PG=1 DO MASCARA @ 02, 2 say 'H_1.-Y ¨qui‚n considera usted que es el principal responsable de que el' @ 03, 2 say ' pa¡s haya mejorado en los £ltimos a¤os?' @ 05, 2 say ' (1) El gobierno' @ 06, 2 say ' (2) El Presidente Zedillo' @ 07, 2 say ' (3) Los mexicanos' @ 08, 2 say ' (4) Otro (REGISTRAR EN PAPEL)' @ 09, 2 say ' (5) Ns/Nc' GET PH_1 RANGE 1,5 READ else replace PH_1 with 0 endif if PG=2.or.PG=3.or.PG=4 DO MASCARA @ 02, 2 say 'H_2.-Y ¨qui‚n considera usted que es el principal responsable de que el' @ 03, 2 say ' pa¡s no haya mejorado en los £ltimos a¤os?' @ 05, 2 say ' (1) El gobierno' @ 06, 2 say ' (2) El Presidente Zedillo' @ 07, 2 say ' (3) Los mexicanos' @ 08, 2 say ' (4) Otro (REGISTRAR EN PAPEL)' @ 09, 2 say ' (5) Ns/Nc' GET PH_2 RANGE 1,5 READ else replace PH_2 with 0 endif do mascara @ 02, 2 say 'A.-¨Recuerda usted haber visto u o¡do recientemente alg£n anuncio que' @ 03, 2 say ' habla de la creaci¢n de empleos en el pa¡s?' @ 05, 2 say ' (1) S¡' @ 06, 2 say ' (2) No' @ 07, 2 say ' (3) Nc' get pA range 1,3 read if pA=1 @ 12, 2 say 'A_1.-¨Cu l? (ENCUESTADOR: NO LEA OPCIONES)' @ 14, 2 say ' S¡ mencion No mencion' @ 16, 2 say ' -El del chavo que consigui¢ trabajo en un hotel (1) (2)' get pA_1 range 1,2 @ 17, 2 say ' -El del empresario que hace ropa de mezclilla (1) (2)' get pA_2 range 1,2 @ 18, 2 say ' -Otro (REGISTRAR EN PAPEL) (1) (2)' get pA_3 range 1,2 read else repl pA_1 with 0,pA_2 with 0, pA_3 with 0 endif if PA<>1.or.PA_1<>1 do mascara @ 02, 2 say 'B.-¨Usted ha visto u o¡do el anuncio donde un muchacho cuenta c¢mo' @ 03, 2 say ' consigui¢ trabajo en un hotel?' @ 05, 2 say ' (1) S¡' @ 06, 2 say ' (2) No' @ 07, 2 say ' (3) Nc' get PB range 1,3 read else repl PB with 0 endif DO MASCARA @ 02, 2 say 'C.-En este anuncio se dice que se ha creado una gran cantidad de empleos' @ 03, 2 say ' en los £ltimos cuatro a¤os. ¨Usted cree que esto es cierto o falso?' @ 05, 2 say ' (1) Cierto' @ 06, 2 say ' (2) Cierto en parte (espont neo)' @ 07, 2 say ' (3) Falso' @ 08, 2 say ' (4) Ns/Nc' GET PC RANGE 1,4 read do mascara @ 02, 2 say 'D.-¨Usted ha visto u o¡do recientemente alg£n anuncio sobre exportaciones' @ 03, 2 say ' en M‚xico?' @ 05, 2 say ' (1) S¡' @ 06, 2 say ' (2) No' @ 07, 2 say ' (3) Nc' get pD range 1,3 read if pD=1 @ 12, 2 say 'D_1.-¨Cu l? (ENCUESTADOR: NO LEA OPCIONES)' @ 14, 2 say ' S¡ mencion No mencion' @ 16, 2 say ' -El del empresario que hace ropa de mezclilla (1) (2)' get pD_1 range 1,2 @ 17, 2 say ' -Otro (REGISTRAR EN PAPEL) (1) (2)' get pD_2 range 1,2 read else repl pD_1 with 0, pD_2 with 0 endif if PD<>1.or.PD_1<>1 do mascara @ 02, 2 say 'E.-Y, ¨recuerda usted haber visto u o¡do el anuncio donde aparece un' @ 03, 2 say ' empresario que fabrica ropa de mezclilla?' @ 05, 2 say ' (1) S¡' @ 06, 2 say ' (2) No' @ 07, 2 say ' (3) Nc' get PE range 1,3 read else repl PE with 0 endif DO MASCARA @ 02, 2 say 'F.-En este anuncio se dice que durante los £ltimos a¤os las exportaciones' @ 03, 2 say ' del pa¡s aumentaron mucho. ¨Usted cree que esto es cierto o falso?' @ 05, 2 say ' (1) Cierto' @ 06, 2 say ' (2) Cierto en parte (espont neo)' @ 07, 2 say ' (3) Falso' @ 08, 2 say ' (4) Ns/Nc' GET PF RANGE 1,4 read do mascara @ 02, 2 say 'Acu.-En general, ¨est  usted de acuerdo o en desacuerdo con la manera' @ 03, 2 SAY ' como est  gobernando el presidente Zedillo?' @ 05, 2 SAY ' (1) Acuerdo' @ 06, 2 SAY ' (2) Acuerdo en parte' @ 07, 2 SAY ' (3) Desacuerdo en parte' @ 08, 2 say ' (4) Desacuerdo' @ 09, 2 say ' (5) Ns/Nc' GET PACU RANGE 1,5 read DO MASCARA @ 02, 2 say '1.-De las cosas que ocurrieron ayer en M‚xico y en el mundo,' @ 03, 2 say ' ¨qu‚ es lo que recuerda usted m s?' @ 04, 2 say ' Si menci¢n No menci¢n' @ 05, 2 say '-(Pdte)Gira de trabajo por estado de Zacatecas (1) (0)' GET PN1_1 RANGE 0,1 @ 06, 2 say '-Destituyen del IFE a Jes£s Cant£ por desvio de fondos (1) (0)' GET PN1_2 RANGE 0,1 @ 07, 2 say '-Diversas declaraciones por posible alianza opositora (1) (0)' GET PN1_3 RANGE 0,1 @ 08, 2 say '-Comparece Adri n Lajous director PEMEX ante Diputados (1) (0)' GET PN1_4 RANGE 0,1 @ 09, 2 say '-Pol‚mica declaraciones E. Moctezuma sobre R. Madrazo (1) (0)' GET PN1_5 RANGE 0,1 @ 10, 2 say '-Sin acuerdos el CGH y profesores em‚ritos de la UNAM (1) (0)' GET PN1_6 RANGE 0,1 @ 11, 2 say '-Rechaza Senado reforma a ley electoral (1) (0)' GET PN1_7 RANGE 0,1 @ 12, 2 say '-Causan estragos fuertes lluvias en el pa¡s (1) (0)' GET PN1_8 RANGE 0,1 @ 13, 2 say '-Se registran muertes a cuasa de calor norte del pais (1) (0)' GET PN1_9 RANGE 0,1 @ 14, 2 say '-Firman convenio IPN y Secretaria Relaciones Exteriores(1) (0)' GET PN1_10 RANGE 0,1 @ 15, 2 say '-Declaraciones de Fco Labastida precandidato PRI 2000 (1) (0)' GET PN1_11 RANGE 0,1 @ 16, 2 say '-Declaraciones de Roberto Madrazo precandidato PRI 2000(1) (0)' GET PN1_12 RANGE 0,1 @ 17, 2 say '-Declaraciones de Vicente Fox precandidato del PAN 2000(1) (0)' GET PN1_13 RANGE 0,1 @ 18, 2 say '-Declaraciones de precandidatos del PRD al 2000 (1) (0)' GET PN1_14 RANGE 0,1 @ 19, 2 say '-Reunion de Perredistas con Episcopado (1) (0)' GET PN1_15 RANGE 0,1 @ 20, 2 say '-Transladan prisi¢n federal francotirador Los Angeles (1) (0)' GET PN1_16 RANGE 0,1 @ 21, 2 say '-Otro (REGISTRADO EN PAPEL) (1) (0)' GET PN1_17 RANGE 0,1 read ********************** **** VERSION (1) ***** ********************** IF VER=1 DO MASCARA @ 02, 2 say 'Ctr.Con lo que usted sabe, ¨usted cree que el gobierno de Ernesto Zedillo' @ 03, 2 say ' tiene las riendas del pa¡s o las cosas se est n saliendo de su control?' @ 05, 2 say ' (1) Tiene las riendas' @ 06, 2 say ' (2) Est n saliendo de su control' @ 07, 2 SAY ' (3) Ns/Nc' GET PCTR RANGE 1,3 READ ENDIF ********************** DO MASCARA @ 02, 2 say 'DIP.-En general, ¨cu ntos a¤os dura un diputado en su cargo (puesto)?' @ 04, 2 say ' (1) 3 a¤os' @ 05, 2 say ' (2) Otro' @ 06, 2 SAY ' (3) Ns/Nc' GET PDIP RANGE 1,3 READ DO MASCARA @ 02, 2 say 'CGR.-Con lo que usted sabe, ¨cu les son las c maras que tiene el Congreso' @ 03, 2 say ' de M‚xico?' @ 05, 2 say ' (1) Diputados y Senadores' @ 06, 2 say ' (2) Diputados' @ 07, 2 say ' (3) Senadores' @ 08, 2 say ' (4) Otra respuesta' @ 09, 2 say ' (5) Ns/Nc' GET PCGR RANGE 1,5 READ DO MASCARA @ 02, 2 say 'GOB.-Por favor, ¨me puede decir el nombre del gobernador actual de' @ 03, 7 say EDONOM+' ?.' @ 05, 5 say GOBER+'(1)Correcto (2)Incorrecto (3)Ns/Nc' get PGOB RANGE 1,3 READ DO MASCARA @ 02, 2 say 'N.-D¡game por favor, ¨cu l es el acontecimiento pol¡tico m s importante' @ 03, 2 say ' que ocurri¢ ayer y que apareci¢ en las noticias y en los peri¢dicos hoy?' @ 04, 2 say ' (1) (Pdte)Gira de trabajo por estado de Zacatecas' @ 05, 2 say ' (2) Destituyen del IFE a Jes£s Cant£ por desvio de fondos' @ 06, 2 say ' (3) Diversas declaraciones por posible alianza opositora' @ 07, 2 say ' (4) Comparece Adri n Lajous director de PEMEX ante Diputados' @ 08, 2 say ' (5) Pol‚mica por declaraciones de Esteban Moctezuma sobre R. Madrazo' @ 09, 2 say ' (6) Sin acuerdos el CGH y profesores em‚ritos de la UNAM' @ 10, 2 say ' (7) Rechaza Senado reforma a ley electoral' @ 11, 2 say ' (8) Causan estragos fuertes lluvias en el pa¡s' @ 12, 2 say ' (9) Se registran muertes a cuasa de calor en el norte del pais' @ 13, 2 say ' (10) Firman convenio IPN y Secretaria de Relaciones Exteriores' @ 14, 2 say ' (11) Declaraciones de Fco Labastida precandidato del PRI al 2000' @ 15, 2 say ' (12) Declaraciones de Roberto Madrazo precandidato del PRI al 2000' @ 16, 2 say ' (13) Declaraciones de Vicente Fox precandidato del PAN al 2000' @ 17, 2 say ' (14) Declaraciones de precandidatos del PRD al 2000' @ 18, 2 say ' (15) Reunion de Perredistas con Episcopado' @ 19, 2 say ' (16) Transladan a prisi¢n federal de EU francotirador en Los Angeles' @ 20, 2 say ' (96) Otro (REGISTRADO EN PAPEL)' @ 21, 2 say ' (99) Ns/Nc' GET PNOT VALID ((PNOT>0.AND.PNOT<17).OR.PNOT=96.OR.PNOT=99) READ IF PNOT>1 DO MASCARA @ 02, 2 say 'N_1.-D¡game, ¨cu l de las acciones realizadas por el presidente durante' @ 03, 2 say ' esta semana recuerda usted m s? (REGISTRE SOLO RESPUESTA ESPONTANEA)' @ 05, 2 say ' (1) Inaugura exposici¢n de Civilizaci¢n Maya en Col Ildefonso' @ 06, 2 say ' (2) Gira de trabajo por el edo. de Morelos' @ 07, 2 say ' (3) Realiza nuevos nombramientos en su gabinete' @ 08, 2 say ' (4) 25ø Mensaje radiof¢nico "Pl ticas del Presidente"' @ 09, 2 say ' (5) Inaugura ciclo escolar 1999-2000 del Polit‚cnico' @ 10, 2 say ' (6) Reuni¢n con Consejo Nacional de la Industria Maquiladora' @ 11, 2 say ' (7) Gira de trabajo por el estado de Veracruz' @ 12, 2 say ' (8) Gira de trabajo por estado de Zacatecas' @ 13, 2 say ' (9) Otro (REGISTRE EN PAPEL)' @ 14, 2 say ' (99) Ns/Nc' GET PNOT_1 VALID (PNOT_1>0.AND.PNOT_1<10.OR.PNOT_1=96.OR.PNOT_1=99) READ ELSE REPL PNOT_1 WITH 0 ENDIF Do mascara @ 02, 2 SAY '15.-En su opini¢n, ¨el presidente Zedillo da el mismo trato a todos' @ 03, 2 SAY ' los partidos pol¡ticos o favorece a alguno?' @ 05, 2 SAY ' (1) Da el mismo trato' @ 06, 2 SAY ' (2) Favorece a alguno' @ 07, 2 SAY ' (3) Ns/Nc' GET P15 RANGE 1,3 READ IF P15=2 @ 10, 2 SAY '15_2.-¨A cu l favorece?' @ 12, 2 SAY ' (1) PAN' @ 13, 2 SAY ' (2) PRI' @ 14, 2 SAY ' (3) PRD' @ 15, 2 SAY ' (4) PT' @ 16, 2 SAY ' (5) Otro (REGISTRAR EN PAPEL)' @ 17, 2 SAY ' (6) Ns/Nc' GET P15_2 RANGE 1,6 READ ELSE REPLACE P15_2 WITH 0 ENDIF Do mascara @ 02, 2 SAY '16.-Y, en su opini¢n, ¨el presidente Zedillo da la misma atenci¢n a todos' @ 03, 2 SAY ' los estados de la Rep£blica o favorece a alguno?' @ 05, 2 SAY ' (1) Da el mismo trato' @ 06, 2 SAY ' (2) Favorece a alguno' @ 07, 2 SAY ' (3) Ns/Nc' GET P16 RANGE 1,3 READ IF P16=2 @ 10, 2 SAY '16_2.-¨A cu l o cu les favorece? (ENCUESTADOR, REGISTRE HASTA DOS RESPUESTAS)' @ 12, 2 SAY ' (1) REGISTRAR EN PAPEL' @ 13, 2 SAY ' (2) Ns/Nc' GET P16_2 RANGE 1,2 READ ELSE REPLACE P16_2 WITH 0 ENDIF DO MASCARA @ 02, 2 say '17.-Con lo que usted ha visto u o¡do, ¨c¢mo dir¡a usted que es la relaci¢n' @ 03, 2 say ' del Presidente Zedillo con los gobiernos de los estados que no son del' @ 04, 2 say ' PRI, buena o mala?' @ 06, 2 say ' (1) Excelente (VOLUNTARIO)' @ 07, 2 say ' (2) Buena' @ 08, 2 say ' (3) Regular (VOLUNTARIO)' @ 09, 2 say ' (4) Mala' @ 10, 2 say ' (5) P‚sima (VOLUNTARIO)' @ 11, 2 say ' (6) Ns/Nc' GET P17 RANGE 1,6 READ if p17=3.or.p17=4.or.p17=5 @ 13, 2 say '17_3.-¨En qu‚ se basa usted para decir que tienen una regular o mala' @ 14, 2 say ' relaci¢n?' @ 16, 2 SAY ' (1) REGISTRAR EN PAPEL' @ 17, 2 SAY ' (2) Ns/Nc' GET P17_3 RANGE 1,2 READ else REPLACE P17_3 WITH 0 ENDIF do mascara @ 02, 2 say '18.-¨Sabe usted si el Presidente Zedillo sali¢ recientemente de gira a alg£n' @ 03, 2 say ' estado de la Rep£blica?' @ 05, 2 say ' (1) S¡' @ 06, 2 say ' (2) No' @ 07, 2 SAY ' (3) Ns/Nc' GET P18 RANGE 1,3 read IF P18=1 @ 10, 2 say '18_1.-De los estados que ha visitado recientemente, ¨cu les recuerda usted' @ 11, 2 say ' m s?' @ 12, 2 say ' S¡ menci¢n No menci¢n' @ 14, 2 say ' -Zacatecas (1) (2)' GET P18_1 RANGE 1,2 @ 15, 2 say ' -Veracruz (1) (2)' GET P18_2 RANGE 1,2 @ 16, 2 say ' -Baja California Sur (1) (2)' GET P18_3 RANGE 1,2 @ 17, 2 say ' -Estado de M‚xico (1) (2)' GET P18_4 RANGE 1,2 @ 18, 2 say ' -Tlaxcala (1) (2)' GET P18_5 RANGE 1,2 @ 19, 2 say ' -Otro (REGISTRAR EN PAPEL) (1) (2)' GET P18_6 RANGE 1,2 read else replace p18_1 with 0, P18_2 WITH 0, P18_3 WITH 0, P18_4 WITH 0,P18_5 WITH 0, P18_6 WITH 0 endif IF P18_1<>1.or.p18_2<>1.or.P18_3<>1.or.p18_4<>1.or.P18_5<>1 DO MASCARA @ 02, 2 SAY '19.-Le voy a leer los nombres de algunos de los estados que visit¢' @ 03, 2 say ' recientemente el Presidente Zedillo. D¡game por favor si antes de' @ 04, 2 say ' mencion rselos usted ya estaba enterado o no de que visit¢:' @ 05, 2 say ' (LEER OPCIONES)?' @ 06, 2 say ' ENTERADO NO ENTERADO NC' if p18_1<>1 @ 08, 2 say ' -Zacatecas (1) (2) (3)' GET P19_1 RANGE 1,3 READ ELSE REPLACE P19_1 WITH 0 ENDIF if p18_2<>1 @ 09, 2 say ' -Visit¢ Veracruz (1) (2) (3)' GET P19_2 RANGE 1,3 READ ELSE REPLACE P19_2 WITH 0 ENDIF if p18_3<>1 @ 10, 2 say ' -Visit¢ Baja California Sur (1) (2) (3)' GET P19_3 RANGE 1,3 READ ELSE REPLACE P19_3 WITH 0 ENDIF if p18_4<>1 @ 11, 2 say ' -Visit¢ el Estado de M‚xico (1) (2) (3)' GET P19_4 RANGE 1,3 READ ELSE REPLACE P19_4 WITH 0 ENDIF if p18_5<>1 @ 12, 2 say ' -Visit¢ Tlaxcala (1) (2) (3)' GET P19_5 RANGE 1,3 READ ELSE REPLACE P19_5 WITH 0 ENDIF ELSE REPLACE P19_1 WITH 0, P19_2 WITH 0, P19_3 WITH 0, P19_4 WITH 0, P19_5 WITH 0 ENDIF do mascara @ 02, 2 say ' 19A.-Y d¡game por favor, ¨de qu‚ partido es el gobernador de Zacatecas?' @ 03, 2 say ' (ENCUESTADOR, NO LEA OPCIONES)' @ 05, 2 say ' (1) Alianza PRD-PT (2) Otro (3) Ns/Nc' GET P19A RANGE 1,3 READ do mascara @ 02, 2 say ' 19B.-Y d¡game por favor, ¨de qu‚ partido es el gobernador de Veracruz?' @ 03, 2 say ' (ENCUESTADOR, NO LEA OPCIONES)' @ 05, 2 say ' (1) PRI (2) Otro (3) Ns/Nc' get p19b range 1,3 READ do mascara @ 02, 2 say ' 19C.-Y d¡game por favor, ¨de qu‚ partido es el gobernador de Baja' @ 03, 2 say ' California Sur (ENCUESTADOR, NO LEA OPCIONES)' @ 05, 2 say ' (1) Alianza PRD-PT (2) Otro (3) Ns/Nc' get p19C range 1,3 READ do mascara @ 02, 2 say ' 19D.-Y d¡game por favor, ¨de qu‚ partido es el gobernador del Estado de' @ 03, 2 say ' M‚xico? (ENCUESTADOR, NO LEA OPCIONES)' @ 05, 2 say ' (1) PRI (2) Otro (3) Ns/Nc' get p19D range 1,3 READ do mascara @ 02, 2 say ' 19E.-Y d¡game por favor, ¨de qu‚ partido es el gobernador de Tlaxcala' @ 03, 2 say ' (ENCUESTADOR, NO LEA OPCIONES)' @ 05, 2 say ' (1) Alianza PRD-PT (2) Otro (3) Ns/Nc' get p19E range 1,3 READ ************** SOLO PARA LOS ENTERADOS DE AL MENOS UNA DE LAS GIRAS************. IF P18_1=1.or.p19_1=1.or.p18_2=1.or.p19_2=1.or.p18_3=1.or.p19_3=1.or.p18_4=1.or.p19_4=1.or.p18_5=1.or.p19_5=1 DO MASCARA @ 02, 2 say '20.-De la gira al estado o estados que me mencion¢, ¨qu‚ recuerda usted' @ 03, 2 say ' m s?' @ 05, 2 SAY ' (1) REGISTRAR EN PAPEL' @ 06, 2 SAY ' (2) Ns/Nc' GET P20 RANGE 1,2 READ ELSE REPLACE P20 WITH 0 ENDIF **********************************************************************************. DO MASCARA @ 02, 2 say '21.-En efecto, recientemente el Presidente Zedillo visit¢ los estados de' @ 03, 2 say ' Zacatecas, Veracruz, Tlaxcala, Baja California Sur y el Estado de M‚xico.' @ 04, 2 say ' En su opini¢n, ¨es cierto o falso que el gobierno s¢lo da apoyo a los' @ 05, 2 say ' estados gobernados por el PRI?' @ 07, 2 say ' (1) Cierto' @ 08, 2 say ' (2) Cierto en parte' @ 09, 2 say ' (3) Falso' @ 10, 2 say ' (4) Ns/Nc' GET P21 RANGE 1,4 READ if p21=1.or.p21=2 @ 12, 2 say '21_1.-En las £tlimas semanas el Presidente Zedillo visit¢ cuatro estados' @ 13, 2 say ' de la Rep£blica gobernados por partidos distintos al PRI.' @ 14, 2 say ' ¨A£n as¡ usted cree que es cierto o falso que el gobierno s¢lo' @ 15, 2 say ' da apoyo a los estados gobernados por el PRI?' @ 17, 2 say ' (1) Cierto' @ 18, 2 say ' (2) Cierto en parte' @ 19, 2 say ' (3) Falso' @ 20, 2 say ' (4) Ns/Nc' GET P21_1 RANGE 1,4 READ ELSE REPLA P21_1 WITH 0 ENDIF DO MASCARA @ 02, 2 say '22.-Con lo que usted ha visto o ha o¡do, ¨qu‚ tan de acuerdo est  usted,' @ 03, 2 say ' totalmente, bastante, poco o nada con que...? (ENCUESTADOR: LEA OPCIONES)' @ 05, 2 say ' TOTALMENTE BASTANTE POCO NADA NS/NC' @ 07, 2 say '-Los mexicanos trabajamos unidos sin' @ 08, 2 say ' importar nuestra preferencia por alg£n' @ 09, 2 say ' partido pol¡tico (1) (2) (3) (4) (5)' GET P22_1 RANGE 1,5 @ 11, 2 say '-El gobierno del presidente Zedillo lleva' @ 12, 2 say ' programas sociales a todos los estados' @ 13, 2 say ' de la Rep£blica sin importar el partido' @ 14, 2 say ' que los gobierna (1) (2) (3) (4) (5)' GET P22_2 RANGE 1,5 READ do mascara @ 02, 2 say '23.-En su opini¢n, ¨c¢mo eval£a el trato del Presidente Zedillo a los estados' @ 03, 2 say ' que tienen gobernadores que son del PAN o del PRD:...?' @ 05, 2 say ' (1) Adecuado o (2) Inadecuado (3) Ns/Nc' get p23_1 range 1,3 @ 06, 2 say ' (1) Respetuoso o (2) Irrespetuoso (3) Ns/Nc' get p23_2 range 1,3 @ 07, 2 say ' (1) Equitativo o (2) Desigual (3) Ns/Nc' get p23_3 range 1,3 @ 08, 2 say ' (1) De cooperaci¢n o (2) De enfrentamiento (3) Ns/Nc' get p23_4 range 1,3 read Do mascara @ 02, 2 say 'Opi.-A ra¡z del trato que da el presidente Zedillo a los estados que son' @ 03, 2 say ' gobernados por partidos diferentes al PRI, ¨su opini¢n sobre el ' @ 04, 2 say ' presidente Zedillo mejor¢ o empeor¢?' @ 06, 2 SAY ' (1) Mejor¢' @ 07, 2 SAY ' (2) No cambi¢' @ 08, 2 say ' (3) Empeor¢' @ 09, 2 SAY ' (4) Ns/Nc' get POPI range 1,4 READ IF POPI=2 @ 12, 2 SAY 'Opi_2-¨Y c¢mo es su opini¢n buena o mala?' @ 14, 2 SAY ' (1) Buena' @ 15, 2 SAY ' (2) Mala' @ 16, 2 SAY ' (3) Ns/Nc' GET POPI_2 RANGE 1,3 READ ELSE REPLACE POPI_2 WITH 0 ENDIF Do mascara @ 02, 2 SAY 'Pele.-Si el d¡a de hoy fueran las elecciones para Presidente de la Rep£blica,' @ 03, 2 SAY ' ¨por cu l partido votar¡a usted?' @ 05, 2 SAY ' (1) PAN' @ 06, 2 SAY ' (2) PRI' @ 07, 2 SAY ' (3) PRD' @ 08, 2 SAY ' (4) PT' @ 09, 2 SAY ' (5) PVEM' @ 10, 2 SAY ' (6) Otro' @ 11, 2 SAY ' (7) Ninguno' @ 12, 2 SAY ' (8) Ns/Nc' get PELE range 1,8 READ ********************** **** VERSION (2) ***** ********************** IF VER=2 DO MASCARA @ 02, 2 say 'Ctr.Con lo que usted sabe, ¨usted cree que el gobierno de Ernesto Zedillo' @ 03, 2 say ' tiene las riendas del pa¡s o las cosas se est n saliendo de su control?' @ 05, 2 say ' (1) Tiene las riendas' @ 06, 2 say ' (2) Est n saliendo de su control' @ 07, 2 SAY ' (3) Ns/Nc' GET PCTR RANGE 1,3 READ ENDIF ********************** do mascara @ 02, 2 say 'SOCIOECONOMICOS' @ 03, 2 SAY 'A.- Sexo: (1) Masculino (2) Femenino ' get sex range 1, 3 @ 05, 2 say 'B.- Edad: (1) 18-25 (2) 26-40 ' @ 06, 2 say ' (3) 41-60 (4) 61 o m s ' get edad range 1, 5 @ 08, 2 say 'C.- ¨En qu‚ tipo de instituci¢n, organismo o empresa trabaja usted?' @ 09, 2 say ' (1) Ninguno' @ 10, 2 say ' (2) Gob. Federal, Estatal o Municipal' @ 11, 2 say ' (3) Paraestatal, Banca, Org. descentralizado ' @ 12, 2 say ' (4) Empresa Privada' @ 13, 2 say ' (5) Negocio Propio' @ 14, 2 say ' (6) Ejecicio o pr ctica independiente' get inst range 1, 7 read if inst = 1 @ 16, 2 say 'D.- ¨A qu‚ se dedica usted?' @ 17, 2 say ' (1) Ama de casa (4) Desempleado ' @ 18, 2 say ' (2) Estudiante (5) Otro ' @ 19, 2 say ' (3) Jubilado ' get ocup range 1, 6 read else repl ocup with 0 endif if inst>1 do mascara @ 02, 2 say 'E.-¨Y usted qu‚ es en lugar donde trabaja?' @ 03, 2 say ' (1) Due¤o' @ 04, 2 say ' (2) Trabajador independiente' @ 05, 2 say ' (3) Directivo o funcionario de alto nivel' @ 06, 2 say ' (4) Empleado' @ 07, 2 say ' (5) Obrero' @ 08, 2 say ' (6) Otro' @ 09, 2 say ' (7) Ns/Nc' get PUESTO range 1,7 read else repl puesto with 0 endif do mascara @ 02, 2 say 'G.- ¨Hasta que a¤o escolar estudi¢ usted?' @ 03, 2 say ' (1) Ninguno ' @ 04, 2 say ' (2) Primaria incompleta ' @ 05, 2 say ' (3) Primaria completa ' @ 06, 2 say ' (4) Secundaria incompleta ' @ 07, 2 say ' (5) Secundaria completa ' @ 08, 2 say ' (6) Preparatoria incompleta ' @ 09, 2 say ' (7) Preparatoria Completa ' @ 10, 2 say ' (8) Universidad incompleta ' @ 11, 2 say ' (9) Univeridad completa ' get escol range 0, 9 @ 13, 2 say 'H.- Rango de Ingreso Familiar Mensual..' @ 14, 2 say ' (1) 0-1 Sal. Min. ($ 0 - 1,026)' @ 15, 2 say ' (2) 1-3 Sal. Min. ($ 1,027 - 3,078)' @ 16, 2 say ' (3) 3-5 Sal. Min. ($ 3,079 - 5,130)' @ 17, 2 say ' (4) 5-7 Sal. Min. ($ 5,131 - 7,182)' @ 18, 2 say ' (5) 7-10 Sal. Min. ($ 7,183 -10,260)' @ 19, 2 say ' (6) 10-+ Sal. Min. ($10,261 - o m s)' get ingre range 1,7 read RETURN