RUNDEF programa
   SELECTION ALL

TABLE GRPEDAD
AS CROSSTABS OF PERSONA.TAMANOHAB
BY PERSONA.TAMANOANT
FOR PERSONA.P03EDAD>14 AND PERSONA.P03EDAD<30 AND PERSONA.HABCIUD>=0 AND PERSONA.RECCIUD>=0

TABLE TODO
AS CROSSTABS OF PERSONA.TAMANOHAB
BY PERSONA.TAMANOANT
FOR PERSONA.P03EDAD>4 AND PERSONA.P03EDAD < 999 AND PERSONA.HABCIUD>=0 AND PERSONA.RECCIUD>=0

TABLE ED2
AS TABOP
OF (GRPEDAD/TODO) * 100
DECIMALS 2 

OUTPUTFILE "PA10CTED2" OVERWRITE