RUNDEF programa
   SELECTION ALL

TABLE DESEM5ANO
AS CROSSTABS OF  POB90.HABCIUD BY POB90.ANTCIUD
FOR POB90.DISTRESHAB >0 AND POB90.DIST5ANO<69  AND POB90.EDAD>9 AND POB90.EDAD<99 AND POB90.ACTIV<6

TABLE DESEMPLEO5ANO
AS CROSSTABS OF  POB90.HABCIUD BY POB90.ANTCIUD
FOR POB90.DISTRESHAB >0 AND POB90.DIST5ANO<69  AND POB90.EDAD>9 AND POB90.EDAD<99 AND POB90.ACTIV<>1 AND POB90.ACTIV<>3 AND POB90.ACTIV<6

TABLE TD 
AS MATRIXOP
OF DESEMPLEO5ANO/ DESEM5ANO

OUTPUTFILE "PA90C5TD" OVERWRITE