UNIDAD 6: TRATAMIENTO DE ARCHIVOS Y FIELD SYMBOLS
LECCION 5: ARCHIVOS EN SERVIDOR: LAS SENTENCIAS TRANSFER, DELETE Y CLOSE.
1| Transferencia de archivos al servidor
TRANSFER.- para transferir datos de archivos del programa Abap al servidor de aplicaciones.
El modo de transferencia se corresponde con el modo de apertura del archivo, si este no
esta abierto para escritura, el sistema intentara abrirlo en
BINARY MODE o usa la ultima sentencia OPEN DATASET.
Con la TX CG3Y se puede copiar un archivo del servidor de aplicaciones a nuestra PC,
dándole la ruta origen y destino y el formato de transferencia
si fuese ASCCI o BINARIO.
2| Borrado de archivos del servidor
DELETE DATASET.- borrar archivos del servidor de aplicaciones, previamente debemos abrirlo.
SY-SUBRC = 0 borrado correctamente caso contrario sera
4.
3| Cierre de archivos del servidor
CLOSE_DATASET, para cerrar archivos del servidor. Siendo este muy recomendable.
4| Búsqueda de archivos en el servidor
Usando la función /SAPDMC/LSM_F4_SERVER_FILE, creamos una ventana de navegación en el
servidor para seleccionar el archivo que deseamos
ejemplo:
*------------------------------------------------------------
DATA: vl_file(500) TYPE c. " ABRIR_VENTANA_ARCHIVOS
CALL FUNCTION '/SAPDMC/LSM_F4_SERVER_FILE'
EXPORTING
directory = p_path
filemask = '*'
IMPORTING
serverfile = vl_file
EXCEPTIONS
canceled_by_user = 1
OTHERS = 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.
*------------------------------------------------------------