* TEMA : SOLICITUD DE RECURSOS SNSP PARA COMBATIR DELINCUENCIA * FECHA : 06/NOV/96 * PATH : SEG11196 * 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 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 cosas que ocurrieron ayer en M‚xico y en el mundo,' @ 03, 2 say ' ¨qu‚ es lo que recuerda usted m s?' @ 05, 2 say ' S¡ menci¢n No menci¢n' @ 06, 2 say ' -(Pdte) Presenta el programa de mejoramiento' @ 07, 2 say ' del magisterio (1) (0)' GET PN1_1 RANGE 0,1 @ 08, 2 say ' -(Pdte) Reuni¢n con directivos de la PEPSI (1) (0)' GET PN1_2 RANGE 0,1 @ 09, 2 say ' -Informa el PRI en la reforma pol¡tica la' @ 10, 2 say ' aprobara solo en la Camara de Diputados (1) (0)' GET PN1_3 RANGE 0,1 @ 11, 2 say ' -Investigan otra casa de Ra£l Salinas (1) (0)' GET PN1_4 RANGE 0,1 @ 12, 2 say ' -Posponen la reuni¢n en Chiapas entre EZLN y Gob (1) (0)' GET PN1_5 RANGE 0,1 @ 13, 2 say ' -Sec. Salud inaugura Simposium Internacional' @ 14, 2 say ' sobre Farmacodependencia (1) (0)' GET PN1_6 RANGE 0,1 @ 15, 2 say ' -Medira el DF rayos Ultra Violeta (1) (0)' GET PN1_7 RANGE 0,1 @ 16, 2 say ' -Sale bien la operacion Boris Yeltsin (1) (0)' GET PN1_8 RANGE 0,1 @ 17, 2 say ' -Gano B. Clinton las elecciones en EU (1) (0)' GET PN1_9 RANGE 0,1 @ 18, 2 say ' -Otro (REGISTRE EN PAPEL) (1) (0)' GET PN1_10 RANGE 0,1 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 Do mascara @ 02, 2 say 'Cal.-En una escala de 0 a 10, ¨qu‚ calificaci¢n le dar¡a a Ernesto' @ 03, 2 say ' Zedillo como presidente?' @ 05, 2 say ' (NS/NC = 11) ' GET PCAL RANGE 0, 11 READ ENDIF ********************** DO MASCARA @ 02, 2 say 'N.-D¡game por favor, ¨cu l es el acontecimiento pol¡tico m s importante' @ 03, 2 say ' que ocurri¢ ayer y que apareci¢ en las noticias y en los peri¢dicos hoy?' @ 05, 2 say ' (1) (Act. Pdte.) Presenta el programa de mejoramiento del magisterio' @ 06, 2 say ' (2) (Act. Pdte.) Reuni¢n con directivos de la PEPSI' @ 07, 2 say ' (3) Informa el PRI en la reforma pol¡tica la aprobara solo en la camara' @ 08, 2 say ' de diputados' @ 09, 2 say ' (4) Investigan otra casa de Ra£l Salinas' @ 10, 2 say ' (5) Posponen la reuni¢n en Chiapas entre el EZLN y Gob' @ 11, 2 say ' (6) Sec. Salud inaugura Simposium Internacional sobre Farmacodependencia' @ 12, 2 say ' (7) Medira el DF rayos Ultra Violeta' @ 13, 2 say ' (8) Sale bien la operacion Boris Yeltsin' @ 14, 2 say ' (9) Gano B. Clinton las elecciones en EU' @ 15, 2 say ' (96) Otro (REGISTRE EN PAPEL)' @ 16, 2 say ' (99) Ns/Nc' get pnot valid((pnot>0.and.pnot<10).or.pnot=96.or.pnot=99) read if pnot>2 do mascara @ 02, 2 say 'N_1.-D¡game, ¨cu l de las acciones realizadas por el presidente durante' @ 03, 2 say ' esta semana recuerda usted m s? (REGISTRE SOLO RESPUESTA ESPONTANEA)' @ 05, 2 say ' (1) Inaugura Asamblea Mundial por la paz' @ 06, 2 say ' (2) Gira por Quintana Roo' @ 07, 2 say ' (3) Firma el pacto Alianza para el crecimiento economico' @ 08, 2 say ' (4) Desayuno con empresarios estadounidenses' @ 09, 2 say ' (5) Envia a c mara de diputados iniciativa para prorrogar por seis' @ 10, 2 say ' meses la ley del IMSS' @ 11, 2 say ' (6) Recepci¢n al presidente de Uruguay' @ 12, 2 say ' (7) Inaugura Congreso Interamericano Industria Construcci¢n' @ 13, 2 say ' (8) Presenta el programa de mejoramiento del magisterio' @ 14, 2 say ' (9) Reuni¢n con directivos de la PEPSI' @ 15, 2 say ' (96) Otro (REGISTRE EN PAPEL)' @ 16, 2 say ' (99) Ns/Nc' GET PNOT_1 VALID ((PNOT_1>0.AND.PNOT_1<10).OR.PNOT_1=96.OR.PNOT_1=99) read ELSE REPL PNOT_1 WITH 0 ENDIF DO MASCARA @ 02, 2 say '7.-¨Vio, escuch¢ o se enter¢ usted si recientemente ocurri¢ alg£n' @ 03, 2 say ' acontecimiento importante para la comunidad internacional?' @ 05, 2 say ' (1) S¡' @ 06, 2 say ' (2) No' @ 07, 2 say ' (3) Ns/Nc' GET P7 RANGE 1,3 READ IF P7=1 @ 10, 2 say '7_1.-¨Qu‚ ocurri¢?' @ 12, 2 say ' (1) Triunfo de Bill Clinton (elecciones en Estados Unidos' @ 13, 2 say ' (2) Operacion de Yeltzin' @ 14, 2 say ' (3) Otro (Registrar en papel)' @ 15, 2 say ' (4) Ns/Nc' GET P7_1 RANGE 1,4 READ ELSE REPLACE P7_1 WITH 0 ENDIF if p7_1<>1 DO MASCARA @ 02, 2 say '8.-D¡game si antes de mencionarselo usted ya estaba enterado o no de que' @ 03, 2 say ' ayer Bill Clinton gano las elecciones presidenciales en Estados' @ 04, 2 say ' Unidos?' @ 06, 2 say ' (1) Enterado' @ 07, 2 say ' (2) No enterado' @ 08, 2 say ' (3) No contest¢' GET P8 RANGE 1,3 READ ELSE REPL P8 WITH 0 ENDIF do mascara @ 02, 2 say '9.-En efecto ayer Bill Clinton gan¢ la presidencia de los Estados Unidos' @ 03, 2 say ' Por favor d¡game en una palabra, ¨qu‚ sensaci¢n le deja a usted' @ 04, 2 say ' esta noticia?' @ 06, 2 say ' (1) REGISTRAR EN PAPEL' @ 07, 2 say ' (2) Ns/Nc' GET P9 RANGE 1,2 READ DO MASCARA @ 02, 2 say '10.-¨Usted cree que la reelecci¢n de Clinton es un acontecimiento que' @ 03, 2 say ' favorecer  o no a M‚xico?' @ 05, 2 say ' (1) Favorece' @ 06, 2 say ' (2) Favorece en parte' @ 07, 2 say ' (3) No favorece' @ 08, 2 say ' (4) Ns/Nc' GET P10 RANGE 1,4 READ DO MASCARA @ 02, 2 say '11.-Pasando a otra cosa por favor d¡game, ¨c¢mo calificar¡a usted la' @ 03, 2 say ' seguridad p£blica en M‚xico, es buena o mala?' @ 05, 2 say ' (1) Buena' @ 06, 2 say ' (2) Regular' @ 07, 2 say ' (3) Mala' @ 08, 2 say ' (4) Muy mala' @ 09, 2 say ' (5) Ns/Nc' get p11 range 1,5 READ DO MASCARA @ 02, 2 say '12.-¨Me puede decir si usted o alguien de su familia ha sido v¡ctima' @ 03, 2 say ' de un acto violento o ha sufrido alg£n asalto?' @ 05, 2 say ' (1) Si' @ 06, 2 say ' (2) No' @ 07, 2 say ' (3) Ns-nc' GET P12 RANGE 1,3 READ IF P12=1 @ 10, 2 say '12_1.-¨Me puede decir que le pas¢?' @ 11, 2 say ' (1) Asalto (dinero, coche, etc)' @ 12, 2 say ' (2) Violaci¢n' @ 13, 2 say ' (3) Secuestro' @ 14, 2 say ' (4) Abusos de las autoridades policiacas' @ 15, 2 say ' (5) Agresiones f¡sicas' @ 16, 2 say ' (6) Otro' @ 17, 2 say ' (7) Ns/Nc' GET P12_1 RANGE 1,7 READ ELSE REPLACE P12_1 WITH 0 ENDIF DO MASCARA @ 02, 2 say '15.-Y, ¨qui‚n o quienes son los encargados de impartir la justicia en' @ 03, 2 say ' en M‚xico? (NO LEA OPCIONES Y REGISTRE 1ERA.RESPUESTA)' @ 05, 2 say ' (1) los jueces' @ 06, 2 say ' (2) La PGR' @ 07, 2 say ' (3) La Suprema Corte de Justicia' @ 08, 2 say ' (4) El Poder Judicial' @ 09, 2 say ' (5) El Ministerio P£blico' @ 10, 2 say ' (6) Otro (Registrar en papel)' @ 11, 2 say ' (7) Ns/Nc' get P15 range 1,7 READ DO MASCARA @ 02, 2 say '14b.-¨Usted conf¡a o no en...?' @ 04, 2 say ' S¡ No Ns/Nc' @ 05, 2 say ' - En los jueces (1) (2) (3)' get p14_5 range 1,3 @ 06, 2 say ' - El Presidente Zedillo (1) (2) (3)' get p14_6 range 1,3 @ 07, 2 say ' - El ej‚rcito (1) (2) (3)' get p14_7 range 1,3 READ DO MASCARA @ 02, 2 say '16.-De las medidas que lleva a cabo el gobierno de Ernesto Zedillo para' @ 03, 2 say ' combatir la delincuencia, ¨cu les recuerda usted m s?' @ 05, 2 say ' S¡ No' @ 06, 2 say ' menci¢n menci¢n' @ 07, 2 say ' -Creacion del Consejo Nacional de Seguridad' @ 08, 2 say ' Publica (1) (2)' get p16_1 range 1,2 @ 09, 2 say ' -Aumento de castigos contra el cr¡men' @ 10, 2 say ' organizado, secuestros y narcotr fico (1) (2)' get p16_2 range 1,2 @ 11, 2 say ' -Modernizaci¢n de la polic¡a (1) (2)' get p16_3 range 1,2 @ 12, 2 say ' -Incorporaci¢n en los mandos superiores de' @ 13, 2 say ' la polic¡a a miembros del ej‚rcito (1) (2)' get p16_4 range 1,2 READ DO MASCARA @ 02, 2 say '17.-¨Con lo que usted sabe que tanto han contribu¡do a disminuir' @ 03, 2 say ' la delincuencia las siguientes medidas del gobierno del' @ 04, 2 say ' presidente Zedillo?' @ 05, 2 say ' Mucho Poco Regular Nada Ns/Nc' @ 07, 2 say '-Creaci¢n del Consejo Nacional de Seguridad' @ 08, 2 say ' Publica (1) (2) (3) (4) (5)' get p17_1 range 1,5 @ 09, 2 say '-Aumento de castigos contra el cr¡men' @ 10, 2 say ' organizado, secuestros y narcotr fico (1) (2) (3) (4) (5)' get p17_2 range 1,5 @ 11, 2 say '-Modernizaci¢n de la polic¡a (1) (2) (3) (4) (5)' get p17_3 range 1,5 @ 12, 2 say '-Incorporaci¢n en los mandos superiores de' @ 13, 2 say ' la polic¡a a miembros del ej‚rcito (1) (2) (3) (4) (5)' get p17_4 range 1,5 READ do mascara @ 02, 2 say '18.-¨Podr¡a decirme que autoridades participan en el Consejo Nacional' @ 03, 2 say ' de Seguridad Publica?' @ 05, 2 say ' S¡ menci¢n No menci¢n' @ 06, 2 say ' -Secretario de Gobernaci¢n (1) (2)' GET P18_1 RANGE 1,2 @ 07, 2 say ' -Gobernadores de los Estados (1) (2)' GET P18_2 RANGE 1,2 @ 08, 2 say ' -El Regente (1) (2)' GET P18_3 RANGE 1,2 @ 09, 2 say ' -El Procurador General de la Republica (1) (2)' GET P18_4 RANGE 1,2 @ 10, 2 say ' -El Procurador General de Justicia del DF (1) (2)' GET P18_5 RANGE 1,2 @ 11, 2 say ' -Secretario de la Defensa Nacional (1) (2)' GET P18_6 RANGE 1,2 @ 12, 2 say ' -Secretario de Marina (1) (2)' GET P18_7 RANGE 1,2 @ 13, 2 say ' -Otro (REGISTRAR EN PAPEL) (1) (2)' GET P18_8 RANGE 1,2 READ DO MASCARA @ 02, 2 say '19.-¨Vio, escuch¢ o se enter¢ usted si recientemente ocurri¢ alg£n' @ 03, 2 say ' acontecimiento importante en relaci¢n a la seguridad p£blica?' @ 05, 2 say ' (1) S¡' @ 06, 2 say ' (2) No' @ 07, 2 say ' (3) Ns/Nc' GET P19 RANGE 1,3 READ IF P19=1 @ 10, 2 say '19_1.-¨Qu‚ ocurri¢?' @ 12, 2 say ' (1) El Consejo de Seguridad P£blica solicit¢ al gobierno' @ 13, 2 say ' federal m s recursos para enfrentar la delincuencia' @ 14, 2 say ' (2) Otro (Registrar en papel)' @ 15, 2 say ' (3) Ns/Nc' GET P19_1 RANGE 1,3 READ ELSE REPLACE P19_1 WITH 0 ENDIF if p19_1<>1 DO MASCARA @ 02, 2 say '20.-D¡game si antes de mencionarselo usted ya estaba enterado o no de que' @ 03, 2 say ' el Consejo de Seguridad P£blica Nacional solicit¢ que el gobierno' @ 04, 2 say ' federal, destine m s recursos para 1997 para combatir a la delincuencia?' @ 06, 2 say ' (1) Enterado' @ 07, 2 say ' (2) No enterado' @ 08, 2 say ' (3) No contest¢' GET P20 RANGE 1,3 READ ELSE REPL P20 WITH 0 ENDIF DO MASCARA @ 02, 2 say '21.-Los recursos que se estan solicitando por m s de 2 mil 400' @ 03, 2 say ' millones de pesos servir n para capacitar a las corporaciones' @ 04, 2 say ' polic¡acas, modernizar los centros penitenciarios, comprar' @ 05, 2 say ' armamento e integrar un sistema nacional de informaci¢n contra' @ 06, 2 say ' la delincuencia. ¨Qu‚ sensaci¢n le deja a usted esta noticia?' @ 08, 2 say ' (1) Le da confianza en (2) Le da desconfianza en (3) Ns/Nc' get p21_1 range 1,3 @ 09, 2 say ' el gobierno el gobierno' @ 10, 2 say ' (1) Satisfacci¢n u (2) Insatisfacci¢n (3) Ns/Nc' get p21_2 range 1,3 READ DO MASCARA @ 02, 2 say '22.-¨Usted cree que con estos nuevos recursos se lograr  disminuir' @ 03, 2 say ' o no la delincuencia?' @ 05, 2 say ' (1) Si' @ 06, 2 say ' (2) En parte' @ 07, 2 say ' (3) No' @ 08, 2 say ' (4) Ns/Nc' get p22 range 1,4 READ DO MASCARA @ 02, 2 say '23.-Y, ¨usted cree que estos recursos se aplicaran adecuadamente o no' @ 03, 2 say ' para mejorar los cuerpos encargados de la seguridad de los' @ 04, 2 say ' ciudadanos?' @ 06, 2 say ' (1) S¡' @ 07, 2 say ' (2) S¡ en parte' @ 08, 2 say ' (3) No' @ 09, 2 say ' (4) Ns/Nc' get p23 range 1,4 READ do mascara @ 02, 2 say '24.-En las condiciones actuales de la econom¡a, a usted le parece bien' @ 03, 2 say ' o mal que el gobierno federal se haga cargo del ochenta porciento' @ 04, 2 say ' de los gastos para brindar seguridad?' @ 06, 2 say ' (1) Bien' @ 07, 2 say ' (2) Ni bien ni mal' @ 08, 2 say ' (3) Mal' @ 09, 2 say ' (4) Ns/Nc' GET P24 RANGE 1,4 READ Do mascara @ 02, 2 say 'Opi-A ra¡z de la solicitud de aprobaci¢n de nuevos recursos para combatir la' @ 03, 2 say ' delincuencia ¨su opini¢n sobre el presidente Zedillo mejor¢ o empeor¢?' @ 05, 2 SAY ' (1) Mejor¢' @ 06, 2 SAY ' (2) No cambi¢' @ 07, 2 say ' (3) Empeor¢' @ 08, 2 SAY ' (4) Ns-Nc' get POPI range 1,4 READ IF POPI=2 @ 12, 2 SAY 'Opi_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 POPI_2 RANGE 1,3 READ ELSE REPLACE POPI_2 WITH 0 ENDIF ****************************** ******** VERSION (2) ********* ****************************** IF VER=2 Do mascara @ 02, 2 say 'Cal.-En una escala de 0 a 10, ¨qu‚ calificaci¢n le dar¡a a Ernesto' @ 03, 2 say ' Zedillo como presidente?' @ 05, 2 say ' (NS/NC = 11) ' GET PCAL RANGE 0, 11 READ 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 'Sim.-De los candidatos a la Presidencia de la Rep£blica de agosto del 94' @ 03, 2 say ' Diego Fern ndez de Cevallos del PAN, Ernesto Zedillo del PRI, y' @ 04, 2 say ' Cuauht‚moc C rdenas del PRD, ¨con cu l candidato simpatiza usted m s?' @ 06, 2 say ' (1) Diego Fern ndez de Cevallos del PAN' @ 07, 2 say ' (2) Ernesto Zedillo del PRI' @ 08, 2 say ' (3) Cuauht‚moc C rdenas del PRD' @ 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 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 - 616)' @ 15, 2 say ' (2) 1-3 Sal. Min. ($ 617 - 1,845)' @ 16, 2 say ' (3) 3-5 Sal. Min. ($ 1,846 - 3,074)' @ 17, 2 say ' (4) 5-7 Sal. Min. ($ 3,075 - 4,304)' @ 18, 2 say ' (5) 7-10 Sal. Min. ($ 4,305 - 6,149)' @ 19, 2 say ' (6) 10-+ Sal. Min. ($ 6,150 - o m s)' get ingre range 1,7 read RETURN