*  Tema     : EVALUACION SPOT EDUCACION
*  Fecha    : 27 DE NOVIEMBRE DE 1999
*  Path     : CAM21199.PRG
*  Lugar    : REPUBLICA MEXICANA
*  Alcance  : NACIONAL

*** VERSION SEGUN EL TIEMPO *****
HORITA=substr(str(HORAINI),3,2)
IF VAL(HORITA)<15
   REPL VER WITH 1
ENDIF
IF VAL(HORITA)>14.AND.VAL(HORITA)<30
   REPL VER WITH 2
ENDIF
IF VAL(HORITA)>29.AND.VAL(HORITA)<45
   REPL VER WITH 3
ENDIF
IF VAL(HORITA)>44.AND.VAL(HORITA)<60
   REPL VER WITH 4
ENDIF
***

DO MASCARA
@ 02, 2 SAY 'A.-En general, ¨cree usted que el pa¡s ha mejorado o ha empeorado en los'
@ 03, 2 SAY '    £ltimos cinco a¤os?'
@ 05, 2 SAY '    (1) S¡ ha mejorado'
@ 06, 2 SAY '    (2) Sigue igual de bien (ESPONTANEA)'
@ 07, 2 SAY '    (3) Sigue igual de mal (ESPONTANEA)'
@ 08, 2 SAY '    (4) Ha empeorado'
@ 09, 2 SAY '    (5) Ns'
@ 10, 2 SAY '    (6) Nc' GET PA RANGE 1,6
READ

IF PA=1
@ 13, 2 SAY 'A_1.-Y, ¨qui‚n considera usted que es el principal responsable de que'
@ 14, 2 SAY '     el pa¡s haya mejorado en los £ltimos a¤os?'
@ 16, 2 SAY '     (1) El gobierno'
@ 17, 2 SAY '     (2) El presidente Zedillo'
@ 18, 2 SAY '     (3) Los mexicanos'
@ 19, 2 SAY '     (4) Otro (REGISTRAR EN PAPEL)'
@ 20, 2 SAY '     (5) Ns'
@ 21, 2 SAY '     (6) Nc' GET PA_1 RANGE 1,6
READ
ELSE
 REPLACE PA_1 WITH 0
ENDIF

IF PA=2.OR.PA=3.OR.PA=4
@ 13, 2 SAY 'A_2.-Y, ¨qui‚n considera usted que es el principal responsable de que'
@ 14, 2 SAY '     el pa¡s no haya mejorado en los £ltimos a¤os?'
@ 16, 2 SAY '     (1) El gobierno'
@ 17, 2 SAY '     (2) El presidente Zedillo'
@ 18, 2 SAY '     (3) Los mexicanos'
@ 19, 2 SAY '     (4) Carlos Salinas de Gortari'
@ 20, 2 SAY '     (5) Otro (REGISTRAR EN PAPEL)'
@ 21, 2 SAY '     (6) Ns'
@ 22, 2 SAY '     (7) Nc' GET PA_2 RANGE 1,7
READ
ELSE
 REPLACE PA_2 WITH 0
ENDIF

DO MASCARA
@ 02, 2 say '2.-De todos los comerciales que se transmiten en radio y TV ¨cu les recuerda'
@ 03, 2 SAY '   usted m s?      (ENCUESTADOR: REGISTRE HASTA TRES RESPUESTAS)'
@ 05, 2 say '    (1) Refrescos                            (2) Bebidas (vinos,jugos, etc)'
@ 06, 2 say '    (3) Alimentos                            (4) Almacenes'
@ 07, 2 say '    (5) Shampoo y cosm‚ticos                 (6) Cigarros'
@ 08, 2 say '    (7) Salud(C¢lera, SIDA)                  (8) Botanas'
@ 09, 2 say '    (9) Bancos (propaganda general)         (10) IMSS'
@ 10, 2 say '   (11) Campa¤a Vive sin Drogas             (12) Loter¡a Nacional'
@ 11, 2 say '   (13) Larga distancia (Telmex, Avantel y Iusacell)'
@ 12, 2 say '   (14) Arts. de limpieza para el hogar' 
@ 13, 2 say '   (15) Planificatel                        (16) Condones (Varios)'
@ 14, 2 say '   (17) Sistema de Ahorro para el Retiro (CONSAR)'
@ 15, 2 say '   (18) EDUCACIàN: EL GOBIERNO TAMBIEN SON PERSONAS...(Gobierno Federal)'
@ 16, 2 say '   (19) Supermercados (Gigante, Aurrer , Comercial Mexicana, etc.)'
@ 17, 2 say '   (20) Anuncio sobre forma de elegir al candidato del PRI a la Presidencia'
@ 18, 2 say '   (21) Anuncios del Gobierno del Distrito Federal'
@ 19, 2 say '   (22) SCT (prevenci¢n de accidentes)              ' GET P2_1 RANGE 1,24
@ 20, 2 say '   (23) Otro (ENTREVISTADOR: ANOTE EN PAPEL)        ' GET P2_2 RANGE 0,23
@ 21, 2 say '   (24) Ns/Nc                                       ' GET P2_3 RANGE 0,23
READ

