* TEMA : MENSAJE DE FIN DE AÑO * Path : MEN11295.PRG * FECHA : 22 DE DICIEMBRE DE 1995 * LUGAR : REPUBLICA MEXICANA * ALCANCE : NACIONAL 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 'Not.-Dígame por favor, ¿cuál es el acontecimiento más importante que ocurrió' @ 03, 2 say ' ayer y que apareció en las noticias y en los periódicos hoy?' @ 05, 2 say ' (1) Mensaje a la nación del presidente Ernesto Zedillo' @ 06, 2 say ' (2) Gira del Presidente Zedillo por Baja California' @ 07, 2 say ' (3) Recomendación del Consejo Nal. del PRI para expulsar a' @ 08, 2 say ' Raúl Salinas de su partido' @ 09, 2 say ' (4) Intervención telefónica por parte de la DEA al gobierno mexicano' @ 10, 2 say ' (5) Descalifica Lozano Gracia las declaraciones sobre el caso Colosio' @ 11, 2 say ' (6) Aclara Lozano Gracia que los fiscales en el caso MRM no' @ 12, 2 say ' renunciaron, sino que fueron cambiados por la procuradora de E.U.' @ 13, 2 say ' (7) Otro (REGISTRAR EN PAPEL)' @ 14, 2 say ' (8) Ns/Nc' GET PNOT RANGE 1,8 READ 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 do mascara @ 02, 2 say '4.-Con lo que sabe de Ernesto Zedillo, ¿usted cree que...' @ 04, 2 say ' Sí Sí en parte No Ns/Nc' *@ 05, 2 say ' -Garantiza su seguridad personal (1) (2) (3) (4)'GET P4_1 RANGE 1,4 @ 06, 2 say ' -Tiene experiencia para resolver los' @ 07, 2 say ' problemas de empleo y salario en el país (1) (2) (3) (4)'GET P4_2 RANGE 1,4 @ 08, 2 say ' -Es un buen lider (1) (2) (3) (4)'GET P4_3 RANGE 1,4 *@ 09, 2 say ' -Puede resolver la pobreza en el país (1) (2) (3) (4)'GET P4_4 RANGE 1,4 read DO MASCARA @ 02, 2 say '5.-En general, ¿cómo ve usted al presidente Ernesto Zedillo...' @ 04, 2 say ' (1) Fuerte o (2) Débil (3) Ns/Nc'GET P5_1 RANGE 1,3 @ 05, 2 say ' (1) Cercano o (2) Distante (3) Ns/Nc'GET P5_2 RANGE 1,3 @ 06, 2 say ' (1) Falso o (2) Sincero (3) Ns/Nc'GET P5_3 RANGE 1,3 @ 07, 2 SAY ' (1) Manipulador o (2) Auténtico (3) Ns/Nc'GET P5_4 RANGE 1,3 READ do mascara @ 02, 2 say '6.-¿Vió, escuchó o se enteró usted si ayer hubo algún mensaje' @ 03, 2 say ' importante para los mexicanos?' @ 05, 2 say ' (1) Sí' @ 06, 2 say ' (2) No' &&PASE a 7 @ 07, 2 say ' (3) Nc' GET P6 RANGE 1,3 &&PASE a 7 read IF P6=1 @ 10, 2 say ' ¿Cuál?' @ 12, 2 say ' (1) Mensaje del Presidente de fin de año' @ 13, 2 say ' (2) Otro' @ 14, 2 say ' (3) Nc' GET P6_1 RANGE 1,3 read ELSE REPLACE P6_1 WITH 0 ENDIF if p6_1<>1 do mascara @ 02, 2 SAY '7.-Tal vez usted ya estaba enterado que ayer el Presidente Zedillo' @ 03, 2 SAY ' dio un mensaje de fin de año para los mexicanos. Dígame por favor si' @ 04, 2 SAY ' antes de que yo se lo mencionara ¿usted ya estaba enterado o no de' @ 05, 2 SAY ' esta noticia?' @ 07, 2 SAY ' (1) Ya estaba enterado' @ 08, 2 SAY ' (2) No estaba enterado' @ 09, 2 SAY ' (3) Ns/Nc' GET P7 RANGE 1,3 READ else repl p7 with 0 endif ****COMIENZO DEL PASE, SOLO PARA LOS ENTERADOS**** IF P7=1.or.p6_1=1 do mascara @ 02, 2 say '8.-¿Porque medio lo vió, lo escuchó o se entero?' @ 04, 2 say ' (1) Radio' @ 05, 2 say ' (2) TV' @ 06, 2 say ' (3) Periódico' @ 07, 2 say ' (4) Comentarios' @ 08, 2 say ' (5) Otro' @ 09, 2 say ' (6) Ns/Nc' get p8 range 1,6 READ if p8=1.or.p8=2 @ 12, 2 say '9.-¿Lo vió o escuchó completo o en parte?' @ 14, 2 say ' (1) Completo' @ 15, 2 say ' (2) En parte' @ 16, 2 say ' (3) Ns/Nc' get p9 range 1,3 READ else repl p9 with 0 endif ******* (A los que contestaron en parte) if p9=2 do mascara @ 02, 2 say '¿Por qué vió o escuchó parte del mensaje?' @ 04, 2 say '(1) REGISTRAR EN PAPEL' @ 05, 2 say '(2) Ns/Nc ' get p9_1 range 1,2 read else replace p9_1 with 0 endif DO MASCARA @ 02, 2 say '10.-¿Dígame por favor cual fue para usted el principal mensaje del' @ 03, 2 say ' Presidente para los mexicanos?' @ 05, 2 say ' (1) REGISTRADO EN PAPEL' @ 06, 2 say ' (2) Ns/Nc' GET P10 RANGE 1,2 READ do mascara @ 02, 2 say '11.-¿Qué sensación le dejó el mensaje del Presidente?' @ 03, 2 say ' (ENTREVISTADOR: LEA OPCIONES)' *@ 05, 2 say ' (1) Confianza o (2) Desconfianza (3) Ns/Nc' get p11_1 range 1,3 @ 06, 2 say ' (1) Pesismismo u (2) Optimismo (3) Ns/Nc' get p11_2 range 1,3 @ 07, 2 say ' (1) Satisfacción o (2) Insatisfacción (3) Ns/Nc' get p11_3 range 1,3 @ 08, 2 say ' (1) Preocupación o (2) Tranquilidad (3) Ns/Nc' get p11_4 range 1,3 read * "En la pregunta 11 opción 7 (satisfacción) habilitarla y deshabilitar confianza" DO MASCARA @ 02, 2 say '12.-En general, ¿le gusto o no el mensaje?' @ 04, 2 say ' (1) Sí' @ 05, 2 say ' (2) No' @ 06, 2 say ' (3) Ns/Nc' GET P12 RANGE 1,3 && PASE A 13 READ If p12=1 @ 10, 2 say '12.1-¿Por qué le gustó?' @ 12, 2 say ' (1) REGISTRAR EN PAPEL' @ 13, 2 say ' (2) Ns/Nc' get p12_1 range 1,2 READ else repl p12_1 with 0 endif If p12=2 @ 10, 2 say '12.2-¿Por qué no le gustó?' @ 12, 2 say ' (1) REGISTRAR EN PAPEL' @ 13, 2 say ' (2) Ns/Nc' get p12_2 range 1,2 READ else repl p12_2 with 0 endif do mascara @ 02, 2 say '12.3-¿Que tan importante es para usted que le presidente Zedillo halla' @ 03, 2 say ' dado este mensaje?' @ 05, 2 say ' (1) Muy importante ' @ 06, 2 say ' (2) Importante en parte' @ 07, 2 say ' (3) Nada importante' @ 08, 2 say ' (4) NS ' get p12_3 range 1,4 read * (Debe ser para quienes lo vieron) do mascara @ 02, 2 say '13.-¿Cree usted que le mensaje del presidente reflejo o no la' @ 03, 2 say ' realidad actual de México?' *@ 02, 2 say '13.-En general, ¿el mensaje del Presidente respondió o no a las' *@ 03, 2 say ' preocupaciones que usted tiene sobre la situación por la que' *@ 04, 2 say ' atraviesa del país?' @ 06, 2 say ' (1) Sí' @ 07, 2 say ' (2) En parte' @ 08, 2 say ' (3) No' @ 09, 2 say ' (4) Ns/Nc' GET P13 RANGE 1,4 read * sustituir texto de la trece DO MASCARA @ 02, 2 say '14.-Comparado con otros mensajes del Presidente Zedillo, ¿cómo diría' @ 03, 2 say ' usted que fue éste?' @ 05, 2 say ' (1) Excelente' @ 06, 2 say ' (2) Bueno' @ 07, 2 say ' (3) Regular' @ 08, 2 say ' (4) Malo' @ 09, 2 say ' (5) Muy malo' @ 10, 2 say ' (6) Ns/Nc' GET P14 RANGE 1,6 READ else repl p8 with 0,p9 with 0,p10 with 0 repl p11_1 with 0,p11_2 with 0,p11_3 with 0,p11_4 with 0 repl p12 with 0,p12_1 with 0,p12_2 with 0 repl p13 with 0,p14 with 0 endif ********FIN DEL PASE DE LOS QUE VIERON O ESCUCHARON EL ANUNCIO**** do mascara @ 02, 2 say '15.-Ayer el presidente Zedillo dió un mensaje, ¿dígame por favor' @ 03, 2 say ' si usted cree o no ciertas las siguientes afirmaciones del' @ 04, 2 say ' Presidente?' @ 05, 2 say ' Cierto' @ 06, 2 say ' Cierto en parte Falso Ns/Nc' @ 07, 2 say ' - El año entrante sera mejor para' @ 08, 2 say ' todos (1) (2) (3) (4)' get p15_1 range 1,4 @ 09, 2 say ' - Hemos avanzado en la solución de' @ 10, 2 say ' la crisis (1) (2) (3) (4)' get p15_2 range 1,4 @ 11, 2 say ' - La economía comenzará a recuperarse' @ 12, 2 say ' en 1996 (1) (2) (3) (4)' get p15_3 range 1,4 @ 13, 2 say ' - Todos, sociedad y gobierno hemos hecho' @ 14, 2 say ' nuestra tarea para la recuperación (1) (2) (3) (4)' get p15_4 range 1,4 @ 15, 2 say ' - Falta mucho por hacer pero se han' @ 16, 2 say ' dado pasos importantes contra los' @ 17, 2 say ' influyentes (1) (2) (3) (4)' get p15_5 range 1,4 read do mascara @ 02, 2 say '16.-El presidente se comprometió a garantizar honestidad de los servidores' @ 03, 2 say ' públicos, ¿Usted cree que el Presidente Zedillo vigilara o no que los' @ 04, 2 say ' servidores publicos sirvan al pueblo con honestidad?' @ 06, 2 say ' (1) Sí' @ 07, 2 say ' (2) No' @ 08, 2 say ' (3) Ns/Nc' get P16 RANGE 1,3 read do mascara @ 02, 2 say '17.-¿Usted siente que Zedillo le habla a usted con la verdad o no?' @ 05, 2 say ' (1) Habla con la verdad' @ 06, 2 say ' (2) No habla con la verdad' @ 07, 2 say ' (3) Ns/Nc' GET P17 RANGE 1,3 read do mascara @ 02, 2 say '17.1-¿El mensaje le inspiro a usted mayor o menor confianza sobre' @ 03, 2 say ' el futuro económico del país?' @ 05, 2 say ' (1) Mayor' @ 06, 2 say ' (2) Igual' @ 07, 2 say ' (3) Menor' @ 08, 2 say ' (4) Ns/Nc ' get p17_1 range 1,4 read DO MASCARA @ 02, 2 say 'OPI.-A raíz del mensaje de fin de año, ¿su opinión' @ 03, 2 say ' sobre el presidente Ernesto 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 If pOPI=2 @ 10, 2 say 'Opi.2-¿Y cómo es su opinión: buena o mala?' @ 12, 2 say ' (1) Buena' @ 13, 2 say ' (2) Mala' @ 14, 2 say ' (3) Ns/Nc' get popi_2 range 1,3 READ else repl popi_2 with 0 endif do mascara @ 02, 2 say 'SIM-De los candidatos a la Presidencia de la República del 21 de agosto' @ 03, 2 say ' Diego Fernández de Cevallos del PAN, Ernesto Zedillo del PRI y ' @ 04, 2 say ' Cuauhtémoc Cárdenas del PRD, ¿con cuál candidato simpatiza usted más?' @ 06, 2 say ' (1) Diego Fernández de Cevallos del PAN' @ 07, 2 say ' (2) Ernesto Zedillo del PRI' @ 08, 2 say ' (3) Cuauhtémoc Cárdenas del PRD' @ 09, 2 say ' (4) Otro' @ 10, 2 say ' (5) Ninguno' @ 11, 2 say ' (6) Ns/Nc' get psim range 1,6 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. (N$ 0 - 550)' @ 15, 2 say ' (2) 1-3 Sal. Min. (N$ 551 - 1,647)' @ 16, 2 say ' (3) 3-5 Sal. Min. (N$ 1,648 - 2,745)' @ 17, 2 say ' (4) 5-7 Sal. Min. (N$ 2,746 - 3,843)' @ 18, 2 say ' (5) 7-10 Sal. Min. (N$ 3,844 - 5,490)' @ 19, 2 say ' (6) 10-+ Sal. Min. (N$ 5,491 - o más)' get ingre range 1,7 read RETURN