DEFINE PERSONA.PEA
	AS SWITCH
	INCASE PERSONA.P17TRAB = 1
	ASSIGN 1
	INCASE PERSONA.P18TRAUS = 1
	ASSIGN 1
	INCASE PERSONA.P19ALGT = 1
	ASSIGN 1
	INCASE PERSONA.P22MOTI = 1
	ASSIGN 1
	INCASE PERSONA.P20BSEM = 1
	ASSIGN 2
	INCASE PERSONA.P21BMES = 1
	ASSIGN 2
	INCASE PERSONA.P22MOTI > 1 AND PERSONA.P22MOTI < 5
	ASSIGN 2
	ELSE 0
	TYPE INTEGER
	RANGE (1 : 2) 
	VARLABEL "PEA"
	VALUELABELS
		1 "OCUPADOS"
		2 "DESOCUPADOS"
	MISSING 3
	NOTAPPLICABLE 4
    
TABLE A
AS CROSSTABS
OF PERSONA.HABCIUD BY PERSONA.RECCIUD 
FOR PERSONA.P03EDAD>24 AND PERSONA.P03EDAD<40
AND PERSONA.PEA>0

TABLE B
AS CROSSTABS
OF PERSONA.HABCIUD BY PERSONA.RECCIUD 
FOR PERSONA.P03EDAD>24 AND PERSONA.P03EDAD<40
AND PERSONA.PEA=2

TABLE T2
AS MATRIXOP
OF B / A