Avalados por :
Olá,
Procurei no fórum por uma resposta, mas não encontrei nenhuma...
Então, aqui está a minha pergunta:
Tenho um arquivo do Excel com macros e quero baixá-lo do servidor.
O uso do gui_download cria um arquivo que não pode ser lido pelo Excel.
FAÇA.
LER DATASET makro_rag EM downtab.
SE sy-subrc > 0. SAIR. FIM-SE.
rec_len = STRLEN( downtab-tab ).
ADICIONAR downtab.
FIMFAÇA.
FECHAR DATASET makro_rag.
DESCREVER A TABELA downtab LINHAS rec_cnt.
CHAMAR FUNÇÃO 'GUI_DOWNLOAD'
EXPORTANDO
filename = makro_rag_down
filetype = 'BIN'
IMPORTANDO
filelength = rec_len
TABELAS
data_tab = downtab
EXCEÇÕES
file_open_error = 1
file_write_error = 2.
Ao usar cl_gui_frontend_services=>gui_download obtive erros devido a atribuições incorretas.
FAÇA.
LER DATASET makro_rag EM downtab.
SE sy-subrc > 0. SAIR. FIM-SE.
rec_len = STRLEN( downtab-tab ).
wa_heading-line = downtab-tab.
ADICIONAR wa_heading a g_heading.
FIMFAÇA.
fechar dataset makro_rag.
CHAMAR MÉTODO cl_gui_frontend_services=>gui_download
EXPORTANDO
BIN_FILESIZE = rec_len
filename = 'c: empmakro_rag.xls'
FILETYPE = 'BIN'
mudando
data_tab = g_heading
Alguém tem alguma ideia do que está dando errado aí?
Obrigado antecipadamente,
Sebastián
Experimente revisar o módulo de função TEXT_CONVERT_XLS_TO_SAP.
Olá Becker,
Experimente as seguintes transações: CG3Y ou CG3Z.
Isso pode ajudar.
Ashven
hi,
use a função TEXT_CONVERT_XLS_TO_SAP para obter valores diretamente do arquivo EXCEL para sua tabela interna.
REPORT zupload_excel_to_itab.
TYPE-POOLS: truxs.
PARAMETERS: p_file TYPE rlgrap-filename.
TYPES: BEGIN OF t_datatab,
col1(30) TYPE c,
col2(30) TYPE c,
col3(30) TYPE c,
END OF t_datatab.
DATA: it_datatab type standard table of t_datatab,
wa_datatab type t_datatab.
DATA: it_raw TYPE truxs_t_text_data.
* Na tela de seleção
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_file.
CALL FUNCTION 'F4_FILENAME'
EXPORTING
field_name = 'P_FILE'
IMPORTING
file_name = p_file.
***********************************************************************
*START-OF-SELECTION.
START-OF-SELECTION.
CALL FUNCTION 'TEXT_CONVERT_XLS_TO_SAP'
EXPORTING
* I_FIELD_SEPERATOR =
i_line_header = 'X'
i_tab_raw_data = it_raw " WORK TABLE
i_filename = p_file
TABLES
i_tab_converted_data = it_datatab[] "DADOS ATUAIS
EXCEPTIONS
conversion_failed = 1
OTHERS = 2.
IF sy-subrc <> 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
***********************************************************************
* END-OF-SELECTION.
END-OF
Olá,
Utilize a função do módulo TEXT_CONVERT_XLS_TO_SAP para obter valores diretamente do arquivo EXCEL para sua tabela interna.
REPORT zupload_excel_to_itab.
TYPE-POOLS: truxs.
PARAMETERS: p_file TYPE rlgrap-filename.
TYPES: BEGIN OF t_datatab,
col1(30) TYPE c,
col2(30) TYPE c,
col3(30) TYPE c,
END OF t_datatab.
DATA: it_datatab TYPE standard table of t_datatab,
wa_datatab TYPE t_datatab.
DATA: it_raw TYPE truxs_t_text_data.
* Na tela de seleção
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_file.
CALL FUNCTION 'F4_FILENAME'
EXPORTING
field_name = 'P_FILE'
IMPORTING
file_name = p_file.
***********************************************************************
*START-OF-SELECTION.
START-OF-SELECTION.
CALL FUNCTION 'TEXT_CONVERT_XLS_TO_SAP'
EXPORTING
* I_FIELD_SEPERATOR =
i_line_header = 'X'
i_tab_raw_data = it_raw " TABELA DE TRABALHO
i_filename = p_file
TABLES
i_tab_converted_data = it_datatab[] "DADOS ATUAIS
EXCEPTIONS
conversion_failed = 1
OTHERS = 2.
IF sy-subrc <> 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
***********************************************************************
* END-OF-SELECTION.
END-
contacto@primeinstitute.com
(+51) 1641 9379
(+57) 1489 6964
© 2024 Copyright. Todos los derechos reservados.
Desarrollado por Prime Institute
