✒️ABAP Los archivos en el servidor y las sentencias OPEN y READ
ABAP Los archivos en el servidor y las sentencias OPEN y READ
1- Tratamiento de Archivos en el Servidor
En un ambiente real de trabajo, es común la utilización de un Servidor de Aplicaciones para trabajar con archivos.
Sentencias para el manejo de archivos en el Servidor de Aplicaciones: OPEN DATASET (Apertura); READ DATASET (Lectura); TRANSFER (Transferencia); DELETE (Borrar) y CLOSE (Cierre).
La Trx AL11 permite ver los Directorios existentes en el Servidor. Haciendo doble click en cualquiera de los directorios, se pueden observar los Archivos que lo componen, y si son Archivos de Texto se los puede Abrir y Ver su contenido.
2- Apertura de Archivos en el Servidor
OPEN DATASET <archivo> FOR <ACCESS> IN <MODE>.
SY-SUBRC = 0 (Apertura OK). SY-SUBRC = 8 (Error en Apertura).
El Nombre del Archivo junto con el Directorio se pueden ingresar como un literal entre comillas o en una Variable. Si no se informa el Directorio, el Sistema intentará abrirlo en el Directorio en el que corre el Servidor de Aplicaciones.
Para Archivo de Entrada: OPEN DATASET <archivo> FOR INPUT IN TEXT <MODE>.
OPEN DATASET p_path FOR INPUT IN TEXT MODE ENCODING DEFAULT. Donde p_path es un campo de una Pantalla donde el usuario ingresará el Nombre del Archivo y el Directorio.
Si el Archivo que se intenta Abrir no existe, el SY-SUBRC = 8. Si llegara a estar abierto el sistema se posiciona en el inicio.
Para Archivo de Salida: OPEN DATASET <archivo> FOR OUTPUT IN TEXT <MODE>.
OPEN DATASET p_path FOR OUTPUT IN TEXT MODE ENCODING DEFAULT. Donde p_path es un campo de una Pantalla donde el usuario ingresará el Nombre del Archivo y el Directorio.
Si el Archivo que se intenta Abrir no existe,se creará automáticamente. Si llegara a estar cerrado se sobreescribirá. Si llegara a estar abierto el sistema se posiciona en el inicio.
Para Archivo a Agregar: OPEN DATASET <archivo> FOR APPENDING IN TEXT <MODE>.
OPEN DATASET p_path FOR APPENDING IN TEXT MODE ENCODING DEFAULT. Donde p_path es un campo de una Pantalla donde el usuario ingresará el Nombre del Archivo y el Directorio.
Si el Archivo que se intenta Abrir no existe,se creará automáticamente. Si llegara a estar cerrado el sistema lo abre y se posiciona al final del mismo. Si llegara a estar abierto el sistema se posiciona al final del archivo.
Modos de Apertura de Archivos
MODO TEXTO: Se debe utilizar la cláusula IN TEXT MODE ENCONDING DEFAULT. Se transfiere línea a línea.
MODO BINARIO: Se debe utilizar la cláusula IN BINARY MODE. Se transfiere byte a byte.
3- Lectura de Archivos del Servidor
READ DATASET <archivo> INTO <estructura>.
* Leo el fichero
DO.
READ DATASET p_path INTO st_archivo.
IF sy-subrc = 0.
MOVE-CORRESPONDING st_archivo TO ti_archivo.
APPEND ti_archivo.
CLEAR: ti_archivo, st_archivo.
ELSE.
EXIT.
ENDIF.
ENDDO.
 
 
 
Sobre el autor
Publicación académica de Victor Norberto Levi, en su ámbito de estudios para la Carrera Consultor ABAP.
Victor Norberto Levi
Profesión: Analista Programador - Argentina - Legajo: VT17H
✒️Autor de: 111 Publicaciones Académicas
🎓Egresado de los módulos:
Certificación Académica de Victor Levi