*  Tema     : DECLARACIONES SOBRE CONTRALORIA CASO RSG
*  Fecha    : 28/NOV/95
*  Path     : RSG41195.PRG
*  Alcance  : NACIONAL
*  Lugar    : REPUBLICA MEXICANA

do mascara
@ 02, 2 say 'ACU-En general, ¿está usted de acuerdo o en desacuerdo con la manera como'
@ 03, 2 say '    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 siguientes palabras, ¿con cuál está más de acuerdo para describir'
@ 03, 2 say '   la situación política del país?'
@ 05, 2 say '   (1) Peligrosa'
@ 06, 2 say '   (2) Preocupante'
@ 07, 2 say '   (3) Tranquila'
@ 08, 2 say '   (4) Mejor que antes'
@ 09, 2 say '   (5) Ns/Nc' get ppol range 1,5
read

*if PPOL=1.OR.PPOL=2
*@ 12, 2 say '1a.- ¿Por qué?'
*@ 13, 2 say '     (ENCUESTADOR: REGISTRAR EN PAPEL)'
*@ 15, 2 say '     (1) REGISTRADO EN PAPEL'
*@ 16, 2 say '     (2) NS/NC' GET PPOL_1 RANGE 1,2
*READ
*ELSE
* REPLACE PPOL_1 WITH 0
*ENDIF

*DO MASCARA
*@ 02, 2 SAY 'N.-Dígame por favor, ¿cuál es el acontecimiento más importante que'
*@ 03, 2 SAY '   ocurrió ayer y que apareció en las noticias y en los periódicos hoy?'
*@ 05, 2 SAY '  (1) Carta de Carlos Salinas de Gortari en relación al caso de RSG'
*@ 06, 2 SAY '  (2) Declaraciones de Oñate de que el PRI no amparará a traidores'
*@ 07, 2 SAY '  (3) Reunión entre católicos y evangélicos en Chamula, Chiapas'
*@ 08, 2 SAY '  (4) Otro (ENCUESTADOR: REGISTRE EN PAPEL)'
*@ 09, 2 SAY '  (5) Ns/Nc' GET PNOT RANGE 1,5
*READ

DO MASCARA
@ 02, 2 say '2.-¿Cómo evalúa usted la actuación del gobierno en relación a...'
@ 03, 2 say '                                   Bien  Regular Mal Ns/Nc'
@ 05, 2 say '   - La crisis económica            (1)    (2)   (3)  (4) ' GET P2_1 RANGE 1,4
@ 06, 2 say '   - El combate a la corrupción     (1)    (2)   (3)  (4) ' GET P2_2 RANGE 1,4
@ 07, 2 say '   - El combate a la impunidad'
@ 08, 2 say '     y al influyentismo             (1)    (2)   (3)  (4) ' GET P2_3 RANGE 1,4
READ

DO MASCARA
@ 02, 2 say '25-Por favor dígame en sus palabras cuál es la principal actividad de la'
@ 03, 2 say '   Secretaría de la Contraloría?'
@ 05, 2 say '     (ENCUESTADOR: REGISTRAR EN PAPEL)'
@ 06, 2 say '     (1) REGISTRADO EN PAPEL'
@ 07, 2 say '     (2) NS/NC' GET P25 RANGE 1,2
READ

*DO MASCARA
*@ 02, 2 say '3.-¿Usted cree que en México ahora hay más personas influyentes intocables'
*@ 03, 2 say '   o menos que en el sexenio pasado?'
*@ 05, 2 say '   (1) Más'
*@ 06, 2 say '   (2) Igual'
*@ 07, 2 say '   (3) Menos'
*@ 08, 2 say '   (4) Ns/Nc' get p3 range 1,4
*READ

do mascara
@ 02, 2 say '4.-¿Vió, escuchó o se enteró usted si recientemente ocurrió algún'
@ 03, 2 say '   acontecimiento importante acerca del caso de Raúl Salinas?'
@ 05, 2 say '   (1) Si '
@ 06, 2 say '   (2) No ' 
@ 07, 2 say '   (3) NS/NC' get p4 range 1,3
read