DO MASCARA
@ 02, 2 say '3.-¨Podr¡a mencionar tres comerciales recientes de radio o T.V. que anuncien'
@ 03, 2 SAY '   algo importante para los mexicanos?'
@ 04, 2 say '   (1) Salud, (c¢lera, vacunaci¢n, SIDA)   (2) LOCATEL'
@ 05, 2 say '   (3) CONACULTA-INBA (espect culos)       (4) IFE (credencial de elector)'
@ 06, 2 say '   (5) CONSAR (sistema de pensiones)       (6) SECTUR (Turismo)'
@ 07, 2 say '   (7) Planificaci¢n familiar'
@ 08, 2 say '   (8) Gobierno del Distrito Federal'
@ 09, 2 say '   (9) Procuradur¡a Federal del Consumidor'
@ 10, 2 say '  (10) SCT (prevenci¢n de accidentes)'
@ 11, 2 say '  (11) Campa¤a Vive sin Drogas'
@ 12, 2 say '  (12) PLANIFICATEL'
@ 13, 2 SAY '  (13) EDUCACIàN: Se¤ora platica de la secundaria donde estudian sus hijos'
@ 14, 2 SAY '  (14) EDUCACIàN: EL GOBIERNO TAMBIEN SON PERSONAS...(Gobierno Federal)'
@ 15, 2 SAY '  (15) Eleccion interna del PRI (manos o escenario)'
@ 16, 2 SAY '  (16) FOX informe de gobierno'
@ 17, 2 SAY '  (17) Labastida precampa¤a'
@ 18, 2 SAY '  (18) Madrazo   precampa¤a'
@ 19, 2 SAY '  (19) Bartlett  precampa¤a                ' GET P3_1 RANGE 1,21
@ 20, 2 say '  (20) Otro (ENTREVISTADOR: ANOTE EN PAPEL)' GET P3_2 RANGE 0,20
@ 21, 2 say '  (21) Ns/Nc                               ' GET P3_3 RANGE 0,20
READ

DO MASCARA
@ 02, 2 SAY '4.- ¨Recuerda usted haber visto, u o¡do, recientemente, alg£n anuncio en'
@ 03, 2 SAY '    radio o TV que hable sobre los avances de la educaci¢n en M‚xico?'
@ 05, 2 SAY '    (1) S¡'
@ 06, 2 SAY '    (2) No'
@ 07, 2 SAY '    (3) NS'
@ 08, 2 SAY '    (4) NC' GET P4 RANGE 1,4
READ

if p4=1
do mascara
@ 02, 2 SAY '4_1.- ¨Cu l? (ENCUESTADOR: NO LEA OPCIONES, REGISTRE RESPUESTA ESPONTANEA)'
@ 04, 2 SAY '                                            SI MENCION     NO MENCION'
@ 06, 2 SAY '  - NS                                           (1)            (2)' GET P4_1 RANGE 1,2
@ 08, 2 SAY '  - Anuncio del ni¤o que agradece a su maestro'
@ 09, 2 SAY '    (CAMPA¥A: EL GOBIERNO TAMBIEN SON PERSONAS   (1)            (2)' GET P4_2 RANGE 1,2
@ 10, 2 SAY '     QUE TRABAJAN PARA TI, versi¢n 1: SIN datos)                   '
@ 12, 2 SAY '  - Anuncio del ni¤o que agradece a su maestro'
@ 13, 2 SAY '    (CAMPA¥A: EL GOBIERNO TAMBIEN SON PERSONAS   (1)            (2)' GET P4_3 RANGE 1,2
@ 14, 2 SAY '     versi¢n 2: cancha, desayunos, datos)                          '
@ 16, 2 SAY '  - Anuncio de la se¤ora que cuenta que en la'
@ 17, 2 SAY '    secundaria de sus hijos construyen un'
@ 18, 2 SAY '    taller de computaci¢n                        (1)            (2)' GET P4_4 RANGE 1,2
@ 20, 2 SAY '  - Otro                                         (1)            (2)' GET P4_5 RANGE 1,2
READ
 ELSE
 REPLACE P4_1 WITH 0, P4_2 WITH 0, P4_3 WITH 0, P4_4 WITH 0, P4_5 WITH 0
