¡Caminando hacia el éxito!

Aprende en Comunidad

Avalados por :

Cómo mejorar la navegación de archivos en tu programa utilizando PARAMETERS: p_file LIKE rlgrap-filename

  • Creado 01/03/2024
  • Modificado 01/03/2024
  • 19 Vistas
0
Cargando...

He definido "PARAMETERS: p_file LIKE rlgrap-filename.". Pero en mi programa quiero que en lugar de poner la dirección manualmente... debería tener la opción de navegación, para que nos lleve directamente al archivo o dato requerido.

Saludos,,,,,

Abhay...............

Pedro Pascal
Se unió el 07/03/2018
Pinterest
Telegram
Linkedin
Whatsapp

4 Respuestas

0
Cargando...

Hola,

Usa FM en

AT selection-screen on value-request for p_file.

CALL FUNCTION 'F4_FILENAME'

EXPORTING

PROGRAM_NAME = SYST-CPROG

DYNPRO_NUMBER = SYST-DYNNR

FIELD_NAME = ' '

IMPORTING

FILE_NAME = P_FILE.

Saludos,

Sonika

Respondido el 15/04/2024
LUCIANO RIOJA GHIOTTO
Se unió el 13/07/2019
0
Cargando...

Prueba el código a continuación. Dará la ruta de tu pantalla de presentación o aplicación según sea necesario. Puedes seleccionar la opción desde la pantalla de selección.

PARAMETERS: p_ifile  TYPE   dxfile-filename LOWER CASE.

PARAMETERS: p_locl  RADIOBUTTON GROUP g1                   " archivo de escritorio
                    DEFAULT 'X' USER-COMMAND fil,
            p_phys  RADIOBUTTON GROUP g1.                  " archivo del servidor de aplicaciones


AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_ifile.
  PERFORM help_input_file USING p_phys p_locl CHANGING p_ifile.

*&---------------------------------------------------------------------*
*&      Form  help_input_file
*&---------------------------------------------------------------------*
*        texto
*----------------------------------------------------------------------*

FORM help_input_file  USING    p_phys_file   TYPE c
                               p_locl_file   TYPE c
                      CHANGING p_source_path TYPE any.

  IF p_phys_file EQ 'X'.
    CALL FUNCTION 'F4_DXFILENAME_4_DYNP'
      EXPORTING
        dynpfield_filename = 'P_IFILE'
        dyname             = sy-repid
        dynumb             = sy-dynnr
        filetype           = 'P'
        location           = 'A'.

  ELSEIF p_locl_file EQ 'X'.
    PERFORM help_local_file CHANGING p_source_path.
  ENDIF.

ENDFORM.                    " help_input_file

*&---------------------------------------------------------------------*
*&      Form  help_local_file
*&---------------------------------------------------------------------*
*       Ruta del archivo local
*----------------------------------------------------------------------*

FORM help_local_file  CHANGING p_path TYPE any .

  DATA:  lt_file_table TYPE filetable,
         la_file_table LIKE LINE OF lt_file_table,
         l_rc TYPE i,
         l_pcdsn TYPE cffile-filename.

  REFRESH lt_file_table.
  CLEAR la_file_table.
  CALL METHOD cl_gui_frontend_services=>file_open_dialog
    CHANGING
      file_table = lt_file_table
      rc         <
        
Respondido el 15/04/2024
LUCIANO RIOJA GHIOTTO
Se unió el 13/07/2019
0
Cargando...

Hola,

Puedes utilizar el módulo de función 'F4_FILENAME' en AT SELECTION SCREEN ON VALUE-REQUEST para tu parámetro de campo.

Saludos,

Samson Rodrigues.

Respondido el 15/04/2024
LUCIANO RIOJA GHIOTTO
Se unió el 13/07/2019
0
Cargando...

Hola

Utiliza esto.

llamar método guiobj->file_save_dialog

K.Kiran.

Prueba esto:-

constantes: archivo LIKE rlgrap-filename valor SPACE,

datos: guiobj tipo ref a cl_gui_frontend_services.

crear objeto guiobj.

llamar método guiobj->file_save_dialog

exportando

WINDOW_TITLE = 'DESCARGAR ARCHIVO EN'

  • WITH_ENCODING = 'X'

INITIAL_DIRECTORY = 'C:\'

default_extension = 'pdf'

default_file_name = nombre_archivo "espacio

file_filter = filtro

cambiando

nombre_archivo = FILENAME

ruta = ruta

ruta_completa = ruta_completa

accion_usuario = uact.

si uact = guiobj->action_cancel.

cancelar = 'X'.

salir.

fin si.

Mensaje editado por: Kiran

Kiran K

Respondido el 15/04/2024
LUCIANO RIOJA GHIOTTO
Se unió el 13/07/2019

contacto@primeinstitute.com

(+51) 1641 9379
(+57) 1489 6964

© 2024 Copyright. Todos los derechos reservados.

Desarrollado por Prime Institute

¡Hola! Soy Diana, asesora académica de Prime Institute, indícame en que curso estas interesado, saludos!
Hola ¿Puedo ayudarte?