if p4=1
@ 10, 2 say '4_1-¿Qué?' 
@ 12, 2 say '    (1) Se detuvo a la esposa de Raúl Salinas en Suiza'
@ 13, 2 say '    (2) La Contraloría informó del proceso contra Raúl Salinas por'
@ 14, 2 say '        diferencias entre los ingresos declarados y sus ingresos'
@ 15, 2 say '        cuando fue funcionario público'
@ 16, 2 say '    (3) Declaraciones del expresidente Carlos Salinas'
@ 17, 2 say '    (6) Declaraciones de María Elena Vazquez Nava (Ex-contralora)'
@ 18, 2 say '    (4) Otro (ANOTAR EN PAPEL)'
@ 19, 2 say '    (5) Ns/Nc '  get p4_1 range 1,6
read
else
 repl p4_1 with 0
endif

do mascara 
@ 02, 2 say '26-Tal vez usted ya estaba enterado que ayer quien fue responsable de la'
@ 03, 2 say '   contraloría en el gobierno de Carlos Salinas declaro sobre el caso de'
@ 04, 2 say '   Raúl, ¿antes de que yo se lo mencionara usted ya estaba enterado o no'
@ 05, 2 say '   de esto?'
@ 07, 2 say '   (1) Sí'
@ 08, 2 SAY '   (2) No'
@ 09, 2 SAY '   (3) Ns/Nc' GET P26 RANGE 1,3
read

if p26=1
@ 11, 2 say '26_1-¿Digame que declaro?'
@ 13, 2 say '   (1) Cuando fue contralora no pudieron detectar las diferencias en la'
@ 14, 2 SAY '       información que dio Raúl Salinas sobre su patrimonio'
@ 15, 2 say '   (2) Que no se informo el asunto al ex-presidente Salinas'
@ 16, 2 say '   (3) Que siempre actuo apegada al derecho'
@ 17, 2 say '   (4) Otro'
@ 18, 2 SAY '   (5) Ns/Nc' GET P26_1 RANGE 1,5
read
ELSE
 REPL P26_1 WITH 0
ENDIF

do mascara 
@ 02, 2 say '27-Ayer Elena Vazquez Nava informo que cuando fue contralora no se pudo'
@ 03, 2 say '   detectar la magnitud de las operaciones de Raúl Salinas por lo que no'
@ 04, 2 say '   se informo a expresidente Salinas, ¿usted le cree o no le cree?'
@ 06, 2 say '   (1) Sí le creo'
@ 07, 2 SAY '   (2) No le creo'
@ 08, 2 SAY '   (3) Ns/Nc' GET P27 RANGE 1,3
read

if p27=2
@ 11, 2 say '27_1-¿Por qué no le cree?'
@ 12, 2 say '     (ENCUESTADOR: REGISTRAR EN PAPEL)'
@ 14, 2 say '     (1) REGISTRADO EN PAPEL'
@ 15, 2 say '     (2) NS/NC' GET P27_1 RANGE 1,2
read
ELSE
 REPL P27_1 WITH 0
ENDIF

*if p4_1<>1
*do mascara 
*@ 02, 2 say '5.-Tal vez usted ya estaba enterado que recientemente se detuvo en Suiza'
*@ 03, 2 say '   a la esposa de Raúl Salinas. ¿Antes de que yo se lo mencionara'
*@ 04, 2 say '   usted ya estaba enterado o no de esto?'
*@ 06, 2 say '   (1) Sí'
*@ 07, 2 SAY '   (2) No'  && PASE A 7
*@ 08, 2 SAY '   (3) Ns/Nc' GET P5 RANGE 1,3 && PASE A 7
*read
*ELSE
* REPL P5 WITH 0
*ENDIF

*if p5=1.or.p4_1=1
*do mascara 
*@ 02, 2 say '6.-Dígame ¿cuál fue la razón por la que detuvieron a la esposa de Raúl'
*@ 03, 2 say '   Salinas en Suiza?'
*@ 05, 2 say '   (1) Trató de retirar dinero con documentación falsa'
*@ 06, 2 say '   (2) Otro'
*@ 07, 2 SAY '   (3) Ns/Nc' get p6 range 1,3
*read
*else
* repl p6 with 0
*endif


