✒️ABAP POO RTTS (Run Time Type Service)

U4-L3

RTTS (Run Time Type Service)

Versión SAP Web AS 6.10; RTTI (Información del tipo en tiempo de ejecución). Los objetos ABAP permiten consultar los tipos de los atributos en tiempo de ejecución mediante clases estándar.

Versión SAP Web AS 6.40; RTTC(Creación de tipos en tiempo de ejecución). Mejora de RTTI.

RTTS = RTTI RTTC.

RTTI (Run Time Type Information)

Concepto basado en clases que utilizamos para determinar el tipo de los atributos en tiempo de ejecución (incluye todos los tipos de datos ABAP, incluye sentencias obsoletas describe table y describe field).
Para obtener una referencia de un objeto de descripción de un tipo, se utilizan los métodos estáticos de CL_ABAP_TYPEDESCR o métodos de navegación de una clase de descripción especial.

En tiempo de ejecución, un objeto de descripción existe para cada tipo.

EJ.
DATA: wa TYPE spli, "Estructura a describir
r_descr TYPE REF TO cl_abap_structdescr, "Referencia a clase describ estructura
wa_Comp TYPE abap_comdescr. "atributo de la clase para describir componentes individuales de la estructura

START-OF-SELECTION.
r_descr ?= cl_abap_typedescr=>desccribe_by_data( wa ). "Devuelve la referencia de la instancia de la descripción de la estructura.
LOOP AT r_descr->components INTO ws_comp.
WRITE wa_comp-name. "Imprime nombres de campos de le estructura SPFLI
ENDLOOP.

Operador de casteo (?=); origen y destino de asignación son variables referenciadas, el tipo estático del origen es mas general que el destino.

Programas útiles sobre RTTI
- SAPBC401_DYND_DATADECL_RTTI
- SAPBC401_DYND_RTTI_OBJECT

RTTC (Run Creation at Run Time)

RTTC se agrega a RTTI para facilitar la creación de tipos en tiempo de ejecución.
Las propiedades de los tipos se implementan a través de atributos de tipos de objetos. O sea, cada tipo tiene un tipo de objeto cuyos atributos describen sus propiedades.
Para obtener referencias a tipos de objetos, mediante atributos estáticos de CL_ABAP_TYPEDESCR o métodos de clases especiales GET_I. GET_C, CREATE.
EJ.
DATA: r_linetype TYPE REF TO cl_Abap_structdescr, "estructura de tipo tabla a crear
r_tabletype TYPE REF TO cl_abap_tabledescr, "tipo tabla
key TYPE abap_keydescr_tab, "campos claves de tabla a crear
r_itab TYPE REF TO data. "tabla a crear en tiempo de ejec

r_linetype ?= cl_abap_typedescr=>describe_by_name( 'SPFLI' ). "crea el tipo de linea, se instancia el objeto de tipo de linea.

APPEND 'CARRID' TO key.
APPEND 'CONNID' TO key.

r_tabletype = cl_abap_tabledescr=>create( "método p crear tipo tabla
p_line_type = r_linetype "estructura o tipo de linea creada arriba
p_table_kind = cl_abap_tabledescr=>tablekind_sorted
p_unique = abap_true
p_key = key

*Creacion de un tipo table con métodos estáticos
CREATE DATA r_itab TYPE HANDLE r_tabletype.