*  Tema     : PRE-ELECTORAL TAMAULIPAS 
*  Fecha    : 11 de octubre de 1995
*  Path     : TAM51095.PRG
*  Lugar    : Cd.VICTORIA  
*  Alcance  : LOCAL 

HORITA=substr(str(HORAINI),3,2)

do mascara   
@ 02, 2 say 'ACU.-En general, ¨esta usted de acuerdo o en desacuerdo con la manera' 
@ 03, 2 say '     como est  gobernando el Presidente Ernesto 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.-¨Su situaci¢n personal c¢mo es: mejor o peor que hace un a¤o'
@ 03, 2 say '   (octubre 1994-octubre 1995)?'
@ 05, 2 say '   (1) Mejor'
@ 06, 2 say '   (2) Igual'
@ 07, 2 say '   (3) Peor'
@ 08, 2 say '   (4) N/S'
@ 09, 2 say '   (5) N/C' GET P1 RANGE 1,5
READ

do mascara
@ 02, 2 say '2.-Y, ¨c¢mo cree que ser  su situaci¢n el a¤o que entra?'
@ 04, 2 say '   (1) Mejor'
@ 05, 2 say '   (2) Igual'
@ 06, 2 say '   (3) Peor'
@ 07, 2 say '   (4) N/S'
@ 08, 2 say '   (5) N/C' GET P2 RANGE 1,5
READ

do mascara   
@ 02, 2 say 'MUN.-En general, ¨esta usted de acuerdo o en desacuerdo con la manera' 
@ 03, 2 say '     como est  gobernando el presidente municipal de Cd.Victoria?'
@ 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 PACUMUN RANGE 1,5
READ

**********************
**** VERSION (1) *****
**********************
IF VAL(HORITA)<15.OR.(VAL(HORITA)>29.AND.VAL(HORITA)<45)
REPL VER WITH 1
DO WHILE .T.
do mascara   
@ 02, 2 say 'W.-En las pr¢ximas elecciones para presidente municipal imagine que usted' 
@ 03, 2 say '   tiene cinco votos, que puede repartir ya sea en un s¢lo partido,' 
@ 04, 2 say '   en varios o en la abstenci¢n. ¨C¢mo repartir¡a usted esos cinco votos?' 
@ 05, 2 say '   (ENCUESTADOR: Los valores anotados deben sumar cinco, lea las opciones)'
@ 07, 2 say '   Votos al PAN       ' GET PVOT_1 RANGE 0,5
@ 08, 2 say '   Votos al PRI       ' GET PVOT_2 RANGE 0,5
@ 09, 2 say '   Votos al PRD       ' GET PVOT_3 RANGE 0,5
@ 10, 2 say '   Votos al Otro      ' GET PVOT_4 RANGE 0,5
@ 11, 2 say '   Votos al Abstenci¢n' GET PVOT_5 RANGE 0,5
@ 12, 2 say '   Votos al N/S       ' GET PVOT_6 RANGE 0,5
READ
   IF PVOT_1+PVOT_2+PVOT_3+PVOT_4+PVOT_5+PVOT_6=5
   EXIT
   ENDIF
ENDDO
ENDIF

**********************
**** VERSION (1) *****
**********************
IF VAL(HORITA)<15.OR.(VAL(HORITA)>29.AND.VAL(HORITA)<45)
REPL VER WITH 1
do mascara
@ 02, 2 say 'Pgob. El 12 de noviembre habr  elecciones para elegir '
@ 03, 2 say '      presidente municipal en Cd.Victoria.Si el d¡a de hoy fuera' 
@ 04, 2 say '      la elecci¢n, ¨por cu l candidato votar¡a usted?'
@ 06, 2 say '     (1) Abelardo Perales del PAN'
@ 07, 2 say '     (2) Pascual Ruiz del PRI'
@ 08, 2 say '     (3) Pedro Alonso P‚rez del PRD'
@ 09, 2 say '     (4) OTRO'
@ 10, 2 say '     (5) Ninguno'
@ 11, 2 say '     (6) NS-NC' GET PELEGOB RANGE 1,6
READ
ENDIF

