✒️ABAP Las tablas internas
ABAP Las tablas internas
Tablas internas: Es un objeto de datos que permite guardar en memoria grandes cantidades de registros de datos con la misma estructura. Sus usos típicos son:
- Almacenar temporalmente los datos de las bases de datos para un procesamiento futuro.
- Estructurar y formatear datos que se mostrarán como salida del programa.
- Formatear datos para ser utilizados por otros servicios.
Existen varias formas de declarar una tabla interna:
1) Usando la siguiente sentencia, creando la tabla interna sin usar de referencia ninguna estructura, campo o tabla ya creada.
DATA: BEGIN OF <tabla interna> OCCURS <n>,
<Definición de Campo 1>,
... ,
<Definición de Campo n>,
END OF <tabla interna>.
DATA: <cabecera> LIKE LINE OF <tabla interna> */ esta sentencia es para ya declarar la estructura cabecera que nos permitirá operar con la tabla interna
La cantidad de líneas se especifican luego de la sentencia OCCURS. Esto no limitan el tamaño de la tabla sino la cantidad de registros que se guardarán en memoria en simultáneo. Por lo general en el parámetro OCCURS se especifica la cantidad 0 lo que permite trabajar con tablas de gran cantidad de registros.
2) Creando la tabla interna usando como referencia una estructura creada anteriormente.
Para esto anteriormente debemos declarar una estructura
DATA: <tabla> LIKE STANDARD TABLE OF <estructura>.
3) Creando la tabla interna usando como referencia una tabla de base de datos.
En este paso declaramos también como cabecera (área de trabajo) a la misma tabla interna.
Ej: DATA: ti_vuelos LIKE STANDARD TABLE OF sflight WITH HEADER LINE.
El llenado de una tabla interna: Para esto utilizamos la sentencia APPEND TO, con el mismo añadimos un registro a la tabla interna en la última posición con los valores que tengamos en el área de trabajo o cabecera. Se debe tener cuidado de previamente inicializar con la sentencias CLEAR la cabecera y asignar los valores deseados a cargar en el registro de nuestra tabla interna.
APPEND <estructura> TO <tabla interna>.
EJ: APPEND wa_proveedores TO ti_proveedores.
También a través de la sentencia SELECT podemos llenar el contenido de una tabla interna con el contenido de una tabla de datos.
SORT: Sentencia utilizada para ordenar una tabla interna. Se tiene que declarar el campo por el cual se quiere ordenar y en que forma se ordenaran los registros (siendo descending de mayor a menor valor y ascending de menor a mayor)
EJ: SORT ti_proveedores BY dni DESCENDING.
El procesamiento de una tabla interna:
Para recorrer una tabla interna y procesar registro a registro utilizamos la sentencia LOOP/ENDLOOP. Los valores de los registros se almacenaran dentro de una estructura siempre, siempre y cuando se cumpla con la condición especificada dentro de la sentencia WHERE.
LOOP AT <tabla interna a recorrer> INTO <cabecera o estructura>
WHERE <campo a validar> IS INITIAL /* en este ultimo término se puede poner la condición que uno desee*/.
ENDLOOP.
Si no existe ningún registro que cumpla la condición especificada de la cláusula WHERE, el SY-SUBRC será distinto de cero.
La lectura de una tabla interna:
Para leer un registro en concreto de una tabla interna sin necesidad de recorrerla utilizamos la sentencia READ TABLE. Ejemplo:
READ TABLE ti_proveedores INTO wa_proveedores WHERE KEY nombre = 'Ariel'.
Si se encuentra el valor buscado el SY-SUBRC será cero. Si se desea leer el contenido particular de un número de registro en particular se debe usar la sentencia INDEX. Ejemplo:
READ TABLE ti_proveedores INTO wa_proveedores INDEX 1.
*El agregado de la cláusula BINARY SEARCH en la sentencia READ TABLE hace que la búsqueda sea ampliamente más eficiente.
Modificaciones de una tabla interna:
- MODIFY: permite modificar un registro de la tabla interna. Se debe especificar el número de registro o alguno condicional con la sentencia WHERE para saber que registro modificar. Si el registro que intentamos modificar no existe el SY-SUBRC será distinto de cero.
- INSERT: permite insertar un registro en una posición específica de una tabla interna.
- DELETE: permite borrar el contenido de un registro de una tabla interna.
- REFRESH: permite borrar todo el contenido de una tabla interna. (NOTA no borra la tabla en sí, solo borra su contenido)
- DESCRIBE TALBE + LINES: para usar esto primero se debe declarar una variable de tipo numero entero (type i). Nos permite saber cuantos registros tiene una tabla interna. La cantidad de líneas se guarda dentro de la variable previamente declarada con formato i.
- FREE: permite liberar el espacio ocupado de una tabla interna en memoria.
A continuación ejemplos de las sentencias mencionadas anteriormente:
MODIFY ti_proveedores FROM wa_proveedores INDEX 1.
INSERT wa_proveedores INTO ti_proveedores INDEX 2.
DELETE ti_proveedores WHERE dni = '20473942'.
REFRESH ti_proveedores.
DATA: v_lineas TYPE i.
DESCRIBE TABLE ti_proveedores LINES v_lineas.
FREE ti_proveedores.
 
 
 
Sobre el autor
Publicación académica de German Ariel Fritsch, en su ámbito de estudios para la Carrera Consultor ABAP.
German Ariel Fritsch
Profesión: Ingeniero Industrial - Argentina - Legajo: EW95G
✒️Autor de: 20 Publicaciones Académicas
🎓Egresado del módulo:
Disponibilidad Laboral: FullTime
Certificación Académica de German Fritsch