RUNDEF programa
   SELECTION ALL

TABLE GRPEDAD  
AS CROSSTABS OF POBLAC.TAMANOH57
BY POBLAC.TAMANOA57
FOR POBLAC.EDAD>59

TABLE TODO
AS CROSSTABS OF POBLAC.TAMANOH57
BY POBLAC.TAMANOA57
FOR POBLAC.EDAD>4

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

OUTPUTFILE "EC90CTED5" OVERWRITE