define PERSONA.situemp
AS SWITCH
incase  PERSONA.P27 = 3 assign 1
incase  PERSONA.P27 = 5 assign 2
incase  PERSONA.P27 = 1 assign 3
incase  PERSONA.P27 = 2 assign 4
incase  PERSONA.P27 = 4 assign 5
incase  PERSONA.P27 = 6 assign 9
else 0
range 1:9
varlabel "Categoría de ocupación"
valuelabels
1 "Empleadores"
2 "Empleado u obrero"
3 "Trabajador por cuenta propia"
4 "Trabajador en negocio familiar"
5 "Trabajador servicio domestico"
9 "No especificado"
FILTER pet = 1

DEFINE PERSONA.parentesco
AS RECODE   PERSONA.P02
( 3  :  4 = 3 )
( 6  :  9 = 6 )
( 10 : 12 = 7 )   
RANGE 1:7				
TYPE INTEGER							
 VARLABEL "Parentesco c/n jefe de hogar"
 VALUELABELS 1 "Jefa/e"
             2 "Cónyuge"
             3 "Hija/o"
             4 "Nuera/yerno"
             5 "Nieta/o"
             6 "Otros parientes"
             7 "Otros No Parientes"

TABLE PY02C5OJ
FREQ ciudadres by situemp by ciudadres5
filter parentesco = 1