Avalados por :
Hola,
Busqué en el foro una respuesta pero no encontré ninguna...
Así que aquí está mi pregunta:
Tengo un archivo de Excel con macros y quiero descargarlo desde el servidor.
El uso de gui_download crea un archivo que no puede ser leído por Excel.
HACER.
LEER DATASET makro_rag EN downtab.
SI sy-subrc > 0. SALIR. FIN-SI.
rec_len = STRLEN( downtab-tab ).
AGREGAR downtab.
FINHACER.
CERRAR DATASET makro_rag.
DESCRIBIR LA TABLA downtab LÍNEAS rec_cnt.
LLAMAR FUNCIÓN 'GUI_DOWNLOAD'
EXPORTANDO
filename = makro_rag_down
filetype = 'BIN'
IMPORTANDO
filelength = rec_len
TABLAS
data_tab = downtab
EXCEPCIONES
file_open_error = 1
file_write_error = 2.
Al usar cl_gui_frontend_services=>gui_download obtuve errores debido a asignaciones incorrectas.
HACER.
LEER DATASET makro_rag EN downtab.
SI sy-subrc > 0. SALIR. FIN-SI.
rec_len = STRLEN( downtab-tab ).
wa_heading-line = downtab-tab.
AGREGAR wa_heading a g_heading.
FINHACER.
cerrar dataset makro_rag.
LLAMAR MÉTODO cl_gui_frontend_services=>gui_download
EXPORTANDO
BIN_FILESIZE = rec_len
filename = 'c: empmakro_rag.xls'
FILETYPE = 'BIN'
cambiando
data_tab = g_heading
¿Alguien tiene alguna idea de qué está saliendo mal allí?
Gracias de antemano,
Sebastián
Prueba revisando el módulo de función <b>TEXT_CONVERT_XLS_TO_SAP</b>.
Hola Becker,
Prueba las siguientes transacciones: CG3Y o CG3Z.
Esto puede ayudar.
Ashven
hi,
use la función de módulo TEXT_CONVERT_XLS_TO_SAP para obtener valores directamente del archivo EXCEL a tu tabla 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.
* En la pantalla de selección
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[] "ACTUAL DATA
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
Hola,
Utiliza la función del módulo TEXT_CONVERT_XLS_TO_SAP para obtener valores directamente del archivo EXCEL a tu tabla 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.
* En pantalla de selección
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[] "ACTUAL DATA
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
