DEFINE PERSONA.TIPOCUPA
  AS RECODE  PERSONA.P26TRAB
  ( 1 - 6 = 1)( 7 = 2)(8 = 3) (9 = 4)(10=5)
  ELSE 0
  RANGE 1 - 5
  VARLABEL "Tipo de ocupación"
  VALUELABELS
  1 "Empleado, obrero"
  2 "Cuenta propia"
  3 "Patrón, empleador"
  4 "Miembro cooperativa"
  5 "Trabajador familiar"
  
TABLE OC
AS CROSSTABS
OF PERSONA.HABCIUD  
BY PERSONA.TIPOCUPA
BY PERSONA.RECCIUD
FOR PERSONA.P03EDAD>4 AND PERSONA.P03EDAD<999