*do mascara 
*@ 02, 2 say '7.-¿Usted cree que con la detención de la esposa de Raúl Salinas se pretende'
*@ 03, 2 say '   avanzar en la investigación del caso Raúl Salinas o busca desprestigiar'
*@ 04, 2 say '   a la familia Salinas?'
*@ 06, 2 say '   (1) Avanzar en la investigación'
*@ 07, 2 SAY '   (2) Desprestigiar a la familia Salinas'
*@ 08, 2 SAY '   (3) Ns/Nc' get p7 range 1,3
*read

DO MASCARA
@ 02, 2 say '28.-La excontralora Vázquez Nava dijo que la contraloría a su cargo no tuvo'
@ 03, 2 say '    capacidad para checar un asunto de la magnitud de los manejos de Raúl'
@ 04, 2 say '    Salinas, ¿usted cree que esto es cierto o que no se investigo más por'
@ 05, 2 say '    tratarse del hermano del entonces Presidente de la República?'
@ 07, 2 say '    (1) Es cierto'
@ 08, 2 say '    (2) No se investigo por ser hermano'
@ 09, 2 say '    (3) Ns/Nc' GET P28 RANGE 1,3
READ

do mascara 
@ 02, 2 say '29-Tal vez usted ya estaba enterado que ayer Norma Zamaniego actual'
@ 03, 2 say '   contralora informo que se abrió proceso administrativo contra Raúl'
@ 04, 2 say '   Salinas por supuesto enriquecimiento ilicito, ¿antes de que yo se'
@ 05, 2 say '   lo mencionara usted ya estaba enterado o no de esto?'
@ 07, 2 say '   (1) Sí'
@ 08, 2 SAY '   (2) No'
@ 09, 2 SAY '   (3) Ns/Nc' GET P29 RANGE 1,3
read

do mascara
@ 02, 2 say '8.-Ayer Norma Zamaniego informó que se inició proceso contra Raúl Salinas'
@ 03, 2 say '   por supuesto enriquecimiento ilícito' 
@ 04, 2 say '   ¿Qué sensación le produce a usted esta' 
@ 05, 2 say '   noticia? (LEER OPCIONES)'
@ 07, 2 say '   (1) Confianza en el o  (2) Desconfianza en el   (3) NS/NC'GET P8_1 RANGE 1,3
@ 08, 2 say '       gobierno               gobierno'
@ 09, 2 SAY '   (1) Coraje          o  (2) Indiferencia         (3) NS/NC'GET P8_2 RANGE 1,3
@ 10, 2 SAY '   (1) Le dio gusto    o  (2) Le molesta           (3) NS/NC'GET P8_3 RANGE 1,3
READ

IF p8_1=2
@ 12, 2 SAY '8.1.-¿Por que le da desconfianza en el gobierno?'
@ 13, 2 SAY '     (ENCUESTADOR: REGISTRAR EN PAPEL)'
@ 15, 2 SAY '     (1) REGISTRADO EN PAPEL'
@ 16, 2 SAY '     (2) Ns / Nc ' get p8_1A range 1,2
read
ELSE
 REPLACE P8_1A WITH 0
ENDIF

*IF p8_2=1
*@ 18, 2 SAY '8.2.-¿Por qué le da coraje?'
*@ 19, 2 SAY '     (ENCUESTADOR: REGISTRAR EN PAPEL)'
*@ 20, 2 SAY '     (1) REGISTRADO EN PAPEL'
*@ 21, 2 SAY '     (2) Ns / Nc ' get p8_2A range 1,2
*read
*ELSE
* REPLACE P8_2A WITH 0
*ENDIF


*IF p8_3=2
*DO MASCARA
*@ 12, 2 SAY '8.3.-¿Por qué le molesta?'
*@ 13, 2 SAY '     (ENCUESTADOR: REGISTRAR EN PAPEL)'
*@ 15, 2 SAY '     (1) REGISTRADO EN PAPEL'
*@ 16, 2 SAY '     (2) Ns / Nc ' get p8_3A range 1,2
*read
*ELSE
* REPLACE P8_3A WITH 0
*ENDIF

*do mascara
*@ 02, 2 say '9.-Tal vez usted ya estaba enterado que ayer el expresidente Carlos'
*@ 03, 2 say '   Salinas de Gortari hizo algunas declaraciones.'
*@ 06, 2 say '   ¿Antes de que yo se lo mencionara usted ya estaba enterado o'
*@ 07, 2 say '   no de esto?'
*@ 08, 2 say '    (1) Sí'
*@ 09, 2 say '    (2) No'  && PASE 20
*@ 10, 2 say '    (3) Ns/Nc' GET P9 RANGE 1,3 && PASE A 20 
*read

