RUNDEF programa
   SELECTION ALL

TABLE PEA5ANO
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<11

TABLE PEA5ANOFILTRO
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 PA 
AS MATRIXOP
OF PEA5ANOFILTRO/ PEA5ANO

OUTPUTFILE "PA90C5PA" OVERWRITE