Exportar tabla interna a Excel

[jjeffer]

Hola,

El problema que tengo es que estoy usando la funcion SAP_CONVERT_TO_XLS_FORMAT para esportar una tabla interna a Excel, el programa crea el archivo en la ruta que le doy pero al al abrir el Excel no hay nada, esta en blanco.


CALL FUNCTION 'SAP_CONVERT_TO_XLS_FORMAT'
EXPORTING
* i_field_seperator = '#'
* I_LINE_HEADER =
i_filename = 'c:\prueba\neps.xls'
* I_APPL_KEEP = ' '
TABLES
i_tab_sap_data = ti_salida
* CHANGING
* I_TAB_CONVERTED_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.


Gracias por su ayuda.

[SAPING]

Buenas....
Cita: "Hola, prueba con la funcion ws_download poniendo en filetype 'WK1'.
En filename le pones el nombre del fichero y en data_tab la tabla interna que contiene los datos." (http://www.mundosap.com/foro/showthread.php?t=1270)

[jjeffer]

Buenas....
Cita: "Hola, prueba con la funcion ws_download poniendo en filetype 'WK1'.
En filename le pones el nombre del fichero y en data_tab la tabla interna que contiene los datos." (http://www.mundosap.com/foro/showthread.php?t=1270)

Gracias SAPING, lo utilice pero al colocar en Filetype 'WK1' me retorna error 4 (invalid_type), y al colocarle 'ASC', efectivamente lo guarda pero inserta todos los datos en una sola columna.

[SAPING]

mmmmm... encontre esto otro:

Código:

DATA: W_RUTA LIKE RLGRAP-FILENAME.

DATA: BEGIN OF LT_FNAMES OCCURS 0.
INCLUDE STRUCTURE FNAME.
DATA: END OF LT_FNAMES.

CONCATENATE 'C:\REPORTE' P_EKORG '.XLS'
INTO W_RUTA.

PERFORM CARGAR_CABECERA.

CALL FUNCTION 'WS_DOWNLOAD'
EXPORTING
FILENAME = W_RUTA
FILETYPE = 'DAT'
TABLES
DATA_TAB = IT_ZMM09_DB02_2
FIELDNAMES = LT_FNAMES.
IF SY-SUBRC <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.

CALL FUNCTION 'WS_EXECUTE'
EXPORTING
DOCUMENT = 'X'
COMMANDLINE = W_RUTA
PROGRAM = 'EXCEL'.
IF SY-SUBRC <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.

[jjeffer]

Muchicimas Gracias SAPING

Efectivamente probé el primero cambiandole el WK1 por DAT, y si me sirvio, te lo agradesco bastante.