RUNDEF programa
   SELECTION ALL

TABLE HOMBRES
AS CROSSTABS OF POBLAC.TAMANOH57
BY POBLAC.TAMANOA57
FOR POBLAC.EDAD>4 AND POBLAC.SEXO=1

TABLE MUJERES 
AS CROSSTABS OF POBLAC.TAMANOH57
BY POBLAC.TAMANOA57
FOR POBLAC.EDAD>4 AND POBLAC.SEXO=2

TABLE IM
AS TABOP 
OF (HOMBRES/MUJERES) * 100
DECIMALS 2

OUTPUTFILE "EC90CTIM" OVERWRITE