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>9 AND PERSONA.P03<99 AND PERSONA.PEA>0
AND PERSONA.DISTRESHAB > 0 AND  PERSONA.DIST5ANO > 0 AND PERSONA.DIST5ANO < 76

TABLE B
AS CROSSTABS
OF PERSONA.HABCIUD
BY  PERSONA.ANTCIUD
FOR PERSONA.P03>9 AND PERSONA.P03<99
AND PERSONA.DISTRESHAB > 0 AND  PERSONA.DIST5ANO > 0 AND PERSONA.DIST5ANO < 76 

TABLE PA 
AS MATRIXOP
OF A / B