Ver Mensaje Individual
  #2  
Viejo 26/12/11, 12:50:43
ademar ademar is offline
Member
 
Fecha de Ingreso: oct 2008
Localización: Lima - Perú
Mensajes: 31
Ejemplo

Hola Aqui te dejo un ejemplo. Creo que tu error esta en poner importing por exporting. Me avisas, espero sea lo que estas buscando.

report zprueba_01.


types: begin of ly_ekko,
ebeln type ekpo-ebeln,
ebelp type ekpo-ebelp,
end of ly_ekko.


types: begin of ly_detalle,
texto type char100,
end of ly_detalle.

types: begin of ly_cabecera,
texto type char100,
end of ly_cabecera.

data: lt_ekko type table of ly_ekko,
lt_detalle type table of ly_detalle,
lt_cabecera type table of ly_cabecera.

data: wa_detalle like line of lt_detalle,
wa_cabecera like line of lt_cabecera.

start-of-selection.

select ebeln ebelp into table lt_ekko
from ekpo
up to 10 rows.

field-symbols: <f_ekko> like line of lt_ekko.

loop at lt_ekko assigning <f_ekko>.
concatenate <f_ekko>-ebeln <f_ekko>-ebelp
into wa_detalle separated by ';'.
append wa_detalle to lt_detalle.
endloop.

concatenate 'PEDIDO' 'POSICION' into wa_cabecera separated by ';'.
append wa_cabecera to lt_cabecera.


call method cl_gui_frontend_services=>gui_download
exporting
filename = 'C:\ekko.txt'
filetype = 'ASC'
write_field_separator = ';'
fieldnames = lt_cabecera
changing
data_tab = lt_detalle.
if sy-subrc eq 0.
write 'Se descargo el archivo'.
endif.


Slds.
__________________

------------------------------------
antony.alza@gmail.com
Responder Con Cita