*  Tema     : VISITA DE SALINAS DE GORTARI A LA CIUDAD DE MEXICO
*  Fecha    : 14-15/JUNIO/99
*  Path     : CSG10699
*  Alcance  : NACIONAL
*  Lugar    : REPUBLICA 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 de'
@ 03, 2 SAY '     gobernar del 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 '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)Incorrec  (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 '7.-¿Vio, escuchó o se enteró usted si recientemente ocurrió algo importante'
@ 03, 2 say '    para los mexicanos?'
@ 05, 2 say '    (1) Sí' 
@ 06, 2 say '    (2) No'                  
@ 07, 2 say '    (3) Nc' GET P7 RANGE 1,3 
read 

IF P7=1
@ 12, 2 say '7_1.-¿Qué?'
@ 14, 2 say '                                                  Sí mención  No mención'
@ 16, 2 say '    -Carlos Salinas de Gortari estuvo en México       (1)        (2)' GET P7_1 RANGE 1,2
@ 17, 2 say '    -Otro (REGISTRAR EN PAPEL)                        (1)        (2)' GET P7_2 RANGE 1,2
read
ELSE
 REPLACE P7_1 WITH 0,P7_2 WITH 0
ENDIF

if p7<>1.or.p7_1<>1
do mascara
@ 02, 2 say '8.-Dígame por favor si antes de que yo se lo mencionara usted ya estaba'
@ 03, 2 say '   enterado o no de la presencia de Carlos Salinas de Gortari en la'
@ 04, 2 say '   Ciudad de México'
@ 06, 2 say '   (1) Ya estaba enterado'
@ 07, 2 say '   (2) No estaba enterado'
@ 08, 2 say '   (3) Nc' GET P8 RANGE 1,3
READ
ELSE
 REPLACE P8 WITH 0
ENDIF

*******************ENTERADOS DE LA PRESENCIA DE CSG EN MEXICO*****************
if p7_1=1.or.p8=1
Do mascara
@ 02, 2 say '9.-¿Vió, escuchó o leyó alguna de las entrevistas del expresidente Carlos'
@ 03, 2 say '   Salinas?'
@ 05, 2 say '   (1) Si'                                       
@ 06, 2 say '   (2) No'                    
@ 07, 2 say '   (3) Ns/Nc' GET P9 RANGE 1,3
read

IF P9=1
DO MASCARA
@ 02, 2 say '9_1.-¿Por qué medio se enteró?'
@ 04, 2 say '     (1) Televisión'
@ 05, 2 say '     (2) Radio'
@ 06, 2 say '     (3) Prensa'
@ 07, 2 say '     (4) Comentarios'
@ 08, 2 say '     (5) Otro'
@ 09, 2 say '     (6) Ns/Nc' GET P9_1 RANGE 1,6
read

IF P9_1=1
@ 12, 2 say '9_1a.-¿Por qué televisora?'
@ 14, 2 say '      (1) Televisa'                               
@ 15, 2 say '      (2) TV Azteca'
@ 16, 2 say '      (3) Otro (Canal 11, 22, Multivisión, Sky, Direct TV)'
@ 17, 2 say '      (4) Ns/Nc' GET P9_1A RANGE 1,4
read
ELSE
 REPLACE P9_1A WITH 0
ENDIF
ELSE
 replace P9_1 WITH 0, P9_1A WITH 0
ENDIF
************************PASE A ENTERADOS DE LAS ENTREVISTAS********************
IF P9=1
DO MASCARA
@ 02, 2 say '10.-¿De las entrevistas que conoció, vió o leyó todo o sólo partes?'
@ 04, 2 say '    (1) Todo '
@ 05, 2 say '    (2) Sólo partes'
@ 06, 2 SAY '    (3) No leyó ninguna (voluntario)'  GET P10 RANGE 1,3
READ

DO MASCARA
@ 02, 2 say '11.-De las declaraciones de Carlos Salinas, ¿cuáles serían los temas'
@ 03, 2 say '    más importantes para usted?'  
@ 05, 2 say '    (1) REGISTRAR EN PAPEL'
@ 06, 2 say '    (2) Ns/Nc' GET P11 RANGE 1,2
READ

DO MASCARA
@ 02, 2 say '12.-Y de las declaraciones de Carlos Salinas, ¿cuáles serían los temas'
@ 03, 2 say '    más importantes para el futuro del país?'
@ 05, 2 say '    (1) REGISTRAR EN PAPEL'
@ 06, 2 say '    (2) Ns/Nc' GET P12 RANGE 1,2
READ

Do mascara 
@ 02, 2 say '13.-De lo que vió, escuchó o leyó, ¿qué sensación le dejaron a usted estas'
@ 03, 2 say '    entrevistas?'
@ 05, 2 say '    (1) Interés      o (2) Indiferencia  (3) Ns/Nc' GET P13_1 RANGE 1,3    
@ 06, 2 say '    (1) Preocupación o (2) Tranquilidad  (3) Ns/Nc' GET P13_2 RANGE 1,3   
@ 07, 2 SAY '    (1) Malestar     o (2) Agrado        (3) Ns/Nc' GET P13_3 RANGE 1,3
READ           
 
Do mascara 
@ 02, 2 say '14.-Estas entrevistas de Carlos Salinas de Gortari, ¿le inspiraron mayor o'
@ 03, 2 say '    menor confianza sobre el futuro 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 P14 RANGE 1,4
READ            

Do mascara 
@ 02, 2 say '15.-¿Cómo vio la actuación de Carlos Salinas en las entrevistas?'
@ 04, 2 say '    (1) Tranquilo       o (2) Nervioso  (3) Ns/Nc' GET P15_1 RANGE 1,3
@ 05, 2 say '    (1) Inseguro        o (2) Seguro    (3) Ns/Nc' GET P15_2 RANGE 1,3
@ 06, 2 SAY '    (1) Claro al hablar o (2) Confuso   (3) Ns/Nc' GET P15_3 RANGE 1,3
@ 07, 2 SAY '    (1) Agresivo        o (2) Calmado   (3) Ns/Nc' GET P15_4 RANGE 1,3
@ 08, 2 SAY '    (1) Evadió algunas  o (2) Contestó  (3) Ns/Nc' GET P15_5 RANGE 1,3
@ 09, 2 say '        preguntas             sin rodeos'
READ

DO MASCARA
@ 02, 2 say '16.-En su opinión, las declaraciones del expresidente, Salinas,'
@ 03, 2 say '    ¿benefician o perjudican al gobierno de Ernesto Zedillo?'
@ 05, 2 say '    (1) Lo benefician'
@ 06, 2 say '    (2) Lo benefician en parte'
@ 07, 2 say '    (3) Ni lo perjudican ni lo benefician'
@ 08, 2 say '    (4) Lo perjudican en parte'
@ 09, 2 say '    (5) Lo perjudican'
@ 10, 2 say '    (6) Ns/Nc' GET P16 RANGE 1,6
READ

ELSE
 REPLACE P10 with 0,P11 with 0,P12 with 0,P13_1 with 0, P13_2 WITH 0, P13_3 WITH 0
 REPLACE P14 with 0,P15_1 with 0,P15_2 with 0,P15_3 with 0,P15_4 with 0, P15_5 WITH 0
 REPLACE P16 WITH 0
ENDIF

ELSE
 REPLACE P9 WITH 0, P9_1 WITH 0, P9_1A WITH 0
 REPLACE P10 with 0,P11 with 0,P12 with 0,P13_1 with 0, P13_2 WITH 0, P13_3 WITH 0
 REPLACE P14 with 0,P15_1 with 0,P15_2 with 0,P15_3 with 0,P15_4 with 0, P15_5 WITH 0
 REPLACE P16 WITH 0
ENDIF
***************************

DO MASCARA
@ 02, 2 say '17.-Dígame en una palabra, ¿qué sensación le produce que el expresidente'
@ 03, 2 say '    Salinas haya hecho declaraciones a la televisión y prensa mexicana?'
@ 05, 2 say '    (1) Ninguna, indiferencia, nada'
@ 06, 2 say '    (2) Me molesta, desagrado, coraje'
@ 07, 2 say '    (3) Risa, es un ridículo'
@ 08, 2 say '    (4) Pena, lastima'
@ 09, 2 say '    (5) Desilusión, decepción'
@ 10, 2 say '    (6) Es un falso, miente, no le creo'
@ 11, 2 say '    (7) Desconfianza' 
@ 12, 2 say '    (8) Preocupación'
@ 13, 2 say '    (9) Esta bien'
@ 14, 2 say '   (10) Satisfacción'
@ 15, 2 say '   (11) Otro (REGISTRAR EN PAPEL)'
@ 16, 2 say '   (12) Ns/Nc' get P17 range 1,12
READ

do mascara
@ 02, 2 say '18.-Dígame por favor si usted cree ciertas o no las siguientes'
@ 03, 2 say '    declaraciones de Carlos Salinas de Gortari'
@ 04, 2 say '                                                   Cierto'
@ 05, 2 say '                                           Cierto  en parte  Falso  Ns/Nc'
@ 07, 2 say '   - Vine porque mi padre está enfermo      (1)     (2)       (3)    (4)' get p18_1 range 1,4 
@ 08, 2 say '   - Colosio y Yo siempre'
@ 09, 2 say '     tuvimos buenas relaciones              (1)     (2)       (3)    (4)' get p18_2 range 1,4
@ 10, 2 say '   - No participaré ni opinaré sobre los'
@ 11, 2 say '     acontecimientos electorales del país   (1)     (2)       (3)    (4)' get p18_3 range 1,4
@ 12, 2 say '   - Al término de mi gobierno se organizó'
@ 13, 2 say '     una campaña en mi contra para'
@ 14, 2 say '     desprestigiarme                        (1)     (2)       (3)    (4)' get p18_4 range 1,4
@ 15, 2 say '   - Respeto a la institución de la'
@ 16, 2 say '     Presidencia de la República            (1)     (2)       (3)    (4)' get p18_5 range 1,4
read                                                                                            

do mascara
@ 02, 2 say '19.-De las siguientes dígame, ¿qué 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 p19 range 1,4
read

DO MASCARA
@ 02, 2 say '20.-A raíz de lo que usted conoció de estas entrevistas, ¿su opinión sobre'
@ 03, 2 say '    Carlos Salinas, mejoró o empeoró?'
@ 05, 2 say '    (1) Mejoró'
@ 06, 2 say '    (2) Se mantuvo igual'
@ 07, 2 say '    (3) Empeoró'
@ 08, 2 say '    (4) Ns/Nc' GET P20 RANGE 1,4
READ

IF P20=2
@ 11, 2 say '20_1.-Y, ¿cómo es su opinión, buena o mala?'
@ 13, 2 say '      (1) Buena'
@ 14, 2 say '      (2) Mala'
@ 15, 2 say '      (3) Ns/Nc' GET P20_1 RANGE 1,3
READ
ELSE
 REPLACE P20_1 WITH 0
ENDIF

DO MASCARA
@ 02, 2 say 'Popi.-A raíz de la presencia de Carlos Salinas de Gortari en la Ciudad de'
@ 03, 2 say '      México, ¿su opinión sobre el presidente Ernesto Zedillo mejoró o'
@ 04, 2 say '      empeoró?'
@ 06, 2 say '      (1) Mejoró'
@ 07, 2 say '      (2) Se mantuvo igual'
@ 08, 2 say '      (3) Empeoró'
@ 09, 2 say '      (4) Ns/Nc' GET Popi RANGE 1,4
READ

IF Popi=2
@ 11, 2 say 'popi_2.-Y, ¿cómo es su opinión, buena o mala?'
@ 13, 2 say '        (1) Buena'
@ 14, 2 say '        (2) Mala'
@ 15, 2 say '        (3) Ns/Nc' GET Popi_2 RANGE 1,3
READ                
ELSE
 REPLACE Popi_2 WITH 0
ENDIF

DO MASCARA
@ 02, 2 say '22.-¿Por qué cree usted que Carlos Salinas vino a México e hizo declaraciones' 
@ 03, 2 say '    por que sólo está interesado en limpiar su nombre, por que quiere influir' 
@ 04, 2 say '    en las decisiones del país, o por que esta realmente interesado en que se' 
@ 05, 2 say '    esclarescan las cosas en México?'
@ 07, 2 say '    (1) Sólo quiere limpiar su nombre solamente'
@ 08, 2 say '    (2) Quiere influir en las decisiones del país'
@ 09, 2 say '    (3) Quiere que se esclarescan las cosas en México'
@ 10, 2 say '    (4) Ns/Nc' GET P22 RANGE 1,4
READ

DO MASCARA
@ 02, 2 say '23.-¿Qué se acerca más a lo que usted piensa:'
@ 03, 2 say '     Para mantener la estabilidad de país... ?'
@ 05, 2 say '     (1) Los expresidentes deben mantener silencio y no intervenir en'
@ 06, 2 say '         política'
@ 07, 2 say '     (2) Los expresidentes deben declarar cuando sea necesario y participar'
@ 08, 2 say '         abiertamente en política '
@ 09, 2 say '     (3) Ns/Nc' GET P23 RANGE 1,3
READ

DO MASCARA
@ 02, 2 say '24.-Carlos Salinas como cualquier mexicano tiene derecho a residir y' 
@ 03, 2 say '    transitar en su país. ¿A usted le preocupa o le tiene sin cuidado que' 
@ 04, 2 say '    Carlos Salinas de Gortari viva en México?' 
@ 06, 2 say '    (1) Le preocupa'
@ 07, 2 say '    (2) Le preocupa en parte'
@ 08, 2 say '    (3) Le tiene sin cuidado'
@ 09, 2 say '    (4) Ns/Nc' GET P24 RANGE 1,4
READ

DO MASCARA
@ 02, 2 say '25.-Y ¿a usted le molesta o le tiene sin cuidado que Carlos Salinas viva en'
@ 03, 2 say '    México?' 
@ 05, 2 say '    (1) Le molesta'
@ 06, 2 say '    (2) Le molesta en parte'
@ 07, 2 say '    (3) Le tiene sin cuidado'
@ 08, 2 say '    (4) Ns/Nc' GET P25 RANGE 1,4
READ

DO MASCARA
@ 02, 2 say '26.-En su opinión, la presencia de Carlos Salinas a la Ciudad de México,'
@ 03, 2 say '    ¿afecta o no a la economía del país?' 
@ 05, 2 say '    (1) Sí la afecta'
@ 06, 2 say '    (2) La afecta en parte'
@ 07, 2 say '    (3) No la afecta'
@ 08, 2 say '    (4) Ns/Nc' GET P26 RANGE 1,4
READ

DO MASCARA
@ 02, 2 say '27.-Y, ¿afecta o no a la estabilidad política del país?' 
@ 04, 2 say '    (1) Sí la afecta'
@ 05, 2 say '    (2) La afecta en parte'
@ 06, 2 say '    (3) No la afecta'
@ 07, 2 say '    (4) Ns/Nc' GET P27 RANGE 1,4
READ

if p27=1.or.p27=2
@ 10, 2 say '27_1.-¿Por qué?' 
@ 12, 2 say '    (1) REGISTRAR EN PAPEL'
@ 13, 2 say '    (2) Ns/Nc' GET P27_1 RANGE 1,2
READ
else
 REPLACE P27_1 WITH 0
ENDIF

do mascara
@ 02, 2 say '28.-De las siguientes reacciones: apoyo, indiferencia, crítica, o abierto'
@ 03, 2 say '    rechazo, ¿cuál cree que ha sido la reacción del... (ENCUESTADOR: LEA'
@ 04, 2 say '    CADA OPCION)...  por la presencia de Carlos Salinas México:'
@ 06, 2 say '                             APOYO  INDIFERENCIA  CRITICA  ABIERTO  NS/NS'
@ 07, 2 say '                                                           RECHAZO'
@ 09, 2 say ' -Del Presidente Zedillo      (1)       (2)         (3)      (4)     (5)' get P28_1 RANGE 1,5
@ 10, 2 say ' -Del PRI                     (1)       (2)         (3)      (4)     (5)' get P28_2 RANGE 1,5
@ 11, 2 say ' -Del PAN                     (1)       (2)         (3)      (4)     (5)' get P28_3 RANGE 1,5
@ 12, 2 say ' -Del PRD                     (1)       (2)         (3)      (4)     (5)' get P28_4 RANGE 1,5
@ 13, 2 say ' -De la población en general  (1)       (2)         (3)      (4)     (5)' get P28_5 RANGE 1,5
@ 14, 2 say ' -De la familia de usted      (1)       (2)         (3)      (4)     (5)' get P28_6 RANGE 1,5
read

do mascara
@ 02, 2 say '29.-La visita de Carlos Salinas, ha provocado diversas reacciones. Con lo que'
@ 03, 2 say '    que usted ha visto u oído, ¿qué tan de acuerdo: totalmente, bastante,'
@ 04, 2 say '    poco o nada está usted con que:...?'
@ 06, 2 say '                                     TOTALMENTE  BASTANTE  POCO  NADA  NS/NS'
@ 08, 2 say '  -La estabilidad política que tenemos'
@ 09, 2 say '   en México no se afecta por la presencia'
@ 10, 2 say '   de Carlos Salinas en el país         (1)       (2)     (3)   (4)    (5)' get P29_1 RANGE 1,5
@ 11, 2 say '  -Carlos Salinas quiere presentarse'
@ 12, 2 say '   ahora como víctima, pero detrás está'
@ 13, 2 say '   su ambición por el poder             (1)       (2)     (3)   (4)    (5)' get P29_2 RANGE 1,5
@ 14, 2 say '  -Hay que perdonar a los que reconocen'
@ 15, 2 say '   sus fallas                           (1)       (2)     (3)   (4)    (5)' get P29_3 RANGE 1,5
@ 16, 2 say '  -Rechazamos que se siga brindando'
@ 17, 2 say '   impunidad a quienes atentan contra el'
@ 18, 2 say '   patrimonio del país, hay que investigar'
@ 19, 2 say '   a Carlos Salinas                     (1)       (2)     (3)   (4)    (5)' get P29_4 RANGE 1,5
READ

DO MASCARA
@ 02, 2 say '30.-A raíz de la presencia de Carlos Salinas de Gortari en la Ciudad de'
@ 03, 2 say '    México,  ¿su opinión sobre el PRI 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 P30 RANGE 1,4
READ

if P30=2
@ 12, 2 say '30_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 P30_2 RANGE 1,3
READ
ELSE
 REPL P30_2 WITH 0
ENDIF

**********************
**** 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
**********************

*** 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