✒️ABAP / Las tablas internas Por Walter Montoya García
ABAP Las tablas internas
TABLAS INTERNAS.
¿QUE SON?.
Objeto de datos que permite guardar en memoria grandes cantidades de registros de datos con la misma estructura.
Por lo general se utilizan para:
- Almacenar temporalmente los datos de las bases de datos para un procesamiento futuro.
- Para estructurar y dar formato a datos que se muestran como salida del programa.
- Para dar formato a datos que van a ser utilizados por otros servicios.
DECLARACIÓN DE UNA TABLA INTERNA.
La tabla interna se define en ABAP con el siguiente código.
DATA: BEGIN OF <tabla> OCCURS <n>, "n, lineas en memoria mas una linea de cabecera
<Def.Campo>,
END OF <tabla>.
OCCURS: Delimita la cantidad de lineas, normalmente es 0 para que permita trabajar con muchos registros.
Ejemplo.
*Tabla interna proveedores
DATA: BEGIN OF ti_proveedores OCCURS 0,
nombre(30) TYPE c,
apellido(30) TYPE c,
dni(8) TYPE c,
END OF ti_proveedores.
Para crear una tabla como una copia de otra que ya existe en el sistema se utiliza :
*Tabla interna de proveedores
DATA: BEGIN OF wa_proveedores,
nombre(30) TYPE c,
apellido(30) TYPEc,
dni(8) TYPE c,
END OF wa_proveedores.
DATA: ti_proveedores LIKE STANDARD TABLE OF wa_proveedores.
Para declarar tablas internas sin tener que especificar aparte un área de trabajo o cabecera, se utiliza la palabra reservada WITH HEADER LINE. Si se quiere crear una tabla interna del mismo tipo que otra ya estandar existente en el sistema.
DATA: ti_vuelos LIKE STANDARD TABLE OF s_fligth WITH HEADER LINE.
De esta forma se declara una tabla interna en donde la cabecera o area de trabajo es la misma tabla interna.
3.LLENADO DE UNA TABLA INTERNA.
APPEND TO: Añade un registro a la tabla interna en la ultima posición con los valores que tengamos en el área de trabajo. Ejemplo.
*Añadir 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.
Otra forma de llenar una tabla iterna con el contenido de una base de datos se hae con la sentencia SELECT, que se verá en el curso mas adelante.
4. ORDENAMIENTO DE UNA TABLA INTERNA.
Se utiliza el ordenamiento SORT.
*Ordenando los proveedores de mayor a menor por dni.
SORT ti_proveedores BY dni DESCENDING. "Para ordenar de menor a mayor se usa ASCENDING.
Para recorrer una tabla interna y procesar registro a registro utilizaremos la sentencia LOOP-ENDLOOP.
*Recorrer los registros donde el nombre no es blanco
LOOP AT ti_proveedores INTO wa_proveedores
WHERE NOT nombre IS INITIAL.
ENDLOOP.
De no existir ningún registro que cumpla la condición especificada en la clausula where, el SY--SUBRC será distinto de cero.
LECTURA DE UNA TABLA INTERNA.
Para leer un registro de una tabla interna, sin recorrerla toda se utiliza la sentencia READ TABLE.
*Leyendo los datos de un registro particular
READ TABLE ti_proveedores INTO wa_proveedores
WITH KEY nombre = 'Ariel.'
Para leer los datos que se encuentren en una posición en particular se utiliza la clausula INDEX.
*Leyendo el primer registro de la tabla.
READ TABLE ti_proveedores INTO wa_proveedores INDEX 1.
Se pueden hacer busquedas binarias con la cláusula BINARY SEARCH.
7.MODIFICANDO UNA TABLA INTERNA.
Se utiliza la sentencia MODIFY. Ejemplo.
*Cambiando el primer registro de la tabla, en el campo dni
wa_proveedores-dni = '24987500'.
MODIFY ti_proveedores FROM wa_proveedores INDEX 1.
En el caso de querer modificar un registro de una tabla interna pero el mismo no existe, entonces el SY-SUBRC será distintio de cero.
Para insertar un registro en una posición determinada de una tabla interna se utiliza la sentencia INSERT. Así.
*Insertando 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 se utiliza la sentencia DELETE.
*Borrando el registro dni de la tabla interna igual a = 20857492.
DELETE ti_proveedores
WHERE dni = '20857492'.
Para borrar todo el contenido de una tabla interna utilizamos la sentencia REFRESH. Así.
*Inicializando la tabla interna
REFRESH ti_proveedores.
Para saber la cantidad de registros que tiene una tabla, se utiliza la sentencia DESCRIBE TABLE. En este 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.
*Averiguando la cantidad de entrada de una tabla
DATA: v_lineas TYPE i.
DESCRIBE TABLE ti_proveedores LINES v_lineas.
OTRAS INSTRUCCIONES DE TABLAS INTERNAS.
Para inicializar el area de trabajo o cabecera de la tabla interna, se utiliza la sentencia CLEAR seguida del area de trabajo o cabecera.
Para liberar el espacio ocupado por una tabla interna en memoria, se usa FREE el nombre de la tabla interna.
La sentencia Refresh borra el contenido de la tabla, no la tabla en si.
Escanear / Compartir
Sobre el autor
Publicación académica de Walter Giovanny Montoya García, en su ámbito de estudios para la Carrera Consultor ABAP Nivel Inicial.
SAP Master
Walter Giovanny Montoya García
Profesión: Administrador de Sistemas Informáticos - Colombia - Legajo: UX58H
✒️Autor de: 55 Publicaciones Académicas
🎓Cursando Actualmente: Carrera Consultor ABAP Nivel Inicial
🎓Egresado de los módulos:
Certificación Académica de Walter Montoya
Disponibilidad Laboral: FullTime
