DEFINE PERSONA.TIPOCUPA
    AS RECODE PERSONA.P18
    (1 - 2=1)
    (3=2)
    (4=3)
    (5=4)
    (6=5)
    (7=6)
    (8=7)
    ELSE 0
    TYPE INTEGER
    RANGE 1 - 7
    VARLABEL "Condición de ocupación"
    VALUELABELS
    1 "Empleado"
    2 "Patron"
    3 "Independiente"
    4 "Familiar"
    5 "Empleado domestivo"
    6 "Trabajador no remunerado"
    7 "Otro" 

TABLE OC 
AS FREQUENCY
	OF PERSONA.HABCIUD 
	BY PERSONA.TIPOCUPA
	BY PERSONA.ANTCIUD
	WEIGHT VIVIENDA.FACTORVI
	FILTER PERSONA.P03>4 AND PERSONA.TIPOCUPA > 0