RUNDEF programa
   SELECTION ALL
   
DEFINE POBLACIO.GRUPEDAD
AS RECODE POBLACIO.EDAD
(5 - 14=1)
(15 - 29=2)
(30 - 59=3)
(60 - 99=4)
ELSE 0
TYPE INTEGER
RANGE 0 - 99
VALUELABELS
1  "5-14"
2  "15-29"
3  "30-59"
4  "60-99"

TABLE ED
AS CROSSTABS OF POBLACIO.HABCIUD BY POBLACIO.GRUPEDAD BY POBLACIO.ANTCIUD
FOR POBLACIO.CANRES5ANO>0 AND  POBLACIO.EDAD >4 AND POBLACIO.GRUPEDAD>0

OUTPUTFILE "CR84C5ED" OVERWRITE