Ver Mensaje Individual
  #2  
Viejo 09/05/23, 11:56:13
quihe quihe is offline
Junior Member
 
Fecha de Ingreso: may 2023
Mensajes: 2
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
Responder Con Cita