el siguiente código nos ayudará a seleccionar una ruta de la PC para descargar un archivo generado desde el programa que estemos desarrollando. Esto normalmente se utiliza para descargar los formatos de PLE o algún archivo de txt que se vaya a cargar en otro lado.
El código es el siguiente:
parametro:
=========
parameters: pFolder like rlgrap-filename memory id MFOLDER.
Código:
=======
at selection-screen on value-request for pFolder.
data: objFile type ref to cl_gui_frontend_services.
data: pickedFolder type string.
data: initialFolder type string.
if sy-batch is initial.
create object objFile.
if not pFolder is initial.
initialFolder = pFolder.
else.
objFile->get_temp_directory( changing temp_dir = initialFolder
exceptions cntl_error = 1
error_no_gui = 2
not_supported_by_gui = 3 ).
endif.
objFile->directory_browse( exporting initial_folder = initialFolder
changing selected_folder = pickedFolder
exceptions cntl_error = 1
error_no_gui = 2
not_supported_by_gui = 3 ).
if sy-subrc = 0.
pFolder = pickedFolder.
else.
write: / 'An error has occured picking a folder'.
endif.
endif.
0 comentarios:
Publicar un comentario