✒️ABAP / Las tablas internas Por Vismark Sevillano Moreno
ABAP Las tablas internas
Tablas Internas
¿Qué son las Tablas Internas?
Si queremos guardar una colección de registros de datos de la misma estructura en
memoria, sin necesidad de acceder continuamente a las bases de datos y poder realizar
diversas operaciones con este conjunto de información, entonces utilizaremos tablas
internas.
TABLA INTERNA
Es un objeto de datos que permite guardar en memoria grandes cantidades de registros de
datos con la misma estructura. La cantidad de registros máxima está relacionada con los
límites especificados en la instalación del sistema.
El uso típico que se le da a una tabla interna es:
- Para almacenar temporalmente los datos de las bases de datos para un procesamiento
futuro.
- Para estructurar y formatear datos que se mostrarán como salida del programa.
- Para formatear datos para ser utilizados por otros servicios.
¿Cómo se declara una Tabla Interna?
La sintaxis para su declaración es la siguiente:
DATA: BEGIN OF<tabla>OCCURS<n>,
<Def.Campo>,
...
END OF <tabla>.
De esta manera definiremos una tabla interna con n líneas en memoria más una línea de
cabecera o área de trabajo. La cantidad de líneas que se especifican en OCCURS no limitan
el tamaño de la tabla sino la cantidad de registros que se guardarán en memoria
simultáneamente.
"Por lo general, en el parámetro OCCURS se especifíca la cantidad 0 lo que
permite trabajar con tablas de gran cantidad de registros.
En el próximo ejemplo declaramos la tabla interna TI_PROVEEDORES.
* Tabla interna de proveedores
DATA: BEGIN OF ti_proveedores OCCURS 0,
nombre(30) TYPE c,
apellido(30) TYPE c,
dni(8) TYPE c,
END OF ti_proveedores.
Otra forma de declarar la misma tabla sería:
* Tabla interna de proveedores
DATA: BEGIN OF wa_proveedores,
nombre(30) TYPE c,
apellido(30) TYPE c,
dni(8) TYPE c,
END OF wa_proveedores.
DATA: ti_proveedores LIKE STANDARD TABLE OF wa_proveedores.
AUDIO TIPS 1: Existe otra forma que podemos utilizar para declarar tablas internar sin tener
que especificar aparte un área de trabajo o cabecera y que se realiza mediante la palabra
reservada WITH HEADER LINE. Por ejemplo, supongamos que queremos crear una tabla
interna ti_vuelos del mismo tipo que la tabla estándar del sistema de vuelos que es la tabla
SFLIGTH. Entonces declarariamos:
DATA: ti_vuelos LIKE STANDARD TABLE OF SFLIGTH WITH HEADER LINE. De esta forma
estamos declarando una tabla interna en donde la cabecera o área de trabajo de la tabla
es la misma tabla interna.
Llenado de una tabla interna
Para llenar con datos una tabla interna utilizamos:
†APPEND TO: se añade un registro a la tabla interna en la última posición con los valores
que tengamos en el área de trabajo. Veamos un ejemplo:
* Añado un registro a la tabla interna de proveedores
CLEAR wa_proveedores.
wa_proveedoresâ€nombre = 'Ernesto'.
wa_proveedoresâ€apellido = 'Villanueva'.
wa_proveedoresâ€dni = '24987564'.
APPEND wa_proveedores TO ti_proveedores.
* Añado otro un registro a la tabla interna de proveedores
CLEAR wa_proveedores.
wa_proveedoresâ€nombre = 'Ariel'.
wa_proveedoresâ€apellido = 'Gallardo'.
wa_proveedoresâ€dni = '25986584'.
APPEND wa_proveedores TO ti_proveedores.
Llenamos la tabla interna con el contenido de una base de datos. Esto lo haremos con la
sentencia SELECT.
Ordenamiento de una tabla
Para ordenar una tabla interna utilizamos la sentencia SORT.
* Ordeno los proveedores de mayor a menor por dni
SORT ti_proveedores BY dni DESCENDING.
En el ejemplo anterior ordenamos la tabla TI_PROVEEDORES de forma descendente por
DNI lo cual invertirá el orden en el que fueron cargados originalmente los registros. Para
ordenar de menor a mayor hay que utilizar la cláusula ASCENDING.
Proceasamiento de una tabla interna
Para recorrer una tabla interna y procesar registro a registro utilizaremos la sentencia
LOOPâ€ENDLOOP.
* Recorro los registros donde el nombre no es blanco
LOOP AT ti_proveedores INTO wa_proveedores
WHERE NOT nombre IS INITIAL.
ENDLOOP.
Si no existe ningún registro que cumple la condición especificada en la cláusula WHERE, el
SYâ€SUBRC será distinto de cero.
AUDIO TIPS 2: Existe otra forma de declarar una estructura o un área de trabajo de una
tabla interna y se realiza utilizando la adición LIKE LINE OF. Tomemos por ejemplo la tabla
interna ti_proveedores que declaramos al comienzo de la lección con la adición OCCURS 0.
Si deseamos crear una estructura con el mismo formato de esta tabla interna podemos
declarar:
DATA: wa_proveedores LIKE LINE OF ti_proveedores. De esta forma estamos creando una
estructura cuyo formato es identico a un registro cualquiera de la tabla interna
ti_proveedores.
Lectura de una tabla interna
Para leer un registro concreto de una tabla interna sin necesidad de recorrerla utilizamos
la sentencia READ TABLE.
* Leo los datos de un registro particular
READ TABLE ti_proveedores INTO wa_proveedores
WITH KEY nombre = 'Ariel'.
Si se encuentra el registro buscado, el SYâ€SUBRC será cero, caso contrario, será distinto de
cero. Si se desea leer los datos que se encuentran en una posición particular de la tabla se
utilizará la cláusula INDEX tal como vemos en el siguiente ejemplo.
* Leo el primer registro de la tabla
READ TABLE ti_proveedores INTO wa_proveedores INDEX 1.
IMPORTANTE: El agregado de la cláusula BINARY SEARCH en la sentencia READ TABLE hace
que la búsqueda sea ampliamente más eficiente. Para mayor información sobre la
sentencia presionar F1.
Modificando una tabla interna
Para modificar el contenido de un registro de una tabla interna utilizamos la sentencia
MODIFI. En el siguiente ejemplo modificamos el campo DNI correspondiente al primer
registro de una tabla interna.
* Modifico el primer registro de la tabla
wa_proveedoresâ€dni = '24987500'
MODIFY ti_proveedores FROM wa_proveedores INDEX 1.
SABIAS QUE... Si intentamos modificar un registro de una tabla interna y el mismo no existe
entonces el SYâ€SUBRC será distinto de cero.
Para insertar un registro en una posición determinada de una tabla interna utilizamos la
sentencia INSERT. En el siguiente ejemplo insertamos un registro en la posición 2.
* Inserto un registro en la segunda posición de la tabla
wa_proveedoresâ€nombre = 'Marcelo'.
wa_proveedoresâ€apellido = 'Rivarola'.
wa_proveedoresâ€dni = '20857492'.
INSERT wa_proveedores INTO ti_proveedores INDEX 2.
Para borrar el contenido de un registro de una tabla interna utilizamos la sentencia DELETE.
En el siguiente ejemplo borramos el registro de la tabla interna
de proveedores con DNI igual a 20857492.
* Borro un registro de la tabla
DELETE ti_proveedores
WHERE dni = '20857492'.
Para borrar todo el contenido de una tabla interna utilizaremos la sentencia REFRESH. En
el siguiente ejemplo inicializamos la tabla interna TI_PROVEEDORES.
* Inicializamos la tabla Interna
REFRESH ti_proveedores.
Para saber cuantos registros tiene una tabla interna utilizamos la sentencia DESCRIBE
TABLE. En el siguiente ejemplo declaramos V_LINEAS que es la variable que va a contener
la cantidad de filas de la tabla interna TI_PROVEEDORES luego de ejecutar la sentencia
DESCRIBE TABLE.
* Averiguo la cantidad de entradas de una tabla
DATA: v_lineas TYPE i.
DESCRIBE TABLE ti_proveedores LINES v_lineas.
AUDIO TIPS 3: Veamos otras instrucciones de manejo de tablas internas que podemos
utilizar:
- Para inicializar el área de trabajo o cabecera de la tabla interna utilizaremos la
sentencia CLEAR seguida del área de trabajo o cabecera.
- Para liberar el espacio ocupado por una tabla interna en memoria utilizarermos la
sentencia FREE seguida del nombre de la tabla interna.
- Y vale la pena destacar que la sentencia REFRESH borrará el contenido de la tabla
interna y no la tabla en si.
Escanear / Compartir
Sobre el autor
Publicación académica de Vismark Eyner Sevillano Moreno, en su ámbito de estudios para la Carrera Consultor ABAP Nivel Inicial.
SAP Senior
Vismark Eyner Sevillano Moreno
Profesión: Tecnologo en Sistemas - Colombia - Legajo: KN43C
✒️Autor de: 62 Publicaciones Académicas
🎓Egresado del módulo:
Disponibilidad Laboral: FullTime
Presentación:
Aprender todo lo relacionado con programación sap abap, para desenvolverme en el área laboral en el sector de programación abap.
Certificación Académica de Vismark Sevillano
