*  Tema     : ASESINATO DEL JEFE DE LA POLICIA DE TIJUANA
*  Fecha    : 28/FEBRERO/2000
*  Path     : NAR20200.PRG
*  Lugar    : REPUBLICA MEXICANA
*  Alcance  : NACIONAL CON SOBREMUESTRA EN BAJA CALIFORNIA NORTE


**** 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'
@ 10, 2 SAY '     (6) Nc' GET PACU RANGE 1,6
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 '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 '4.-Con lo que usted sabe, ¿cree que el gobierno mexicano ha tenido' 
@ 03, 2 SAY '   éxito o ha fracasado en la lucha contra el narcotráfico?'
@ 05, 2 SAY '   (1) Exito'
@ 06, 2 SAY '   (2) Exito en parte'
@ 07, 2 SAY '   (3) Fracaso'
@ 08, 2 SAY '   (4) Ns/Nc'  GET P4 RANGE 1,4
READ

do mascara
@ 02, 2 say '5.-En los últimos dos años en Baja California han ocurrido numerosos'
@ 03, 2 SAY '   asesinatos de personas y autoridades policiacas, ¿a qué cree usted'
@ 04, 2 say '   que se deben estos hechos de violencia? (NO LEA OPCIONES)'
@ 06, 2 say '   (2) Problemas políticos'
@ 07, 2 say '   (1) Problemas entre narcotraficantes'
@ 08, 2 say '   (3) Corrupción policiaca'
@ 09, 2 say '   (4) Problemas económicos'
@ 10, 2 say '   (5) Otro '
@ 11, 2 say '   (6) Ns/Nc' GET P5 RANGE 1,6
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 '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 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 '       (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 '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=3.or.ppol=4
@ 14, 2 say 'Pol_3.-¿Por qué?'
@ 16, 2 say '    (1) REGISTRAR EN PAPEL'
@ 17, 2 SAY '    (2) Ns/Nc' GET PPOL_3 RANGE 1,2
read
ELSE
 REPLACE PPOL_3 WITH 0
ENDIF

**********************
**** VERSION (1) *****
**********************
IF VER=1
do mascara
@ 02, 2 say '10.-En su opinión, ¿el gobierno ha hecho todo lo posible por combatir al'
@ 03, 2 SAY '    narcotráfico y el crimen organizado en el país o le falta algo por'
@ 04, 2 SAY '    hacer?'
@ 06, 2 say '    (1) Ha hecho todo lo posible' 
@ 07, 2 say '    (2) Le falta algo por hacer'  
@ 08, 2 say '    (3) Ns/Nc' GET P10 RANGE 1,3
READ

IF P10=2
@ 12, 2 say '10_2.-¿Qué le falta por hacer?'
@ 14, 2 SAY '     (1) (REGISTRAR EN PAPEL)'
@ 15, 2 say '     (2) Ns/Nc' GET P10_2 RANGE 1,2
READ
ELSE
 REPL P10_2 WITH 0
ENDIF

do mascara
@ 02, 2 say '11.-Y, ¿cuánta confianza tiene usted en el presidente Zedillo para protegerlo'
@ 03, 2 say '    contra el narcotráfico, muchísima, mucha, poca o ninguna?'
@ 05, 2 say '    (1) Muchísima'
@ 06, 2 say '    (2) Mucha'
@ 07, 2 say '    (3) Poca'
@ 08, 2 say '    (4) Ninguna'
@ 09, 2 say '    (5) Ns/Nc' GET P11 RANGE 1,5
READ
ENDIF
**********************

DO MASCARA
@ 02, 2 say '12.-¿Vio, escuchó o se enteró si recientemente ocurrieron actos de violencia'
@ 03, 2 say '    en el país?'
@ 05, 2 say '    (1) Sí'
@ 06, 2 say '    (2) No'                   
@ 07, 2 say '    (3) Nc' get P12 range 1,3  
read

IF P12=1
@ 12, 2 say '12_1.-¿Cuáles?'
@ 14, 2 say '                                                   Sí mención   No mención'
@ 16, 2 say '    -Asesinato del Jefe de la policía de Tijuana       (1)        (2)' GET P12_1 RANGE 1,2
@ 17, 2 say '    -Otro (REGISTRAR EN PAPEL)                         (1)        (2)' GET P12_2 RANGE 1,2
READ
ELSE
 REPL P12_1 WITH 0,P12_2 WITH 0
ENDIF

DO MASCARA
@ 02, 2 say '13.-Y dígame, ¿vio, escuchó o se enteró si recientemente ocurrió algo'
@ 03, 2 say '    importante en relación al narcotráfico?'
@ 05, 2 say '    (1) Sí'
@ 06, 2 say '    (2) No'                   
@ 07, 2 say '    (3) Nc' get P13 range 1,3  
read

IF P13=1
@ 10, 2 say '13_1.-¿Qué?'
@ 11, 2 say '                                                   Sí mención   No mención'
@ 13, 2 say '    -Declaraciones del Presidente Zedillo durante'
@ 14, 2 say '     su gira por Baja California Norte                 (1)        (2)' GET P13_1 RANGE 1,2
@ 15, 2 say '    -Detención de dos cómplices de la banda de los'
@ 16, 2 say '     hermanos Amezcua acusados de lavado de dinero     (1)        (2)' GET P13_2 RANGE 1,2
@ 17, 2 say '    -Otro (REGISTRAR EN PAPEL)                         (1)        (2)' GET P13_3 RANGE 1,2
READ
ELSE
 REPL P13_1 WITH 0,P13_2 WITH 0,P13_3 WITH 0
ENDIF

IF P13<>1.OR.P13_1<>1
do mascara
@ 02, 2 say '14.-Dígame por favor si antes de que yo se lo mencionara usted ya estaba'
@ 03, 2 say '    enterado o no de las declaraciones del Presidente Zedillo durante su gira'
@ 04, 2 say '    por Baja California Norte sobre el problema del narcotráfico'
@ 06, 2 say '    (1) Sí estaba enterado'
@ 07, 2 say '    (2) No estaba enterado'
@ 08, 2 say '    (3) Ns/Nc' GET P14 RANGE 1,3
read
else
 replace p14 with 0
endif

************SOLO A ENTERADOS DEL DISCURSO DE EZP********************
IF P13_1=1.OR.P14=1
do mascara
@ 02, 2 say '15.-De las declaraciones del Presidente Zedillo durante esta gira, ¿qué es'
@ 03, 2 say '    lo que recuerda usted más?'
@ 05, 2 say '    (1) REGISTRAR EN PAPEL'
@ 06, 2 say '    (2) Ns/Nc' GET P15 RANGE 1,2
read
ELSE
 REPLACE P15 WITH 0
ENDIF
*************FIN DE PASE A ENTERADOS***************

IF P12<>1.OR.P12_1<>1
do mascara
@ 02, 2 say '16.-Dígame por favor si antes de que yo se lo mencionara usted ya estaba'
@ 03, 2 say '    enterado o no de que el domingo fue asesinado el Director de la policía'
@ 04, 2 say '    de Tijuana'
@ 06, 2 say '    (1) Sí estaba enterado'
@ 07, 2 say '    (2) No estaba enterado'
@ 08, 2 say '    (3) Ns/Nc' GET P16 RANGE 1,3
read
else
 replace p16 with 0
endif

************SOLO A ENTERADOS DEL ASESINATO********************
IF P12_1=1.OR.P16=1
do mascara
@ 02, 2 say '17.-¿Por qué cree usted que asesinaron al director de la policía de Tijuana?'
@ 04, 2 say '    (1) REGISTRAR EN PAPEL'
@ 05, 2 say '    (2) Ns/Nc' GET P17 RANGE 1,2
READ
ELSE
 REPLACE P17 WITH 0
ENDIF
*************FIN DE PASE A ENTERADOS***************

do mascara
@ 02, 2 say '18.-En efecto, el domingo fue asesinado el director de la policía de Tijuana.'
@ 03, 2 say '    ¿Cree usted que este asesinato afecta o no la estabilidad política del'
@ 04, 2 say '    país?'
@ 06, 2 say '    (1) Sí la afecta'
@ 07, 2 say '    (2) La afecta en parte'
@ 08, 2 say '    (3) No la afecta'
@ 09, 2 say '    (4) Ns/Nc' GET P18 RANGE 1,4
READ

IF P18=1
@ 12, 2 say '18_1.-¿Qué tanto?'
@ 14, 2 SAY '      (1) Mucho'
@ 15, 2 SAY '      (2) Regular'
@ 16, 2 SAY '      (3) Poco'
@ 17, 2 SAY '      (4) Nada'
@ 18, 2 say '      (5) Ns/Nc' GET P18_1 RANGE 1,5
READ
ELSE
 REPL P18_1 WITH 0
ENDIF

do mascara
@ 02, 2 say '19.-Y, ¿usted siente amenazada la seguridad del país?'
@ 04, 2 say '    (1) Sí'
@ 05, 2 say '    (2) No'
@ 06, 2 say '    (3) Ns/Nc' GET P19 RANGE 1,3
READ

do mascara
@ 02, 2 say '20.-¿Y usted en lo personal, siente amenazada su seguridad personal?'
@ 04, 2 SAY '    (1) Sí'
@ 05, 2 say '    (2) No'
@ 06, 2 say '    (3) Ns/Nc' GET P20 RANGE 1,3
READ

DO MASCARA
@ 02, 2 say '21.-¿Qué se acerca más a lo que usted piensa: este asesinato ocurrió porque'
@ 03, 2 say '    el gobierno mexicano está combatiendo con firmeza al narcotráfico u'
@ 04, 2 say '    ocurrió porque el narcotráfico tiene en jaque al gobierno mexicano?'
@ 06, 2 say '    (1) Porque el gobierno mexicano está combatiendo con firmeza al'
@ 07, 2 say '        narcotráfico'
@ 08, 2 say '    (2) Porque el narcotráfico tiene en jaque al gobierno mexicano'
@ 09, 2 say '    (3) Ns/Nc' GET P21 RANGE 1,3
READ

DO MASCARA
@ 02, 2 say '22.-Durante su gira por Baja California el Presidente declaró que el único'
@ 03, 2 say '    lugar que merecen los criminales son las cárceles y que no pueden hacer'
@ 04, 2 say '    de Baja California su casa. ¿Qué tanto cree que el asesinato del'
@ 05, 2 say '    Director de la policía sea una respuesta a estas declaraciones?'
@ 07, 2 say '    (1) Totalmente'
@ 08, 2 say '    (2) Bastante'
@ 09, 2 say '    (3) Poco'
@ 10, 2 say '    (4) Nada'
@ 11, 2 say '    (5) Ns/Nc' GET P22 RANGE 1,5
READ

**********************
**** VERSION (2) *****
**********************
IF VER=2
do mascara
@ 02, 2 say '10.-En su opinión, ¿el gobierno ha hecho todo lo posible por combatir al'
@ 03, 2 SAY '    narcotráfico y el crimen organizado en el país o le falta algo por'
@ 04, 2 SAY '    hacer?'
@ 06, 2 say '    (1) Ha hecho todo lo posible' 
@ 07, 2 say '    (2) le falta algo por hacer'  
@ 08, 2 say '    (3) Ns/Nc' GET P10 RANGE 1,3
READ

IF P10=2
@ 12, 2 say '10_2.-¿Qué le falta por hacer?'
@ 14, 2 SAY '     (1) (REGISTRAR EN PAPEL)'
@ 15, 2 say '     (2) Ns/Nc' GET P10_2 RANGE 1,2
READ
ELSE
 REPL P10_2 WITH 0
ENDIF

do mascara
@ 02, 2 say '11.-Y, ¿cuánta confianza tiene usted en el presidente Zedillo para protegerlo'
@ 03, 2 say '    contra el narcotráfico, muchísima, mucha, poca o ninguna?'
@ 05, 2 say '    (1) Muchísima'
@ 06, 2 say '    (2) Mucha'
@ 07, 2 say '    (3) Poca'
@ 08, 2 say '    (4) Ninguna'
@ 09, 2 say '    (5) Ns/Nc' GET P11 RANGE 1,5
READ
ENDIF
**********************

DO MASCARA
@ 02, 2 say '23.-¿Con lo que usted ha visto o ha oído en Baja California el Gobierno'
@ 03, 2 say '    Federal apoya decididamente o no el combate al crimen organizado?'
@ 05, 2 say '    (1) Sí'
@ 06, 2 say '    (2) Sí en parte'
@ 07, 2 say '    (3) No'
@ 08, 2 say '    (4) Ns/Nc' GET P23 RANGE 1,4
READ

if p13<>1.OR.P13_2<>1
do mascara
@ 02, 2 say '24.-Ahora dígame por favor si antes de que yo se lo mencionara usted ya'
@ 03, 2 say '    estaba enterado o no de que ayer fueron detenidos dos cómplices de la'
@ 04, 2 say '    banda de narcotraficantes de los hermanos Amezcua'
@ 06, 2 say '    (1) Sí estaba enterado'
@ 07, 2 say '    (2) No estaba enterado'
@ 08, 2 say '    (3) Ns/Nc' GET P24 RANGE 1,3
read
else
 replace p24 with 0
endif

*******************SOLO A ENTERADOS DE LA DETENCION DE COMPLICES****************
IF P13_2=1.OR.P24=1
DO MASCARA
@ 02, 2 say '25.-¿Por qué fueron detenidos los cómplices de los hermanos Amezcua?'
@ 03, 2 say '    (ENCUESTADOR: NO LEA OPCIONES)'
@ 05, 2 say '    (1) Por ser los encargados del lavado de dinero del Cártel de los'
@ 06, 2 say '        Amezcua'
@ 07, 2 say '    (2) Otro (REGISTRAR EN PAPEL)'
@ 08, 2 say '    (3) Ns/Nc' GET P25 RANGE 1,3
READ
ELSE
 REPLACE P25 WITH 0
ENDIF
*******************FIN PASE ENTERADOS DE LA DETENCION DE COMPLICES****************

DO MASCARA
@ 02, 2 say '27.-En efecto, ayer fueron detenidos dos de los encargados del lavado de' 
@ 03, 2 say '    dinero y fueron incautadas muchas propiedades del Cártel de los Amezcua.'
@ 04, 2 say '    Dígame en una palabra, ¿qué sensación le causa a usted esta noticia?'
@ 06, 2 say '    (1) Gusto/satisfacción'
@ 07, 2 say '    (2) Sorpresa'
@ 08, 2 say '    (3) Enojo/molestia'
@ 09, 2 say '    (4) Nada/indiferencia'
@ 10, 2 say '    (5) Otro (REGISTRAR EN PAPEL)'
@ 11, 2 say '    (6) Ns/nc' GET P27 RANGE 1,6
READ

**********************
**** VERSION (1) *****
**********************
IF VER=1
DO MASCARA
@ 02, 2 say '28.-A raíz de la detención de los cómplices de los hermanos Amezcua,'
@ 03, 2 say '    ¿su opinión sobre... mejoró o empeoró?'
@ 05, 2 say '                            Mejoró   Igual   Igual  Empeoró  Ns/Nc'
@ 06, 2 say '                                      bien    mal'
@ 07, 2 say '                                     (VOL)   (VOL)'
@ 09, 2 say '   - El gobierno              (1)     (2)     (3)     (4)     (5)' GET P28_1 RANGE 1,5
@ 10, 2 say '   - El Procurador General'
@ 11, 2 say '     de la República          (1)     (2)     (3)     (4)     (5)' GET P28_2 RANGE 1,5
@ 12, 2 say '   - La policía judicial      (1)     (2)     (3)     (4)     (5)' GET P28_3 RANGE 1,5
@ 13, 2 say '   - El presidente Zedillo    (1)     (2)     (3)     (4)     (5)' GET P28_4 RANGE 1,5
READ
ENDIF
**********************

**********************
**** VERSION (2) *****
**********************
IF VER=2
DO MASCARA
@ 02, 2 say '28.-A raíz de la detención de los cómplices de los hermanos Amezcua,'
@ 03, 2 say '    ¿su opinión sobre... mejoró o empeoró?'
@ 05, 2 say '                            Mejoró   Igual   Igual  Empeoró  Ns/Nc'
@ 06, 2 say '                                      bien    mal'
@ 07, 2 say '                                     (VOL)   (VOL)'
@ 09, 2 say '   - La policía judicial      (1)     (2)     (3)     (4)     (5)' GET P28_3 RANGE 1,5
@ 10, 2 say '   - El presidente Zedillo    (1)     (2)     (3)     (4)     (5)' GET P28_4 RANGE 1,5
@ 11, 2 say '   - El gobierno              (1)     (2)     (3)     (4)     (5)' GET P28_1 RANGE 1,5
@ 12, 2 say '   - El Procurador General'
@ 13, 2 say '     de la República          (1)     (2)     (3)     (4)     (5)' GET P28_2 RANGE 1,5
READ
ENDIF
**********************

DO MASCARA
@ 02, 2 say 'Dbl.-¿Y usted cree que con estas detenciones el presidente Zedillo muestra'
@ 03, 2 say '     debilidad o fuerza?'
@ 05, 2 say '     (1) Debilidad'
@ 06, 2 say '     (2) Fuerza'
@ 07, 2 say '     (3) Ns/Nc' GET PDbl RANGE 1,3
READ

DO MASCARA
@ 02, 2 say '30.-¿Usted cree que se aplicará o no todo el peso de la ley a estos'
@ 03, 2 say '    narcotraficantes?'
@ 05, 2 say '    (1) Sí se aplicará'
@ 06, 2 say '    (2) No se aplicará'
@ 07, 2 say '    (3) Ns/Nc' GET P30 RANGE 1,3
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
***********************************

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)  Erjecicio 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,128)'
@ 15, 2 say '    (2)  1-3 Sal.  Min. ($ 1,129 - 3,385)'
@ 16, 2 say '    (3)  3-5 Sal.  Min. ($ 3,386 - 5,640)'
@ 17, 2 say '    (4)  5-7 Sal.  Min. ($ 5,641 - 7,896)'
@ 18, 2 say '    (5)  7-10 Sal. Min. ($ 7,897 -11,280)'
@ 19, 2 say '    (6)  10-+ Sal. Min. ($11,281 - o más)' get ingre range 1,7
read

RETURN