Foro de programación ABAP

SAP / ABAP => Programación ABAP => Mensaje iniciado por: molaci en 13 de Noviembre de 2009, 11:25:59 am

Título: Abrir un excel desde una ruta de la red.
Publicado por: molaci en 13 de Noviembre de 2009, 11:25:59 am

Hola.

Mi pregunta es si hay alguna manera de recuperar un fichero Excel '.xls' desde una ruta del servidor tipo: \\PRUEBAS\tmp\ejemplo.xls

He probado con los OPEN DATASET y me lo abre con símbolos raros ## etc...

Luego he probado con la función 'ALSM_EXCEL_TO_INTERNAL_TABLE' pero me da un DUMP.

Alguien conoce alguna forma de recuperar el excel? Se puede?  ???

Muchas gracias.

Título: Re: Abrir un excel desde una ruta de la red.
Publicado por: oscar en 13 de Noviembre de 2009, 01:44:49 pm

Lo que tienes que hacer es... después de recuperar el fichero con el OPEN DATASET (la que comentas que te salen con símbolos raros), es utilizar este código de ejemplo que te muestro.

Declaramos las variables.

Código: [Seleccionar]

DATA: p_filename LIKE  rlgrap-filename.
TYPES: BEGIN OF t_datatab,
      fecha(8),
      ceco(20),
      cuenta(9),
      dcorta(4),
      signo(1),
      impor(13),
      dlarga(30),
      sociedad(4),
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.

Utilizamos la función: TEXT_CONVERT_XLS_TO_SAP
Es un poco lenta pero 100% efectiva.

Código: [Seleccionar]

  p_filename = p_file.

  CALL FUNCTION 'TEXT_CONVERT_XLS_TO_SAP'
    EXPORTING
*     i_field_seperator = ';'
      i_line_header = 'X'                " X = Sin la cabecera
      i_tab_raw_data = it_raw
      i_filename = p_filename
    TABLES
      i_tab_converted_data = it_datatab[]
    EXCEPTIONS
      conversion_failed = 1
    OTHERS = 2.