* Tema : EVALUACION PRI * Fecha : 05-06/JULIO/00 * Path : PRI10700 * Alcance : NACIONAL * Lugar : REP. MEXICANA *** 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 '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 ********************** **** 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 'PELE.-Si el día de hoy se repitieran las elecciones para Presidente de la' @ 03, 2 SAY ' República ¿por cuál partido votaría usted?' @ 05, 2 say ' (1) PAN' @ 06, 2 say ' (2) PRI' @ 07, 2 say ' (4) PRD' @ 08, 2 say ' (6) PARM' @ 09, 2 say ' (8) PT' @ 10, 2 say ' (9) PVEM' @ 11, 2 say ' (10) Otro' @ 12, 2 say ' (11) Ninguno' @ 13, 2 say ' (12) NS' @ 14, 2 say ' (13) NC' @ 15, 2 say ' (14) Alianza por el Cambio (PAN-PVEM)' @ 16, 2 say ' (15) Alianza por México (PRD-PT-PSN-CD-PAS)' @ 17, 2 say ' (16) PCD' @ 18, 2 say ' (17) PDS' GET PELE VALID(PELE=1.OR.PELE=2.OR.PELE=4.OR.PELE=6.OR.(PELE>7.AND.PELE<18)) 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 '6.-Por favor dígame si antes de mencionárselo había oído usted' @ 03, 2 say ' hablar de Dulce María Sauri' @ 05, 2 say ' (1) Sí' @ 06, 2 say ' (2) No' @ 07, 2 SAY ' (3) Ns/Nc' GET P6 RANGE 1,3 READ IF P6=1 @ 09, 2 say '6_1.-¿Sabe usted qué es o a qué se dedica?' @ 11, 2 say ' (1) Dirigente Nacional del PRI' @ 12, 2 say ' (2) Ex-gobernadora de Yucatán' @ 13, 2 SAY ' (3) Otro' @ 14, 2 SAY ' (4) Ns/Nc' GET P6_1 RANGE 1,4 READ else REPLACE P6_1 WITH 0 endif IF P6<>1.or.P6_1<>1 do mascara @ 02, 2 say '7.-Dígame si antes de mencionárselo, usted ya estaba enterado o no de que' @ 03, 2 say ' Dulce María Sauri es la dirigente nacional del PRI' @ 05, 2 say ' (1) Ya estaba enterado' @ 06, 2 say ' (2) No estaba enterado' @ 07, 2 say ' (3) Ns/Nc' GET P7 RANGE 1,3 read ELSE REPL P7 WITH 0 ENDIF *****SOLO PARA ENTERADOS DE DULCE MARIA SAURI**** if p6_1=1.or.p7=1 DO MASCARA @ 02, 2 say '8A.-¿Qué opinión tiene de ella, buena o mala?' @ 04, 2 say ' (1) Buena' @ 05, 2 SAY ' (2) Regular' @ 06, 2 SAY ' (3) Mala' @ 07, 2 SAY ' (4) Ns/Nc' GET P8A RANGE 1,4 READ DO MASCARA @ 02, 2 say '8B.-En su opinión, desde que Dulce María Sauri es dirigente del PRI, ¿este' @ 03, 2 say ' partido ha mejorado o ha empeorado?' @ 05, 2 say ' (1) Ha mejorado' @ 06, 2 say ' (2) Ha seguido igual de bien ' @ 07, 2 say ' (3) Ha seguido igual de mal ' @ 08, 2 say ' (4) Ha empeorado ' @ 09, 2 say ' (5) Ns/Nc'GET P8B RANGE 1,5 READ ELSE REPLACE P8A WITH 0, P8B WITH 0 ENDIF ************TERMINA PASE ENTERADOS DULCE MA. SAURI***** 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 'POL.-De las siguientes palabras, ¿con cuál estaría más de acuerdo' @ 03, 2 SAY ' para describir la situación política del país?' @ 05, 2 say ' (1) Tranquila' @ 06, 2 say ' (2) Mejor que antes' @ 07, 2 say ' (3) Peligrosa' @ 08, 2 say ' (4) Preocupante' @ 09, 2 say ' (5) Ns/Nc' GET PPOL RANGE 1,5 READ if ppol=1.or.ppol=2 @ 12, 2 say 'Pol_1.-¿Por qué?' @ 14, 2 say ' (1) REGISTRAR EN PAPEL' @ 15, 2 SAY ' (2) Ns/Nc' GET PPOL_1 RANGE 1,2 read ELSE REPLACE PPOL_1 WITH 0 ENDIF if ppol=3.or.ppol=4 @ 12, 2 say 'Pol_3.-¿Por qué?' @ 14, 2 say ' (1) REGISTRAR EN PAPEL' @ 15, 2 SAY ' (2) Ns/Nc' GET PPOL_3 RANGE 1,2 read ELSE REPLACE PPOL_3 WITH 0 ENDIF do mascara @ 02, 2 say '11.-Dígame por favor, ¿qué opinión tiene usted, buena o mala, de los' @ 03, 2 say ' siguientes partidos:...?' @ 05, 2 say ' BUENA REGULAR MALA NS/NC' @ 07, 2 say ' - PAN (1) (2) (3) (4)' GET P11_1 RANGE 1,4 @ 08, 2 say ' - PRD (1) (2) (3) (4)' GET P11_2 RANGE 1,4 @ 09, 2 say ' - PRI (1) (2) (3) (4)' GET P11_3 RANGE 1,4 READ if P11_3=2.OR.P11_3=3 @ 12, 2 say '11_3A.-¿Por qué tiene esa opinión del PRI?' @ 14, 2 say ' (1) REGISTRAR EN PAPEL' @ 15, 2 SAY ' (2) Ns/Nc' GET p11_3A RANGE 1,2 read ELSE REPLACE P11_3A WITH 0 ENDIF do mascara @ 02, 2 say '12.-De lo que usted sabe del PAN, PRI y PRD, ¿cuál cree usted que' @ 03, 2 say ' es el más...?' @ 05, 2 SAY ' PAN PRI PRD Ninguno Ns/Nc' @ 07, 2 SAY ' - Democrático (1) (2) (3) (4) (5)' GET P12_1 RANGE 1,5 @ 08, 2 SAY ' - Independiente del gobierno (1) (2) (3) (4) (5)' GET P12_2 RANGE 1,5 @ 09, 2 SAY ' - Corrupto (1) (2) (3) (4) (5)' GET P12_3 RANGE 1,5 @ 10, 2 say ' - Experimentado para gobernar (1) (2) (3) (4) (5)' GET P12_4 RANGE 1,5 READ DO MASCARA @ 02, 2 say '13.-Con lo que usted sabe, ¿al conocer que Fox ganó la Presidencia de la' @ 03, 2 say ' República, Francisco Labastida:...?' @ 05, 2 say ' (1) Reconoció la derrota (2) Reconoció la derrota (3) Ns/Nc' get p13_1 range 1,3 @ 06, 2 say ' con buena actitud o con soberbia' @ 07, 2 say ' (1) Mostró resentimiento o (2) Mostró conformidad (3) Ns/Nc' get p13_2 range 1,3 read DO MASCARA @ 02, 2 say '14.-Y, ¿cuál fue la actitud de Cuauhtémoc Cárdenas ante el triunfo de Fox?' @ 05, 2 say ' (1) Reconoció la derrota (2) Reconoció la derrota (3) Ns/Nc' get p14_1 range 1,3 @ 06, 2 say ' con buena actitud o con soberbia' @ 07, 2 say ' (1) Mostró resentimiento o (2) Mostró conformidad (3) Ns/Nc' get p14_2 range 1,3 read DO MASCARA @ 02, 2 say '15.-Con lo que usted ha visto o ha escuchado, ¿usted diría que ante el' @ 03, 2 say ' triunfo de Fox, el PRI:...?' @ 05, 2 say ' (1) Mantiene una actitud (2) Entró en crisis interna (3) Ns/Nc' get p15_1 range 1,3 @ 06, 2 say ' serena o' @ 07, 2 say ' (1) Logrará superar esta (2) Inicia su desintegración (3) Ns/Nc' get p15_2 range 1,3 @ 08, 2 say ' derrota o' @ 09, 2 say ' (1) Desaparecerá al no formar (2) Se mantendrá como oposición (3) Ns/Nc' get p15_3 range 1,3 @ 10, 2 say ' parte del gobierno o fuerte al nuevo gobierno' read DO MASCARA @ 02, 2 say '16.-A raíz del triunfo de Vicente Fox en las elecciones presidenciales' @ 03, 2 say ' ¿usted cree que el PRI quedó igual que antes o se debilitó?' @ 05, 2 say ' (1) Quedó igual que antes' @ 06, 2 say ' (2) Se debilitó' @ 07, 2 say ' (3) Ns/Nc' GET P16 RANGE 1,3 READ if p16=2 @ 10, 2 say '16_2.-Y, ¿qué tanto cree usted que se debilitó, mucho o poco?' @ 12, 2 say ' (1) Mucho' @ 13, 2 say ' (2) Regular' @ 14, 2 say ' (3) Poco' @ 15, 2 say ' (4) Nada' @ 16, 2 say ' (5) Ns/Nc' GET P16_2 RANGE 1,5 READ else REPLA P16_2 WITH 0 ENDIF do mascara @ 02, 2 SAY '17.-¿Vio, escuchó o se enteró usted si recientemente sucedió algo importante' @ 03, 2 SAY ' en el Partido Revolucionario Institucional' @ 05, 2 SAY ' (1) Sí' @ 06, 2 SAY ' (2) No' @ 07, 2 SAY ' (3) Nc' GET P17 RANGE 1,3 READ IF P17=1 @ 10, 2 say '17_1.-¿Qué?' @ 12, 2 SAY ' Sí mención No mención' @ 14, 2 SAY ' -Reacciones de dirigentes del PRI ante el' @ 15, 2 SAY ' resultado de las elecciones (1) (2)' GET P17_1 RANGE 1,2 @ 16, 2 SAY ' -Rechazo a la renuncia de Dulce María Sauri' @ 17, 2 SAY ' como Dirigente Nacional del PRI (1) (2)' GET P17_2 RANGE 1,2 @ 18, 2 SAY ' -Otro (REGISTRAR EN PAPEL) (1) (2)' GET P17_3 RANGE 1,2 READ else repl p17_1 with 0, P17_2 WITH 0, P17_3 WITH 0 endif if P17<>1.or.p17_1<>1 DO MASCARA @ 02, 2 say '18.-Dígame por favor si antes de que yo se lo mencionara usted ya estaba' @ 03, 2 say ' enterado o no de las reacciones de miembros del PRI después de perder la' @ 04, 2 say ' Presidencia de la República' @ 06, 2 say ' (1) Ya estaba enterado' @ 07, 2 say ' (2) No estaba enterado' @ 08, 2 say ' (3) Nc' get P18 range 1,3 read ELSE REPLACE P18 WITH 0 ENDIF ************************PASE ENTERADOS DE LAS REACCIONES********************* IF P17_1=1.or.p18=1 DO MASCARA @ 02, 2 say '19.-¿Qué recuerda usted más de estas reacciones?' @ 04, 2 say ' (1) REGISTRAR EN PAPEL' @ 05, 2 SAY ' (2) Ns/Nc' GET P19 RANGE 1,2 READ ELSE REPLACE P19 WITH 0 ENDIF ***********************FIN PASE ENTERADOS*************** DO MASCARA @ 02, 2 say '20.-Hay quienes dicen que el Presidente hizo mal en reconocer el triunfo de' @ 03, 2 say ' Fox antes de que el IFE diera a conocer los resultados oficiales finales.' @ 04, 2 say ' ¿A usted le parece bien o le parece mal que el Presidente Zedillo haya' @ 05, 2 say ' reconocido el triunfo de Fox el mismo día de las elecciones antes de que' @ 06, 2 say ' el IFE terminara de contar todos los votos?' @ 08, 2 say ' (1) Le parece bien' @ 09, 2 say ' (2) Le parece bien en parte' @ 10, 2 say ' (3) Le parece mal' @ 11, 2 say ' (4) Ns/Nc'GET P20 RANGE 1,4 READ IF p20=1.OR.P20=2 @ 13, 2 say '20_1.-¿Por qué le parece bien?' @ 15, 2 say ' (1) REGISTRAR EN PAPEL' @ 16, 2 say ' (2) Ns/Nc' GET P20_1 RANGE 1,2 READ ELSE REPLA P20_1 WITH 0 ENDIF IF p20=3 @ 13, 2 say '20_3.-¿Por qué le parece mal?' @ 15, 2 say ' (1) REGISTRAR EN PAPEL' @ 16, 2 say ' (2) Ns/Nc' GET P20_3 RANGE 1,2 READ ELSE REPLA P20_3 WITH 0 ENDIF Do mascara @ 02, 2 say '21.-En su opinión, ¿este reconocimiento del Presidente Zedillo benefició o' @ 03, 2 say ' perjudicó la imagen del PRI?' @ 05, 2 say ' (1) La benefició' @ 06, 2 say ' (2) La dejó igual (VOLUNTARIO)' @ 07, 2 say ' (3) La perjudicó' @ 08, 2 say ' (4) Ns/Nc' GET P21 RANGE 1,4 read IF p21=1 @ 12, 2 say '21_1.-¿Por qué la benefició?' @ 14, 2 say ' (1) REGISTRAR EN PAPEL' @ 15, 2 say ' (2) Ns/Nc' GET P21_1 RANGE 1,2 READ ELSE REPLA P21_1 WITH 0 ENDIF IF p21=3 @ 12, 2 say '21_3.-¿Por qué la perjudicó?' @ 14, 2 say ' (1) REGISTRAR EN PAPEL' @ 15, 2 say ' (2) Ns/Nc' GET P21_3 RANGE 1,2 READ ELSE REPLA P21_3 WITH 0 ENDIF Do mascara @ 02, 2 say '22.-Ante el triunfo de Fox, Dulce María Sauri y Esteban Moctezuma presentaron' @ 03, 2 say ' su renuncia como dirigentes del PRI. Los miembros del PRI rechazaron' @ 04, 2 say ' estas renuncias. ¿Usted cree que el PRI debió aceptar o no la renuncia de' @ 05, 2 say ' estos dirigentes después de los resultados del 2 de julio?' @ 07, 2 say ' (1) Sí' @ 08, 2 say ' (2) No' @ 09, 2 say ' (3) Ns/Nc' GET P22 RANGE 1,3 read Do mascara @ 02, 2 say '23.-Con lo que usted ha visto o ha oído, ¿por qué cree que los priístas' @ 03, 2 say ' rechazaron estas renuncias:...? (LEA OPCIONES)' @ 05, 2 say ' (1) Porque Sauri y Moctezuma son buenos dirigentes, o' @ 06, 2 say ' (2) Para evitar una crisis en el PRI' @ 07, 2 say ' (3) Ambas (VOLUNTARIO)' @ 08, 2 say ' (4) Ns/Nc' GET P23 RANGE 1,4 read Do mascara @ 02, 2 say '24.-Ante la derrota del PRI, dirigentes locales y gobernadores priístas' @ 03, 2 say ' reclamaron al Presidente Zedillo haber aceptado el triunfo de Fox con' @ 04, 2 say ' tanta anticipación. En su opinión, ¿la postura del Presidente como' @ 05, 2 say ' priísta fue correcta o incorrecta?' @ 07, 2 say ' (1) Correcta' @ 08, 2 say ' (2) Correcta en parte' @ 09, 2 say ' (3) Incorrecta' @ 10, 2 say ' (4) Ns/Nc' GET P24 RANGE 1,4 read DO MASCARA @ 02, 2 say '25.-También le reclamaron haber traicionado al PRI y ser responsable de la' @ 03, 2 say ' derrota. En su opinión, ¿el Presidente Zedillo:...? (LEA OPCIONES)' @ 05, 2 say ' (1) Traicionó a su partido o (2) Ha sido fiel a su partido (3) Ns/Nc' get p25_1 range 1,3 @ 06, 2 say ' (1) No es responsable de la (2) Es responsable de esta (3) Ns/Nc' get p25_2 range 1,3 @ 07, 2 say ' derrota del PRI o derrota' 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