* Tema : VISITA DEL PRESIDENTE A CHIAPAS * Fecha : 6 DE JUNIO DE 1995 * Path : CHS10695.PRG * Alcance : 4 CIUDADES DE CHIAPAS HORITA=substr(str(HORAINI),3,2) DO MASCARA @ 02, 2 say '1.- De las siguientes palabras, con cuál está usted más de acuerdo para' @ 03, 2 say ' describir la situación política del estado:' @ 04, 2 say ' (ENCUESTADOR: LEER OPCIONES 1 A 4)' @ 06, 2 say ' (1) Peligrosa' @ 07, 2 say ' (2) Preocupante' @ 08, 2 say ' (3) Tranquila' @ 09, 2 say ' (4) Mejor que antes' @ 10, 2 say ' (5) No sabe/No contestó' GET P1 RANGE 1,5 READ ********************** **** VERSION (1) ***** ********************** IF VAL(HORITA)<15.OR.(VAL(HORITA)>29.AND.VAL(HORITA)<45) REPL VER WITH 1 DO MASCARA @ 02, 2 SAY '2.-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 ' (ENCUESTADOR : NO LEA OPCIONES)' @ 06, 2 SAY ' (1) Visita del presidente Zedillo a Chiapas' @ 07, 2 SAY ' (2) Acuerdo entre militares, gobernación y Educación para prevenir' @ 08, 2 SAY ' desastres' @ 09, 2 SAY ' (3) Día mundial del medio ambiente' @ 10, 2 SAY ' (4) Declaraciones del EZLN' @ 11, 2 SAY ' (5) Constancias de mayoría para Fox y Cervera' @ 12, 2 SAY ' (6) Otro (ANOTAR EN PAPEL)' @ 13, 2 SAY ' (7) Ns/Nc' GET P2 RANGE 1,7 READ endif do mascara @ 02, 2 say 'ACU.-En general, ¿está usted de acuerdo o en desacuerdo con la' @ 03, 2 say ' manera 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 ********************** **** VERSION (2) ***** ********************** IF (VAL(HORITA)>14.AND.VAL(HORITA)<30).OR.VAL(HORITA)>44 REPL VER WITH 2 DO MASCARA @ 02, 2 SAY '2.-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 ' (ENCUESTADOR : NO LEA OPCIONES)' @ 06, 2 SAY ' (1) Visita del presidente Zedillo a Chiapas' @ 07, 2 SAY ' (2) Acuerdo entre militares, gobernación y Educación para prevenir' @ 08, 2 SAY ' desastres' @ 09, 2 SAY ' (3) Día mundial del medio ambiente' @ 10, 2 SAY ' (4) Declaraciones del EZLN' @ 11, 2 SAY ' (5) Constancias de mayoría para Fox y Cervera' @ 12, 2 SAY ' (6) Otro (ANOTAR EN PAPEL)' @ 13, 2 SAY ' (7) Ns/Nc' GET P2 RANGE 1,7 READ endif do mascara @ 02, 2 say '3.-De los siguientes dígame ¿cuál el problema que le preocupa' @ 03, 2 SAY ' más a usted en estos momentos?' @ 04, 2 SAY ' (ENTREVISTADOR: LEA OPCIONES Y REGISTRE LA PRIMERA RESPUESTA)' @ 06, 2 SAY ' (1) Aumento de precios' @ 07, 2 SAY ' (2) Desempleo' @ 08, 2 say ' (3) Conflicto en Chiapas' @ 09, 2 say ' (4) Seguridad pública' @ 10, 2 SAY ' (5) Asesinatos políticos' @ 11, 2 SAY ' (6) Ninguno' @ 12, 2 say ' (7) Ns/Nc' GET P3 RANGE 1,7 READ do mascara @ 02, 2 say '4.-En su opinión, a raiz del inicio de dialogo por la Paz,' @ 03, 2 SAY ' el conflicto en Chiapas se ha agravado o las cosas han mejorado?' @ 05, 2 SAY ' (1) Se ha agravado' @ 06, 2 SAY ' (2) Sigue igual (EXPONTANEO)' @ 07, 2 say ' (3) Las cosas han mejorado' @ 08, 2 say ' (4) Ns/Nc' get P4 RANGE 1,4 read DO MASCARA @ 02, 2 say '5.- ¿Vio, escuchó o se enteró si ayer sucedió algo importante' @ 03, 2 say ' para los chiapanecos?' @ 05, 2 say ' (1) Sí' @ 06, 2 say ' (2) No' @ 07, 2 say ' (3) Nc' GET P5 RANGE 1,3 READ IF P5=1 @ 09, 2 say 'Qué?' @ 11, 2 say ' (1) Visita del presidente Zedillo a Chiapas' @ 12, 2 say ' (2) Otro (ANOTAR EN PAPEL)' @ 13, 2 say ' (3) Ns/Nc ' GET P5_1 RANGE 1,3 READ ELSE REPL P5_1 WITH 0 ENDIF IF P5>1.OR.P5_1>1 DO MASCARA @ 02, 2 say '6.- Tal vez usted ya había escuchado que ayer el presidente Zedillo' @ 03, 2 SAY ' realizó una visita al estado de Chiapas. Antes de que yo se' @ 04, 2 SAY ' lo mencionara usted ya estaba enterado o no de esto?' @ 06, 2 SAY ' (1) Ya estaba enterado' @ 07, 2 SAY ' (2) No estaba enterado' @ 08, 2 say ' (3) Ns/Nc' GET P6 RANGE 1,3 READ ELSE REPL P6 WITH 0 ENDIF IF P5_1=1.OR.P6=1 DO MASCARA @ 02, 2 say '7.- ¿Vio, escuchó o se enteró del mensaje que el Presidente Zedillo' @ 03, 2 say ' dirigió a los chiapanecos?' @ 05, 2 say ' (1) Sí' @ 06, 2 say ' (2) No' @ 07, 2 say ' (3) Nc' GET P7 RANGE 1,3 READ IF P7=1 do mascara @ 02, 2 say '8.- ¿Recuerda usted lo que dijo el presidente Zedillo en su mensaje?' @ 04, 2 say ' (1) Expresó su apoyo al diálogo para la paz en Chiapas' @ 05, 2 say ' (2) Anunció un programa de asistencia alimentaria en la zona' @ 06, 2 say ' del conflicto' @ 07, 2 SAY ' (3) Apoyo a la producción en el campo' @ 08, 2 SAY ' (4) Más apoyos a las escuelas de Chiapas' @ 09, 2 say ' (5) Más atención a los servicios de salud en Chiapas' @ 10, 2 SAY ' (6) Integración de los indígenas al desarrollo del país?' @ 11, 2 say ' (8) Más recursos para atender las necesidades de Chiapas' @ 12, 2 SAY ' (9) Otro' @ 13, 2 SAY ' (10) Ns-Nc' GET P8 RANGE 1,10 READ do mascara @ 02, 2 say '9.- ¿Cómo escuchó usted a Ernesto Zedillo ...?' @ 04, 2 say ' (1) Fue sincero o (2) No fue sincero (3) Nc' GET P9_1 RANGE 1,3 @ 05, 2 say ' (1) Confuso o (2) Claro (3) Nc' GET P9_2 RANGE 1,3 @ 06, 2 SAY ' (1) Inspiró confianza o (2) Inspiró desconfianza (3) Nc' GET P9_3 RANGE 1,3 @ 07, 2 SAY ' (1) Lo dejó intranquilo o (2) Lo dejó tranquilo (3) Nc' GET P9_4 RANGE 1,3 @ 08, 2 SAY ' (1) Como un presidente (2) Como un presidente (3) Nc' GET P9_5 RANGE 1,3 @ 09, 2 SAY ' débil o fuerte' READ ELSE REPL P8 WITH 0 REPL P9_1 WITH 0,P9_2 WITH 0,P9_3 WITH 0,P9_4 WITH 0,P9_5 WITH 0 ENDIF ELSE REPL P7 WITH 0,P8 WITH 0 REPL P9_1 WITH 0,P9_2 WITH 0,P9_3 WITH 0,P9_4 WITH 0,P9_5 WITH 0 ENDIF DO MASCARA @ 02, 2 say '10.- En su mensaje, Ernesto Zedillo se comprometió nuevamente a buscar' @ 03, 2 say ' por todos los medios la paz, mantener el alto a fuego y atender de' @ 04, 2 say ' manera especial las grandes carencias de los habitantes de Chiapas.' @ 05, 2 say ' ¿Usted cree que Ernesto Zedillo cumplirá lo que ofrece?' @ 07, 2 say ' (1) Sí cumplirá' @ 08, 2 say ' (2) No cumplirá' @ 09, 2 say ' (3) Ns/Nc' GET P10 RANGE 1,3 READ do mascara @ 02, 2 say '11.-A raíz de la visita a Chiapas, ¿su opinión sobre el presidente' @ 03, 2 say ' Zedillo mejoró o empeoró?' @ 05, 2 say ' (1) Mejoró' @ 06, 2 say ' (2) No cambio' @ 07, 2 say ' (3) Empeoró' @ 08, 2 say ' (4) Ns/Nc' get POPI range 1,4 read do mascara @ 02, 2 say '12.-¿Usted cree que el gobierno está o no en vías firmes de solucionar' @ 03, 2 SAY ' el conflicto en Chiapas?' @ 05, 2 SAY ' (1) Sí' @ 06, 2 say ' (2) No' @ 07, 2 say ' (3) Ns/Nc' GET P12 RANGE 1,3 READ Do mascara @ 02, 2 say '13.- ¿Cree usted que la visita de Ernesto Zedillo ayudará o no a solucionar' @ 03, 2 say ' el conflicto en Chiapas?' @ 05, 2 say ' (1) Si' @ 06, 2 SAY ' (2) Si en parte' @ 07, 2 SAY ' (3) No' @ 08, 2 SAY ' (4) Ns/Nc' GET P13 RANGE 1,4 READ do mascara @ 02, 2 say '14.- ¿Cómo calificaría usted la actuación del presidente Zedillo para' @ 03, 2 SAY ' solucionar el conflicto en Chiapas?' @ 05, 2 SAY ' (1) Adecuada o (2) Inadecuada (3) Ns/Nc' GET P14_1 RANGE 1,3 @ 06, 2 say ' (1) Oportuna o (2) Fuera de tiempo (3) Ns/Nc' GET P14_2 RANGE 1,3 @ 07, 2 say ' (1) Suficiente o (2) Insuficiente (3) Ns/Nc' GET P14_3 RANGE 1,3 @ 08, 2 say ' (1) Duro con el EZLN o (2) Demasiado blando (3) Ns/Nc' GET P14_4 RANGE 1,3 read DO mascara @ 02, 2 say 'PELE.-Si el dia de hoy se repitieran las elecciones para presidente de,' @ 03, 2 say ' la República, ¿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) Otro' @ 09, 2 say ' (5) Ninguno' @ 10, 2 say ' (6) Ns/Nc' @ 11, 2 say ' (8) Necesita conocer al candidato' get PELE valid (pele>0.and.pele<7).or.pele=8 READ * --- SOCIOECONOMICOS 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 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 - 550,000)' @ 15, 2 say ' (2) 1-3 Sal. Min. ( 551,000 - 1,647,000)' @ 16, 2 say ' (3) 3-5 Sal. Min. (1,648,000 - 2,745,000)' @ 17, 2 say ' (4) 5-7 Sal. Min. (2,746,000 - 3,843,000)' @ 18, 2 say ' (5) 7-10 Sal. Min. (3,844,000 - 5,490,000)' @ 19, 2 say ' (6) 10-+ Sal. Min. (5,491,000 - o más) ' get ingre range 1,7 read RETURN