✒️ABAP Los archivos en el servidor y las sentencias OPEN y READ
ABAP Los archivos en el servidor y las sentencias OPEN y READ
Tratamiento de archivos en el servidor
En un ambiente de trabajo real es común la utilización de un servidor de aplicaciones,para trabajar con archivos.
Abap dispone una serie de sentencias para el tratamiento de ubicación de archivos en el servidor de aplicaciones.
Las principales son:
- OPEN DATASET: para la apertura de los archivos del servidor.
- READ DATASET: para la lectura de archivos deñ servidor.
- TRANSFER: para transferir datos de archivos al servidor.
- DELETE: para borrar archivos del servidor
- CLOSE: para cerrar archivos del servidor.
Con la tras. SE11 podemos acceder a los directorios de SAP del servidor he incluso abrir los archivos, ingresando vemos todos los directorios disponibles, si los archivos contenidos en los directorios son de texto podemos ver su contenido. Si queremos crear un directorio vamos a necesitar que los administradores del sistema SAP nos otorguen los permisos necesarios.
Apertura de archivos en el servidor
La sentencia OPEN DATASET para la apertura de archivos
OPEN DATASET <archivo> FOR <ACCESS> IN <MODE> , si la apertura se realizó correctamente entonces SY_SUBRC será 0 sino será 8.
El nombre del archivo adjunto con el directorio, se puede ingresar con comillas o en una variable. Si no ingresamos el directorio y solo ingresamos el nombre, entonces el sistema intentará abrir el archivo en el directorio en que corre el servidor de aplicaciones. Si queremos abrir un archivo de lectura debemos usar la cláusula FOR INPUNT
OPEN DATASET <archivo> FOR INPUT IN TEXT <MODE>, el archivo que se intenta abrir debe existir caso contrario el SY-SUBRC será 8. si el archivo existe y est{a abierto, el sisitema se posicionará al comienzo del mismo.
Abrir Fichero para lectura OPEN DATASET p_path FOR INPUT IN TEXT MODE ENCODING DEFAULT. IF sy-subrc NE 0. * Error al abrir el archivo MESSAGE s000(z_prueba) WITH text-004. ELSE.p_path es un parámetro de la pantalla de selección en donde el usuario ingresa el directorio y nombre del archivo.
Es recomendable que todos los archivos estén cerrados antes de realizar la apertura con OPEN DATASET.
Si queremos abrir un archivo para escritura debemos utilizar la cláusula FOR OUTPUT.
OPEN DATASET <archivo> FOR OUTOUT IN TEXT <MODE> , si no existe se creará automáticamente, si existe pero esta cerrado el contenido será sobreescrito, si existe y está abierto el sistema posicionará al comienzo del archivo. La apertura correcta SY-SUBRC será 0 caso contrario 8.
Abrir Fichero para escritura OPEN DATASET p_path FOR OUTPUT IN TEXT MODE ENCODING DEFAULT. IF sy-subrc NE 0. * Error al abrir el archivo MESSAGE s000(z_prueba) WITH text-004. ENDIF.si queremos abrir un archivo y agregar información debemos utilizar la cláusula FOR APPENDING
OPEN DATASET <archivo> FOR APPENDING IN TEXT <MODE>, si el archivo no exite, se creará automáticamente, si existe pero esta cerrado, el sistema lo abrirá y se posicionará a final del mismo, si existe y esta abierto, el sistema se posicionará a final del archivo. SY-SUBRC será 0.
Abrir Fichero para agregar datos OPEN DATASET p_path FOR APPENDING IN TEXT MODE ENCODING DEFAULT. IF sy-subrc NE 0. * Error al abrir el archivo MESSAGE s000(z_prueba) WITH text-004. ENDIF.Lectura de archivos del servidor Utilizamos la sentencia READ DATASET par ala lectura de archivos del servidor. READ DATASET <archivo> INTO <estructura>, para determinar en que variable debemos almacenar los datos que leeremos del archivo debemos conocer la estructura del archivo que leeremos. Si se realizo correctamente SY-SUBRC será 0 caso contrario será 8. 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. ENDIF.
 
 
 
Sobre el autor
Publicación académica de Juan Carlos Pavicich, en su ámbito de estudios para la Carrera Consultor ABAP.
Juan Carlos Pavicich
Profesión: Técnico Informático - Argentina - Legajo: VR91L
✒️Autor de: 116 Publicaciones Académicas
🎓Egresado de los módulos:
Disponibilidad Laboral: FullTime
Presentación:
Tengo el agrado de dirigirme a ud/s con el objeto de mencionar mi experiencia y conocimientos técnicos necesarios para desarrollar actividades en el rubro de su empresa.
Certificación Académica de Juan Pavicich