RUNDEF programa
   SELECTION ALL

TABLE  GRPEDAD
AS CROSSTABS
OF PERSONA.TAMCIUHA BY  PERSONA.TAMCIUVIV
FOR PERSONA.P03>29 AND PERSONA.P03<45  AND PERSONA.P11M < 6 AND PERSONA.P09M < 6 AND VIVIENDA.TIPVV = 1
WEIGHT HOGAR.EXPH

TABLE  TODO 
AS CROSSTABS
OF PERSONA.TAMCIUHA BY  PERSONA.TAMCIUVIV
FOR PERSONA.P03>4  AND PERSONA.P11M < 6 AND PERSONA.P09M < 6 AND VIVIENDA.TIPVV = 1
WEIGHT HOGAR.EXPH

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

OUTPUTFILE "AR10CTED3" OVERWRITE