ENDIF

***************************
********VERSION 1 y 3******
***************************
IF VER=1.OR.VER=3
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 '       (4) PRD'
@ 08, 2 say '       (8) PT'
@ 09, 2 say '       (9) PVEM'
@ 10, 2 say '      (10) Otro'
@ 11, 2 say '      (11) Ninguno'
@ 12, 2 say '      (12) NS'
@ 13, 2 say '      (13) NC' GET PELE VALID(PELE=1.OR.PELE=2.OR.PELE=4.OR.(PELE>7.and.PELE<14))
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'
@ 10, 2 SAY '     (6) Nc' GET PACU RANGE 1,6
read
ENDIF
***************************

DO MASCARA
@ 02, 2 say '7.-Con lo que usted ha visto o ha escuchado, ¨cree que el gobierno de'
@ 03, 2 say '   Ernesto Zedillo hace cosas que benefician a los mexicanos o no hace'
@ 04, 2 say '   cosas que los benefician?'
@ 06, 2 say '   (1) S¡'
@ 07, 2 say '   (2) Algunas'
@ 08, 2 say '   (3) No'
@ 09, 2 say '   (4) Ns'
@ 10, 2 say '   (5) Nc' GET P7 RANGE 1,5
READ

IF p7=1.or.p7=2
@ 14, 2 say '7_1.-¨Cu les?'
@ 16, 2 say '     (1) REGISTRAR EN PAPEL'
@ 17, 2 say '     (2) Ns'
@ 18, 2 say '     (3) Nc' GET P7_1 RANGE 1,3
READ
ELSE
 REPLACE P7_1 WITH 0
ENDIF

***************************
********VERSION 1**********
***************************
IF VER=1
DO MASCARA
@ 02, 2 say '8.-En su opini¢n, ¨qu‚ tanto ha atendido el gobierno del presidente Zedillo'
@ 03, 2 say '   las siguientes necesidades del pa¡s: mucho, bastante, poco o nada?'
@ 05, 2 say '                    MUCHO   BASTANTE  POCO   NADA   NS     NC'
@ 07, 2 say '- Educaci¢n          (1)       (2)     (3)    (4)   (5)    (6)' GET P8_1 RANGE 1,6
@ 08, 2 say '- Salud              (1)       (2)     (3)    (4)   (5)    (6)' GET P8_2 RANGE 1,6
@ 09, 2 say '- Vivienda           (1)       (2)     (3)    (4)   (5)    (6)' GET P8_3 RANGE 1,6
@ 10, 2 say '- Apoyo al campo     (1)       (2)     (3)    (4)   (5)    (6)' GET P8_4 RANGE 1,6
@ 11, 2 say '- Generaci¢n de                                               '
@ 12, 2 say '  empleos            (1)       (2)     (3)    (4)   (5)    (6)' GET P8_5 RANGE 1,6
READ
ENDIF
***************************

***************************
********VERSION 2**********
***************************
IF VER=2
DO MASCARA
@ 02, 2 say '8.-En su opini¢n, ¨qu‚ tanto ha atendido el gobierno del presidente Zedillo'
@ 03, 2 say '   las siguientes necesidades del pa¡s: mucho, bastante, poco o nada?'
@ 05, 2 say '                    MUCHO   BASTANTE  POCO   NADA   NS     NC'
@ 07, 2 say '- Vivienda           (1)       (2)     (3)    (4)   (5)    (6)' GET P8_3 RANGE 1,6
@ 08, 2 say '- Apoyo al campo     (1)       (2)     (3)    (4)   (5)    (6)' GET P8_4 RANGE 1,6
@ 09, 2 say '- Educaci¢n          (1)       (2)     (3)    (4)   (5)    (6)' GET P8_1 RANGE 1,6
@ 10, 2 say '- Generaci¢n de                                               '
@ 11, 2 say '  empleos            (1)       (2)     (3)    (4)   (5)    (6)' GET P8_5 RANGE 1,6
@ 12, 2 say '- Salud              (1)       (2)     (3)    (4)   (5)    (6)' GET P8_2 RANGE 1,6
READ
ENDIF
***************************

