RUNDEF programa SELECTION ALL DEFINE POBLACIO.CANEMPAD AS VAL (PROVINCI.IDPROVIN)*100+VAL(CANTON.IDCANTON) TYPE INTEGER RANGE 1 - 999 DEFINE POBLACIO.CANEMPA AS RECODE POBLACIO.CANEMPAD ( 101 = 1 ) ( 102 = 2 ) ( 103 = 3 ) ( 104 = 4 ) ( 105 = 5 ) ( 106 = 6 ) ( 107 = 7 ) ( 108 = 8 ) ( 109 = 9 ) ( 110 = 10 ) ( 111 = 11 ) ( 112 = 12 ) ( 113 = 13 ) ( 114 = 14 ) ( 115 = 15 ) ( 116 = 16 ) ( 117 = 17 ) ( 118 = 18 ) ( 119 = 19 ) ( 120 = 20 ) ( 201 = 21 ) ( 202 = 22 ) ( 203 = 23 ) ( 204 = 24 ) ( 205 = 25 ) ( 206 = 26 ) ( 207 = 27 ) ( 208 = 28 ) ( 209 = 29 ) ( 210 = 30 ) ( 211 = 31 ) ( 212 = 32 ) ( 213 = 33 ) ( 214 = 34 ) ( 215 = 35 ) ( 301 = 36 ) ( 302 = 37 ) ( 303 = 38 ) ( 304 = 39 ) ( 305 = 40 ) ( 306 = 41 ) ( 307 = 42 ) ( 308 = 43 ) ( 401 = 44 ) ( 402 = 45 ) ( 403 = 46 ) ( 404 = 47 ) ( 405 = 48 ) ( 406 = 49 ) ( 407 = 50 ) ( 408 = 51 ) ( 409 = 52 ) ( 410 = 53 ) ( 501 = 54 ) ( 502 = 55 ) ( 503 = 56 ) ( 504 = 57 ) ( 505 = 58 ) ( 506 = 59 ) ( 507 = 60 ) ( 508 = 61 ) ( 509 = 62 ) ( 510 = 63 ) ( 511 = 64 ) ( 601 = 65 ) ( 602 = 66 ) ( 603 = 67 ) ( 604 = 68 ) ( 605 = 69 ) ( 606 = 70 ) ( 607 = 71 ) ( 608 = 72 ) ( 609 = 73 ) ( 610 = 74 ) ( 611 = 75 ) ( 701 = 76 ) ( 702 = 77 ) ( 703 = 78 ) ( 704 = 79 ) ( 705 = 80 ) ( 706 = 81 ) ELSE 0 TYPE INTEGER RANGE 1 - 81 VALUELABELS 1 "SAN JOSE" 2 "ESCAZU" 3 "DESAMPARADOS" 4 "PURISCAL" 5 "TARRAZU" 6 "ASERRI" 7 "MORA" 8 "GOICOECHEA" 9 "SANTA ANA" 10 "ALAJUELITA" 11 "VASQUEZ DE CORONADO" 12 "ACOSTA" 13 "TIBAS" 14 "MORAVIA" 15 "MONTES DE OCA" 16 "TURRUBARES" 17 "DOTA" 18 "CURRIDABAT" 19 "PEREZ ZELEDON" 20 "LEON CORTES" 21 "ALAJUELA" 22 "SAN RAMON" 23 "GRECIA" 24 "SAN MATEO" 25 "ATENAS" 26 "NARANJO" 27 "PALMARES" 28 "POAS" 29 "OROTINA" 30 "SAN CARLOS" 31 "ALFARO RUIZ" 32 "VALVERDE VEGA" 33 "UPALA" 34 "LOS CHILES" 35 "GUATUSO" 36 "CARTAGO" 37 "PARAISO" 38 "LA UNION" 39 "JIMENEZ" 40 "TURRIALBA" 41 "ALVARADO" 42 "OREAMUNO" 43 "EL GUARCO" 44 "HEREDIA" 45 "BARVA" 46 "SANTO DOMINGO" 47 "SANTA BARBARA" 48 "SAN RAFAEL" 49 "SAN ISIDRO" 50 "BELEN" 51 "FLORES" 52 "SAN PABLO" 53 "SARAPIQUI" 54 "LIBERIA" 55 "NICOYA" 56 "SANTA CRUZ" 57 "BAGACES" 58 "CARRILLO" 59 "CAÑAS" 60 "ABANGARES" 61 "TILARAN" 62 "NANDAYURE" 63 "LA CRUZ" 64 "HOJANCHA" 65 "PUNTARENAS" 66 "ESPARZA" 67 "BUENOS AIRES" 68 "MONTES DE ORO" 69 "OSA" 70 "AGUIRRE" 71 "GOLFITO" 72 "COTO BRUS" 73 "PARRITA" 74 "CORREDORES" 75 "GARABITO" 76 "LIMON" 77 "POCOCI" 78 "SIQUIRRES" 79 "TALAMANCA" 80 "MATINA" 81 "GUACIMO" DEFINE POBLACIO.CANRES5ANO AS RECODE POBLACIO.CODRESID ( 101 = 1 ) ( 102 = 2 ) ( 103 = 3 ) ( 104 = 4 ) ( 105 = 5 ) ( 106 = 6 ) ( 107 = 7 ) ( 108 = 8 ) ( 109 = 9 ) ( 110 = 10 ) ( 111 = 11 ) ( 112 = 12 ) ( 113 = 13 ) ( 114 = 14 ) ( 115 = 15 ) ( 116 = 16 ) ( 117 = 17 ) ( 118 = 18 ) ( 119 = 19 ) ( 120 = 20 ) ( 201 = 21 ) ( 202 = 22 ) ( 203 = 23 ) ( 204 = 24 ) ( 205 = 25 ) ( 206 = 26 ) ( 207 = 27 ) ( 208 = 28 ) ( 209 = 29 ) ( 210 = 30 ) ( 211 = 31 ) ( 212 = 32 ) ( 213 = 33 ) ( 214 = 34 ) ( 215 = 35 ) ( 301 = 36 ) ( 302 = 37 ) ( 303 = 38 ) ( 304 = 39 ) ( 305 = 40 ) ( 306 = 41 ) ( 307 = 42 ) ( 308 = 43 ) ( 401 = 44 ) ( 402 = 45 ) ( 403 = 46 ) ( 404 = 47 ) ( 405 = 48 ) ( 406 = 49 ) ( 407 = 50 ) ( 408 = 51 ) ( 409 = 52 ) ( 410 = 53 ) ( 501 = 54 ) ( 502 = 55 ) ( 503 = 56 ) ( 504 = 57 ) ( 505 = 58 ) ( 506 = 59 ) ( 507 = 60 ) ( 508 = 61 ) ( 509 = 62 ) ( 510 = 63 ) ( 511 = 64 ) ( 601 = 65 ) ( 602 = 66 ) ( 603 = 67 ) ( 604 = 68 ) ( 605 = 69 ) ( 606 = 70 ) ( 607 = 71 ) ( 608 = 72 ) ( 609 = 73 ) ( 610 = 74 ) ( 611 = 75 ) ( 701 = 76 ) ( 702 = 77 ) ( 703 = 78 ) ( 704 = 79 ) ( 705 = 80 ) ( 706 = 81 ) ELSE 0 TYPE INTEGER RANGE 0 - 81 VALUELABELS 1 "SAN JOSE" 2 "ESCAZU" 3 "DESAMPARADOS" 4 "PURISCAL" 5 "TARRAZU" 6 "ASERRI" 7 "MORA" 8 "GOICOECHEA" 9 "SANTA ANA" 10 "ALAJUELITA" 11 "VASQUEZ DE CORONADO" 12 "ACOSTA" 13 "TIBAS" 14 "MORAVIA" 15 "MONTES DE OCA" 16 "TURRUBARES" 17 "DOTA" 18 "CURRIDABAT" 19 "PEREZ ZELEDON" 20 "LEON CORTES" 21 "ALAJUELA" 22 "SAN RAMON" 23 "GRECIA" 24 "SAN MATEO" 25 "ATENAS" 26 "NARANJO" 27 "PALMARES" 28 "POAS" 29 "OROTINA" 30 "SAN CARLOS" 31 "ALFARO RUIZ" 32 "VALVERDE VEGA" 33 "UPALA" 34 "LOS CHILES" 35 "GUATUSO" 36 "CARTAGO" 37 "PARAISO" 38 "LA UNION" 39 "JIMENEZ" 40 "TURRIALBA" 41 "ALVARADO" 42 "OREAMUNO" 43 "EL GUARCO" 44 "HEREDIA" 45 "BARVA" 46 "SANTO DOMINGO" 47 "SANTA BARBARA" 48 "SAN RAFAEL" 49 "SAN ISIDRO" 50 "BELEN" 51 "FLORES" 52 "SAN PABLO" 53 "SARAPIQUI" 54 "LIBERIA" 55 "NICOYA" 56 "SANTA CRUZ" 57 "BAGACES" 58 "CARRILLO" 59 "CAÑAS" 60 "ABANGARES" 61 "TILARAN" 62 "NANDAYURE" 63 "LA CRUZ" 64 "HOJANCHA" 65 "PUNTARENAS" 66 "ESPARZA" 67 "BUENOS AIRES" 68 "MONTES DE ORO" 69 "OSA" 70 "AGUIRRE" 71 "GOLFITO" 72 "COTO BRUS" 73 "PARRITA" 74 "CORREDORES" 75 "GARABITO" 76 "LIMON" 77 "POCOCI" 78 "SIQUIRRES" 79 "TALAMANCA" 80 "MATINA" 81 "GUACIMO" SAVE "CANRES5ANO" OVERWRITE DEFINE POBLACIO.HABCIUD AS RECODE POBLACIO.CANEMPA ( 21 = 1 ) ( 28 = 1 ) ( 36 = 2 ) ( 37 = 2 ) ( 42 = 2 ) ( 43 = 2 ) ( 23 = 3 ) ( 77 = 4 ) ( 44 - 52 = 5 ) ( 54 = 6 ) ( 27 = 7 ) ( 76 = 8 ) ( 65 = 9 ) ( 30 = 10 ) ( 19 = 11 ) ( 1 - 3 = 12 ) ( 6 - 11 = 12 ) ( 13 - 15 = 12 ) ( 18 = 12 ) ( 38 = 12 ) ( 22 = 13 ) ( 78 = 14 ) ( 40 = 15 ) ELSE 0 TYPE INTEGER RANGE 0 - 15 VARLABEL "CIUDAD DE RESIDENCIA HABITUAL" VALUELABELS 0 " Otro " 1 " Alajuela " 2 " Cartago " 3 " Grecia " 4 " Guapiles y Cariarí " 5 " Heredia " 6 " Liberia " 7 " Palmares " 8 " Puerto Limón " 9 " Puntarenas " 10 " Quesada " 11 " San Isidro de El General " 12 " San José " 13 " San Ramón " 14 " Siquirres " 15 " Turrialba " DEFINE POBLACIO.ANTCIUD AS RECODE POBLACIO.CANRES5ANO ( 21 = 1 ) ( 28 = 1 ) ( 36 = 2 ) ( 37 = 2 ) ( 42 = 2 ) ( 43 = 2 ) ( 23 = 3 ) ( 77 = 4 ) ( 44 - 52 = 5 ) ( 54 = 6 ) ( 27 = 7 ) ( 76 = 8 ) ( 65 = 9 ) ( 30 = 10 ) ( 19 = 11 ) ( 1 - 3 = 12 ) ( 6 - 11 = 12 ) ( 13 - 15 = 12 ) ( 18 = 12 ) ( 38 = 12 ) ( 22 = 13 ) ( 78 = 14 ) ( 40 = 15 ) ELSE 0 TYPE INTEGER RANGE 0 - 15 VARLABEL "CIUDAD DE RESIDENCIA ANTERIOR" VALUELABELS 0 " Otro " 1 " Alajuela " 2 " Cartago " 3 " Grecia " 4 " Guapiles y Cariarí " 5 " Heredia " 6 " Liberia " 7 " Palmares " 8 " Puerto Limón " 9 " Puntarenas " 10 " Quesada " 11 " San Isidro de El General " 12 " San José " 13 " San Ramón " 14 " Siquirres " 15 " Turrialba " DEFINE POBLACIO.TAMANOHAB AS RECODE POBLACIO.HABCIUD ( 0 = 0 ) ( 1 = 2 ) ( 2 = 2 ) ( 3 = 5 ) ( 4 = 4 ) ( 5 = 2 ) ( 6 = 4 ) ( 7 = 5 ) ( 8 = 3 ) ( 9 = 3 ) ( 10 = 4 ) ( 11 = 4 ) ( 12 = 1 ) ( 13 = 4 ) ( 14 = 5 ) ( 15 = 4 ) RANGE 0 - 5 VARLABEL "TAMAÑO CIUDADES (HABITUAL)" VALUELABELS 0 " Otro " 1 " 1 MILLÓN O MAS " 2 " 100000-499999 " 3 " 50000-99999 " 4 " 20000-49999 " 5 " Menos de 20000 " SAVE "TAMANOHAB" OVERWRITE DEFINE POBLACIO.TAMANOANT AS RECODE POBLACIO.ANTCIUD ( 0 = 0 ) ( 1 = 2 ) ( 2 = 2 ) ( 3 = 5 ) ( 4 = 4 ) ( 5 = 2 ) ( 6 = 4 ) ( 7 = 5 ) ( 8 = 3 ) ( 9 = 3 ) ( 10 = 4 ) ( 11 = 4 ) ( 12 = 1 ) ( 13 = 4 ) ( 14 = 5 ) ( 15 = 4 ) RANGE 0 - 5 VARLABEL "TAMAÑO CIUDADES (ANTERIOR)" VALUELABELS 0 " Otro " 1 " 1 MILLÓN O MAS " 2 " 100000-499999 " 3 " 50000-99999 " 4 " 20000-49999 " 5 " Menos de 20000 " SAVE "TAMANOANT" OVERWRITE TABLE CR00E5MB AS FREQUENCY OF POBLACIO.TAMANOHAB BY POBLACIO.TAMANOANT FILTER POBLACIO.CANRES5ANO > 0 AND POBLACIO.EDAD > 4