Data download (for excel) ISSUE!

Former Member · ‎2008 Aug 12

hi

i use GUI_DOWNLOAD function download inter table data generated xls format.

in inter table data have ID FIeld which consist of numeric!

example:

35000078297773587

when download the field will change:3.50001E+16

i want to avoid it!

in sap stardand provide a mothod:

run REUSE_ALV_GRID_DISPLAY function to display

data.

in REUSE_ALV_GRID_DISPLAY screen:

go to list~~>export~~>sprresheet

choice excel(in MHTML format) will download data what i want!

who know which function is executed in REUSE_ALV_GRID_DISPLAY .

or exist other method to solve this issue!

help!

thank you advance!

Former Member · ‎2008 Aug 12

hi,

before passing the internal table to FM, store it in a separate internal table in the form of a character string.

for eg:


CLASS cl_abap_char_utilities DEFINITION LOAD.
CONSTANTS: con_tab  TYPE c VALUE cl_abap_char_utilities=>horizontal_tab,
           con_cret TYPE c VALUE cl_abap_char_utilities=>cr_lf.

loop at itab.
  concatenate var1 var2 var3 into itab_new-line separated by con_tab
  concatenate con_cret itab_new-line into itab_new-line.
    APPEND itab_new-line.
endloop.

now, pass this new internal table itab_new to the FM.

Edited by: vikram shah on Aug 12, 2008 11:51 AM

Former Member · ‎2008 Aug 12

Hi,

Declare the internal table of type STRING.

Declare two variable of type Cl_ABAP_CHAR_UTILTIES->HORIZONTAL TAB and Cl_ABAP_CHAR_UTILTIES->VERTICAL TAB. Use them for column separation and row separation.

pass the final table to GT_FINAL(of type STRING) to function module.

'SCMS_STRING_TO_FTEXT'.

and then pass it to GUI_DOWNLOAD.

regards,

Vamsi

viktoru · ‎2008 Aug 12

you can use the following:



data: lt_lines type table of string.
data: ls_lines type string.
data: lv_string type string.
data: lt_content type table of <x>.
data: ls_content type <x>.

loop at lt_content into ls_content.
 lv_string = ls_content-<filed1>.
 concatenate ls_lines lv_string into ls_lines separated by ';'.
.
.
.
 lv_string = ls_content-<filedn>.
 concatenate ls_lines lv_string into ls_lines separated by ';'.

 append ls_lines to lt_lines.

endloop.

OPEN DATASET is_dstfmt-fnamappl FOR OUTPUT IN TEXT MODE ENCODING DEFAULT.

LOOP AT lt_lines into ls_lines.
 TRANSFER ls_lines  TO is_dstfmt-fnamappl.
ENDLOOP.

CLOSE DATASET is_dstfmt-fnamappl.

You must fill the structure is_dstfmt.

The extension of the file must be ".csv". You can open it with excel!

Former Member · ‎2008 Aug 12

hi vikram

thank you very help!

i have do it!

but the result have the same!

CALL FUNCTION 'GUI_DOWNLOAD'

EXPORTING

FILENAME = FILENAME

FILETYPE = 'DAT'

CODEPAGE = '4110'

TABLES

DATA_TAB = IT_S.

DATA_TAB = <F_FS>.

Former Member · ‎2008 Aug 12

hi,

try the following code. it is working here.


DATA: BEGIN OF itab OCCURS 0,
        var1 TYPE f,
        var2 TYPE c,
        var3 TYPE c,
      END OF itab.

DATA: BEGIN OF itab_new OCCURS 0,
        line TYPE string,
      END OF itab_new.

DATA: str_var1  TYPE string,
      p10_4(10) TYPE p DECIMALS 4.

CLASS cl_abap_char_utilities DEFINITION LOAD.
CONSTANTS: con_tab  TYPE c VALUE cl_abap_char_utilities=>horizontal_tab,
           con_cret TYPE c VALUE cl_abap_char_utilities=>cr_lf.

itab-var1 = 5.
itab-var2 = 'A'.
itab-var3 = 'D'.
APPEND itab.

itab-var1 = 1500000.
itab-var2 = 'A'.
itab-var3 = 'D'.
APPEND itab.

LOOP AT itab.
  CALL FUNCTION 'CEVA_CONVERT_FLOAT_TO_CHAR'
    EXPORTING
      float_imp  = itab-var1
      format_imp = p10_4
    IMPORTING
      char_exp   = str_var1.

  CONCATENATE str_var1 itab-var2 itab-var3 INTO itab_new-line SEPARATED BY con_tab.
*  concatenate con_cret itab_new-line INTO itab_new-line.
  APPEND itab_new.
  CLEAR itab_new-line.
ENDLOOP.

CALL FUNCTION 'GUI_DOWNLOAD'
  EXPORTING
    filename                = '..\DESKTOP\DICT.XLS' "ur path
    filetype                = 'ASC'
    write_field_separator   = con_tab
  TABLES
    data_tab                = itab_new
  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.
