RUNDEF programa
   SELECTION ALL

TABLE  GRPEDAD
AS CROSSTABS
OF PERSONA.CIUTAMAHAB BY  PERSONA.CIUTAMA5AN
FOR PERSONA.P5>29 AND PERSONA.P5<45  

TABLE  TODO 
AS CROSSTABS
OF PERSONA.CIUTAMAHAB BY  PERSONA.CIUTAMA5AN
FOR PERSONA.P5>4  

TABLE ED3 
AS TABOP
OF (GRPEDAD/ TODO) * 100

OUTPUTFILE "CU12CTED3" OVERWRITE