¡Caminando hacia el éxito!

Aprende en Comunidad

Avalados por :

Como baixar um arquivo do Excel com macros do servidor sem erros de atribuição

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

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

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

4 Respuestas

0
Cargando...

Experimente revisar o módulo de função TEXT_CONVERT_XLS_TO_SAP.

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

Olá Becker,

Experimente as seguintes transações: CG3Y ou CG3Z.

Isso pode ajudar.

Ashven

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

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
        
Respondido el 15/04/2024
LUCIANO RIOJA GHIOTTO
Se unió el 13/07/2019
0
Cargando...

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-
        
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?