Dear Experts,
I met a problem with gui download. It is not showing the last two columns of table in excel file. I can see it in alv output, but not in excel. I tride many things starting with columns options in module, changing type of headings, changing size, debugging etc. Code is simple, but I can not find error here.
*&---------------------------------------------------------------------*
REPORT zak_ce1itc1.
DATA: alv TYPE REF TO cl_salv_table.
TABLES ce1itc1.
TYPES: BEGIN OF t_ce1itc1, kndnr TYPE ce1itc1-kndnr, vtweg TYPE ce1itc1-vtweg, land1 TYPE ce1itc1-land1, frwae TYPE ce1itc1-frwae, paledger TYPE ce1itc1-paledger, vrgar TYPE ce1itc1-vrgar, perio TYPE ce1itc1-perio, belnr TYPE ce1itc1-belnr, posnr TYPE ce1itc1-posnr, hzdat TYPE ce1itc1-hzdat, budat TYPE ce1itc1-budat, rbeln TYPE ce1itc1-rbeln, rposn TYPE ce1itc1-rposn, bukrs TYPE ce1itc1-bukrs, kaufn TYPE ce1itc1-kaufn, kdpos TYPE ce1itc1-kdpos, kstar TYPE ce1itc1-kstar, artnr TYPE ce1itc1-artnr, gjahr TYPE ce1itc1-gjahr, gsber TYPE ce1itc1-gsber, matkl TYPE ce1itc1-matkl, paobjnr TYPE ce1itc1-paobjnr, perde TYPE ce1itc1-perde, werks TYPE ce1itc1-werks, wwgr TYPE ce1itc1-wwgr, wwmp TYPE ce1itc1-wwmp, wwtp TYPE ce1itc1-wwtp, plikz TYPE ce1itc1-plikz, pprctr TYPE ce1itc1-pprctr, prctr TYPE ce1itc1-prctr, spart TYPE ce1itc1-spart, vvcpr TYPE ce1itc1-vvcpr, vvsp1 TYPE ce1itc1-vvsp1, erlos TYPE ce1itc1-erlos, vvkor TYPE ce1itc1-vvkor, vvr01 TYPE ce1itc1-vvr01, vvr02 TYPE ce1itc1-vvr02, vvr03 TYPE ce1itc1-vvr03, vvr04 TYPE ce1itc1-vvr04, vvroz TYPE ce1itc1-vvroz, vvssd TYPE ce1itc1-vvssd, vvsfi TYPE ce1itc1-vvsfi, END OF t_ce1itc1.
DATA it_ce1itc1 TYPE STANDARD TABLE OF t_ce1itc1 INITIAL SIZE 0.
DATA: BEGIN OF my_names OCCURS 0, text(24), END OF my_names.
SELECTION-SCREEN BEGIN OF BLOCK bl1 WITH FRAME TITLE title.
SELECT-OPTIONS: so_paled FOR ce1itc1-paledger, "Typ waluty so_vrgar FOR ce1itc1-vrgar, "Rodzaj operacji so_perio FOR ce1itc1-perio, "Okres/Rok so_kstar FOR ce1itc1-kstar, "Rodzaj kosztów so_bukrs FOR ce1itc1-bukrs, "Jednostka gospodarcza so_artnr FOR ce1itc1-artnr, "Produkt so_werks FOR ce1itc1-werks. "Zakład
SELECTION-SCREEN END OF BLOCK bl1.
SELECTION-SCREEN: BEGIN OF BLOCK b03 WITH FRAME TITLE text-003.
PARAMETERS zapisz AS CHECKBOX.
PARAMETERS x_file LIKE rlgrap-filename DEFAULT 'C:\CE1ITC1.xls'.
SELECTION-SCREEN: END OF BLOCK b03.
SELECT kndnr vtweg land1 frwae paledger vrgar perio belnr posnr hzdat budat rbeln
rposn bukrs kaufn kdpos kstar artnr gjahr gsber matkl paobjnr perde werks wwgr wwmp wwtp plikz pprctr prctr spart vvcpr vvsp1 erlos vvkor vvr01 vvr02 vvr03 vvr04 vvroz vvssd vvsfi FROM ce1itc1 INTO CORRESPONDING FIELDS OF TABLE it_ce1itc1 WHERE paledger IN so_paled AND vrgar IN so_vrgar AND perio IN so_perio AND kstar IN so_kstar AND bukrs IN so_bukrs AND artnr IN so_artnr AND werks IN so_werks. IF zapisz = 'X'. PERFORM names. PERFORM down. ENDIF.
cl_salv_table=>factory( IMPORTING r_salv_table = alv CHANGING t_table = it_ce1itc1 ).
alv->display( ).
FORM down. DATA c_file_path TYPE string. MOVE x_file TO c_file_path. CALL FUNCTION 'GUI_DOWNLOAD' EXPORTING filename = c_file_path filetype = 'DBF' codepage = '1401' col_select = '' TABLES data_tab = it_ce1itc1 fieldnames = my_names EXCEPTIONS file_write_error = 1 no_batch = 2 gui_refuse_filetransfer = 3 invalid_type = 4 no_authority = 5 unknown_error = 6 header_not_allowed = 7 separator_not_allowed = 8 filesize_not_allowed = 9 header_too_long = 10 dp_error_create = 11 dp_error_send = 12 dp_error_write = 13 unknown_dp_error = 14 access_denied = 15 dp_out_of_memory = 16 disk_full = 17 dp_timeout = 18 file_not_found = 19 dataprovider_exception = 20 control_flush_error = 21 OTHERS = 22.
ENDFORM. " DOWN
FORM names. CLEAR my_names. my_names = 'Klient'. APPEND my_names. my_names = 'Kanal dystry.'. APPEND my_names. my_names = 'Kraj'. APPEND my_names. my_names = 'Waluta'. APPEND my_names. my_names = 'Typ waluty'. APPEND my_names. my_names = 'Rodzaj oper.'. APPEND my_names. my_names = 'Okres/rok'. APPEND my_names. my_names = 'Nr. Dokum.'. APPEND my_names. my_names = 'Pozycja'. APPEND my_names. my_names = 'Data utworz.'. APPEND my_names. my_names = 'Data ksiego.'. APPEND my_names. my_names = 'Nr. Dok. Ref.'. APPEND my_names. my_names = 'Nr.Poz.Ref.'. APPEND my_names. my_names = 'JG'. APPEND my_names. my_names = 'Zlec. Klienta'. APPEND my_names. my_names = 'Poz. Zlec.'. APPEND my_names. my_names = 'Rodz. Kosz.'. APPEND my_names. my_names = 'Produkt'. APPEND my_names. my_names = 'Rok obrot.'. APPEND my_names. my_names = 'Dział. Gosp.'.
APPEND my_names. my_names = 'Grupa mat.'. APPEND my_names. my_names = 'Ob. Wynik'. APPEND my_names. my_names = 'Okres'. APPEND my_names. my_names = 'Zaklad'. APPEND my_names. my_names = 'Gramatura'. APPEND my_names. my_names = 'Maszyna'. APPEND my_names. my_names = 'Typ pap.'. APPEND my_names. my_names = 'Plan./Rzecz.'. APPEND my_names. my_names = 'Centr. Zysku Par.'. APPEND my_names. my_names = 'Centr. Zysku'. APPEND my_names. my_names = 'Dziedzina'. APPEND my_names. my_names = 'Czas prod.'. APPEND my_names. my_names = 'Ilosc Sprzed.(1)'. APPEND my_names. my_names = 'Przychod'. APPEND my_names. my_names = 'Korekty ceny'. APPEND my_names. my_names = 'Przychod'. APPEND my_names. my_names = 'Korekty ceny'. APPEND my_names. my_names = 'Opust za got.'. APPEND my_names. my_names = 'Opust-odb. Wlas.'. APPEND my_names. my_names = 'Doplata'. APPEND my_names. my_names = 'Rabat klienta'. APPEND my_names. my_names = 'Roznica Zaok.'. APPEND my_names. my_names = 'Skonto (SD)'. APPEND my_names. my_names = 'Skonto (FI)'. APPEND my_names.
ENDFORM. " NAMES
Many Thanks for your help.
Kind Regards,
Adrian