Re: Exce, Gui_upload necesitado de ayuda, por favor.
Buenas a todos,
Le he dado otra vuelta de nuevo y finalmente, me llega a leer el excell al seleccionarlo, pero claro entiendo que estos datos tienen que volcarse en una tabla interna y posteriormente mostrarlos en el alv.
Asi tengo actualmente el código:
FORM obtener_fichero CHANGING p_p_file.
*** Aparecerá el cuadro para poder seleccionar el fichero ***
CALL FUNCTION 'F4_FILENAME'
IMPORTING
file_name = p_file. "Tiene que ser del tipo rlgrap-filename para que pueda leerlo".
IF sy-subrc <> 0.
MESSAGE gc_nodata TYPE 'S' DISPLAY LIKE 'E'.
ENDIF.
ENDFORM.
FORM upload_file .
*** Cargaremos el fichero,leerá los datos a través de esta función ***
DATA: lt_raw_data TYPE truxs_t_text_data,
lv_filename TYPE string.
*** Con los datos obtenidos tras gui_upload convertirá estos datos a la estructura definida de la tabla internta***
CALL FUNCTION 'TEXT_CONVERT_XLS_TO_SAP'
EXPORTING
i_line_header = abap_true "Indicará que tiene encabezado"
i_tab_raw_data = lt_raw_data "Puse esta antes gt_file_table pero necesita tener necesita una tabla tipo truxs_t_text_data "
i_filename = p_file
TABLES
i_tab_converted_data = it_equipo2
EXCEPTIONS
conversion_failed = 1
OTHERS = 2.
IF sy-subrc <> 0.
* Implement suitable error handling here
else.
LOOP AT it_equipo2 into .
ENDLOOP.
ENDIF.
ENDFORM.
¿como podria seguir?
Gracias
|