***************************
********VERSION 3**********
***************************
IF VER=3
DO MASCARA
@ 02, 2 say '8.-En su opini¢n, ¨qu‚ tanto ha atendido el gobierno del presidente Zedillo'
@ 03, 2 say '   las siguientes necesidades del pa¡s: mucho, bastante, poco o nada?'
@ 05, 2 say '                    MUCHO   BASTANTE  POCO   NADA   NS     NC'
@ 07, 2 say '- Protecci¢n del                                              '
@ 08, 2 say '  medio ambiente     (1)       (2)     (3)    (4)   (5)    (6)' GET P8_8 RANGE 1,6
@ 09, 2 say '- Educaci¢n          (1)       (2)     (3)    (4)   (5)    (6)' GET P8_1 RANGE 1,6
@ 10, 2 say '- Apoyo a los                                                 '
@ 11, 2 say '  m s pobres         (1)       (2)     (3)    (4)   (5)    (6)' GET P8_6 RANGE 1,6
@ 12, 2 say '- Seguridad p£blica  (1)       (2)     (3)    (4)   (5)    (6)' GET P8_7 RANGE 1,6
READ
ENDIF
***************************

***************************
********VERSION 4**********
***************************
IF VER=4
DO MASCARA
@ 02, 2 say '8.-En su opini¢n, ¨qu‚ tanto ha atendido el gobierno del presidente Zedillo'
@ 03, 2 say '   las siguientes necesidades del pa¡s: mucho, bastante, poco o nada?'
@ 05, 2 say '                    MUCHO   BASTANTE  POCO   NADA   NS     NC'
@ 07, 2 say '- Apoyo a los                                                 '
@ 08, 2 say '  m s pobres         (1)       (2)     (3)    (4)   (5)    (6)' GET P8_6 RANGE 1,6
@ 09, 2 say '- Seguridad p£blica  (1)       (2)     (3)    (4)   (5)    (6)' GET P8_7 RANGE 1,6
@ 10, 2 say '- Protecci¢n del                                              '
@ 11, 2 say '  medio ambiente     (1)       (2)     (3)    (4)   (5)    (6)' GET P8_8 RANGE 1,6
@ 12, 2 say '- Educaci¢n          (1)       (2)     (3)    (4)   (5)    (6)' GET P8_1 RANGE 1,6
READ
ENDIF
***************************

DO MASCARA
@ 02, 2 say '9.-En su opini¢n, ¨qui‚n es el principal responsable de que los ni¤os'
@ 03, 2 say '   puedan estudiar hasta la secundaria? (NO LEA OPCIONES)' 
@ 05, 2 say '   (1) Los padres' 
@ 06, 2 say '   (2) El gobierno'
@ 07, 2 say '   (3) Los maestros'
@ 08, 2 say '   (4) Otro (REGISTRAR EN PAPEL)'
@ 09, 2 say '   (5) Ns'
@ 10, 2 say '   (6) Nc' GET P9 RANGE 1,6
READ

DO MASCARA
@ 02, 2 say '10.-¨Usted cree que es cierto o falso que, en M‚xico, 9 de cada diez ni¤os'
@ 03, 2 say '    que terminan la primaria entran a la secundaria?'
@ 05, 2 say '    (1) Cierto'
@ 06, 2 SAY '    (2) Cierto en parte'
@ 07, 2 SAY '    (3) Falso'
@ 08, 2 SAY '    (4) Ns'
@ 09, 2 SAY '    (5) Nc' get P10 range 1,5
READ

IF p10=2.or.p10=3
@ 14, 2 say '10_1.- ¨Por qu‚?'
@ 16, 2 say '       (1) REGISTRAR EN PAPEL'
@ 17, 2 say '       (2) Ns'
@ 18, 2 say '       (3) Nc' GET P10_1 RANGE 1,3
READ
ELSE
 REPLACE P10_1 WITH 0
ENDIF

