RUNDEF programa
   SELECTION ALL

TABLE GRPEDAD  
AS CROSSTABS
OF PERSONA.CIUDADRHTAM BY PERSONA.CIUDADRH5TAM
FOR PERSONA.EDAD>44 AND PERSONA.EDAD<60   

TABLE TODO 
AS CROSSTABS
OF PERSONA.CIUDADRHTAM BY PERSONA.CIUDADRH5TAM
FOR PERSONA.EDAD>4   

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

OUTPUTFILE "CH02CTED4" OVERWRITE