RUNDEF programa
   SELECTION ALL
   
TABLE DEP5
AS CROSSTABS OF POBLAC.CIUHORD57 BY POBLAC.CIUAORD57
FOR POBLAC.CIUHORD57>=0 AND POBLAC.CIUAORD57>=0 AND (POBLAC.EDAD>4 AND POBLAC.EDAD<15) OR POBLAC.EDAD>64

TABLE DEP51
AS CROSSTABS OF POBLAC.CIUHORD57 BY POBLAC.CIUAORD57
FOR POBLAC.CIUHORD57>=0 AND POBLAC.CIUAORD57>=0 AND POBLAC.EDAD>14 AND POBLAC.EDAD<65

TABLE ID
AS MATRIXOP
OF DEP5/ DEP51

OUTPUTFILE "EC90C5ID" OVERWRITE