*if p9=1
*DO MASCARA
*@ 02, 2 say '9a.- Dígame, ¿qué declaró?'
*@ 04, 2 say '     (1) Sorpresa por los nuevos cargos contra su hermano'
*@ 05, 2 say '     (2) Que durante su gobierno no desconocia los manejos'
*@ 06, 2 say '         de su hermano Raúl'
*@ 07, 2 say '     (3) Que si se prueba la culpabilidad de Raúl deberá ser castigado'
*@ 08, 2 say '     (4) Ns/Nc' GET P9_1 RANGE 1,4
*READ
*ELSE
* REPLACE P9_1 WITH 0
*ENDIF

*do mascara 
*@ 02, 2 say '21.- En relación al caso de Raúl Salinas, ¿ha oído usted mencionar que'
*@ 03, 2 say '     algunos políticos de alto nivel pueden estar involucrados con su'
*@ 04, 2 say '     enriquecimiento ilícito?'
*@ 06, 2 SAY '     (1) Sí'
*@ 07, 2 SAY '     (2) No'
*@ 08, 2 say '     (3) Ns/Nc' GET P21 RANGE 1,3
*read

*IF P21=1
*@ 11, 2 say '21a.- ¿Quiénes?'
*@ 12, 2 say '       (ENCUESTADOR: REGISTRE EN PAPEL)'
*@ 14, 2 say '      (1) REGISTRADO EN PAPEL'
*@ 15, 2 say '      (2) NS/NC' GET P21_1 RANGE 1,2
*READ

*do mascara 
*@ 02, 2 say '21b.- Con lo que usted sabe, ¿cree que estas acusaciones tienen'
*@ 03, 2 SAY '     fundamento o no?'
*@ 05, 2 SAY '     (1) Sí tienen fundamento'
*@ 06, 2 SAY '     (2) No tienen fundamento'
*@ 07, 2 SAY '     (3) Ns/Nc' get p21_2 range 1,3
*read
*else
*repl p21_1 with 0,p21_2 with 0
*endif

do mascara
@ 02, 2 say '30.-Dígame por favor en relación a las declaraciones de Norma Zamaniego'
@ 03, 2 say '    que se acerca más a lo que usted piensa:'
@ 05, 2 say '    (1) Tiene buena voluntad y es sincera pero hasta no ver no creer'
@ 06, 2 say '    (2) Ahora si le creo al gobierno'
@ 07, 2 say '    (3) Ya no se puede creer en el gobierno'
@ 08, 2 say '    (4) Ns/Nc' GET P30 RANGE 1,4
read

*do mascara 
*@ 02, 2 say '22.- A raíz del proceso administrativo en contra de Raúl Salinas,'
*@ 03, 2 say '    ¿su opinión ha mejorado o empeorado sobre...'
*@ 05, 2 SAY '                              Sigue igual  Sigue igual'
*@ 06, 2 SAY '                        Mejoró   de bien    de mal     Empeoró  Ns/Nc'
*@ 08, 2 say '   El gobierno actual     (1)     (2)        (3)         (4)     (5)' get p22_1 range 1,5
*@ 09, 2 say '   El PRI                 (1)     (2)        (3)         (4)     (5)' get p22_2 range 1,5
*@ 10, 2 SAY '   Carlos Salinas         (1)     (2)        (3)         (4)     (5)' get p22_3 range 1,5
*read

*DO MASCARA
*@ 02, 2 say '23.-Algunas personas dicen que todos los priístas son corruptos, otros'
*@ 03, 2 say '    afirman que sólo algunos son corruptos, ¿usted que opina?'
*@ 05, 2 SAY '    (1) Todos son corruptos'
*@ 06, 2 SAY '    (2) Algunos son corruptos'
*@ 07, 2 SAY '    (3) Ns/Nc' get p23 range 1,3
*READ

