RUNDEF programa
   SELECTION ALL

DEFINE PERSONA.ANOSEST
AS SWITCH
INCASE PERSONA.NIVINS = 0
ASSIGN 0
INCASE PERSONA.NIVINS = 9
ASSIGN 98
INCASE (PERSONA.NIVINS = 4 AND PERSONA.GRADO=0) OR (PERSONA.NIVINS = 4 AND PERSONA.GRADO=1)
ASSIGN 0
INCASE PERSONA.NIVINS = 4
ASSIGN PERSONA.GRADO - 1
INCASE PERSONA.NIVINS = 1 OR PERSONA.NIVINS = 2
ASSIGN PERSONA.GRADO
INCASE PERSONA.NIVINS = 3
ASSIGN PERSONA.GRADO + 6
INCASE PERSONA.NIVINS = 5
ASSIGN PERSONA.GRADO + 9
INCASE PERSONA.NIVINS = 6 OR PERSONA.NIVINS = 7
ASSIGN PERSONA.GRADO + 12
INCASE PERSONA.NIVINS = 8
ASSIGN PERSONA.GRADO + 18
ELSE 99
VARLABEL "Años de estudio"
VALUELABELS
98 "Se ignora"
99 "Menores 5 años"
TYPE INTEGER
RANGE 0 - 99

TABLE A
AS CROSSTABS OF PERSONA.TAMANOH58 
BY PERSONA.TAMANOA58
FOR PERSONA.EDAD>29 AND PERSONA.EDAD<45 AND PERSONA.ANOSEST<22 

TABLE A1
AS CROSSTABS OF PERSONA.TAMANOH58
BY PERSONA.TAMANOA58
FOR  PERSONA.EDAD>29 AND PERSONA.EDAD<45  AND PERSONA.ANOSEST<22 
TALLY PERSONA.ANOSEST

TABLE AE2
AS MATRIXOP 
OF A1/A
DECIMALS 2

OUTPUTFILE "EC01CTAE2" OVERWRITE