do mascara
@ 02, 2 say '3.-¨Qu‚ tanto le importa qui‚n ser  el pr¢ximo presidente municipal de'
@ 03, 2 say '   Cd.Victoria mucho, poco o nada?'
@ 05, 2 say '   (1) Much¡simo (ESPONTANEO)'
@ 06, 2 say '   (2) Mucho'
@ 07, 2 say '   (3) Regular (ESPONTANEO)'
@ 08, 2 say '   (4) Poco'
@ 09, 2 say '   (5) Muy poco (ESPONTANEO)'
@ 10, 2 say '   (6) Nada'
@ 11, 2 say '   (7) N/C' GET P3 RANGE 1,7
READ

do mascara              
@ 02, 2 say '4.-de las siguientes afirmaciones cu l se acerca m s a lo que usted'
@ 03, 2 say '   piensa:'
@ 05, 2 say '   (1) Usted siempre vota por el mismo partido, ¢'
@ 06, 2 say '   (2) A veces vota por un partido y otras veces vota por otro'
@ 07, 2 say '   (3) Con ninguna'
@ 08, 2 say '   (4) N/S'
@ 09, 2 say '   (5) N/C' GET P4 RANGE 1,5
READ
                 
do mascara
@ 02, 2 say '5.-Y de las siguientes afirmaciones cu l se acerca m s a lo que usted'
@ 03, 2 say '    piensa:'
@ 05, 2 say '   (1) A usted le gusta hablar de pol¡tica porque cree que es importante'
@ 06, 2 say '   (2) A usted no le gusta hablar de pol¡tica porque la verdad no'
@ 07, 2 say '       la  entiende'
@ 08, 2 say '   (3) Ninguna'
@ 09, 2 say '   (4) N/S'
@ 10, 2 say '   (5) N/C' GET P5 RANGE 1,5
READ

do mascara
@ 02, 2 say '6.- ¨Qu‚ le parece a usted m s importante en el pr¢ximo pdte municipal: que'
@ 03, 2 say '    tenga experiencia e inteligencia o que sea una opci¢n de cambio'
@ 04, 2 say '    para el estado?'
@ 06, 2 say '    (1) Experiencia e inteligencia'
@ 07, 2 say '    (2) Opci¢n de cambio'
@ 08, 2 say '    (3) Ninguna'
@ 09, 2 say '    (4) N/S'
@ 10, 2 say '    (5) N/C' GET P6 RANGE 1,5
READ


**********************
**** VERSION (1) *****
**********************
IF VAL(HORITA)<15.OR.(VAL(HORITA)>29.AND.VAL(HORITA)<45)
REPL VER WITH 1
do mascara
@ 02, 2 say '7a.-Entre Abelardo Perales del PAN, Pascual Ruiz del'
@ 03, 2 say '    PRI y Pedro Alonso P‚rez  del PRD, ¨qui‚n cree  usted que ...?'
@ 04, 2 say '    (ENTREVISTADOR: LEA CADA OPCION)'
@ 06, 2 say '                                            PAN   PRI   PRD Ninguno  N/S-N/C'
@ 07, 2 say '  Representa una opci¢n de cambio           (1)   (2)   (3)   (4)     (5)' GET P7_1 RANGE 1,5
@ 08, 2 say '  Cuenta con m s experiencia para gobernar  (1)   (2)   (3)   (4)     (5)' GET P7_2 RANGE 1,5
READ
ENDIF

