✒️ABAP Los archivos en el servidor y las sentencias TRANSFER, DELETE y CLOSE
ABAP Los archivos en el servidor y las sentencias TRANSFER, DELETE y CLOSE
TRANSFERENCIA DE ARCHIVOS AL SERVIDOR
Se utiliza la sentencia TRANSFER para la transferencia de datos desde ABAP a los archivos ubicados en el servidor de aplicaciones.
El modo en que se realiza la transferencia de información corresponde con el modo de apertura del archivo.
Si el sistema no está abierto para escritura, el sistema intentará abrirlo en BINARY MODE o utilizando la última ejecución de la sentencia OPEN DATASET.
Ejemplo:
*Abriendo el fichero
OPEN DATASET p_path FOR OUTPUT IN TEXT MODE ENCODING DEFAULT.
IF sy-subrc NE 0.
MESSAGE s000(z_prueba) WITH text-004.
ELSE.
*Transfiero los datos al fichero
st_archivo-dni = '27654315'.
st_archivo-nombre_ape = 'Ricardo Alvarez'.
st_archivo-estado_usu = 'A'.
.
.
TRANSFER st_archivo TO p_path.
Con la transacción CG3Y, se puede copiar un archivo alojado en el servidor a nuestro computador.
BORRADO DE ARCHIVOS DEL SERVIDOR
Para borrar datos del servidor de aplicaciones usamos la sentencia DELETE DATASET.
Para borrar un archivo hay que abrirlo previamente.
Si el borrado correcto el sy-subrc es = 0, caso contrario = 4.
*Borra el archivo
IF NOT p_borrar IS INITIAL.
DELETE DATASET p_path.
ENDIF.
CERRAR ARCHIVOS DEL SERVIDOR.
Para cerrar archivos del servidor de aplicaciones usamos la sentencia CLOSE DATASET.
Ejemplo
*Cierro
CLOSE DATASET p_path.
IF sy-subrc NE 0.
MESSAGE s000(z_prueba) WITH text-006.
ENDIF.
BUSQUEDA DE ARCHIVOS EN EL SERVIDOR
Podemos crear una ventana de navegación en el servidor de aplicaciones para poder seleccionar el archivo que deseamos. Ejemplo.
DATA: vl_file(500) TYPE c.
CALL FUNCTION '/SAPDMC/LSM_F4_SERVER_FILE'
EXPORTING
directory = p_path
filemask = '*'
IMPORTING
serverfile = vl_file
EXCEPTION
canceled_by_user = 1
OTHER = 2.
IF sy-subrc<>0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ELSE
MOVE vl_file TO p_path.
ENDIF.
Para probar este código requerimos de un servidor de aplicación.
 
 
 
Sobre el autor
Publicación académica de Walter Giovanny Montoya García, en su ámbito de estudios para la Carrera Consultor ABAP.
Walter Giovanny Montoya García
Profesión: Administrador de Sistemas Informáticos - Colombia - Legajo: UX58H
✒️Autor de: 55 Publicaciones Académicas
🎓Cursando Actualmente: Consultor ABAP Nivel Inicial
🎓Egresado de los módulos:
Certificación Académica de Walter Montoya