DO MASCARA
@ 02, 2 say '11.-D¡game, ¨qu‚ tan satisfecho se siente usted con lo que el gobierno del'
@ 03, 2 say '   Presidente Zedillo ha hecho en materia de educaci¢n? (LEER OPCIONES 1 a 4)'
@ 05, 2 say '   (1) Mucho'
@ 06, 2 say '   (2) Bastante'
@ 07, 2 SAY '   (3) Poco'
@ 08, 2 SAY '   (4) Nada'
@ 09, 2 SAY '   (5) Ns'
@ 10, 2 SAY '   (6) Nc' get P11 range 1,6
READ

IF p11=1.or.p11=2
@ 14, 2 say '11_1.-¨Por qu‚?'
@ 16, 2 say '     (1) REGISTRAR EN PAPEL'
@ 17, 2 say '     (2) Ns'
@ 18, 2 say '     (3) Nc' GET P11_1 RANGE 1,3
READ
ELSE
 REPLACE P11_1 WITH 0
ENDIF

IF p11=3.or.p11=4
@ 14, 2 say '11_2.-¨Por qu‚?'
@ 16, 2 say '     (1) REGISTRAR EN PAPEL'
@ 17, 2 say '     (2) Ns'
@ 18, 2 say '     (3) Nc' GET P11_2 RANGE 1,3
READ
ELSE
 REPLACE P11_2 WITH 0
ENDIF

*******************
IF P4<>1.OR.(P4_2<>1.and.P4_3<>1)
DO MASCARA
@ 02, 2 SAY '12.- ¨Ha visto, o escuchado, el anuncio donde un ni¤o aparece con su maestro,'
@ 03, 2 SAY '      al terminar la primaria?'
@ 05, 2 SAY '     (1) S¡'
@ 06, 2 SAY '     (2) No'
@ 07, 2 SAY '     (3) NS'
@ 08, 2 SAY '     (4) NC' GET P12 RANGE 1,4
READ
ELSE
 REPLACE P12 WITH 0
ENDIF

*******PASE PARA QUIENES RECUERDAN EL ANUNCIO DE EDUCACION******.
if P4_2=1.OR.P4_3=1.or.p12=1
DO MASCARA
@ 02, 2 SAY '13.- ¨Qu‚ imagen recuerda usted m s del anuncio del ni¤o que termin¢ la'
@ 03, 2 SAY '    primaria? (ENCUESTADOR: RESPUESTA ESPONTANEA, NO LEA OPCIONES)'
@ 05, 2 SAY '    (1) Emblema del gobierno de la Rep£blica'
@ 06, 2 SAY '    (2) Otro (REGISTRAR EN PAPEL)'
@ 07, 2 SAY '    (3) NS'
@ 08, 2 SAY '    (4) NC' GET P13 RANGE 1,4
READ

DO MASCARA
@ 02, 2 SAY '14.-Y ¨qu‚ frase recuerda m s de este anuncio?'
@ 03, 2 SAY '    (ENCUESTADOR: RESPUESTA ESPONTANEA)'
@ 05, 2 SAY '    (1) El gobierno tambi‚n son personas (lema INCOMPLETO)' 
@ 06, 2 SAY '    (2) El gobierno tambi‚n son personas y trabajan para ti' 
@ 07, 2 SAY '    (3) Un gobierno que trabaja para ti'
@ 08, 2 SAY '    (4) "Vas a llegar muy alto"'
@ 09, 2 SAY '    (5) Todos los ni¤os en edad escolar acuden a la primaria'
@ 10, 2 SAY '    (6) 9 de cada 10 entran a secundaria'
@ 11, 2 SAY '    (7) Hay personas que trabajan para que tengamos m s oportunidades'
@ 12, 2 SAY '    (8) Otro (REGISTRAR EN PAPEL)'
@ 13, 2 SAY '    (9) NS'
@ 14, 2 SAY '    (10) NC' GET P14 RANGE 1,10
READ

DO MASCARA
@ 02, 2 SAY '15.-En general, ¨el anuncio le gust¢ o no le gust¢?'
@ 04, 2 SAY '    (1) S¡ le gust¢'
@ 05, 2 SAY '    (2) No le gust¢'
@ 06, 2 SAY '    (3) NS'
@ 07, 2 SAY '    (4) NC' GET P15 RANGE 1,4
READ

