RUNDEF programa
   SELECTION ALL

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

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

TABLE IM 
AS TABOP
OF (HOMBRE/ MUJER) * 100

OUTPUTFILE "AR10CTIM" OVERWRITE