RUNDEF programa
   SELECTION ALL

TABLE GRPEDAD
AS CROSSTABS OF PERSONA.TAMANOH58
BY PERSONA.TAMANOA58
FOR PERSONA.P03>14 AND PERSONA.P03<30

TABLE TODO
AS CROSSTABS OF PERSONA.TAMANOH58
BY PERSONA.TAMANOA58
FOR PERSONA.P03>4 

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

OUTPUTFILE "EC10CTED2" OVERWRITE