if p15=2  
@ 10, 2 SAY '15_1.-¨Por qu‚ no le gust¢?'
@ 12, 2 SAY '      (1) REGISTRAR EN PAPEL'
@ 13, 2 SAY '      (2) NS'
@ 14, 2 SAY '      (3) NC' GET P15_1 RANGE 1,3
READ
ELSE
  REPLACE P15_1 WITH 0
ENDIF

DO MASCARA
@ 02, 2 SAY '16.- De las siguientes sensaciones, ¨cu l se acerca m s a lo que usted'
@ 03, 2 SAY '     siente cuando ve o escucha ese anuncio? (LEER LAS ALTERNATIVAS)'
@ 05, 2 SAY '     (1) Agrado         o    (2) Fastidio         (3) NS/NC' GET P16_1 RANGE 1,3
@ 06, 2 SAY '     (1) Le molesta     o    (2) Le complace      (3) NS/NC' GET P16_2 RANGE 1,3
@ 07, 2 SAY '     (1) Certeza        o    (2) Duda             (3) NS/NC' GET P16_3 RANGE 1,3
@ 08, 2 SAY '     (1) Des nimo       o    (2) Motivaci¢n       (3) NS/NC' GET P16_4 RANGE 1,3
read

DO MASCARA
@ 02, 2 SAY '17.-Y, ¨le genera alguna otra sensaci¢n adem s de las que le le¡?'
@ 04, 2 SAY '    (1) S¡'
@ 05, 2 SAY '    (2) No'
@ 06, 2 SAY '    (3) NC' GET P17 RANGE 1,3
READ

IF P17=1
@ 10, 2 SAY '17_1.-¨Como cu l?'
@ 12, 2 SAY '      (1) REGISTRAR EN PAPEL'
@ 13, 2 SAY '      (2) NS'
@ 14, 2 SAY '      (3) NC' GET P17_1 RANGE 1,3
READ
ELSE
 REPLACE P17_1 WITH 0
ENDIF

DO MASCARA
@ 02, 2 SAY '18.- Podr¡a decirme, con sus propias palabras, ¨cu l es para usted el'
@ 03, 2 SAY '     principal mensaje de este anuncio?'
@ 05, 2 SAY '     (1) REGISTRAR EN PAPEL'
@ 06, 2 SAY '     (2) NS'
@ 07, 2 SAY '     (3) NC' GET P18 RANGE 1,3
READ

DO MASCARA
@ 02, 2 SAY '19.- Pensando en el maestro que aparece en el anuncio, ¨usted dir¡a que ...?'
@ 03, 2 SAY '     (ENCUESTADOR: LEA OPCIONES)'
@ 05, 2 SAY '     (1) Es simp tico              o  (2) Es desagradable       (3) NS/NC' GET P19_1 RANGE 1,3
@ 06, 2 SAY '     (1) Le cree lo que dice       o  (2) Dice mentiras         (3) NS/NC' GET P19_2 RANGE 1,3
@ 07, 2 SAY '     (1) As¡ son los maestros de   o  (2) Los maestros no son   (3) NS/NC' GET P19_3 RANGE 1,3
@ 08, 2 SAY '         primaria                         como el del anuncio   '         
READ

****************
** VERSION 1 y 2
****************
IF VER=1.OR.VER=2
DO MASCARA
@ 02, 2 SAY '20.-Le voy a leer algunas frases; d¡game, en su opini¢n,'
@ 03, 2 SAY '    ¨cu l de ellas describe mejor el principal mensaje del anuncio?'
@ 04, 2 SAY '    (LEER LAS PRIMERAS 4 OPCIONES)'
@ 06, 2 SAY '    (1) Ahora casi todos los ni¤os estudian la primaria'
@ 07, 2 SAY '    (2) El gobierno atiende las necesidades de los mexicanos'
@ 08, 2 SAY '    (3) Las escuelas p£blicas tienen buenos maestros'
@ 09, 2 SAY '    (4) El gobierno es gente que trabaja para todos'
@ 10, 2 SAY '    (5) Ninguna (ESPONTANEA)'
@ 11, 2 SAY '    (6) NS'
@ 12, 2 SAY '    (7) NC' GET P20 RANGE 1,7
READ
ENDIF
****************

