Hola, dale una ojeada a este ejemplo, espero te sirva
DATA: DATATYPE TYPE REF TO CL_ABAP_DATADESCR,
FIELD(5) TYPE C.
DATATYPE ?= CL_ABAP_TYPEDESCR=>DESCRIBE_BY_DATA( FIELD ).
DATA: LINETYPE TYPE REF TO CL_ABAP_STRUCTDESCR,
MYSTRUC TYPE SPFLI.
LINETYPE ?= CL_ABAP_TYPEDESCR=>DESCRIBE_BY_DATA( MYSTRUC ).
Write: DATATYPE->TYPE_KIND,
LINETYPE->TYPE_KIND,
LINETYPE->ABSOLUTE_NAME.