DO MASCARA
@ 02, 2 say '24.-Dígame por favor ¿qué se acerca más a lo que usted piensa...'
@ 04, 2 say '    (1) El PRI es un buen partido pero debe renovarse por su corrupción'
@ 05, 2 SAY '    (2) Por su corrupción ya no hay nada que hacer con el PRI, por lo que'
@ 06, 2 SAY '        debe desaparecer'
@ 07, 2 SAY '    (3) Ns/Nc' get P24 range 1,3
read

DO MASCARA
@ 02, 2 say '10.-¿Usted cree que a Raúl Salinas se le aplicará todo el peso de la ley o'
@ 03, 2 say '    saldrá libre por ser hermano de un expresidente?'
@ 05, 2 say '    (1) Se le aplicará todo el peso de la ley'
@ 06, 2 say '    (2) Saldrá libre por ser hermano de un expresidente'
@ 07, 2 say '    (3) Ns/Nc' GET P10 RANGE 1,3
READ

*Do mascara 
*@ 02, 2 say '11.-Hay quienes dicen que la detención de la esposa de Raúl Salinas y la'
*@ 03, 2 say '    denuncia de enriquecimiento ilícito de éste se hizo'
*@ 04, 2 say '    para dar un golpe espectacular porque el presidente Zedillo no puede'
*@ 05, 2 say '    con la crisis económica, ¿Usted cree que esto es cierto o no?.'
*@ 07, 2 say '    (1) Sí es cierto'
*@ 08, 2 SAY '    (2) No es cierto'
*@ 09, 2 SAY '    (3) Por las dos razones'
*@ 10, 2 SAY '    (4) Ns/Nc' GET P11 RANGE 1,4
*READ

*do mascara
*@ 02, 2 say '12.-Hasta el momento, ¿cómo calificaría usted la actuación del gobierno en'
*@ 03, 2 SAY '    la investigación del caso Raúl Salinas: bien o mal?'
*@ 05, 2 say '    (1) Bien     '
*@ 06, 2 say '    (2) Regular'
*@ 07, 2 say '    (3) Mal   '
*@ 08, 2 say '    (4) Ns/Nc' get p12 range 1,4
*read

*do mascara
*@ 02, 2 say '13.-¿Y cómo calificaría la actuación del Procurador en la investigación'
*@ 03, 2 SAY '    del caso Raúl Salinas?'
*@ 05, 2 say '    (1) Bien     '
*@ 06, 2 say '    (2) Regular'
*@ 07, 2 say '    (3) Mal   ' 
*@ 08, 2 say '    (4) Ns/Nc' get p13 range 1,4
*read

*do mascara
*@ 02, 2 say '14.-¿A qué atribuye usted más el avance en las investigaciones del caso Raúl'
*@ 03, 2 say '    Salinas: a la actuación de un Procurador que no es priista o a la'
*@ 04, 2 say '    actitud decidida del presidente Zedillo de combatir la corrupción'
*@ 05, 2 say '    y el abuso de influyentes?'
*@ 07, 2 say '    (1) Procurador no priista'
*@ 08, 2 say '    (2) Actitud del presidente para combatir la corrupción'
*@ 09, 2 say '    (3) Ambas'
*@ 10, 2 say '    (4) Ns/Nc' get p14 range 1,4
*read

do mascara
@ 02, 2 say '15.-De las siguientes dígame que se acerca más a lo que usted piensa.'
@ 03, 2 say '    El expresidente Carlos Salinas: '
@ 05, 2 say '    (1) Desconocía del enriquecimiento ilícito de su hermano'
@ 06, 2 say '    (2) Sabía del enriquecimiento ilícito de su hermano y lo dejó pasar'
@ 07, 2 say '    (3) Sabía del enriquecimiento ilícito de su hermano y trató de protegerlo'
@ 08, 2 say '    (4) Ns/Nc' get p15 range 1,4
read

*do mascara
*@ 02, 2 say '16.-Con lo que usted sabe el expresidente Carlos Salinas, ¿Ha encubierto'
*@ 03, 2 say '    o no a su hermano Raúl?' 
*@ 05, 2 say '    (1) Ha encubierto'
*@ 06, 2 say '    (2) No ha encubierto'
*@ 07, 2 say '    (3) Ns/Nc' get p16 range 1,3
*read