****************
** VERSION 3 y 4
****************
IF VER=3.OR.VER=4
DO MASCARA
@ 02, 2 SAY '20.-Le voy a leer algunas frases; d¡game, en su opini¢n,'
@ 03, 2 SAY '    ¨cu l de ellas describe mejor el principal mensaje del anuncio?'
@ 04, 2 SAY '    (LEER LAS PRIMERAS 4 OPCIONES)'
@ 06, 2 SAY '    (3) Las escuelas p£blicas tienen buenos maestros'
@ 07, 2 SAY '    (4) El gobierno es gente que trabaja para todos'
@ 08, 2 SAY '    (1) Ahora casi todos los ni¤os estudian la primaria'
@ 09, 2 SAY '    (2) El gobierno atiende las necesidades de los mexicanos'
@ 10, 2 SAY '    (5) Ninguna (ESPONTANEA)'
@ 11, 2 SAY '    (6) NS'
@ 12, 2 SAY '    (7) NC' GET P20 RANGE 1,7
READ
ENDIF
****************
 
DO MASCARA
@ 02, 2 SAY '21.- Y, ¨a usted le parece que ese mensaje es cierto o es falso?'
@ 04, 2 SAY '     (1) Cierto'
@ 05, 2 SAY '     (2) Cierto en parte (ESPONTANEA)'
@ 06, 2 SAY '     (3) Falso'
@ 07, 2 SAY '     (4) NS'
@ 08, 2 SAY '     (5) NC' GET P21 RANGE 1,5
READ

DO MASCARA
@ 02, 2 SAY '22.- En general, ¨usted dir¡a que este anuncio ...?'
@ 03, 2 SAY '     (ENCUESTADOR: LEA OPCIONES)'
*@ 05, 2 SAY '     (1) Dura mucho               o  (2) Dura lo que otros        (3) NS/NC' GET P22_1 RANGE 1,3
@ 05, 2 SAY '     (1) Lo ha visto pocas veces  o  (2) Lo ha visto demasiado    (3) NS/NC' GET P22_2 RANGE 1,3
@ 06, 2 SAY '     (1) Muestra avances          o  (2) S¢lo es propaganda       (3) NS/NC' GET P22_3 RANGE 1,3
@ 07, 2 SAY '         verdaderos del pa¡s' 
@ 08, 2 SAY '     (1) Informa                  o  (2) No dice nada nuevo       (3) NS/NC' GET P22_4 RANGE 1,3
read

DO MASCARA
@ 02, 2 SAY '23.-D¡game por favor, ¨de qui‚n cree usted que es este anuncio?'
@ 03, 2 SAY '    (ENCUESTADOR: NO LEA OPCIONES, REGISTRE RESPUESTA ESPONTANEA)'
@ 05, 2 SAY '    (1) Gobierno de la Rep£blica / Presidencia'
@ 06, 2 SAY '    (2) La Secretar¡a de Educaci¢n P£blica (SEP)'
@ 07, 2 SAY '    (3) Otro (REGISTRAR EN PAPEL)'
@ 08, 2 SAY '    (4) NS'
@ 09, 2 SAY '    (5) NC' GET P23 RANGE 1,5
READ

DO MASCARA
@ 02, 2 say '24.-Comparado con otros anuncios que se ven en T.V., ¨c¢mo dir¡a'
@ 03, 2 say '    usted que es este anuncio sobre educaci¢n: muy bueno, bueno, malo'
@ 04, 2 say '    o muy malo?'
@ 06, 2 say '    (1) Muy bueno' 
@ 07, 2 say '    (2) Bueno'
@ 08, 2 say '    (3) Regular (VOLUNTARIO)'
@ 09, 2 say '    (4) Malo'
@ 10, 2 say '    (5) Muy malo'
@ 11, 2 say '    (6) Ns'
@ 12, 2 say '    (7) Nc' GET P24 RANGE 1,7
READ

ELSE
 REPLACE P13 WITH 0, P14 WITH 0, P15_1 WITH 0, P15_1 WITH 0
 REPLACE P16_1 WITH 0, P16_2 WITH 0,P16_3 WITH 0, P16_4 WITH 0, P17 WITH 0
 REPLACE P17_1 WITH 0, P18 WITH 0, P19_1 WITH 0, P19_2 WITH 0, P19_3 WITH 0
 REPLACE P20 WITH 0, P21 WITH 0, p22_2 with 0, p22_3 with 0, p22_4 with 0
 REPLACE P23 WITH 0, P24 WITH 0
