Ayuda Para Principiante

Colapsar
X
 
  • Tiempo
  • Mostrar
Limpiar Todo
nuevos mensajes
  • jlpdky2
    Junior Member
    • feb
    • 11

    #1

    Ayuda Para Principiante

    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
  • ppchico
    Senior Member
    • oct
    • 144

    #2
    Originalmente publicado por jlpdky2
    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
    Lo que puedes hacer, es en el evento:

    at selection-screen on value-request for fichero.

    CALL FUNCTION 'WS_FILENAME_GET'
    EXPORTING
    mask = '
    ,ALL FILES, *.*'.
    MODE = '0'
    IMPORTING
    filename = fichero.
    EXCEPTIONS
    INV_WINSYS = 1
    NO_BATCH = 2
    SELECTION_CANCEL = 3
    SELECTION_ERROR = 4
    OTHERS = 5.


    Con esto, cuando pulse F4 en el campo del nombre del fichero, o pulse a la ayuda, tendra um browser de ficheros, devolviendo en el campo del nombre del fichero la ruta del archivo que seleccione.

    Espero que esto te sirva de ayuda.

    Comentario

    Trabajando...