*if p16=1
*do mascara
*@ 02, 2 say '17.-¿Por cree usted que el expresidente ha encubierto a Raúl: porque es su'
*@ 03, 2 say '    hermano y quiere protegerlo o porque está involucrado en los negocios'
*@ 04, 2 say '    de Raúl?'
*@ 06, 2 say '    (1) Porque es su hermano y quiere protegerlo'
*@ 07, 2 say '    (2) Está involucrado en los negocios'
*@ 08, 2 say '    (3) Ambas'
*@ 09, 2 say '    (4) Ns/Nc' get p17 range 1,4
*read
*else
* repl p17 with 0
*endif

Do mascara 
@ 02, 2 say '31.-En su opinión la corrupción e impunidad de Raúl Salinas es'
@ 03, 2 say '    resultado del sistema político creado por el PRI, o es resultado de'
@ 04, 2 SAY '    la ambición personal de Raúl Salinas?'
@ 06, 2 SAY '    (1) Resultado del sistema político del PRI'
@ 07, 2 say '    (2) Ambición personal de Raúl Salinas'
@ 08, 2 say '    (3) Ambos'
@ 08, 2 say '    (4) Otro (REGISTRE EN PAPEL)'
@ 09, 2 SAY '    (5) Ns-Nc' get P31 range 1,5
READ

Do mascara 
@ 02, 2 say 'Opi-A raíz del proceso administrativo por enriquecimiento ilícito contra'
@ 03, 2 say '   Raúl Salinas, ¿su opinión sobre el presidente 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
@ 12, 2 SAY 'Opi_1-¿Igual de bien o igual de mal?'
@ 14, 2 SAY '      (1) Igual de bien'
@ 15, 2 SAY '      (2) Igual de mal'
@ 16, 2 SAY '      (3) Ns/Nc'  GET POPI_1 RANGE 1,3
READ
ELSE
 REPLACE POPI_1 WITH 0
ENDIF

*DO mascara
*@ 02, 2 say '19.-¿Usted cree que se debe detener a Carlos Salinas de Gortari o no?'
*@ 04, 2 say '    (1) Si'
*@ 05, 2 say '    (2) No'
*@ 06, 2 say '    (3) Nc' get p19 range 1,3
*READ
*
*if p19=1
*@ 09, 2 say '    ¿Por qué?'
*@ 10, 2 say '    (ENCUESTADOR: REGISTRE EN PAPEL)'
*@ 12, 2 say '    (1) REGISTRADO EN PAPEL'
*@ 13, 2 say '    (2) NS/NC' GET P19A RANGE 1,2
*READ
*ELSE
* REPLACE P19A WITH 0
*ENDIF
*
*if p19=1
*DO MASCARA
*@ 10, 2 say '19.1-¿Le preocupa o no, que una detención de este tipo pueda provocar'
*@ 11, 2 say '     inestabilidad política?'
*@ 13, 2 say '     (1) Si'
*@ 14, 2 say '     (2) No'
*@ 15, 2 say '     (3) Nc' get p19_1 range 1,3
*read
*
*IF P19_1=1
*@ 17, 2 say '19.2-¿Que tanto le preocupa mucho o poco?' 
*@ 19, 2 say '     (1) Mucho'
*@ 20, 2 say '     (2) Poco'
*@ 21, 2 say '     (3) Ns/Nc' get p19_3 range 1,3
*read
*else
* replace p19_3 with 0
*endif
*else
* repl p19_1 with 0, p19_3 with 0
*endif
*
*if p19=2
*@ 10, 2 say '19_2-¿No, por qué?'
*@ 12, 2 say '     (1) (REGISTRAR EN PAPEL)'
*@ 13, 2 say '     (2) Ns/Nc' get p19_2 range 1,2
*read
*else
*repl p19_2 with 0
*endif

DO mascara
@ 02, 2 say 'PSIM.-De los candidatos a la Presidencia de la República del 21 de agosto'
@ 03, 2 say '     Cuauhtémoc Cárdenas del PRD, Diego Fernández de Cevallos del PAN, y' 
@ 04, 2 say '     Ernesto Zedillo del PRI, ¿con cuál candidato simpatiza usted más?'
@ 06, 2 say '     (3) Cuauhtémoc Cárdenas del PRD'  
@ 07, 2 say '     (1) Diego Fernández de Cevallos del PAN'
@ 08, 2 say '     (2) Ernesto Zedillo del PRI'
@ 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