ENDIF

****FIN DE PASE PARA QUIENES RECUERDAN EL ANUNCIO DE EDUCACION***

****************
** VERSION 1 y 2
****************
IF VER=1.OR.VER=2
DO MASCARA
@ 02, 2 SAY '25.-En un anuncio sobre la educaci¢n en M‚xico se dice que'
@ 03, 2 SAY '    "el gobierno trabaja para que todos tengamos m s oportunidades".'
@ 04, 2 SAY '    ¨Usted cree que esto es cierto o es falso?'
@ 06, 2 SAY '    (1) Cierto'
@ 07, 2 SAY '    (2) Cierto en parte (ESPONTANEA)'
@ 08, 2 SAY '    (3) Falso'
@ 09, 2 SAY '    (4) NS'
@ 10, 2 SAY '    (5) NC' GET P25 RANGE 1,5
READ
ENDIF
****************

****************
** VERSION 3 y 4
****************
IF VER=3.OR.VER=4
DO MASCARA
@ 02, 2 SAY '25.-En un anuncio sobre la educaci¢n en M‚xico se dice que'
@ 03, 2 SAY '    "el gobierno tambi‚n son personas que trabajan para que'
@ 04, 2 SAY '    todos tengamos m s oportunidades".'
@ 05, 2 SAY '    ¨Usted cree que esto es cierto o es falso?'
@ 07, 2 SAY '    (1) Cierto'
@ 08, 2 SAY '    (2) Cierto en parte (ESPONTANEA)'
@ 09, 2 SAY '    (3) Falso'
@ 10, 2 SAY '    (4) NS'
@ 11, 2 SAY '    (5) NC' GET P25 RANGE 1,5
READ
ENDIF
****************

DO MASCARA
@ 02, 2 say '26.-D¡game por favor, ¨en qu‚ empleados y funcionarios del gobierno piensa'
@ 03, 2 say '    usted cuando escucha la siguiente frase:'
@ 05, 2 say '    "El gobierno tambi‚n son personas que trabajan para ti".'  
@ 06, 2 say '    (ENCUESTADOR: RESPUESTA ESPONTANEA, NO LEER OPCIONES)'
@ 08, 2 say '                                     SI MENCION      NO MENCION' 
@ 09, 2 say '    -NS                                  (1)              (2)' GET P26_1 RANGE 1,2
@ 10, 2 say '    -NINGUNO                             (1)              (2)' GET P26_2 RANGE 1,2
@ 11, 2 say '    -TODOS                               (1)              (2)' GET P26_3 RANGE 1,2
@ 12, 2 say '    -Maestras/maestros                   (1)              (2)' GET P26_4 RANGE 1,2
@ 13, 2 say '    -Enfermeras                          (1)              (2)' GET P26_5 RANGE 1,2
@ 14, 2 say '    -M‚dicos                             (1)              (2)' GET P26_6 RANGE 1,2
@ 15, 2 say '    -Polic¡as                            (1)              (2)' GET P26_7 RANGE 1,2
@ 16, 2 say '    -Soldados/el Ejercito                (1)              (2)' GET P26_8 RANGE 1,2
@ 17, 2 say '    -Diputados o Senadores               (1)              (2)' GET P26_9 RANGE 1,2
@ 18, 2 say '    -El presidente                       (1)              (2)' GET P26_10 RANGE 1,2
@ 19, 2 say '    -Gobernadores                        (1)              (2)' GET P26_11 RANGE 1,2
@ 20, 2 say '    -Secretarios de Estado               (1)              (2)' GET P26_12 RANGE 1,2
@ 21, 2 say '    -Otro (REGISTRAR EN PAPEL)           (1)              (2)' GET P26_13 RANGE 1,2
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 '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

***************************
********VERSION 2 Y 4******
***************************
IF VER=2.OR.VER=4
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'
@ 10, 2 SAY '     (6) Nc' GET PACU RANGE 1,6
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 '       (4) PRD'
@ 08, 2 say '       (8) PT'
@ 09, 2 say '       (9) PVEM'
@ 10, 2 say '      (10) Otro'
@ 11, 2 say '      (11) Ninguno'
@ 12, 2 say '      (12) NS'
@ 13, 2 say '      (13) NC' GET PELE VALID(PELE=1.OR.PELE=2.OR.PELE=4.OR.(PELE>7.and.PELE<14))
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