DEFINE PERSONA.PEA
AS SWITCH
INCASE (PERSONA.P14=1) ASSIGN 1
INCASE (PERSONA.P14=2 AND PERSONA.P17=1) ASSIGN 1
INCASE (PERSONA.P14=2 AND PERSONA.P15=1) ASSIGN 2
INCASE (PERSONA.P14=2 AND PERSONA.P15=2 AND PERSONA.P16=1) ASSIGN 2
INCASE (PERSONA.P14=2 AND PERSONA.P15=2 AND PERSONA.P17<4) ASSIGN 2
ELSE 0
TYPE INTEGER
RANGE 1 - 2
VARLABEL "PEA"
VALUELABELS
1  "PEA OCUPADA"
2  "PEA DESOCUPADA"

TABLE A
AS CROSSTABS
OF PERSONA.HABCIUD BY   PERSONA.ANTCIUD 
FOR PERSONA.P03>24 AND PERSONA.P03<40
AND PERSONA.DISTRESHAB > 0 AND  PERSONA.DIST5ANO > 0 AND PERSONA.DIST5ANO < 76
AND PERSONA.PEA>0

TABLE B
AS CROSSTABS
OF PERSONA.HABCIUD BY   PERSONA.ANTCIUD 
FOR PERSONA.P03>24 AND PERSONA.P03<40
AND PERSONA.DISTRESHAB > 0 AND  PERSONA.DIST5ANO > 0 AND PERSONA.DIST5ANO < 76
AND PERSONA.PEA = 2

TABLE T2 
AS MATRIXOP
OF B / A