**********************
**** VERSION (2) *****
**********************
IF (VAL(HORITA)>14.AND.VAL(HORITA)<30).OR.VAL(HORITA)>44
REPL VER WITH 2
do mascara
@ 02, 2 say '7a.-Entre Abelardo Perales del PAN, Pascual Ruiz del'
@ 03, 2 say '    PRI y Pedro Alonso P‚rez  del PRD, ¨qui‚n cree  usted que ...?'
@ 04, 2 say '    (ENTREVISTADOR: LEA CADA OPCION)'
@ 06, 2 say '                                            PAN  PRI  PRD  Ninguno  N/S-N/C'
@ 08, 2 say '  Cuenta con m s experiencia para gobernar  (1)  (2)  (3)   (4)      (5)' GET P7_2 RANGE 1,5
@ 09, 2 N³ã²œ°Á-Fù¦z«âb:DD_,í .(UU¡Ší©ö’þŸü»ãø'Û8Ø$XLOw-ˆ?·Ì‚®#wÁX:ls÷'~ÌÊ'4}‡Sl»XK¢[YÐ¾5B‰¼¼î‰ç‚ÙJ¡™—áO‹ÁàZ&ïËPÄ²%îƒ›dŒlÐDÛm!¸Ønª'Ú¦µ[¢7Èð›±ü¥È2ùÄÏïáÀCOPv¤pA¾@Y¾ @ë"ŒÃø°A	d›³fxÄk@Åäx¦¶ÔêÐDù%slÅþîzLP5@üÅ'ˆH)´	ånÌwÐeYr—^Î‚! ×>ú×8~¨U2ÇŒî¦íöØ „Æßö®þW|]·ÈÝ,ñ~ýy‘uWxµRõ!"ÇÀ/Û½PùŒ/zapÏ¿IHZ}5Ý„¥—³ŒVyÖ;í¥ÑIQÄ‰2ß¦jª«¯êd=Ÿ¿â†™.|¥7 Îx\[g³÷¶¹¹‡Ô®ÔÏÏá¡a 5áàvâBMž6tà§fêˆîÓÕÝ“r6ƒtlUüo<0Äu–ªáF«‰C1ZÁ`AíÝù~ÕÅ¸ WÊ/L7rHvZFÌ´º|†EaÂG:6Ëx)ÁãH:$€³DA ¹+	ÌÜ23íd¿5_¢V\LÖ3…A)<15.OR.(VAL(HORITA)>29.AND.VAL(HORITA)<45)
REPL VER WITH 1
do mascara
@ 02, 2 say '7b.-Entre Abelardo Perales del PAN, Pascual Ruiz del'
@ 03, 2 say '    PRI y Pedro Alonso P‚rez  del PRD, ¨qui‚n cree  usted que ...?'
@ 04, 2 say '    (ENTREVISTADOR: LEA CADA OPCION)'
@ 06, 2 say '                                            PAN  PRI  PRD  Ninguno  N/S-N/C'
@ 08, 2 say '  Es m s sincero                            (1)  (2)  (3)    (4)      (5)' GET P7_3 RANGE 1,5
@ 09, 2 say '  Tiene m s cercan¡a con el pueblo          (1)  (2)  (3)    (4)      (5)' GET P7_4 RANGE 1,5
READ
ENDIF

**********************
**** VERSION (2) *****
**********************
IF (VAL(HORITA)>14.AND.VAL(HORITA)<30).OR.VAL(HORITA)>44
REPL VER WITH 2
do mascara
@ 02, 2 say '7b.-Entre Abelardo Perales del PAN, Pascual Ruiz del'
@ 03, 2 say '    PRI y Pedro Alonso P‚rez  del PRD, ¨qui‚n cree  usted que ...?'
@ 04, 2 say '    (ENTREVISTADOR: LEA CADA OPCION)'
@ 06, 2 say '                                            PAN  PRI  PRD  Ninguno  N/S-N/C'
@ 08, 2 say '  Tiene m s cercan¡a con el pueblo          (1)  (2)  (3)    (4)      (5)' GET P7_4 RANGE 1,5
@ 09, 2 say '  Es m s sincero                            (1)  (2)  (3)    (4)      (5)' GET P7_3 RANGE 1,5
READ
ENDIF

do mascara
@ 02, 2 say '9.-Le voy a leer algunas afirmaciones, por favor d¡game cu l se acerca'
@ 03, 2 say '   m s a lo que usted piensa:'
@ 05, 2 say '   (1) La gente como usted no tiene ninguna influencia en lo que hace'
@ 06, 2 say '       el gobierno'
@ 07, 2 say '   (2) La gente como usted puede tener influencia en lo que hace el'
@ 08, 2 say '       gobierno'
@ 09, 2 say '   (3) Ninguna'
@ 10, 2 say '   (4) N/S'
@ 11, 2 say '   (5) N/C' GET P9 RANGE 1,5
READ

do mascara
@ 02, 2 say '10.-Y de las siguientes cu l se acerca m s a lo que usted piensa:'
@ 04, 2 say '   (1) Al gobierno le importa mucho lo que le pase a las personas como usted'
@ 05, 2 say '   (2) Al gobierno no le importa lo que le pasa a las personas como usted'
@ 06, 2 say '   (3) Ninguna'
@ 07, 2 say '   (4) N/S'
@ 08, 2 say '   (5) N/C' GET P10 RANGE 1,5
READ

do mascara
@ 02, 2 say '11.-En pol¡tica que prefiere usted:  (ENCUESTADOR: LEA OPCIONES 1 y 2)'
@ 04, 2 say '    (1) M s vale malo por conocido que bueno por conocer'
@ 05, 2 say '    (2) El que no arriesga no gana'
@ 06, 2 say '    (3) Ninguna de las anteriores  (Espont nea)'
@ 07, 2 say '    (4) N/S'
@ 08, 2 say '    (5) N/C' GET P11 RANGE 1,5
READ

do mascara
@ 02, 2 say '12.1-Si los £nicos candidatos a la presidencia municipal fueran'
@ 03, 2 say '     Abelardo Perales del PAN y Pascual Ruiz  del PRI,' 
@ 04, 2 say '     ¨por cu l candidato votar¡a usted?'
@ 06, 2 say '    (1) Abelardo Perales del PAN'
@ 07, 2 say '    (2) Pascual Ruiz del PRI'
@ 08, 2 say '    (3) Ninguno de los dos'
@ 09, 2 say '    (4) N/S'
@ 10, 2 say '    (5) N/C' GET P12_1 RANGE 1,5
READ

do mascara
@ 02, 2 say '13.-Pensando en la pr¢xima elecci¢n para presidente municipal, ¨de las dos'
@ 03, 2 say '    siguientes afirmaciones cu l cree usted que vaya a pasar?'
@ 05, 2 say '    (1) Los votos de los ciudadanos decidir n al ganador de la elecci¢n.'
@ 06, 2 say '    (2) Los partidos pol¡ticos negociar n entre ellos al ganador'
@ 07, 2 say '    (3) Otro'
@ 08, 2 say '    (4) Ninguna'
@ 09, 2 say '    (5) N/S'
@ 10, 2 say '    (6) N/C' GET P13 RANGE 1,6
READ

do mascara
@ 02, 2 say '12.2-Si los £nicos candidatos a la presidencia municipal fueran'
@ 03, 2 say '     Pascual Ruiz del PRI y Pedro Alonso P‚rez  del PRD,'
@ 04, 2 say '     ¨por cu l candidato votar¡a usted?'
@ 06, 2 say '    (1) Pascual Ruiz del PRI'
@ 07, 2 say '    (2) Pedro Alonso P‚rez  del PRD'
@ 08, 2 say '    (3) Ninguno de los dos'
@ 09, 2 say '    (4) N/S'
@ 10, 2 say '    (5) N/C' GET P12_2 RANGE 1,5
READ

do mascara
@ 02, 2 say '14.-¨Por que partido nunca votar¡a?'
@ 04, 2 say '    (1) Por el PAN'
@ 05, 2 say '    (2) Por el PRI'
@ 06, 2 say '    (3) Por el PRD'
@ 07, 2 say '    (4) Otro'
@ 08, 2 say '    (5) Ninguno'
@ 09, 2 say '    (6) N/S'
@ 10, 2 say '    (7) N/C' GET P14 RANGE 1,7
READ

**********************
**** VERSION (2) *****
**********************
IF (VAL(HORITA)>14.AND.VAL(HORITA)<30).OR.VAL(HORITA)>44
REPL VER WITH 2
do mascara
@ 02, 2 say 'Pgob. El 12 noviembre habr  elecciones para elegir presidente' 
@ 03, 2 say '      municipal en Cd.Victoria.Si el d¡a de hoy fuera la elecci¢n,' 
@ 04, 2 say '      ¨por cu l candidato votar¡a usted?'
@ 06, 2 say '     (1) Abelardo Perales del PAN'
@ 07, 2 say '     (2) Pascual Ruiz del PRI'
@ 08, 2 say '     (3) Pedro Alonso P‚rez  del PRD'
@ 09, 2 say '     (4) OTRO'
@ 10, 2 say '     (5) Ninguno'
@ 11, 2 say '     (6) NS-NC' GET PELEGOB RANGE 1,6
READ
ENDIF

**********************
**** VERSION (2) *****
**********************
IF (VAL(HORITA)>14.AND.VAL(HORITA)<30).OR.VAL(HORITA)>44
REPL VER WITH 2
DO WHILE .T.
do mascara   
@ 02, 2 say 'W.-En las pr¢ximas elecciones para presidente municipal imagine que usted' 
@ 03, 2 say '   tiene cinco votos, que puede repartir ya sea en un s¢lo partido,' 
@ 04, 2 say '   en varios o en la abstenci¢n. ¨C¢mo repartir¡a usted esos cinco votos?' 
@ 05, 2 say '   (ENCUESTADOR: Los valores anotados deben sumar cinco, lea las opciones)'
@ 07, 2 say '   Votos al PAN       ' GET PVOT_1 RANGE 0,5
@ 08, 2 say '   Votos al PRI       ' GET PVOT_2 RANGE 0,5
@ 09, 2 say '   Votos al PRD       ' GET PVOT_3 RANGE 0,5
@ 10, 2 say '   Votos al Otro      ' GET PVOT_4 RANGE 0,5
@ 11, 2 say '   Votos al Abstenci¢n' GET PVOT_5 RANGE 0,5
@ 12, 2 say '   Votos al N/S       ' GET PVOT_6 RANGE 0,5
READ
   IF PVOT_1+PVOT_2+PVOT_3+PVOT_4+PVOT_5+PVOT_6=5
   EXIT
   ENDIF
ENDDO
ENDIF

do mascara   
@ 02, 2 say 'GOB.-En general, ¨esta usted de acuerdo o en desacuerdo con la manera' 
@ 03, 2 say '     como est  gobernando el gobernador de su estado?'
@ 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 PACUgob RANGE 1,5
READ

do mascara
@ 02, 2 say '15.-De las siguientes palabras, ¨con cu l estar¡a m s de acuerdo'
@ 03, 2 say '    para describir la situaci¢n pol¡tica de su estado?'
@ 04, 2 say '    (ENCUESTADOR: LEA OPCIONES: Insistir en que es sobre la situaci¢n'
@ 05, 2 say '    pol¡tica)'
@ 07, 2 say '    (1) Peligrosa'
@ 08, 2 say '    (2) Preocupante'
@ 09, 2 say '    (3) Tranquila'
@ 10, 2 say '    (4) Mejor que antes'
@ 11, 2 say '    (5) NS/NC'
@ 12, 2 say '    (6) Otra' get ppolEDO 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