IF sy-subrc <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
*         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.

Former Member · ‎2008 Aug 12

hi vamsi

my trying code!

DATA:PLINE TYPE I,CLINE TYPE I.

REFRESH IT_S.

REFRESH itab.

CALL FUNCTION 'NAMETAB_GET'

EXPORTING

langu = sy-langu

tabname = itoper-tabname

TABLES

nametab = itab

EXCEPTIONS

no_texts_found = 1.

IF sy-subrc = 1.

MESSAGE 'STOP,CREATE TABLE ERROR' TYPE 'E'.

ENDIF.

DESCRIBE TABLE itab LINES pline.

LOOP AT <F_FS> ASSIGNING <F_FS5>.

CLEAR CLINE.

LOOP AT itab.

CLINE = sy-tabix.

ASSIGN COMPONENT itab-fieldname OF STRUCTURE <F_FS5> TO <F_FS6>.

IF SY-SUBRC = 0.

IF CLINE = 1.

WA_S = <F_FS6>.

ELSE.

CONCATENATE WA_S <F_FS6> INTO WA_S separated by con_tab.

IF CLINE = pline.

concatenate WA_S con_cret into WA_S.

ENDIF.

ENDLOOP.

APPEND WA_S TO IT_S.

ENDLOOP.

IF <F_FS5> IS ASSIGNED.

UNASSIGN <F_FS5>.

ENDIF.

IF <F_FS6> IS ASSIGNED.

UNASSIGN <F_FS6>.

ENDIF.

now how to use the function:

CALL FUNCTION 'SCMS_STRING_TO_FTEXT'

EXPORTING

TEXT =

IMPORTING
LENGTH =

TABLES

FTEXT_TAB =

.

thank you very much!

Former Member · ‎2008 Aug 12

HI

DATA:PLINE TYPE I,CLINE TYPE I.

REFRESH IT_S.

REFRESH: itab,GT_S.

CALL FUNCTION 'NAMETAB_GET'

EXPORTING

langu = sy-langu

tabname = itoper-tabname

TABLES

nametab = itab

EXCEPTIONS

no_texts_found = 1.

IF sy-subrc = 1.

MESSAGE 'STOP,CREATE TABLE ERROR' TYPE 'E'.

ENDIF.

DESCRIBE TABLE itab LINES pline.

LOOP AT <F_FS> ASSIGNING <F_FS5>.

CLEAR CLINE.

LOOP AT itab.

CLINE = sy-tabix.

ASSIGN COMPONENT itab-fieldname OF STRUCTURE <F_FS5> TO <F_FS6>.

IF SY-SUBRC = 0.

IF CLINE = 1.

WA_S = <F_FS6>.

ELSE.

CONCATENATE WA_S <F_FS6> INTO WA_S separated by con_tab.

IF CLINE = pline.

concatenate WA_S con_cret into WA_S.

ENDIF.

ENDLOOP.

REFRESH IT_S.

CALL FUNCTION 'SCMS_STRING_TO_FTEXT'

EXPORTING

TEXT = WA_S

IMPORTING
LENGTH =

TABLES

FTEXT_TAB = IT_S

.

APPEND LINES OF IT_S TO GT_S.

APPEND WA_S TO IT_S.

ENDLOOP.

IF <F_FS5> IS ASSIGNED.

UNASSIGN <F_FS5>.

ENDIF.

IF <F_FS6> IS ASSIGNED.

UNASSIGN <F_FS6>.

ENDIF.

WHEN RUN:

CALL FUNCTION 'SCMS_STRING_TO_FTEXT'

EXPORTING

TEXT = WA_S

IMPORTING
LENGTH =

TABLES

FTEXT_TAB = IT_S

Will dump out!

TYPES:S_STRING TYPE STRING.

DATA:WA_S TYPE S_STRING,

IT_S TYPE TABLE OF S_STRING WITH HEADER LINE,

GT_S TYPE TABLE OF S_STRING WITH HEADER LINE.

Former Member · ‎2008 Aug 12

hi vikram

thank you your hard work for this case!

but the result no change !

Former Member · ‎2008 Aug 12

hi, can u explain ur problem again? is the number field that u r using of "float" type or of some other type?

according to my understanding the prob is that the number field when transferred to excel is displayed as 1.50000000E+03 instead of 1500000.

is that correct?

i executed my code here n after using the FM CEVA_CONVERT_FLOAT_TO_CHAR it is giving correct result. i.e., the number in the excel sheet is displayed as 1500000.

Former Member · ‎2008 Nov 13

thank you! i have using other way to do it!

txt file!

By Category

Related Content

Activity Groups

Industry Groups

Influence and Feedback Groups

Interest Groups

Location Groups

Customer Only Groups

Forums

Related Resources

Products

Learning and Support

About

My SAP Profile

My SAP Profile

Data download (for excel) ISSUE!