* Tema : CANDIDATOS A LA PRESIDENCIA: PAN, PRD, PARM, PVEM * Fecha : 15/SEPTIEMBRE/1999 * Path : POL10999.PRG * 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 '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)Recibe cartas credencial de embajadores en México (1) (0)' GET PN1_1 RANGE 0,1 @ 06, 2 say '-(Pdte)Gira de trabajo por el estado de Puebla (1) (0)' GET PN1_2 RANGE 0,1 @ 07, 2 say '-Controversia uso imagen Virgen Guadalupe, campaña FOX (1) (0)' GET PN1_3 RANGE 0,1 @ 08, 2 say '-Liberan a zapatistas presos, desmantelamiento Aguastintas(1) (0)' GET PN1_4 RANGE 0,1 @ 09, 2 say '-Forma comisión de enlace Con Univ para enlace con el CGH (1) (0)' GET PN1_5 RANGE 0,1 @ 10, 2 say '-Comparece ante diputados Diodóro Carrasco SEGOB (1) (0)' GET PN1_6 RANGE 0,1 @ 11, 2 say '-Queda registrado P Muñoz Ledo candidato del PARM al 2000 (1) (0)' GET PN1_7 RANGE 0,1 @ 12, 2 say '-Continúa paro en UNAM, denuncias que EZLN esta armado (1) (0)' GET PN1_8 RANGE 0,1 @ 13, 2 say '-Sesiona comisión notables para elegir método de Alianza (1) (0)' GET PN1_9 RANGE 0,1 @ 14, 2 say '-Continúan fuertes lluvias en todo el país (1) (0)' GET PN1_10 RANGE 0,1 @ 15, 2 say '-Declaraciones de Fco Labastida precandidato PRI al 2000 (1) (0)' GET PN1_11 RANGE 0,1 @ 16, 2 say '-Declaraciones de Roberto Madrazo precandidato PRI al 2000(1) (0)' GET PN1_12 RANGE 0,1 @ 17, 2 say '-Declaraciones de Vicente Fox candidato del PAN al 2000 (1) (0)' GET PN1_13 RANGE 0,1 @ 18, 2 say '-Declaraciones de C Cárdenas precandidato PRD 2000 (1) (0)' GET PN1_14 RANGE 0,1 @ 19, 2 say '-Tomará protesta hoy Arturo Montiel Rojas al edo de México(1) (0)' GET PN1_15 RANGE 0,1 @ 20, 2 say '-Naciones Unidas denuncia mas 7 mil asesinatos Timor Otal (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 '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 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?' @ 05, 2 say ' (1) (Pdte)Recibe cartas credencial de nuevos embajadores en México' @ 06, 2 say ' (2) (Pdte)Gira de trabajo por el estado de Puebla' @ 07, 2 say ' (3) Continúa controversia uso de imagen Virgen de Guadalupe, campaña FOX' @ 08, 2 say ' (4) Liberan a zapatistas presos, caso desmantelamiento Aguastintas, Chs' @ 09, 2 say ' (5) Forma comisión de enlace Consejo Universitario para enlace con el CGH' @ 10, 2 say ' (6) Comparece ante diputados Diodóro Carrasco SEGOB' @ 11, 2 say ' (7) Queda registrado Porfirio Muñoz Ledo candidato del PARM al 2000' @ 12, 2 say ' (8) Continúa paro de actividades en UNAM, denuncias que EZLN esta armado' @ 13, 2 say ' (9) Sesiona comisión de notables para elegir método de elección Alianza' @ 14, 2 say ' (10) Continúan fuertes lluvias en todo el país' @ 15, 2 say ' (11) Declaraciones de Fco Labastida precandidato del PRI al 2000' @ 16, 2 say ' (12) Declaraciones de Roberto Madrazo precandidato del PRI al 2000' @ 17, 2 say ' (13) Declaraciones de Vicente Fox candidato del PAN al 2000' @ 18, 2 say ' (14) Declaraciones de Cuauhtémoc Cárdenas precandidato PRD al 2000' @ 19, 2 say ' (15) Tomará protesta hoy Arturo Montiel Rojas al edo de México' @ 20, 2 say ' (16) Naciones Unidas denuncia mas de 7 mil asesinatos en Timor Oriental' @ 21, 2 say ' (96) Otro (REGISTRADO EN PAPEL)' @ 22, 2 say ' (99) Ns/Nc' GET PNOT VALID ((PNOT>0.AND.PNOT<16).OR.PNOT=96.OR.PNOT=99) READ IF PNOT>2 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) Felicita telefónicamente a López Dóriga por inicio noticiero' @ 06, 2 say ' (2) Recibe a los equipos Diablos y Tigres de Beisbol Nacional' @ 07, 2 say ' (3) Gira de trabajo por el edo. de México' @ 08, 2 say ' (4) Envia carta de solidaridad al presidente de Grecia' @ 09, 2 say ' (5) Gira de trabajo por Nueva Zelanda a reunión con la APEC' @ 10, 2 say ' (6) 30° Mensaje radiofónico "Pláticas del Presidente"' @ 11, 2 say ' (7) Encabeza conmemoracion de la batalla de chapultepec' @ 12, 2 say ' (8) Recibe cartas credencial de nuevos embajadores en México' @ 13, 2 say ' (9) Gira de trabajo por el estado de Puebla' @ 14, 2 say ' (96) Otro (REGISTRE EN PAPEL)' @ 15, 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 '8.-¿Dígame por favor, ¿qué partidos ya tienen a su candidato a la' @ 03, 2 SAY ' Presidencia de la República y quién es él?' @ 05, 2 SAY ' SI MENCION SI MENCION NO MENCION' @ 06, 2 SAY ' CORRECTO INCORRECTO' @ 08, 2 SAY ' - PAN: Vicente Fox Quesada (1) (2) (3)' get p8_1 range 1,3 @ 09, 2 SAY ' - PRD y PT: Cuauhtémoc Cárdenas (1) (2) (3)' get p8_2 range 1,3 @ 10, 2 SAY ' - PVEM: Jorge González Torres (1) (2) (3)' get p8_3 range 1,3 @ 11, 2 SAY ' - PARM: Porfirio Muñoz Ledo (1) (2) (3)' get p8_4 range 1,3 @ 12, 2 SAY ' - Otros (REGISTRAR EN PAPEL) (1) (2) (3)' get p8_5 range 1,3 READ if p8_1=3.or.p8_2=3.or.p8_3=3.or.p8_4=3 DO MASCARA @ 02, 2 say '9.-Le voy a leer los nombres de varios partidos que ya eligieron a sus' @ 03, 2 say ' candidatos a la Presidencia de la República. Dígame por favor si antes' @ 04, 2 say ' de mencionárselos ya estaba usted enterado o no de que:... ' @ 06, 2 SAY ' ENTERADO NO ENTERADO NS/NC' if p8_1=3 @ 08, 2 SAY '-Vicente Fox es el candidato del PAN a la' @ 09, 2 SAY ' Presidencia (1) (2) (3)' get p9_1 range 1,3 READ ELSE REPLACE P9_1 WITH 0 ENDIF if p8_2=3 @ 10, 2 SAY '-Cuauhtémoc Cárdenas es el candidato del PRD' @ 11, 2 SAY ' y el Partido del Trabajo a la Presidencia (1) (2) (3)' get p9_2 range 1,3 READ ELSE REPLACE P9_2 WITH 0 ENDIF if p8_3=3 @ 12, 2 SAY '-Jorge González Torres es el candidato del' @ 13, 2 SAY ' Partido Verde Ecologista a la Presidencia (1) (2) (3)' get p9_3 range 1,3 READ ELSE REPLACE P9_3 WITH 0 ENDIF if p8_4=3 @ 14, 2 SAY '-Porfirio Muñoz Ledo es el candidato del Partido' @ 15, 2 SAY ' Auténtico de la Revolución Mexicana (1) (2) (3)' get p9_4 range 1,3 READ ELSE REPLACE P9_4 WITH 0 ENDIF else replace p9_1 with 0, p9_2 with 0, p9_3 with 0, p9_4 with 0 endif Do mascara @ 02, 2 SAY '10.-De los candidatos a la Presidencia de la República que existen hasta el' @ 03, 2 SAY ' momento: (ENCUESTADOR, LEA OPCIONES)' @ 05, 2 SAY ' (1) Vicente Fox del PAN' @ 06, 2 SAY ' (2) Cuauhtémoc Cárdenas del PRD y PT' @ 07, 2 SAY ' (3) Jorge González Torres del Verde Ecologista y' @ 08, 2 SAY ' (4) Porfirio Muñoz Ledo del PARM' @ 10, 2 SAY ' ¿Por quién votaría usted para Presidente de la República o no los conoce' @ 11, 2 SAY ' lo suficiente para darme su opinión?' @ 13, 2 SAY ' (5) No los conoce suficiente para darme su opinión' @ 14, 2 SAY ' (6) Ninguno (VOLUNTARIO)' @ 15, 2 SAY ' (7) Ns/Nc' get p10 range 1,7 READ Do mascara @ 02, 2 SAY '11.-Con lo que usted sabe de la situación política actual, ¿usted cree que' @ 03, 2 SAY ' es posible o no que el PAN y el PRD se pongan de acuerdo para unirse y' @ 04, 2 SAY ' nombrar a un sólo candidato para las elecciones del 2000?' @ 06, 2 SAY ' (1) Sí es posible' @ 07, 2 SAY ' (2) No es posible' @ 08, 2 SAY ' (3) Ns/Nc' get p11 range 1,3 READ DO MASCARA @ 02, 2 say 'PELEAL.-Si el día de hoy fueran las elecciones para Presidente de la' @ 03, 2 say ' República y los únicas opciones fueran el PRI y una alianza de los' @ 04, 2 say ' partidos de oposición, ¿por cuál de ellas votaría usted?' @ 06, 2 say ' (1) PRI' @ 07, 2 say ' (2) Alianza de los partidos de oposición' @ 08, 2 say ' (3) Ninguno (VOLUNTARIO)' @ 09, 2 say ' (4) Ns/Nc' GET Peleal RANGE 1,4 read do mascara @ 02, 2 say '13.-Y, entre Manuel Bartlett, Francisco Labastida, Roberto Madrazo y' @ 03, 2 say ' Humberto Roque, ¿por quién votaría usted en la elección para escoger' @ 04, 2 SAY ' al candidato del PRI a la Presidencia?' @ 06, 2 say ' (1) Manuel Bartlett' @ 07, 2 SAY ' (2) Francisco Labastida' @ 08, 2 SAY ' (3) Roberto Madrazo' @ 09, 2 SAY ' (4) Humberto Roque' @ 10, 2 SAY ' (5) Ns/Nc' GET P13 RANGE 1,5 READ DO MASCARA @ 02, 2 say 'TRIHEAD1.-Si el día de hoy fueran las elecciones para Presidente de la' @ 03, 2 say ' República y los únicos candidatos fueran Vicente Fox del PAN, Francisco' @ 04, 2 say ' Labastida del PRI y Cuauhtémoc Cárdenas del PRD, ¿por quién votaría' @ 05, 2 say ' usted?' @ 07, 2 say ' (1) Vicente Fox del PAN' @ 08, 2 say ' (2) Francisco Labastida del PRI' @ 09, 2 say ' (3) Cuauhtémoc Cárdenas del PRD' @ 10, 2 say ' (4) Ns/Nc' GET trihead1 RANGE 1,4 read DO MASCARA @ 02, 2 SAY 'INDEPAR.-Independientemente del partido por el que usted va a votar,' @ 03, 2 SAY ' ¿usted normalmente se considera panista, priista o perredista?' @ 05, 2 SAY ' (1) Panista' @ 06, 2 SAY ' (2) Priista' @ 07, 2 SAY ' (3) Perredista' @ 08, 2 SAY ' (4) De otro partido' @ 09, 2 SAY ' (5) No se identifica con ningún partido' @ 10, 2 SAY ' (6) Ns/Nc' GET INDEPAR RANGE 1,6 READ DO MASCARA @ 02, 2 say 'TRIHEAD2.-Si el día de hoy fueran las elecciones para Presidente de la' @ 03, 2 say ' República y los únicos candidatos fueran Vicente Fox del PAN, Roberto' @ 04, 2 say ' Madrazo del PRI y Cuauhtémoc Cárdenas del PRD, ¿por quién votaría' @ 05, 2 say ' usted?' @ 07, 2 say ' (1) Vicente Fox del PAN' @ 08, 2 say ' (2) Roberto Madrazo del PRI' @ 09, 2 say ' (3) Cuauhtémoc Cárdenas del PRD' @ 10, 2 say ' (4) Ns/Nc' GET trihead2 RANGE 1,4 read DO MASCARA @ 02, 2 say '17.-¿Sabe usted si recientemente ocurrió algo importante en el PAN en torno' @ 03, 2 SAY ' a las elecciones del 2000?' @ 05, 2 say ' (1) Sí' @ 06, 2 say ' (2) No' @ 07, 2 say ' (3) Ns/Nc' GET P17 RANGE 1,3 READ if p17=1 @ 09, 2 say '17_1.-¿Qué?' @ 10, 2 SAY ' SI MENCION NO MENCION' @ 12, 2 SAY ' - El sábado Vicente Fox usó un estandarte de' @ 13, 2 SAY ' de la Virgen de Guadalupe en un acto' @ 14, 2 SAY ' político en León (1) (2)' get p17_1 range 1,2 @ 15, 2 SAY ' - El domingo el PAN realizó una consulta para' @ 16, 2 SAY ' elegir a su candidato a la Presidencia de' @ 17, 2 SAY ' la República (1) (2)' get p17_2 range 1,2 @ 18, 2 SAY ' - Las declaraciones de la Secretaría de' @ 19, 2 SAY ' Gobernación sobre el uso de símbolos' @ 20, 2 SAY ' religiosos en las campañas políticas (1) (2)' get p17_3 range 1,2 @ 21, 2 SAY ' - Otra (REGISTRAR EN PAPEL) (1) (2)' get p17_4 range 1,2 READ else replace p17_1 with 0, p17_2 with 0, p17_3 with 0, p17_4 with 0 endif if p17<>1.OR.P17_1<>1.OR.P17_2<>1.or.p17_3<>1 do mascara @ 02, 2 say '18.-Le voy a leer algunos acontecimientos recientes, dígame por favor si' @ 03, 2 SAY ' antes de mencionárselos ya estaba usted enterado o no de que:...' @ 05, 2 SAY ' ENTERADO NO ENTERADO NC' IF P17_1<>1 @ 07, 2 SAY '-El sábado Vicente Fox usó un estandarte de' @ 08, 2 SAY ' la Virgen de Guadalupe en un acto político en' @ 09, 2 SAY ' León (1) (2) (3)' get p18_1 range 1,3 READ ELSE REPLACE P18_1 WITH 0 ENDIF if P17_2<>1 @ 10, 2 SAY '-El domingo el PAN realizó una consulta para' @ 11, 2 SAY ' elegir a su candidato a la Presidencia de la' @ 12, 2 SAY ' República (1) (2) (3)' get p18_2 range 1,3 READ ELSE REPLACE P18_2 WITH 0 ENDIF if P17_3<>1 @ 13, 2 SAY '-Las declaraciones de la Secretaría de' @ 14, 2 SAY ' Gobernación sobre el uso de símbolos ' @ 15, 2 SAY ' religiosos en las campañas políticas (1) (2) (3)' get p18_3 range 1,3 READ ELSE REPLACE P18_3 WITH 0 ENDIF else replace p18_1 with 0, p18_2 with 0, p18_3 with 0 endif DO MASCARA @ 02, 2 say '19.-En efecto el domingo pasado el PAN realizó una consulta entre sus' @ 03, 2 say ' miembros y simpatizantes para elegir a su candidato a la Presidencia.' @ 04, 2 say ' ¿Qué se acerca más a lo que usted piensa:...?' @ 06, 2 say ' (1) Esta consulta fue un acto democrático, o' @ 07, 2 say ' (2) Fue una farsa porque Vicente Fox era el único candidato registrrado' @ 08, 2 say ' (3) Ns/Nc' GET P19 RANGE 1,3 READ do mascara @ 02, 2 say '20.-En un acto político Vicente Fox recibió, de sus hijos un estandarte de' @ 03, 2 SAY ' la Virgen de Guadalupe. ¿A usted le parece correcto o incorrecto que Fox' @ 04, 2 SAY ' haya usado el símbolo de la Virgen de Guadalupe en su campaña para la' @ 05, 2 SAY ' Presidencia de la República?' @ 07, 2 SAY ' (1) Le parece correcto' @ 08, 2 SAY ' (2) Le tiene sin cuidado (VOLUNTARIO)' @ 09, 2 SAY ' (3) Le parece incorrecto' @ 10, 2 SAY ' (4) Ns/Nc' GET P20 RANGE 1,4 READ if p20=3 @ 13, 2 SAY '20_3.-¿Por qué le parece incorrecto?' @ 15, 2 say ' (1) REGISTRAR EN PAPEL' @ 16, 2 say ' (2) Ns/Nc' GET P20_3 RANGE 1,2 read else replace p20_3 with 0 endif do mascara @ 02, 2 say '21.-La Secretaría de Gobernación señaló que Vicente Fox incurrió en una falta' @ 03, 2 SAY ' ya que la ley prohibe utilizar imágenes religiosas durante las campañas' @ 04, 2 SAY ' electorales. En su opinión, la Secretaría de Gobernación :...' @ 06, 2 SAY ' (1) Hizo bien al señalar este' @ 07, 2 SAY ' hecho o (2) Hizo mal (3) Ns/Nc' GET P21_1 RANGE 1,3 @ 08, 2 SAY ' (1) Tuvo una postura adecuada o (2) Inadecuada (3) Ns/Nc' GET P21_2 RANGE 1,3 @ 09, 2 SAY ' (1) Busca desacreditar la (2) Busca el respeto de las (3) Ns/Nc' GET P21_3 RANGE 1,3 @ 10, 2 SAY ' campaña de Fox o leyes electorales' READ do mascara @ 02, 2 say '22.-¿Qué se acerca más a lo que usted piensa:...?' @ 04, 2 SAY ' (1) Fox recibió el estandarte de la Virgen de Guadalupe como una muestra' @ 05, 2 SAY ' de cariño y buena suerte de sus hijos, o' @ 06, 2 SAY ' (2) Trató de usar la imagen de la Virgen de Guadalupe para obteer votos' @ 07, 2 SAY ' de los mexicanos' @ 08, 2 SAY ' (3) Ns/Nc' GET P22 RANGE 1,3 READ do mascara @ 02, 2 say '23.-¿Usted está de acuerdo o en desacuerdo conn que los partidos políticos' @ 03, 2 SAY ' usen símbolos religiosos para ganar simpatizantes?' @ 05, 2 SAY ' (1) Acuerdo' @ 06, 2 SAY ' (2) Acuerdo en parte (VOLUNTARIO)' @ 07, 2 SAY ' (3) Desacuerdo' @ 08, 2 SAY ' (4) Ns/Nc' GET P23 RANGE 1,4 READ if P23=1.OR.P23=2 @ 10, 2 say '23_1.-La ley electoral prohibe el uso de símbolos religiosos en las campañas' @ 11, 2 SAY ' políticas. Aún así, ¿usted está de acuerdo o en desacuerdo conn que los' @ 12, 2 SAY ' partidos políticos usen símbolos religiosos para ganar simpatizantes?' @ 14, 2 SAY ' (1) Acuerdo' @ 15, 2 SAY ' (2) Acuerdo en parte (VOLUNTARIO)' @ 16, 2 SAY ' (3) Desacuerdo' @ 17, 2 SAY ' (4) Ns/Nc' GET P23_1 RANGE 1,4 READ else replace p23_1 with 0 endif DO MASCARA @ 02, 2 say '24.-A raíz de que Vicente Fox usó un estandarte de la Virgen de Guadalupe en' @ 03, 2 say ' un acto político, ¿su opinión sobre Vicente Fox mejoró o empeoró?' @ 05, 2 say ' (1) Mejoró' @ 06, 2 say ' (2) No cambio, es buena' @ 07, 2 say ' (3) No cambio, es mala' @ 08, 2 say ' (4) Empeoró' @ 09, 2 say ' (5) Ns/Nc' GET P24 RANGE 1,5 READ do mascara @ 02, 2 say '25.-Con lo que usted ha visto u oído del gobierno de Vicente Fox en' @ 03, 2 say ' Guanajuato, ¿a usted le gustaría o no que fuera el próximo Presidente' @ 04, 2 say ' de la República?' @ 06, 2 say ' (1) Sí le gustaría' @ 07, 2 say ' (2) Le gustaría en parte' @ 08, 2 say ' (3) No le gustaría' @ 09, 2 say ' (4) Ns/Nc' get p25 range 1,4 read if p25=1.or.p25=2 @ 12, 2 say '25_1.-¿Por qué le gustaría?' @ 14, 2 say ' (1) REGISTRAR EN PAPEL' @ 15, 2 say ' (2) Ns/Nc' get p25_1 range 1,2 read ELSE REPL P25_1 WITH 0 ENDIF if p25=3 @ 12, 2 say '25_3.-¿Por qué no le gustaría?' @ 14, 2 say ' (1) REGISTRAR EN PAPEL' @ 15, 2 say ' (2) Ns/Nc' get p25_3 range 1,2 read ELSE REPL P25_3 WITH 0 ENDIF DO MASCARA @ 02, 2 say '26.-A raíz del nombramiento de Vicente Fox como candidato del PAN a la' @ 03, 2 say ' Presidencia, ¿su opinión sobre el PAN 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 P26 RANGE 1,4 READ if P26=2 @ 12, 2 say '26_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 P26_2 RANGE 1,3 READ ELSE REPL P26_2 WITH 0 ENDIF DO MASCARA @ 02, 2 say '27.-Dígame por favor, en su opinión, el PAN...(ENTREVISTADOR: LEA OPCIONES)' @ 04, 2 say ' Sí En parte No Ns/Nc' @ 06, 2 say ' - Tiene o no fuerza suficiente para ganar la' @ 07, 2 say ' Presidencia en el 2000 (1) (2) (3) (4)' GET P27_1 RANGE 1,4 @ 08, 2 say ' - Tiene o no un equipo capaz para gobernar el' @ 09, 2 say ' país en el 2000 si gana las elecciones (1) (2) (3) (4)' GET P27_2 RANGE 1,4 @ 10, 2 say ' - Garantiza un mejor gobierno en la Presidencia' @ 11, 2 say ' que el PRI y el PRD (1) (2) (3) (4)' GET P27_3 RANGE 1,4 READ ******************* *** VERSION (2) *** ******************* *IF VER=2 *do mascara *@ 02, 2 say 'Ctr.-¿Usted cree que el gobierno tiene las riendas del país o las cosas se' *@ 03, 2 SAY ' están saliendo de su control?' *@ 05, 2 say ' (1) Tiene las riendas' *@ 06, 2 say ' (2) Está perdiendo el control' *@ 07, 2 say ' (3) Ns/Nc' GET PCTR RANGE 1,3 *READ *ENDIF *********************************** ***** 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 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