ALV Heading truncating - Excel

Hi,
When downloading ALV output to excel, the headings the getting truncated.
Program is using  CL_SALV_TABLE for ALV processing.
Can any one help on how to fix this.
In general fieldcatalog there is a field - DDICTXT by which we can pass 'L'/'M'/'S' - is there any thing available in OO ALV so that to fix this issue.
Thanks,
Chandra.

Hi Chandra,
If it is through program then try to set the column text as below
      gr_column ?= gr_columns->get_column( lv_col_text ).
       gr_column->set_medium_text( lv_med_text ).
       gr_column->set_long_text( lv_lng_text ).
       gr_column->set_short_text( lv_shrt_txt ).
This will set the text to the column of ALV for a respective field.
Regards,
Rafi

Similar Messages

  • ALV Heading truncated when downloading to excel

    Hi,
    While downloading the ALV Grid output to Excel, the headings are getting truncated even I have given output length max.
    Any one please let me know how to fix this in OO ALV - existing program using  CL_SALV_COLUMN class for setting column texts, output length.
    One of SCN thread stating to use DDICTXT, but that is in fieldcatalog - FM model. Is there any equal method in OO ALV.
    Thanks,
    Chandra.

    Maybe you can declare the Field of your internal table a bit bigger? For example if the field has a length of 15, declare it as 20? This might help for the heading.

  • Problem while exporting ALV column header to excel sheet.

    Hi,
    I am able to export an ALV grid details to an excel sheet. But the ALV column headers when exported to excel sheet are getting truncated.
    For eg: if my column header in ALV grid is displayed as 'Material' then the column header in excel sheet is 'Mater' only. Remaining portion is getting truncated.
    How can I view the entire column header text?
    Kindly assist.
    Thanks.

    I have the same problem with you, when user export to excel. I fixed it by using
    w_layo-colwidth_optimize = 'X'. <<<<<<<<<<<<This
    perform generate_fcat_reftab
        using 'PRUEFLOS' 'T_INPUT' '' '' 'Inspection Lot' 0.
    form generate_fcat_reftab  using    p_fieldname
                                        p_tabname
                                        p_ref_tabname
                                        p_ref_fieldname
                                        p_output_text
                                        p_output_lenght.
      clear w_fcat.
      w_fcat-fieldname = p_fieldname.
      w_fcat-tabname   = p_tabname.
      w_fcat-ref_fieldname = p_ref_fieldname.
      w_fcat-ref_tabname = p_ref_tabname.
      w_fcat-seltext_s = p_output_text.
      w_fcat-seltext_m = p_output_text.
      w_fcat-seltext_l = p_output_text.
      w_fcat-outputlen = p_output_lenght.
      w_fcat-ddictxt = 'L'. <<<<<<<<<<<<<<<<<<This
      append w_fcat to t_fcat.
    endform.

  • Export header of alv-oo into excel

    When I export an alv function into excel also exports the header but when I'm working with alv-oo doesn't export the header.
    How can I do to export into excel also the header of the alv-oo??
    Thanks a lot!!!

    Hi,
    I think Field catalog not set properly.
    Otherwise u can provide one pushbutton OR use same standard Button & in the coding part use 'WS_DOWNLOAD' function module.
    It will work. U can pass header data also in this & also provide path using F4_FILENAMEu2019 function module.
    salil

  • Addiing additional data in header of excel output  of alv excel dowload.

    Hi Experts,
    I want to set(print) some additional data in header(with table header) of excel output of alv standard functionality(Export to Microsoft Excel) in webdynpro abap.
    any suggesions...
    Reg,
    Rajesh.

    OLE is the solution but not very performance oriented. Search for details in SDN

  • Alv heading to display in excel

    Hi
    i have a problem ,
    i want 2 take print of body of alv with ALV header.
    while printing , only body is comin for print-out, not a header.
    guide me.
    points vil be rewarded

    write the header under the event top-fo-page and use listheader structure and also use FM ALV_commentary _write
    see following code for example
    http://sapprograms.blogspot.com/2008/04/alv-grid-display-report.html

  • How to send ALV Report in excel format from SAP

    Hi Gurus,
    We are using SAP 4.7 and using different SAP reports.Now I want to send SAP ALV report in excel format directly from SAP in background.Now we send these reports in background weekly by using autimetic scheduling but this is PDF format.Now I want to change this pdf format to excel format.In SCOT T.Code I am able to find any excel format.Please help me out.
    I am waiting for your reply.
    Advance Thanks
    Nirmal

    Hi Nirmal,
    I have done the same in my previous organisation.For this particular solution you need to ask your basis guys to upgrade the support package so that BCS classes could be available in the system.
    API interafces five some problem with attachemnts and SAP has recommended to use BCS classes.
    Currently BCS classes won't be availbale in 4.7.
    Once the BCS classes are available
    use below code
       CONSTANTS:
        lc_tab          TYPE c VALUE cl_bcs_convert=>gc_tab,
        lc_crlf         TYPE c VALUE cl_bcs_convert=>gc_crlf,
       lc_codepage     TYPE abap_encod VALUE '4103',
    data :
       lv_string      TYPE string,
       binary_content TYPE solix_tab,
       size           TYPE so_obj_len,
       *" Set Heading of Excel File
      CONCATENATE 'Employee DATA'
                   lc_crlf lc_crlf
                   INTO lv_string.
       *" Set Header for Excel Fields
      CONCATENATE lv_string
                  lc_header1 lc_tab
                  lc_header2 lc_tab
                  lc_header3 lc_tab
                  lc_header4 lc_tab
                  lc_header5 lc_tab
                  lc_header6 lc_tab
                  lc_header7 lc_tab
                  lc_header8 lc_tab
                  lc_header9 lc_tab
                  lc_header10 lc_crlf
                  INTO lv_string.
    "lc_header1 to 10 could be your field headers
       "Move Internal table data
      LOOP AT gt_final1 INTO gwa_final1.
        CONCATENATE lv_string
                    gwa_final1-field1     lc_tab
                    gwa_final1-field2      lc_tab
                    gwa_final1-field3    lc_crlf
                    INTO lv_string.
      ENDLOOP.
       *" convert the text string into UTF-16LE binary data including
    *" byte-order-mark. Mircosoft Excel prefers these settings
    *" all this is done by new class cl_bcs_convert (see note 1151257)
      TRY.
          cl_bcs_convert=>string_to_solix(
            EXPORTING
              iv_string   = lv_string
              iv_codepage = lc_codepage  "suitable for MS Excel, leave empty
              iv_add_bom  = abap_true     "for other doc types
            IMPORTING
              et_solix  = binary_content
              ev_size   = size ).
        CATCH cx_bcs.
          MESSAGE e445(so).
      ENDTRY.
      TRY.
    *" create persistent send request
          send_request = cl_bcs=>create_persistent( ).
          document = cl_document_bcs=>create_document(
            i_type    = lc_doc
            i_text    = main_text
            i_subject = lc_sub  ).     
          document->add_attachment(
            i_attachment_type    = lc_attach                    "#EC NOTEXT
            i_attachment_subject = lc_sub                       "#EC NOTEXT
            i_attachment_size    = size
            i_att_content_hex    = binary_content ).
       send_request->set_document( document ).
       recipient = cl_cam_address_bcs=>create_internet_address( email ).
       CALL METHOD send_request->add_recipient
              EXPORTING
                i_recipient = recipient.
       IF recipient IS NOT INITIAL.
            sent_to_all = send_request->send( i_with_error_screen = abap_true ).
            COMMIT WORK.
    *        MESSAGE text-014 TYPE gc_succ  .
          ENDIF.
        CATCH cx_bcs INTO bcs_exception.
          MESSAGE i865(so) WITH bcs_exception->error_type.
      ENDTRY.
    For BCS decalartion u can go to se 38 and see program BCS_EXAMPLE_1 to BCS_EXAMPLE_7.
    Rewrads if helpful.
    Cheers
    Ramesh Bhatt

  • Alv Grid to Excel Sheet Downloading problem for Bank account Number(CHAR18)

    Hi every one,
                 I am downloading  Alv grid to excel using local file---> spreadsheet
    but,  the bank account no is populating as like ''11+E213". When press F2 in that column then only its showing the correct value.
    If i do download directly from  ctrlshiftF7 , its down loading perfectly but my user Needs the Header of the ALV also, Buecause HEader Consists of Payment Date and all details.
    I have checked the same from the Satandard table also its also populating in the same way as in the report,
    So if any body have valueble suggestions, Please reply soon,
    Thanks & Regards,
    Raj S

    Hi Lalit,
             Thanks for Ur promt reply,
    I ahve alraedy Changed the lenght to 25 but it doesnot effect,
    But when i concatenate the same number with any one character in front of the A/C No. Its generating perfectly,
    But i cant do so as its an account No.
    Thanks,
    Raj S

  • ALV Output to Excel file

    Hi All,
    I am downloading the ALV output to Excel file.I am making use of  LIST--->EXPORT--->SPREADSHEET option.
    My list is having Header, Footer, sub totals and totals.When i transfer the list i am facing following problems
    1.Even i am getting the empty columns betweeen my output.
    2.In the Place of sub totals i am getting astericks
    3.On the top of the records downloaded,"DYNAMIC LIST DISPLAY" is found.I want to avoid this text on the top
    Thanks,
    Ravee...

    Hello Vinod,
    1.I am getting the empty columns betweeen my output.
    I am having 16 columns in the ALV output,but i got 19 columns in my excel file.
    2.In the Place of sub totals i am getting astericks.
    Generally there is no possibility to download the sub totals.i am using LIST->EXPORT->SPREADSHEET.
                     I am having the sub totals in my output.
    *You would have noticed the' * ' for sub total and ' ** ' for grand totals values.*These sub total & total values are not downloaded but these asterisks are carried to excel file.
    3.On the top of the records downloaded,"DYNAMIC LIST DISPLAY" is found.I want to avoid this text on the top.
    I am using the application tool bar icon only.Still i am getting the same.
    Thanks,
    Ravee...

  • ALV grid to excel (.XLS) format issue

    im trying to export an ALV grid to excel file using FM 'GUI_DOWNLOAD'.
    the output  is located at the link  below:
    http://img393.imageshack.us/my.php?image=excelproblemjt4.jpg
    some how the fields arent inside the individual boxes..
    can anyone provide me with the solution? thanks
    below are the codes of how i implement the 'GUI DOWNLOAD' FM
    CALL FUNCTION 'GUI_DOWNLOAD'
        EXPORTING
          filename   = lv_file        " C:\filename.xls
          write_field_separator = 'X'
        IMPORTING
          filelength = lv_size
        TABLES
          data_tab   = ltt_data

    REPORT  test0012                                                  .
    INCLUDE test_top.
    INCLUDE test_f01.
    INCLUDE test_alv.
          START OF SELECTION
    START-OF-SELECTION.
      PERFORM get_data.
      PERFORM process_data.
    END-OF-SELECTION.
      IF tt_output IS NOT INITIAL.
        PERFORM prepare_excel_data.
    Download CSV file to local
        IF c_loc = 'X'.
         PERFORM convert_to_xls.
          PERFORM download_local.
        ENDIF.
      ELSE.
    Show Message when no records selected
       MESSAGE I016 WITH TEXT-005.
      ENDIF.
      PERFORM f_alv_disp.
    *&  Include           test_TOP                                   *
    TABLES: vbrk, vbrp, vbak, vbap, kna1.
    DATA: total_value TYPE p DECIMALS 2 LENGTH 15.
    DATA: total TYPE c LENGTH 5 VALUE 'total'.
    TYPE-POOLS
    TYPE-POOLS: slis, truxs.
    -ALV----
    DATA:
      wa_alv_layout       TYPE slis_layout_alv,
      tt_alv_fieldcat     TYPE slis_t_fieldcat_alv WITH HEADER LINE,
    tt_alv_sort         TYPE slis_t_sortinfo_alv WITH HEADER LINE,
      tt_alv_events       TYPE slis_t_event WITH HEADER LINE,
      wa_sort             TYPE slis_sortinfo_alv,
      tt_sort             TYPE slis_t_sortinfo_alv,
      v_pagno             TYPE sy-pagno,
      s_keyinfo           TYPE slis_keyinfo_alv.
    TYPES
    TYPES: BEGIN OF vbrk,
            vbeln TYPE vbrk-vbeln,
            fkdat TYPE vbrk-fkdat,
            vkorg TYPE vbrk-vkorg,
            vtweg TYPE vbrk-vtweg,
            spart TYPE vbrk-spart,
            kunag TYPE vbrk-kunag,
           END OF vbrk,
           BEGIN OF vbrp,
            vbeln TYPE vbrp-vbeln,
            aubel TYPE vbrp-aubel,
            vgbel TYPE vbrp-vgbel,
            aupos TYPE vbrp-aupos,
           END OF vbrp,
           BEGIN OF vbak,
            vbeln TYPE vbak-vbeln,
            auart TYPE vbak-auart,
            bstnk TYPE vbak-bstnk,
           END OF vbak,
           BEGIN OF vbap,
            vbeln TYPE vbap-vbeln,
            posnr TYPE vbap-posnr,
            netwr TYPE vbap-netwr,
            mwsbp TYPE vbap-mwsbp,
           END OF vbap,
           BEGIN OF kna1,
            kunnr TYPE kna1-kunnr,
            name1 TYPE kna1-name1,
           END OF kna1,
           BEGIN OF output,
            fkdat TYPE vbrk-fkdat,
            vkorg TYPE vbrk-vkorg,
            vtweg TYPE vbrk-vtweg,
            spart TYPE vbrk-spart,
            kunag TYPE vbrk-kunag,
            name1 TYPE kna1-name1,
            auart TYPE vbak-auart,
            bstnk TYPE vbak-bstnk,
            aubel TYPE vbrp-aubel,
            vgbel TYPE vbrp-vgbel,
            total LIKE total_value,
           END OF output.
    Type for download to excel use.
    TYPES: BEGIN OF ty_excel,
             col1(20), sp01,
             col2(25), sp02,
             col3(23), sp03,
             col4(14), sp04,
             col5(15), sp05,
             col6(23), sp06,
             col7(13), sp07,
             col8(25), sp08,
             col9(20), sp09,
             col10(30), sp10,
             col11(13),
           END OF ty_excel.
    DATA: wa_vbrk TYPE vbrk,
          wa_vbrp TYPE vbrp,
          wa_vbak TYPE vbak,
          wa_vbap TYPE vbap,
          wa_kna1 TYPE kna1,
          wa_output TYPE output,
          tt_vbrk TYPE STANDARD TABLE OF vbrk,
          tt_vbrp TYPE STANDARD TABLE OF vbrp,
          tt_vbak TYPE STANDARD TABLE OF vbak,
          tt_vbap TYPE STANDARD TABLE OF vbap,
          tt_kna1 TYPE STANDARD TABLE OF kna1,
          tt_output TYPE STANDARD TABLE OF output.
    Table for download to excel use.
    DATA: tt_excel TYPE STANDARD TABLE OF ty_excel,
          wa_excel LIKE LINE OF tt_excel,
          tt_excel_output  TYPE truxs_t_text_data.
         wa_excel type ty_excel.
    Data Declaration for CSV file use
    CONSTANTS : c_comma TYPE c VALUE ','.
    Selection-Screen
    SELECTION-SCREEN BEGIN OF BLOCK b01 WITH FRAME TITLE text-b01.
    SELECT-OPTIONS:  s_fkdat FOR vbrk-fkdat OBLIGATORY.
    SELECTION-SCREEN END OF BLOCK b01.
    SELECTION-SCREEN BEGIN OF BLOCK b02 WITH FRAME TITLE text-b02.
    PARAMETERS:      p_vkorg TYPE vbrk-vkorg OBLIGATORY.
    SELECT-OPTIONS:  s_vtweg FOR vbrk-vtweg,
                     s_spart FOR vbrk-spart.
    SELECTION-SCREEN END OF BLOCK b02.
    SELECTION-SCREEN BEGIN OF BLOCK b03 WITH FRAME TITLE text-b03.
    SELECT-OPTIONS:  s_kunag FOR vbrk-kunag.
    SELECTION-SCREEN END OF BLOCK b03.
    SELECTION-SCREEN BEGIN OF BLOCK b04 WITH FRAME TITLE text-b04.
    PARAMETERS:      c_loc AS CHECKBOX,
                     p_file LIKE rlgrap-filename DEFAULT 'C:\filename.txt'.
    SELECTION-SCREEN END OF BLOCK b04.
    *&  Include           test_F01                                   *
    FORM get_data
    FORM get_data.
      DATA: lt_vbrk TYPE STANDARD TABLE OF vbrk,
            lt_vbrp TYPE STANDARD TABLE OF vbrp.
      SELECT vbeln fkdat vkorg vtweg spart kunag
      FROM vbrk
      INTO TABLE tt_vbrk
      WHERE fkdat IN s_fkdat
      AND   vkorg = p_vkorg
      AND   vtweg IN s_vtweg
      AND   spart IN s_spart
      AND   kunag IN s_kunag.
      lt_vbrk[] = tt_vbrk[].
      SORT lt_vbrk BY vbeln.
      IF lt_vbrk[] IS NOT INITIAL.
        SELECT vbeln aubel vgbel aupos
        FROM vbrp
        INTO TABLE tt_vbrp
        FOR ALL ENTRIES IN lt_vbrk
        WHERE vbeln = lt_vbrk-vbeln.
      ENDIF.
      lt_vbrp[] = tt_vbrp[].
      SORT lt_vbrp BY aubel.
      IF lt_vbrp[] IS NOT INITIAL.
        SELECT vbeln auart bstnk
        FROM vbak
        INTO TABLE tt_vbak
        FOR ALL ENTRIES IN lt_vbrp
        WHERE vbeln = lt_vbrp-aubel.
      ENDIF.
      lt_vbrp[] = tt_vbrp[].
      SORT lt_vbrp BY aubel aupos.
      IF lt_vbrp[] IS NOT INITIAL.
        SELECT vbeln posnr netwr mwsbp
        FROM vbap
        INTO TABLE tt_vbap
        FOR ALL ENTRIES IN lt_vbrp
        WHERE vbeln = lt_vbrp-aubel
        AND posnr = lt_vbrp-aupos.
      ENDIF.
      lt_vbrk[] = tt_vbrk[].
      SORT lt_vbrk BY kunag.
      IF lt_vbrk[] IS NOT INITIAL.
        SELECT kunnr name1
        FROM kna1
        INTO TABLE tt_kna1
        FOR ALL ENTRIES IN lt_vbrk
        WHERE kunnr = lt_vbrk-kunag.
      ENDIF.
    ENDFORM.                    "get_data
    *&      Form  process_data
    FORM process_data.
      LOOP AT tt_vbrk INTO wa_vbrk.
        wa_output-fkdat = wa_vbrk-fkdat.
        wa_output-vkorg = wa_vbrk-vkorg.
        wa_output-vtweg = wa_vbrk-vtweg.
        wa_output-spart = wa_vbrk-spart.
        wa_output-kunag = wa_vbrk-kunag.
    read table tt_vbrp into wa_vbrp with key vbeln = wa_vbrk-vbeln.
    if sy-subrc = 0.
       wa_output-aubel = wa_vbrp-aubel.
       wa_output-vgbel = wa_vbrp-vgbel.
    endif.
        READ TABLE tt_kna1 INTO wa_kna1 WITH KEY kunnr = wa_vbrk-kunag BINARY SEARCH.
        IF sy-subrc = 0.
          wa_output-name1 = wa_kna1-name1.
        ENDIF.
        LOOP AT tt_vbrp INTO wa_vbrp WHERE vbeln = wa_vbrk-vbeln.
          wa_output-aubel = wa_vbrp-aubel.
          wa_output-vgbel = wa_vbrp-vgbel.
          READ TABLE tt_vbak INTO wa_vbak WITH KEY vbeln = wa_vbrp-aubel BINARY SEARCH.
          IF sy-subrc = 0.
            wa_output-auart = wa_vbak-auart.
            wa_output-bstnk = wa_vbak-bstnk.
          ENDIF.
          READ TABLE tt_vbap INTO wa_vbap  WITH KEY vbeln = wa_vbrp-aubel
                                                    posnr = wa_vbrp-aupos BINARY SEARCH.
          wa_output-total = wa_vbap-netwr + wa_vbap-mwsbp.
          APPEND wa_output TO tt_output.
        ENDLOOP. "endloop tt_vbrp
      wa_output-total = wa_vbap-netwr + wa_vbap-mwsbp.
    append wa_output to tt_output.
        CLEAR wa_output.
      ENDLOOP.  "endloop vbrk
    ENDFORM.                    "process_data
    *&      Form  APPEND_EXCEL
    FORM append_excel .
      wa_excel-sp01 = wa_excel-sp02 = wa_excel-sp03 =
      wa_excel-sp04 = wa_excel-sp05 = wa_excel-sp06 =
      wa_excel-sp07 = wa_excel-sp08 = wa_excel-sp09 =
      wa_excel-sp10.
      APPEND wa_excel TO tt_excel. CLEAR wa_excel.
    ENDFORM.                    " APPEND_EXCEL
    *&      Form  PREPARE_EXCEL_DATA
    FORM prepare_excel_data .
    List's Header for excel file
      WRITE  'Billing Date'                TO wa_excel-col1.
      WRITE  'Sales Organization'          TO wa_excel-col2.
      WRITE  'Distribution Channel'        TO wa_excel-col3.
      WRITE  'Division'                    TO wa_excel-col4.
      WRITE  'Sold-to Party'               TO wa_excel-col5.
      WRITE  'Name of Sold-to Party'       TO wa_excel-col6.
      WRITE  'Order Type'                  TO wa_excel-col7.
      WRITE  'Customer PO Number'          TO wa_excel-col8.
      WRITE  'Sales Order Number'          TO wa_excel-col9.
      WRITE  'Delivery Order Number'       TO wa_excel-col10.
      WRITE  'Total Value'                 TO wa_excel-col11.
      PERFORM append_excel.
    Item data for excel file.
      LOOP AT tt_output INTO wa_output.
        WRITE  wa_output-fkdat  TO wa_excel-col1.
        WRITE  wa_output-vkorg  TO wa_excel-col2.
        WRITE  wa_output-vtweg  TO wa_excel-col3.
        WRITE  wa_output-spart  TO wa_excel-col4.
        WRITE  wa_output-kunag  TO wa_excel-col5.
        WRITE  wa_output-name1  TO wa_excel-col6.
        WRITE  wa_output-auart  TO wa_excel-col7.
        WRITE  wa_output-bstnk  TO wa_excel-col8.
        WRITE  wa_output-aubel  TO wa_excel-col9.
        WRITE  wa_output-vgbel  TO wa_excel-col10.
        WRITE  wa_output-total TO wa_excel-col11.
        PERFORM append_excel.
      ENDLOOP.
    List's Header for excel file
    CONCATENATE '"' 'Billing Date'           '"'     INTO WA_EXCEL-COL1.
    CONCATENATE '"' 'Sales Organization'     '"'     INTO WA_EXCEL-COL2.
    CONCATENATE '"' 'Distribution Channel'   '"'     INTO WA_EXCEL-COL3.
    CONCATENATE '"' 'Division'               '"'     INTO WA_EXCEL-COL4.
    CONCATENATE '"' 'Sold-to Party'          '"'     INTO WA_EXCEL-COL5.
    CONCATENATE '"' 'Name of Sold-to Party'  '"'     INTO WA_EXCEL-COL6.
    CONCATENATE '"' 'Order Type'             '"'      INTO WA_EXCEL-COL7.
    CONCATENATE '"' 'Customer PO Number'     '"'     INTO WA_EXCEL-COL8.
    CONCATENATE '"' 'Sales Order Number'     '"'     INTO WA_EXCEL-COL9.
    CONCATENATE '"' 'Delivery Order Number'  '"'     INTO WA_EXCEL-COL10.
    CONCATENATE '"' 'Total Value'            '"'     INTO WA_EXCEL-COL11.
    PERFORM APPEND_EXCEL.
    Item data for excel file.
    LOOP AT TT_output INTO WA_output.
       CONCATENATE '"' WA_OUTPUT-FKDAT '"' INTO WA_EXCEL-COL1.
       CONCATENATE '"' WA_OUTPUT-VKORG '"' INTO WA_EXCEL-COL2.
       CONCATENATE '"' WA_OUTPUT-VTWEG '"' INTO WA_EXCEL-COL3.
       CONCATENATE '"' WA_OUTPUT-SPART '"' INTO WA_EXCEL-COL4.
       CONCATENATE '"' WA_OUTPUT-KUNAG '"' INTO WA_EXCEL-COL5.
       CONCATENATE '"' WA_OUTPUT-NAME1 '"' INTO WA_EXCEL-COL6.
       CONCATENATE '"' WA_OUTPUT-AUART '"' INTO WA_EXCEL-COL7.
       CONCATENATE '"' WA_OUTPUT-BSTNK '"' INTO WA_EXCEL-COL8.
       CONCATENATE '"' WA_OUTPUT-AUBEL '"' INTO WA_EXCEL-COL9.
       CONCATENATE '"' WA_OUTPUT-VGBEL '"' INTO WA_EXCEL-COL10.
       CONCATENATE '"' total '"' INTO WA_EXCEL-COL11.
       PERFORM APPEND_EXCEL.
    ENDLOOP.
    ENDFORM.                    " PREPARE_EXCEL_DATA
    *&      Form  Convert_to_xls
    *form Convert_to_xls.
    LOOP AT TT_EXCEL INTO WA_EXCEL.
       MOVE WA_EXCEL TO LTT_DATA-TEXT.
       APPEND LTT_DATA. CLEAR LTT_DATA.
    ENDLOOP.
    LV_FILE = P_FILE.
    CALL FUNCTION 'SAP_CONVERT_TO_XLS_FORMAT'
    EXPORTING
       I_FIELD_SEPERATOR          = ';'
      I_LINE_HEADER              =
       i_filename                 = lv_file
      I_APPL_KEEP                = ' '
    tables
       i_tab_sap_data             = LTT_DATA
    CHANGING
      I_TAB_CONVERTED_DATA       = tt_excel_output
    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.
    *endform.
    *&      Form  DOWNLOAD_LOCAL
    FORM download_local .
      TYPES:
          BEGIN OF lty_data,
            text(800),
          END OF lty_data.
      DATA:
        lv_file  TYPE string,
        lv_size  TYPE i,
        lv_msg   TYPE bapi_msg,
        ltt_data TYPE STANDARD TABLE OF lty_data WITH HEADER LINE.
      LOOP AT tt_excel INTO wa_excel.
        MOVE wa_excel TO ltt_data-text.
        APPEND ltt_data. CLEAR ltt_data.
      ENDLOOP.
      lv_file = p_file.
    CONCATENATE LV_FILE 'file.csv' INTO LV_FILE.
      CALL FUNCTION 'GUI_DOWNLOAD'
        EXPORTING
          filename   = lv_file
          write_field_separator = 'X'
          FILETYPE   = 'ASC'
        IMPORTING
          filelength = lv_size
        TABLES
          data_tab   = ltt_data
        EXCEPTIONS
          OTHERS     = 1.
      IF sy-subrc EQ 0.
        "File &1 downloaded successfully - &2 bytes transferred
        MESSAGE e419(3e) WITH lv_file lv_size INTO lv_msg.      "#EC *
      ELSE.
        MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
                WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4 INTO lv_msg.
      ENDIF.
    WRITE LV_MSG.
    ENDFORM.                    " DOWNLOAD_LOCAL
    *ENDIF.
    *&  Include          test_ALV                                   *
    FORM build_layout .
    wa_alv_layout-zebra           = 'X'.
      wa_alv_layout-colwidth_optimize = 'X'.
      wa_alv_layout-window_titlebar = sy-title.
    ENDFORM.                    " build_layout
    *&      Form  f_build_event
          text
    -->  p1        text
    <--  p2        text
    FORM f_build_event .
      REFRESH tt_alv_events.
      tt_alv_events-name = slis_ev_top_of_page.
      tt_alv_events-form = slis_ev_top_of_page.
      APPEND tt_alv_events.
      CLEAR tt_alv_events.
      tt_alv_events-name = slis_ev_top_of_list.
      tt_alv_events-form = slis_ev_top_of_list.
      APPEND tt_alv_events.
      CLEAR tt_alv_events.
    ENDFORM.                    " f_build_event
    *&      Form  f_alv_disp
          text
    -->  p1        text
    <--  p2        text
    FORM f_alv_disp.
      DATA lv_repid TYPE sy-repid.
      REFRESH: tt_alv_fieldcat, tt_alv_events.
      PERFORM build_layout.
      PERFORM f_build_event.
      lv_repid = sy-repid.
      PERFORM f_build_fieldcat_summary.
      CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
        EXPORTING
          i_callback_program = lv_repid
          is_layout          = wa_alv_layout
          it_fieldcat        = tt_alv_fieldcat[]
          I_GRID_TITLE       = 'Billing Due List Report'
         it_sort           = tt_sort
           i_save          = 'A'
         it_events          = tt_alv_events[]
        TABLES
          t_outtab           = tt_output
        EXCEPTIONS
          program_error      = 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.
    ENDFORM.                    " f_alv_disp
    *&      Form  f_build_fieldcat_SUMMARY
          text
    -->  p1        text
    <--  p2        text
    FORM f_build_fieldcat_summary .
    do_sum    no_out    outputlen
      PERFORM f_fieldcat USING:
      'tt_output'  'FKDAT'      text-c01    ' '       ' '       '10' ,
      'tt_output'  'VKORG'      text-c02    ' '       ' '       '10',
      'tt_output'  'VTWEG'      text-c03    ' '       ' '       '10' ,
      'tt_output'  'SPART'      text-c04    ' '       ' '       '10'  ,
      'tt_output'  'KUNAG'      text-c05    ' '       ' '       '10' ,
      'tt_output'  'NAME1'      text-c06    ' '       ' '       '10' ,
      'tt_output'  'AUART'      text-c07    ' '       ' '       '10' ,
      'tt_output'  'BSTNK'      text-c08    ' '       ' '       '10'  ,
      'tt_output'  'AUBEL'      text-c09    ' '       ' '       '10' ,
      'tt_output'  'VGBEL'      text-c10    ' '       ' '       '10' ,
      'tt_output'  'TOTAL'      text-c11    ' '       ' '       '15' .
    ENDFORM.                    "
    *&      Form  f_fieldcat
    FORM f_fieldcat  USING pv_a TYPE any
                           pv_b TYPE any
                           pv_c TYPE any
                           pv_d TYPE any
                           pv_e TYPE any
                           pv_f TYPE any.
      tt_alv_fieldcat-tabname      = pv_a.
      tt_alv_fieldcat-fieldname    = pv_b.
      tt_alv_fieldcat-reptext_ddic = pv_c.
      tt_alv_fieldcat-do_sum       = pv_d.
      tt_alv_fieldcat-no_out       = pv_e.
      tt_alv_fieldcat-outputlen    = pv_f.
      APPEND tt_alv_fieldcat.
      CLEAR tt_alv_fieldcat.
    ENDFORM.                    " f_fieldcat

  • Down loading an ALV report in EXCEl

    my ALV report contains 76 columns, if i try to download it in an excel sheel its not getting displayed in correct format.
    Few columns are automatically displayed in the second row and also all my values are getting collapsed due to this display.
    In the print preview also i am getting the same problem.
    Is there any column limit in ALV display or i can make it to get display correctly as it is in the exact output.

    Hi,
    here is an example of downloading an alv report in excel...
    Download a report to excel with format (border, color cell, etc) 
    Try this program...it may help you to change the font ..etc.
    Code:
    REPORT ZSIRI NO STANDARD PAGE HEADING.
    this report demonstrates how to send some ABAP data to an
    EXCEL sheet using OLE automation.
    INCLUDE OLE2INCL.
    handles for OLE objects
    DATA: H_EXCEL TYPE OLE2_OBJECT,        " Excel object
          H_MAPL TYPE OLE2_OBJECT,         " list of workbooks
          H_MAP TYPE OLE2_OBJECT,          " workbook
          H_ZL TYPE OLE2_OBJECT,           " cell
          H_F TYPE OLE2_OBJECT.            " font
    TABLES: SPFLI.
    DATA  H TYPE I.
    table of flights
    DATA: IT_SPFLI LIKE SPFLI OCCURS 10 WITH HEADER LINE.
    *&   Event START-OF-SELECTION
    START-OF-SELECTION.
    read flights
      SELECT * FROM SPFLI INTO TABLE IT_SPFLI UP TO 10 ROWS.
    display header
      ULINE (61).
      WRITE: /     SY-VLINE NO-GAP,
              (3)  'Flg'(001) COLOR COL_HEADING NO-GAP, SY-VLINE NO-GAP,
              (4)  'Nr'(002) COLOR COL_HEADING NO-GAP, SY-VLINE NO-GAP,
              (20) 'Von'(003) COLOR COL_HEADING NO-GAP, SY-VLINE NO-GAP,
              (20) 'Nach'(004) COLOR COL_HEADING NO-GAP, SY-VLINE NO-GAP,
              (8)  'Zeit'(005) COLOR COL_HEADING NO-GAP, SY-VLINE NO-GAP.
      ULINE /(61).
    display flights
      LOOP AT IT_SPFLI.
      WRITE: / SY-VLINE NO-GAP,
               IT_SPFLI-CARRID COLOR COL_KEY NO-GAP, SY-VLINE NO-GAP,
               IT_SPFLI-CONNID COLOR COL_NORMAL NO-GAP, SY-VLINE NO-GAP,
               IT_SPFLI-CITYFROM COLOR COL_NORMAL NO-GAP, SY-VLINE NO-GAP,
               IT_SPFLI-CITYTO COLOR COL_NORMAL NO-GAP, SY-VLINE NO-GAP,
               IT_SPFLI-DEPTIME COLOR COL_NORMAL NO-GAP, SY-VLINE NO-GAP.
      ENDLOOP.
      ULINE /(61).
    tell user what is going on
      CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR'
         EXPORTING
              PERCENTAGE = 0
               TEXT       = TEXT-007
           EXCEPTIONS
                OTHERS     = 1.
    start Excel
      CREATE OBJECT H_EXCEL 'EXCEL.APPLICATION'.
    PERFORM ERR_HDL.
      SET PROPERTY OF H_EXCEL  'Visible' = 1.
    CALL METHOD OF H_EXCEL 'FILESAVEAS' EXPORTING #1 = 'c:\kis_excel.xls'
    PERFORM ERR_HDL.
    tell user what is going on
      CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR'
         EXPORTING
              PERCENTAGE = 0
               TEXT       = TEXT-008
           EXCEPTIONS
                OTHERS     = 1.
    get list of workbooks, initially empty
      CALL METHOD OF H_EXCEL 'Workbooks' = H_MAPL.
      PERFORM ERR_HDL.
    add a new workbook
      CALL METHOD OF H_MAPL 'Add' = H_MAP.
      PERFORM ERR_HDL.
    tell user what is going on
      CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR'
         EXPORTING
              PERCENTAGE = 0
               TEXT       = TEXT-009
           EXCEPTIONS
                OTHERS     = 1.
    output column headings to active Excel sheet
      PERFORM FILL_CELL USING 1 1 1 'Flug'(001).
      PERFORM FILL_CELL USING 1 2 0 'Nr'(002).
      PERFORM FILL_CELL USING 1 3 1 'Von'(003).
      PERFORM FILL_CELL USING 1 4 1 'Nach'(004).
      PERFORM FILL_CELL USING 1 5 1 'Zeit'(005).
      LOOP AT IT_SPFLI.
    copy flights to active EXCEL sheet
        H = SY-TABIX + 1.
        PERFORM FILL_CELL USING H 1 0 IT_SPFLI-CARRID.
        PERFORM FILL_CELL USING H 2 0 IT_SPFLI-CONNID.
        PERFORM FILL_CELL USING H 3 0 IT_SPFLI-CITYFROM.
        PERFORM FILL_CELL USING H 4 0 IT_SPFLI-CITYTO.
        PERFORM FILL_CELL USING H 5 0 IT_SPFLI-DEPTIME.
      ENDLOOP.
    changes by Kishore  - start
    CALL METHOD OF H_EXCEL 'Workbooks' = H_MAPL.
      CALL METHOD OF H_EXCEL 'Worksheets' = H_MAPL." EXPORTING #1 = 2.
      PERFORM ERR_HDL.
    add a new workbook
      CALL METHOD OF H_MAPL 'Add' = H_MAP  EXPORTING #1 = 2.
      PERFORM ERR_HDL.
    tell user what is going on
      SET PROPERTY OF H_MAP 'NAME' = 'COPY'.
      CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR'
         EXPORTING
              PERCENTAGE = 0
               TEXT       = TEXT-009
           EXCEPTIONS
                OTHERS     = 1.
    output column headings to active Excel sheet
      PERFORM FILL_CELL USING 1 1 1 'Flug'(001).
      PERFORM FILL_CELL USING 1 2 0 'Nr'(002).
      PERFORM FILL_CELL USING 1 3 1 'Von'(003).
      PERFORM FILL_CELL USING 1 4 1 'Nach'(004).
      PERFORM FILL_CELL USING 1 5 1 'Zeit'(005).
      LOOP AT IT_SPFLI.
    copy flights to active EXCEL sheet
        H = SY-TABIX + 1.
        PERFORM FILL_CELL USING H 1 0 IT_SPFLI-CARRID.
        PERFORM FILL_CELL USING H 2 0 IT_SPFLI-CONNID.
        PERFORM FILL_CELL USING H 3 0 IT_SPFLI-CITYFROM.
        PERFORM FILL_CELL USING H 4 0 IT_SPFLI-CITYTO.
        PERFORM FILL_CELL USING H 5 0 IT_SPFLI-DEPTIME.
      ENDLOOP.
    changes by Kishore  - end
    disconnect from Excel
         CALL METHOD OF H_EXCEL 'FILESAVEAS' EXPORTING  #1 = 'C:\SKV.XLS'.
      FREE OBJECT H_EXCEL.
      PERFORM ERR_HDL.
          FORM FILL_CELL                                                *
          sets cell at coordinates i,j to value val boldtype bold       *
    FORM FILL_CELL USING I J BOLD VAL.
      CALL METHOD OF H_EXCEL 'Cells' = H_ZL EXPORTING #1 = I #2 = J.
      PERFORM ERR_HDL.
      SET PROPERTY OF H_ZL 'Value' = VAL .
      PERFORM ERR_HDL.
      GET PROPERTY OF H_ZL 'Font' = H_F.
      PERFORM ERR_HDL.
      SET PROPERTY OF H_F 'Bold' = BOLD .
      PERFORM ERR_HDL.
    ENDFORM.
    *&      Form  ERR_HDL
          outputs OLE error if any                                       *
    -->  p1        text
    <--  p2        text
    FORM ERR_HDL.
    IF SY-SUBRC <> 0.
      WRITE: / 'Fehler bei OLE-Automation:'(010), SY-SUBRC.
      STOP.
    ENDIF.
    ENDFORM.                    " ERR_HDL

  • Alv report to excel

    How can i convert an alv report to excel using abap code?

    Thank you very much, but how can i convert the alv list into internal table?
    I am using this code but dont work
    REPORT Z_SAMPLE.
    TYPES tipoLinea(1024) TYPE c.
    DATA: begin of TablaLinea occurs 0,
          linea type tipoLinea,
    END OF TablaLinea.
    DATA lista LIKE abaplist OCCURS 0 WITH HEADER LINE.
    CALL FUNCTION 'LIST_FREE_MEMORY'
    TABLES
    listobject = lista.
    SUBMIT  rhrhaz00
           AND RETURN
           EXPORTING LIST TO MEMORY.
    CALL FUNCTION 'LIST_FROM_MEMORY'
    TABLES
    listobject = lista
    EXCEPTIONS
    OTHERS = 1.
    WRITE: / 'C:', SY-SUBRC.
    perform save_ascii_list.
    LOOP AT TablaLinea.
       WRITE: / TablaLinea-linea.
    ENDLOOP.
    WRITE: / 'C:', SY-SUBRC.
    * FUNCTION: save_ascii_list
    form save_ascii_list.
    CALL FUNCTION 'LIST_TO_ASCI'
    EXPORTING
    LIST_INDEX = -1
    TABLES listasci = TablaLinea
    listobject = lista
    EXCEPTIONS empty_list = 1
    list_index_invalid = 2
    OTHERS = 3.
    IF sy-subrc <> 0. ENDIF.
    endform.
    Another question, this code is showing the alv list in the screen and i dont want to appear, just convert directly into internal table. How to do that?

  • How to convert ALV report to Excel ??

    Hi,
    My requirement is to show ALV report in the excel .
    I have 2 radio buttons in Selection screen :
    1)  ALV  format                           2) Excel.
    If excel is selected then user will give a path : C :\newexcelreport.xls
    I knew that there is a way to download report through ALV report using download into local file. But the requirement is to create a report in Excel same like ALV report .
    I tried using GUI_Download . But it is displaying some fields wrongly, ex : Date , Time, without header .
    Date is showing year month date format in the excel .
    time is showing in a numeric format.
    But the ALV report is showing correct report . When I download into local then the report is showing correct results .
    Is there any function module to download exact ALV report into excel .??
    Thanks & Regards,
    Varma

    Use the FM - ALV_XXL_CALL. here is the sample -
    REPORT  ZSKC_ALV_XXL.
    TYPE-POOLS : KKBLO.
    DATA : ITAB LIKE T100 OCCURS 0,
           T_FCAT_LVC TYPE LVC_S_FCAT OCCURS 0 WITH HEADER LINE,
           T_FCAT_KKB TYPE KKBLO_T_FIELDCAT.
    START-OF-SELECTION.
    Get data.
      SELECT * UP TO 20 ROWS
      FROM   T100
      INTO   TABLE ITAB
      WHERE  SPRSL = SY-LANGU.
      CHECK SY-SUBRC EQ 0.
    Create the field catalog.
      CALL FUNCTION 'LVC_FIELDCATALOG_MERGE'
       EXPORTING
          I_STRUCTURE_NAME             = 'T100'
        CHANGING
          CT_FIELDCAT                  = T_FCAT_LVC[]
        EXCEPTIONS
          INCONSISTENT_INTERFACE       = 1
          PROGRAM_ERROR                = 2
          OTHERS                       = 3.
      CHECK SY-SUBRC EQ 0.
    make sure you pass the correct internal table name in the field catalog.
      t_fcat_lvC-tabname = 'ITAB'.
      MODIFY T_FCAT_LVC TRANSPORTING TABNAME WHERE TABNAME NE SPACE.
    Transfer to KKBLO format.
      CALL FUNCTION 'LVC_TRANSFER_TO_KKBLO'
        EXPORTING
          IT_FIELDCAT_LVC                 = T_FCAT_LVC[]
        IMPORTING
          ET_FIELDCAT_KKBLO               = T_FCAT_KKB
       EXCEPTIONS
         IT_DATA_MISSING                 = 1
         IT_FIELDCAT_LVC_MISSING         = 2
         OTHERS                          = 3.
      CHECK SY-SUBRC EQ 0.
    Call XXL.
      CALL FUNCTION 'ALV_XXL_CALL'
        EXPORTING
          I_TABNAME                    = 'ITAB'
          IT_FIELDCAT                  = T_FCAT_KKB
        TABLES
          IT_OUTTAB                    = ITAB[]
        EXCEPTIONS
          FATAL_ERROR                  = 1
          NO_DISPLAY_POSSIBLE          = 2
          OTHERS                       = 3.
      IF SY-SUBRC <> 0.
      ENDIF.

  • How to convert alv list into excel file?

    Hi Experts,
            i have created one report for Due Date Analysis.
    Now My output is displaying in ALV list. But I need to convert the data which in alv list into Excel File. then only i have to send the Excel File to the Customer Thro Email.
         So i need the Function Module to Convert the Data into Excel File.
    Thanks,
    Neptune.M

    Hi,
      U can use function module gui_download.
      CALL FUNCTION 'GUI_DOWNLOAD'
         EXPORTING
        BIN_FILESIZE       =
          filename           = 'C:\Transportaionlane.XLS'
          filetype                       = 'DAT'
        WRITE_FIELD_SEPARATOR           = ' '
        HEADER                          = '00'
        TABLES
          ata_tab                       = t_trans_lane_dis[]
           OTHERS                          = 22
    if u want with header then pass the header.
    regards
    Ahasan

  • ALV Export to Excel problem

    Hi All
    I have a problem with exporting a ALV Grid to Excel. If I add the quantity field to my Grid output the excel spreadsheet does not bring through the quantity field and it puts all the other columns one place out. I tried changing field attributes from QUAN to CHAR field and it made no difference.
    I am using the standard sap functionality:
    List > Save > Local File > Spreadsheet
    It works fine as long as I do not include my quantity column? I have tried many other custom FM's with no luck because all of them require you to put in a internal table inside the function but I do not want to send whole internal table to spreadsheet only the ones selected in the ALV Grid. So please do not suggest function modules as I have had no luck with these!
    I need to know how to use the standard sap alv export to excel function with my quantity field? The only issue I can think of that would cause a error would be that I have 50+ columns on the grid and internal table. Even If I put quantity field by itself in the grid then export to excel it brings through the Qty header but no data.

    Hi Atish
    Quantity is below: (RMNGE)
    Data type is QUAN, Length 10, Decimal places 0.
    DATA: BEGIN OF I_DATA OCCURS 0.
             INCLUDE STRUCTURE ZWRNTHDR.
    DATA:   POSNR LIKE ZWRNTITM-POSNR,      "Sales Document Item
             MATNR LIKE ZWRNTITM-MATNR,      "Material Number
             CLRFL LIKE ZWRNTITM-CLRFL,      "Claim Reference Line ID
             PCBPN LIKE ZWRNTITM-PCBPN,      "PCB Part Number
             PCBPX LIKE MAKT-MAKTX,          "PCB Part Number Description
             RMNGE LIKE ZWRNTITM-RMNGE,      "Quantity
             MEINS LIKE ZWRNTITM-MEINS,      "Base Unit of Measure
             WRNTC LIKE ZWRNTITM-WRNTC,      "Warranty Claimed
             WRNTG(3) TYPE C,                "Warranty Given
             FLTCD LIKE ZWRNTITM-FLTCD,      "Fault Code
             MFATE LIKE ZWRNTITM-MFATE,      "Module Fate
             CMNTS LIKE ZWRNTITM-CMNTS,      "Comments
             SRIAL LIKE ZWRNTITM-SRIAL,      "Serial Number
             PFREX LIKE ZWRNTITM-PFREX,      "PFR External
             PFINT LIKE ZWRNTITM-PFINT,      "PFR Internal
             RLCRQ LIKE ZWRNTITM-RLCRQ,      "Replacement Requested
             TCHID LIKE ZWRNTITM-TCHID,      "Technician ID
             PMATN LIKE ZWRNTITM-PMATN,      "Parent Material
             PMATX LIKE MAKT-MAKTX,          "Parent Material Description
             MDLNO LIKE ZWRNTITM-MDLNO,      "Module Number
             MDLNT LIKE MAKT-MAKTX,          "Module Description
             CLVFX LIKE ZWRNTITM-CLVFX,      "Claim Value FX
             CRVFX LIKE ZWRNTITM-CRVFX,      "Credit Value FX
             CRVLC LIKE ZWRNTITM-CRVLC,      "Credit Value Local
             XRATE LIKE ZWRNTITM-XRATE,      "FX Rate
             NAME1 LIKE KNA1-NAME1,          "Customer Name
             MAKTX LIKE MAKT-MAKTX,          "Material Description
             CTYPT LIKE DD07T-DDTEXT,        "Customer Type Text
             BUNTT LIKE DD07T-DDTEXT,        "Business Unit Text
             FRCRT LIKE DD07T-DDTEXT,        "Freight Carrier Text
             FLTCT LIKE ZFLTCODES-FDESC,     "Fault Code Text
             ISRES LIKE ZWRNTITM-ISRES,      "Issue Resolved
             DCODE LIKE ZWRNTITM-DCODE,      "Date Code
             ISTAT LIKE ZWRNTITM-ISTAT,      "Ignore Stats
             LABCL LIKE ZWRNTITM-LABCL,      "Labour Claimed
             MATCL LIKE ZWRNTITM-MATCL,      "Material Claimed
           END OF I_DATA.
    Field Catalog:
    FORM          BUILD_ALV_COLUMNS
    Build Main Page ALV Fieldcat
    FORM BUILD_ALV_COLUMNS.
       CLEAR FIELDCAT_LN.
       ADD 1 TO COL_POS.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTHDR'.
       FIELDCAT_LN-FIELDNAME = 'KUNNR'.
       FIELDCAT_LN-COL_POS = COL_POS.
       FIELDCAT_LN-KEY = 'X'.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 2 TO COL_POS.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTHDR'.
       FIELDCAT_LN-FIELDNAME = 'CLMID'.
       FIELDCAT_LN-KEY = 'X'.
       FIELDCAT_LN-COL_POS = COL_POS.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 3 TO COL_POS.
       FIELDCAT_LN-SELTEXT_L = 'Claim Type'.
       FIELDCAT_LN-FIELDNAME = 'CTYPT'.
       FIELDCAT_LN-COL_POS = COL_POS.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 4 TO COL_POS.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTHDR'.
       FIELDCAT_LN-FIELDNAME = 'CLREF'.
       FIELDCAT_LN-COL_POS = COL_POS.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 5 TO COL_POS.
       FIELDCAT_LN-SELTEXT_L = 'Business Unit'.
       FIELDCAT_LN-FIELDNAME = 'BUNTT'.
       FIELDCAT_LN-COL_POS = COL_POS.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 6 TO COL_POS.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTHDR'.
       FIELDCAT_LN-FIELDNAME = 'CURCY'.
       FIELDCAT_LN-COL_POS = COL_POS.
       FIELDCAT_LN-EMPHASIZE = 'C500'.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 7 TO COL_POS.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTHDR'.
       FIELDCAT_LN-FIELDNAME = 'CHKID'.
       FIELDCAT_LN-COL_POS = COL_POS.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 8 TO COL_POS.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTHDR'.
       FIELDCAT_LN-FIELDNAME = 'RECVD'.
       FIELDCAT_LN-COL_POS = COL_POS.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 9 TO COL_POS.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTHDR'.
       FIELDCAT_LN-FIELDNAME = 'APVDT'.
       FIELDCAT_LN-COL_POS = COL_POS.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 10 TO COL_POS.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTHDR'.
       FIELDCAT_LN-FIELDNAME = 'CRDRF'.
       FIELDCAT_LN-COL_POS = COL_POS.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 11 TO COL_POS.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTHDR'.
       FIELDCAT_LN-FIELDNAME = 'RORDR'.
       FIELDCAT_LN-COL_POS = COL_POS.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 12 TO COL_POS.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTHDR'.
       FIELDCAT_LN-FIELDNAME = 'RORDD'.
       FIELDCAT_LN-COL_POS = COL_POS.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 13 TO COL_POS.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTHDR'.
       FIELDCAT_LN-FIELDNAME = 'ARVDT'.
       FIELDCAT_LN-COL_POS = COL_POS.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 14 TO COL_POS.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTHDR'.
       FIELDCAT_LN-FIELDNAME = 'TSTDT'.
       FIELDCAT_LN-COL_POS = COL_POS.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 15 TO COL_POS.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTHDR'.
       FIELDCAT_LN-FIELDNAME = 'TEDDT'.
       FIELDCAT_LN-COL_POS = COL_POS.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 16 TO COL_POS.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTHDR'.
       FIELDCAT_LN-FIELDNAME = 'FSTDT'.
       FIELDCAT_LN-COL_POS = COL_POS.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 17 TO COL_POS.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTHDR'.
       FIELDCAT_LN-FIELDNAME = 'FEDDT'.
       FIELDCAT_LN-COL_POS = COL_POS.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 19 TO COL_POS.
       FIELDCAT_LN-SELTEXT_L = 'Freight Carrier'.
       FIELDCAT_LN-FIELDNAME = 'FRCRT'.
       FIELDCAT_LN-COL_POS = COL_POS.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 20 TO COL_POS.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTHDR'.
       FIELDCAT_LN-FIELDNAME = 'FRTRF'.
       FIELDCAT_LN-COL_POS = COL_POS.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 21 TO COL_POS.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTHDR'.
       FIELDCAT_LN-FIELDNAME = 'FRINV'.
       FIELDCAT_LN-COL_POS = COL_POS.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 22 TO COL_POS.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTHDR'.
       FIELDCAT_LN-FIELDNAME = 'UNAMECR'.
       FIELDCAT_LN-COL_POS = COL_POS.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 23 TO COL_POS.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTHDR'.
       FIELDCAT_LN-FIELDNAME = 'DATUMCR'.
       FIELDCAT_LN-COL_POS = COL_POS.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 24 TO COL_POS.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTHDR'.
       FIELDCAT_LN-FIELDNAME = 'UNAMECH'.
       FIELDCAT_LN-COL_POS = COL_POS.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 25 TO COL_POS.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTHDR'.
       FIELDCAT_LN-FIELDNAME = 'DATUMCH'.
       FIELDCAT_LN-COL_POS = COL_POS.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 26 TO COL_POS.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTHDR'.
       FIELDCAT_LN-FIELDNAME = 'UNAMEDE'.
       FIELDCAT_LN-COL_POS = COL_POS.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 27 TO COL_POS.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTHDR'.
       FIELDCAT_LN-FIELDNAME = 'DATUMDE'.
       FIELDCAT_LN-COL_POS = COL_POS.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 28 TO COL_POS.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTITM'.
       FIELDCAT_LN-FIELDNAME = 'POSNR'.
       FIELDCAT_LN-COL_POS = COL_POS.
       FIELDCAT_LN-KEY = 'X'.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 29 TO COL_POS.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTITM'.
       FIELDCAT_LN-FIELDNAME = 'MATNR'.
       FIELDCAT_LN-COL_POS = COL_POS.
       FIELDCAT_LN-EMPHASIZE = 'C700'.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 30 TO COL_POS.
       FIELDCAT_LN-TABNAME   = 'ZWRNTITM'.
       FIELDCAT_LN-FIELDNAME = 'RMNGE'.
       FIELDCAT_LN-SELTEXT_L = 'Qty'.
       FIELDCAT_LN-COL_POS = COL_POS.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 31 TO COL_POS.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTITM'.
       FIELDCAT_LN-FIELDNAME = 'CLRFL'.
       FIELDCAT_LN-COL_POS = COL_POS.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 32 TO COL_POS.
       FIELDCAT_LN-SELTEXT_L = 'PCB Part No'.
       FIELDCAT_LN-FIELDNAME = 'PCBPN'.
       FIELDCAT_LN-COL_POS = COL_POS.
       FIELDCAT_LN-EMPHASIZE = 'C700'.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 33 TO COL_POS.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTITM'.
       FIELDCAT_LN-FIELDNAME = 'MEINS'.
       FIELDCAT_LN-COL_POS = COL_POS.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 34 TO COL_POS.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTITM'.
       FIELDCAT_LN-FIELDNAME = 'WRNTC'.
       FIELDCAT_LN-DO_SUM = SPACE.
       FIELDCAT_LN-COL_POS = COL_POS.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 35 TO COL_POS.
       FIELDCAT_LN-SELTEXT_L = 'Warranty Given'.
       FIELDCAT_LN-FIELDNAME = 'WRNTG'.
       FIELDCAT_LN-COL_POS = COL_POS.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 36 TO COL_POS.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTITM'.
       FIELDCAT_LN-FIELDNAME = 'FLTCD'.
       FIELDCAT_LN-COL_POS = COL_POS.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 37 TO COL_POS.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTITM'.
       FIELDCAT_LN-FIELDNAME = 'MFATE'.
       FIELDCAT_LN-COL_POS = COL_POS.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 38 TO COL_POS.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTITM'.
       FIELDCAT_LN-FIELDNAME = 'CMNTS'.
       FIELDCAT_LN-COL_POS = COL_POS.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 39 TO COL_POS.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTITM'.
       FIELDCAT_LN-FIELDNAME = 'SRIAL'.
       FIELDCAT_LN-COL_POS = COL_POS.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 40 TO COL_POS.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTITM'.
       FIELDCAT_LN-FIELDNAME = 'PFREX'.
       FIELDCAT_LN-COL_POS = COL_POS.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 41 TO COL_POS.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTITM'.
       FIELDCAT_LN-FIELDNAME = 'PFINT'.
       FIELDCAT_LN-COL_POS = COL_POS.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 42 TO COL_POS.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTITM'.
       FIELDCAT_LN-FIELDNAME = 'RLCRQ'.
       FIELDCAT_LN-COL_POS = COL_POS.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 43 TO COL_POS.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTITM'.
       FIELDCAT_LN-FIELDNAME = 'TCHID'.
       FIELDCAT_LN-COL_POS = COL_POS.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 44 TO COL_POS.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTITM'.
       FIELDCAT_LN-FIELDNAME = 'PMATN'.
       FIELDCAT_LN-COL_POS = COL_POS.
       FIELDCAT_LN-EMPHASIZE = 'C700'.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 45 TO COL_POS.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTITM'.
       FIELDCAT_LN-FIELDNAME = 'MDLNO'.
       FIELDCAT_LN-COL_POS = COL_POS.
       FIELDCAT_LN-EMPHASIZE = 'C700'.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 46 TO COL_POS.
       FIELDCAT_LN-SELTEXT_L = 'Customer Name'.
       FIELDCAT_LN-FIELDNAME = 'NAME1'.
       FIELDCAT_LN-COL_POS = COL_POS.
       FIELDCAT_LN-KEY = 'X'.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 47 TO COL_POS.
       FIELDCAT_LN-REF_TABNAME = 'MAKT'.
       FIELDCAT_LN-FIELDNAME = 'MAKTX'.
       FIELDCAT_LN-COL_POS = COL_POS.
       FIELDCAT_LN-EMPHASIZE = 'C700'.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 48 TO COL_POS.
       FIELDCAT_LN-SELTEXT_L = 'Parent Matl Description'.
       FIELDCAT_LN-FIELDNAME = 'PMATX'.
       FIELDCAT_LN-COL_POS = COL_POS.
       FIELDCAT_LN-EMPHASIZE = 'C700'.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 49 TO COL_POS.
       FIELDCAT_LN-SELTEXT_L = 'PCB Matl Description'.
       FIELDCAT_LN-FIELDNAME = 'PCBPX'.
       FIELDCAT_LN-COL_POS = COL_POS.
       FIELDCAT_LN-EMPHASIZE = 'C700'.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 50 TO COL_POS.
       FIELDCAT_LN-SELTEXT_L = 'Fault Code Description'.
       FIELDCAT_LN-FIELDNAME = 'FLTCT'.
       FIELDCAT_LN-COL_POS = COL_POS.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 51 TO COL_POS.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTITM'.
       FIELDCAT_LN-FIELDNAME = 'CLVFX'.
       FIELDCAT_LN-COL_POS = COL_POS.
       FIELDCAT_LN-EMPHASIZE = 'C500'.
       FIELDCAT_LN-NO_ZERO = 'X'.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 52 TO COL_POS.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTITM'.
       FIELDCAT_LN-FIELDNAME = 'CRVFX'.
       FIELDCAT_LN-COL_POS = COL_POS.
       FIELDCAT_LN-NO_ZERO = 'X'.
       FIELDCAT_LN-EMPHASIZE = 'C500'.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 53 TO COL_POS.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTITM'.
       FIELDCAT_LN-FIELDNAME = 'XRATE'.
       FIELDCAT_LN-COL_POS = COL_POS.
       FIELDCAT_LN-NO_ZERO = 'X'.
       FIELDCAT_LN-EMPHASIZE = 'C500'.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 54 TO COL_POS.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTITM'.
       FIELDCAT_LN-FIELDNAME = 'CRVLC'.
       FIELDCAT_LN-COL_POS = COL_POS.
       FIELDCAT_LN-NO_ZERO = 'X'.
       FIELDCAT_LN-EMPHASIZE = 'C500'.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 55 TO COL_POS.
       FIELDCAT_LN-SELTEXT_L = 'Module Description'.
       FIELDCAT_LN-FIELDNAME = 'MDLNT'.
       FIELDCAT_LN-COL_POS = COL_POS.
       FIELDCAT_LN-EMPHASIZE = 'C700'.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 56 TO COL_POS.
       FIELDCAT_LN-SELTEXT_L = 'Iss Resvld'.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTITM'.
       FIELDCAT_LN-FIELDNAME = 'ISRES'.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 57 TO COL_POS.
       FIELDCAT_LN-SELTEXT_L = 'Date Code'.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTITM'.
       FIELDCAT_LN-FIELDNAME = 'DCODE'.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 58 TO COL_POS.
       FIELDCAT_LN-SELTEXT_L = 'Ignore Stats'.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTITM'.
       FIELDCAT_LN-FIELDNAME = 'ISTAT'.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 59 TO COL_POS.
       FIELDCAT_LN-SELTEXT_L = 'Labr Claimed'.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTITM'.
       FIELDCAT_LN-FIELDNAME = 'LABCL'.
       APPEND FIELDCAT_LN TO FIELDCAT.
       CLEAR FIELDCAT_LN.
       ADD 60 TO COL_POS.
       FIELDCAT_LN-SELTEXT_L = 'Matl Claimed'.
       FIELDCAT_LN-REF_TABNAME = 'ZWRNTITM'.
       FIELDCAT_LN-FIELDNAME = 'MATCL'.
       APPEND FIELDCAT_LN TO FIELDCAT.
    ENDFORM.                    " BUILD_ALV_COLUMNS

Maybe you are looking for

  • Need help in creating prompt for Month To Date Report.

    <span class="postbody"><font size="2">Hi All <br />I need to create a Month To Date Report using month(Start date & End date) as prompts, By default it has to run on the previous month data or if user selects his own range of dates then it has to bri

  • DYNAMIC PL/SQL BLOCK

    Hello, My requirement is to create procedures on the fly and call the created procedures. The pl/sql code for the procedures are stored in the tables. I was able to create the procedure on the fly. But it ended being an invalid object. I got this err

  • PE9 - occasional black screen instead of video clip

    Hi, I have Adobe Premiere Elements 9.0.1 and windows XP SP3. In general, I don't have any problems with the software. However, occasionally, the video clip that I have imported in timeline become black (with sound OK). The rest of the clips are OK. S

  • BSP URL  in Variable

    Hi, How can i get bsp application URL in a variable. Is there is any function module? Please let us know as early as possible.

  • OS Level Execution

    Hi ALL, Here is my recept project activity. I have written a stored procedure, which populates few tables, and as there exists a already written unix shell script (which creates a text / flat file these tables), and want to run this, unix shell scrip