Olá,
Use FM em
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.
Saudações,
Sonika
Avalados por :
Eu defini "PARAMETERS: p_file LIKE rlgrap-filename.". Mas no meu programa, eu gostaria de ter a opção de navegação em vez de inserir o endereço manualmente... assim poderíamos ir diretamente para o arquivo ou dado necessário.
Saudações,,,,,
Abhay...............
Olá,
Use FM em
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.
Saudações,
Sonika
Experimente o código abaixo. Ele mostrará o caminho da sua tela de apresentação ou aplicação conforme necessário. Você pode selecionar a opção na tela de seleção.
PARAMETERS: p_ifile TYPE dxfile-filename LOWER CASE.
PARAMETERS: p_locl RADIOBUTTON GROUP g1 " arquivo de desktop
DEFAULT 'X' USER-COMMAND fil,
p_phys RADIOBUTTON GROUP g1. " arquivo do servidor de aplicativos
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
*&---------------------------------------------------------------------*
* Rota do arquivo 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 = l_rc
dsn = l_pcdsn
user_action=>l_user_action.
Ol·,
Podes usar o mÛdulo de funÁ„o 'F4_FILENAME' no AT SELECTION SCREEN ON VALUE-REQUEST para o teu par‚metro de campo.
Cumprimentos,
Samson Rodrigues.
Olá
Use isso.
chamar método guiobj->file_save_dialog
K.Kiran.
Experimente isso:-
constantes: arquivo LIKE rlgrap-filename valor SPACE,
dados: guiobj tipo ref a cl_gui_frontend_services.
criar objeto guiobj.
chamar método guiobj->file_save_dialog
exportando
WINDOW_TITLE = 'BAIXAR ARQUIVO EM'
WITH_ENCODING = 'X'
INITIAL_DIRECTORY = 'C:\'
default_extension = 'pdf'
default_file_name = nome_arquivo "espaço
file_filter = filtro
mudando
nome_arquivo = FILENAME
caminho = caminho
caminho_completo = caminho_completo
ação_usuario = uact.
se uact = guiobj->action_cancel.
cancelar = 'X'.
sair.
fim se.
Mensagem editada por: Kiran
Kiran K
contacto@primeinstitute.com
(+51) 1641 9379
(+57) 1489 6964
© 2024 Copyright. Todos los derechos reservados.
Desarrollado por Prime Institute