Foro de programación ABAP
SAP / ABAP => Programación ABAP => Mensaje iniciado por: jlpdky2 en 28 de Septiembre de 2007, 01:27:12 pm
-
HOLA A TODOS,
ALGUIEN ME PODRIA AYUDAR?
QUIERO HACER UN PROGRAMA EN EL QUE EL USUARIO ME INTRODUZCA UNA RUTA Y UN NOMBRE DE UN FICHERO
Q LUEGO MI PROGRAMA GENERARA. MI PREGUNTA ES: ¿COMO PUEDO PONER AL LADO DEL NOMBRE EL TIPICO
ICONO 'MI PC' PARA QUE EL USUARIO PUEDA NAVEGAR POR LAS CARPETAS DE SU PC Y ASI EL PUEDA
DECIDIR DONDE QUIERE QUE SE GRABE EL FICHERO QUE EL PROGRAMA GENERARA?
¿QUE ME FALTA?
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
PARAMETERS fichero(50) TYPE c OBLIGATORY DEFAULT 'c:\aaa.txt'.
SELECTION-SCREEN END OF BLOCK b1.
GRACIAS POR ADELANTADO
-
Utiliza este trozo de código.
PARAMETERS: fichero LIKE rlgrap-filename.
*Funcion que ayuda a buscar un archivo en windows
AT SELECTION-SCREEN ON VALUE-REQUEST FOR fichero.
CALL FUNCTION 'WS_FILENAME_GET'
EXPORTING
* DEF_FILENAME = ' '
* DEF_PATH = ' '
mask = ',*.* ,*.*.'
mode = '0'
title = 'Datos de pedido'
IMPORTING
filename = fichero
* RC =
* EXCEPTIONS
* INV_WINSYS = 1
* NO_BATCH = 2
* SELECTION_CANCEL = 3
* SELECTION_ERROR = 4
* OTHERS = 5
.
IF sy-subrc <> 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
Un saludo.