Intervalo de edad

DATA: years type numc2,
months type numc2,
days type numc2.

CALL FUNCTION 'ZHRCM_TIME_PERIOD_CALCULATE'
EXPORTING
begda = TRAN_STRUCTURE-GBDAT
endda = sy-datum
IMPORTING
noyrs = years
nomns = months
nodys = days
EXCEPTIONS
invalid_dates = 1
overflow = 2
OTHERS = 3.

IF years < 20.
RESULT = 1.
ELSEIF years >= 20 AND years <= 29.
RESULT = 2.
ELSEIF years >= 30 AND years <= 39.
RESULT = 3.
ELSEIF years >= 40 AND years <= 49.
RESULT = 4.
ELSEIF years >= 50 AND years <= 59.
RESULT = 5.
ELSEIF years >= 60 AND years <= 69.
RESULT = 6.
ELSEIF years >= 70.
RESULT = 7.
Else. RESULT =