DEFINE  PERSONA.CIUDHABIT
AS VAL (CMPCODE (MUNIC))

DEFINE  PERSONA.CIUDHAB
AS RECODE PERSONA.CIUDHABIT
(	314	=	1	)
(	313	=	1	)
(	303	=	1	)
(	310	=	1	)
(	315	=	1	)
(	309	=	1	)
(	307	=	1	)
(	306	=	1	)
(	304	=	1	)
(	312	=	1	)
(	311	=	1	)
(	301	=	1	)
(	302	=	1	)
(	305	=	1	)
(	308	=	1	)
(	111	 =	3	) 
(	401	 =	3	) 
(	509	 =	3	) 
(	607	 =	3	) 
(	808	 =	3	) 
(	908	 =	3	) 
(	1005	 =	3	) 
(	1106	 =	3	) 
(	1204	 =	3	) 
(	1306	 =	3	) 
(	1402	 =	3	) 
(	402	 =	4	) 
(   707  =  4   )
(	802	 =	4	) 
(	909	 =	4	) 
(	1114	 =	4	) 
(	1206	 =	4	) 
(	1307	 =	4	) 
(	108	 =	5	)
(	110	 =	5	)
(	202	 =	5	)
(	204	 =	5	)
(	205	 =	5	)
(	207	 =	5	)
(	213	 =	5	)
(	217	 =	5	)
(	219	 =	5	)
(	405	 =	5	)
(	407	 =	5	)
(	412	 =	5	)
(	503	 =	5	)
(	505	 =	5	)
(	506	 =	5	)
(	508	 =	5	)
(	513	 =	5	)
(	606	 =	5	)
(	702	 =	5	)
(	704	 =	5	)
(	706	 =	5	)
(	905	 =	5	)
(	910	 =	5	)
(	1002	 =	5	)
(	1007	 =	5	)
(	1008	 =	5	)
(	1103	 =	5	)
(	1109	 =	5	)
(	1111	 =	5	)
(	1113	 =	5	)
(	1203	 =	5	)
(	1209	 =	5	)
(	1213	 =	5	)
(	1301	 =	5	)
(   1303     =  5   )
(	1305	 =	5	)
(	1404	 =	5	)
(	9901	 =	5	)
ELSE 0
TYPE INTEGER
RANGE 0:5
VARLABEL "CIUDADES DE RESIDENCIA HABITUAL POR TAMAÑO"
VALUELABELS
0 "OTROS"
1 "Millón o más"
2 "500.000-999.999"
3 "100.000-499.999"
4 "50.000-99.999"
5 "20.000-49.999"

SAVE "CIUHAB9"
OVERWRITE

DEFINE PERSONA.MUNIREC
AS PERSONA.P8PROV * 100 +  PERSONA.P8MUN

DEFINE  PERSONA.CIUDREC
AS RECODE PERSONA.MUNIREC
(	314	=	1	)
(	313	=	1	)
(	303	=	1	)
(	310	=	1	)
(	315	=	1	)
(	309	=	1	)
(	307	=	1	)
(	306	=	1	)
(	304	=	1	)
(	312	=	1	)
(	311	=	1	)
(	301	=	1	)
(	302	=	1	)
(	305	=	1	)
(	308	=	1	)
(	111	 =	3	) 
(	401	 =	3	) 
(	509	 =	3	) 
(	607	 =	3	) 
(	808	 =	3	) 
(	908	 =	3	) 
(	1005	 =	3	) 
(	1106	 =	3	) 
(	1204	 =	3	) 
(	1306	 =	3	) 
(	1402	 =	3	) 
(	402	 =	4	) 
(   707  =  4   )
(	802	 =	4	) 
(	909	 =	4	) 
(	1114	 =	4	) 
(	1206	 =	4	) 
(	1307	 =	4	) 
(	108	 =	5	)
(	110	 =	5	)
(	202	 =	5	)
(	204	 =	5	)
(	205	 =	5	)
(	207	 =	5	)
(	213	 =	5	)
(	217	 =	5	)
(	219	 =	5	)
(	405	 =	5	)
(	407	 =	5	)
(	412	 =	5	)
(	503	 =	5	)
(	505	 =	5	)
(	506	 =	5	)
(	508	 =	5	)
(	513	 =	5	)
(	606	 =	5	)
(	702	 =	5	)
(	704	 =	5	)
(	706	 =	5	)
(	905	 =	5	)
(	910	 =	5	)
(	1002	 =	5	)
(	1007	 =	5	)
(	1008	 =	5	)
(	1103	 =	5	)
(	1109	 =	5	)
(	1111	 =	5	)
(	1113	 =	5	)
(	1203	 =	5	)
(	1209	 =	5	)
(	1213	 =	5	)
(	1301	 =	5	)
(   1303     =  5   )
(	1305	 =	5	)
(	1404	 =	5	)
(	9901	 =	5	)
ELSE 0
TYPE INTEGER
RANGE 0:5
VARLABEL "CIUDADES DE RESIDENCIA HACE 5 AÑOS POR TAMAÑO"
VALUELABELS
0 "OTROS"
1 "Millón o más"
2 "500.000-999.999"
3 "100.000-499.999"
4 "50.000-99.999"
5 "20.000-49.999"

SAVE "CIUREC9"
OVERWRITE


DEFINE PERSONA.MUNREC
AS SWITCH            
INCASE PERSONA.P8A=1 ASSIGN PERSONA.CIUDHAB
INCASE PERSONA.P8A=3 AND PERSONA.P9<5 AND PERSONA.P8PAIS>0 ASSIGN 170
INCASE PERSONA.P8A=3 AND PERSONA.P9>4 AND PERSONA.P9<99 ASSIGN PERSONA.CIUDHAB 
INCASE PERSONA.P8PROV = 98 OR PERSONA.P8MUN=99 ASSIGN 172
INCASE PERSONA.P9=99 ASSIGN 172
INCASE PERSONA.P8A=3 AND PERSONA.P9<5 ASSIGN PERSONA.CIUDREC
ELSE 172
MISSING 172
NOTAPPLICABLE 170 
VARLABEL "Municipio de residencia hace 5 años"
LIKE PERSONA.CIUDHAB
RANGE 0:5
SAVE "MUNREC19"
OVERWRITE
VARLABEL "CIUDAD DE RESIDENCIA HACE 5 AÑOS POR TAMAÑO"


FREQ PERSONA.CIUDHAB BY PERSONA.MUNREC 
FILTER PERSONA.P5>4  
OUTPUTFILE "CU02CTMB.xls" OVERWRITE