ALV's HEAD

................DATE...................
..DAY..
....MONTH...
..YEAR..
....02...
.......12........
...2003...
....23...
.......03........
...2000...
Can do it with alv grid (2 heads)?
Thanks

check the following program : REPORT ERGP2140 LINE-SIZE 90 NO STANDARD PAGE HEADING.
* Report ERGP2140: Einzeilige Liste mit hierarchischen Überschriften   *
* Entspricht: ERGO2140, 2145                                           *
*                  mit/ohne Streifenmuster (Standard),                 *
* Programmversion; angelegt: 1.2.1995, Gerd Waloszek                   *
* Letzte Änderung: 25.2.98, Gerd Waloszek                              *
************************* Global data **********************************
DATA: LENGTH TYPE I VALUE 8.           " Length of list
data: tp like textpool occurs 0 with header line.
DATA: TXT_REPORT LIKE DOKHL-OBJECT.   "Reportname für Erläuterungsaufruf
DATA: BEGIN OF MYLIST OCCURS 10,       " Internal table for preparing
        E3AA(12) TYPE P DECIMALS 2,    " the list
        E3AB(12) TYPE P DECIMALS 2,
        E3BA(12) TYPE P DECIMALS 2,
        E3BB(12) TYPE P DECIMALS 2,
      END OF MYLIST.
DATA: STRIPES TYPE C VALUE ' '.        " Stripes Y/N
DATA: SEED1 TYPE I,                    " Rand number seed 1
      SEED2 TYPE I,                    " Rand number seed 2
      SEED3 TYPE I,                    " Rand number seed 3
      WIDTH TYPE I.                    " Width of list
*************************** Main Program *******************************
START-OF-SELECTION.
  SET PF-STATUS 'LIBS1'.
  READ TEXTPOOL SY-REPID INTO TP LANGUAGE SY-LANGU.
  LOOP AT TP WHERE ID = 'R'.
    SET TITLEBAR '001' WITH TP-entry.
    EXIT.
  ENDLOOP.
* Start seed for random number generator
  SEED1 = 123.  SEED2 = 2345. SEED3 = 23.
  PERFORM FILL_ITAB.            " Fill internal table with pseudo-data
* List output
  WIDTH = 69.                          " Width of list
  PERFORM MAIN.
*************************** Form Routines ******************************
*       FORM MAIN                                                     *
*       List output                                                   *
FORM MAIN.
  PERFORM HEADING.                     " Heading
  PERFORM BODY.                        " First body
  PERFORM FINISH(ERGPHELP) USING WIDTH.
  PERFORM LEGEND(ERGPHELP)
                 USING 'X' STRIPES ' ' ' ' ' ' ' ' ' ' ' '.
ENDFORM.
*       FORM FILL_ITAB                                                *
*       Fills the internal table for the list output                  *
FORM FILL_ITAB.
  DATA: RAN TYPE F,
        RANI TYPE I,
        RANP TYPE P DECIMALS 2.
  DO LENGTH TIMES.
    PERFORM RANDOM(ERGPHELP) USING SEED1 SEED2 SEED3 RAN.
    RANI = 1000000 * RAN.  RANP = RANI.
    MOVE RANP TO MYLIST-E3AA.
    PERFORM RANDOM(ERGPHELP) USING SEED1 SEED2 SEED3 RAN.
    RANI = 1000000 * RAN.  RANP = RANI.
    MOVE RANP TO MYLIST-E3AB.
    PERFORM RANDOM(ERGPHELP) USING SEED1 SEED2 SEED3 RAN.
    RANI = 1000000 * RAN.  RANP = RANI.
    MOVE RANP TO MYLIST-E3BA.
    PERFORM RANDOM(ERGPHELP) USING SEED1 SEED2 SEED3 RAN.
    RANI = 1000000 * RAN.  RANP = RANI.
    MOVE RANP TO MYLIST-E3BB.
    APPEND MYLIST.
  ENDDO.
ENDFORM.
*       FORM HEADING                                                  *
*       Writes the heading of the list                                *
*       This list has hierarchical headings                           *
FORM HEADING.
DATA: WIDTH2 TYPE I.
  WIDTH2 = WIDTH - 2.                  " Width without borders
  FORMAT INTENSIFIED OFF.              " Remove any INTENSIFIED
  ULINE AT (WIDTH).                    " Upper frame border
  FORMAT COLOR COL_HEADING INTENSIFIED." Title color
  WRITE: / SY-VLINE NO-GAP.            " Left border
  WRITE: AT (WIDTH2) TEXT-U10 CENTERED NO-GAP.
  WRITE: AT WIDTH SY-VLINE.            " Right border
  ULINE AT (WIDTH).
  FORMAT COLOR COL_HEADING INTENSIFIED OFF. " Secondary title color
  WRITE: / SY-VLINE NO-GAP.            " Left border
  WRITE: (33) TEXT-V10 CENTERED NO-GAP.
  WRITE: SY-VLINE NO-GAP  .            " Middle border
  WRITE: (33) TEXT-V20 CENTERED NO-GAP.
  WRITE: AT WIDTH SY-VLINE.            " Right border
  ULINE AT (WIDTH).                    " Line below titles
  FORMAT COLOR COL_HEADING INTENSIFIED OFF. " Third title color
  WRITE: / SY-VLINE NO-GAP.            " Left border
  WRITE: (15) TEXT-W10 RIGHT-JUSTIFIED.
  WRITE: SY-VLINE NO-GAP  .            " Middle border
  WRITE: (15) TEXT-W20 RIGHT-JUSTIFIED.
  WRITE: SY-VLINE NO-GAP  .            " Middle border
  WRITE: (15) TEXT-W30 RIGHT-JUSTIFIED.
  WRITE: SY-VLINE NO-GAP  .            " Middle border
  WRITE: (15) TEXT-W40 RIGHT-JUSTIFIED.
  WRITE: AT WIDTH SY-VLINE.            " Right border
  ULINE AT (WIDTH).                    " Line below titles
ENDFORM.
*       FORM BODY                                                     *
*       Writes the body of the list                                   *
* Important:                                                          *
* Use SY-VLINE or '|' for vertival lines                              *
* Use NO-GAP for avoiding free space behind fields                    *
* Use FORMAT COLOR COL_NORMAL INTENSIFIED OFF for light list body     *
* Use COLOR behind fields for individualized coloring                 *
* Caution: the actual field values are pure dummies!                  *
* Stripes in the list body                                            *
* If You want a striped list body, You have to set up a counter.      *
* If the counter starts with zero You have to set the body color to:  *
* even counter values: COL_NORMAL INTENSIFIED
* odd counter values: COL_NORMAL INTENSIFIED OFF
FORM BODY.
  DATA: COUNT TYPE I VALUE 0,          " Loop counter for list body
        EVEN TYPE I VALUE 0.           " Checker even/odd
*       max type i value 8,            " Number of rows in list
*       helpn type p.
  LOOP AT MYLIST.
* Stripe handling
    IF STRIPES EQ ' '.                 " No Stripes
      FORMAT COLOR COL_NORMAL INTENSIFIED OFF.
    ELSE.                              " Stripes
      EVEN = COUNT MOD 2.              " Check for even/odd
      IF EVEN = '0'.
        FORMAT COLOR COL_NORMAL INTENSIFIED.
      ELSE.
        FORMAT COLOR COL_NORMAL INTENSIFIED OFF.
      ENDIF.
    ENDIF.
* List row
    WRITE: / SY-VLINE NO-GAP.
    WRITE: (16) MYLIST-E3AA NO-GAP, SY-VLINE NO-GAP.
    WRITE: (16) MYLIST-E3AB NO-GAP, SY-VLINE NO-GAP.
    WRITE: (16) MYLIST-E3BA NO-GAP, SY-VLINE NO-GAP.
    WRITE: (16) MYLIST-E3BB NO-GAP.
    WRITE: AT WIDTH SY-VLINE.
    ADD 1 TO COUNT.
  ENDLOOP.
ENDFORM.
*************************** Events *************************************
AT USER-COMMAND.
  CASE SY-UCOMM.
    WHEN 'ERLE'.
      TXT_REPORT = 'ERGP2140'.
      CALL FUNCTION 'ERGO_TEXT_SHOW'
           EXPORTING
                TEXTNAME       = TXT_REPORT
                ID             = 'RE'
                LANGU          = SY-LANGU
           EXCEPTIONS
                TEXT_NOT_FOUND = 01.
    WHEN 'STRI'.
      SY-LSIND = 0.
      IF STRIPES EQ 'X'.
        STRIPES = ' '.
      ELSE.
        STRIPES = 'X'.
      ENDIF.
      PERFORM MAIN.
  ENDCASE.

Similar Messages

  • Traffic lights in ALV list header

    how do i display traffic lights as icons in ALV list header. for example, in the code below, i want to display a green icon at the end of closed items and a red icon at the end of the open items:
                closed : 4 [green-icon]
                open   : 2  [red-icon]
    CLEAR header_alv_wa-info.
      header_alv_wa-key  = 'closed:'.
      header_alv_wa-info = gv_closed.
      header_alv_wa-typ  = 'S'.
      APPEND header_alv_wa TO headeralv.
      CLEAR header_alv_wa-info.
      header_alv_wa-typ  = 'S'.
      header_alv_wa-key  = 'open:'.
      header_alv_wa-info = gv_open.
      APPEND header_alv_wa TO headeralv.

    Hi,
    http://www.sapfans.com/forums/viewtopic.php?t=79424
    http://www.sapfans.com/forums/viewtopic.php?t=24512
    the above links will give u the code for the same..
    Regards,
    Aparna

  • Writing selections in  alv list header

    Hi,
    in alv list header i have to show the values entered in selection screen.
    ex.
    Current year    : 2008
    current period  : 03
    report ID          : R_123
    company code : I BT  AA to BB
                            I BT  CC to DD
                            I EQ  FF
    in the above example first three are parameters and  company code is select-option, for parameters i can display what i want, but for company code( which is select option) it is showing only first line and not showing other lines.
    at the time of filling list header table for select-option, i am looping the select-option, first i am filling with  typ, key and info and for other i am filling only info, if i fill typ, key also for other recoreds also it is showing the  company code in all lines  as below ....
    company code  : I BT  AA to BB
    company code : I BT  CC to DD
    company code : I EQ  FF
    can any one suggest to get the list header as shown at the begining....
    thanks,
    bhushan

    Hi,
    Check this sample code. Here plant and date are selection screen paramters.
    Plant
      lwa_header-typ  = 'S'.
      lwa_header-key  = text-t47.
    If the select option for plant is 'EQ'
      LOOP AT s_werks.                                       "#EC *
        IF s_werks-option = 'EQ'.
          lwa_plant-werks = s_werks-low.
          APPEND lwa_plant TO lt_plant.
          CLEAR lwa_plant.
    If the select option for plant is 'BT'
        ELSEIF s_werks-option = 'BT'.
          CONCATENATE s_werks-low
                      text-t50
                      s_werks-high
            INTO lf_plant.
          lwa_header-info = lf_plant.
          APPEND lwa_header TO gt_header.
          CLEAR lwa_header.
        ENDIF.
      ENDLOOP.
      IF s_werks-option = 'EQ'.
        READ TABLE lt_plant INTO lwa_plant INDEX 1.
        lwa_header-info = lwa_plant-werks.
        APPEND lwa_header TO gt_header.
        CLEAR lwa_header.
        LOOP AT lt_plant INTO lwa_plant FROM 2.
          lwa_header-typ   = 'S'.
          lwa_header-key   = ''.
          lwa_header-info  =  lwa_plant-werks.
          APPEND lwa_header TO gt_header.
          CLEAR: lwa_header.
        ENDLOOP.
      ENDIF.
    Post date Range
      lwa_header-typ   = 'S'.
      lwa_header-key   = text-t33.
    If the select option for post date is 'EQ'
      LOOP AT s_budat.                                      "#EC *
        IF s_budat-option = 'EQ'.
          CONCATENATE s_budat-low+6(2) '.'
                      s_budat-low+4(2) '.'
                      s_budat-low(4) INTO lf_range.
        For multiple values
          IF lf_date_tmp IS INITIAL.
            lwa_date-date = lf_range.
            APPEND lwa_date TO lt_date.
          ELSE.
            lwa_date-date = lf_range.
            APPEND lwa_date TO lt_date.
          ENDIF.
      If the select option for post date is 'BT'
        ELSEIF s_budat-option = 'BT'.
          CONCATENATE s_budat-low+6(2) '.'
                      s_budat-low+4(2) '.'
                      s_budat-low(4) text-t49
                      s_budat-high+6(2) '.'
                      s_budat-high+4(2) '.'
                      s_budat-high(4) INTO lf_range .
          lwa_header-info  =  lf_range.
          CLEAR lf_range.
        ENDIF.
      ENDLOOP.
      IF s_budat-option = 'EQ'.
        READ TABLE lt_date INTO lwa_date INDEX 1.
        lwa_header-info  =  lwa_date-date.
        APPEND lwa_header TO gt_header.
        CLEAR: lwa_header.
        LOOP AT lt_date INTO lwa_date FROM 2.
          lwa_header-typ   = 'S'.
          lwa_header-key   = ''.
          lwa_header-info  =  lwa_date-date.
          APPEND lwa_header TO gt_header.
          CLEAR: lwa_header.
        ENDLOOP.
      ENDIF.
    Appending work area to the header table
      APPEND lwa_header TO gt_header.
      CLEAR lwa_header.
      CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
        EXPORTING
          it_list_commentary = gt_header.
    <REMOVED BY MODERATOR>
    Regards,
    Ramya
    Edited by: Alvaro Tejada Galindo on Apr 8, 2008 4:30 PM

  • Alv list header problem

    Hai Friends,
    In my ALV List header..i am writing date , time and my program name.
    but all are coming on left side.
    can i get date on left side, program name on centered and time on write side.
    my code is like this.
    FORM list_headers.
          lists-typ = 'H'.
          lists-info = text-010.
          APPEND lists.
          CLEAR lists.
          lists-typ = 'S'.
          lists-key = text-011.
          CONCATENATE sy-datum+6(2) '/'
                      sy-datum+4(2) '/'
                      sy-datum+0(4) INTO lists-info.
          APPEND lists.
          CLEAR lists.
          lists-typ = 'S'.
          lists-key = text-012.
          CONCATENATE sy-uzeit+0(2) ':'
                      sy-uzeit+2(2) ':'
                      sy-uzeit+4(2) INTO lists-info.
          APPEND lists.
          CLEAR lists.
    ENDFORM.

    Hi again,
    1. first of all how are u writing / displaying
       the alv header ?
    2. using documentary write ?
       then also, u can use one variable of
      length 100 and use this concept.
    3. If u are using top_of_page
      event,
      in this event, WE CAN use WRITE.
      (i have used it, and it
      works fantastic)
                  (not in case of alv grid)
    4. My point is, what ever u are using,
       use on variable of length 100.
      WRITE value INTO variable.
      using offset
      and then proceed further.
    regards,
    amit m.

  • Refresh ALV HTML header

    Is it possible to refresh the ALV HTML header?
    ex: When I click in a button of the ALV Toolbar, I want the html header to refresh...
    Thanks.
    Alexandre

    Hi
    An internal table can be converted into an HTML Template using the function Module WWW_HTML_FROM_LISTOBJECT. This will create an HTML template which will be stored in SMW0->(Zero)
    Now you can call this template in your header.
    Regards,
    Vara

  • Subdivide a ALV column header

    Hi experts ,
    I have an requirment to divide a ALV column header.
    I want to add a header row grouping the column headers.
            Departure                                               Arrival        <-- This row is what I want to add
    Airport    Gate    Date                         Airport    Gate    Date
    Thanks,
    Regards ,
    Swashrayee
    Edited by: SWASHRAYEE77928 on Feb 1, 2012 7:30 AM
    Moderator Message: UserID sent for deletion, for ignoring multiple Moderator warnings.
    Edited by: kishan P on Feb 1, 2012 12:05 PM

    Hello,
    Take a look on this code:
      DATA:
        lv_title              TYPE        string,
        lt_columns            TYPE        salv_wd_t_column_ref,
        lr_column_settings    TYPE REF TO if_salv_wd_column_settings,
        lr_salv_wd_table      TYPE REF TO iwci_salv_wd_table,
        lr_table              TYPE REF TO cl_salv_wd_config_table,
      FIELD-SYMBOLS:
        <fs_column> LIKE LINE OF lt_columns,
      lr_salv_wd_table = wd_this->wd_cpifc_cmp_alv( ).
      lr_table         = lr_salv_wd_table->get_model( ).
      lr_column_settings ?= lr_table.
      lt_columns = lr_column_settings->get_columns( ).
      LOOP AT lt_columns ASSIGNING <fs_column>.
        lr_col_header = <fs_column>-r_column->get_header( ).
        lr_col_header->set_ddic_binding_element( space ).
        lr_col_header->set_ddic_binding_field( if_salv_wd_c_column_settings=>ddic_bind_none ).
          lv_title = cl_wd_utilities=>get_otr_text_by_alias( alias = 'HISTORIC' ).
          lr_col_header->set_text( lv_title ).
          CLEAR lv_title.
    I suggest you to put this code in some method called over the method WDDOMODIFYVIEW.
    Regards.

  • Split ALV Column heading into two

    Hello All,
    I have a ALV Column Header - ALV LIST - SAP 46C.
    Material   |  Info Type |  Quantity |  Price etc..
    Due to space contraints and other reason client needs to split the Info type column into two.
    Material   |  Info  |  Quantity |  Price etc..
               | Type   |
    The data records should not have any additional blank lines.
    How to achieve this?
    Thanks,

    You have to assign X to layout property no_colhead.
    Then write your heading using write statements.
    Here is the exact example you are looking for [Create Multiple Lines Header In ALV List Report|http://www.freesaptutorial.com/create-multiple-lines-header-in-alv-list-report/]

  • ALV Grid Header Problem.

    Hi All,
    I want to display the header of the ALV Grid as:
    Material                          111/11823
    Plant/Usage/Alt               2845/3/5
    Description                      ABI CAB
    Base Qty.                        23.000
    The values are to be taken from variables
    Please suggest how to do this.
    Thanks

    *& Report  ZDEMO_ALVGRID                                               *
    *& Example of a simple ALV Grid Report with grand total                *
    *& The basic requirement for this demo is to display a number of       *
    *& fields from the EKKO table.                                         *
    REPORT  zdemo_alvgrid                 .
    TABLES:     ekko.
    type-pools: slis.                                 "ALV Declarations
    *Data Declaration
    TYPES: BEGIN OF t_ekko,
      ebeln TYPE ekpo-ebeln,
      ebelp TYPE ekpo-ebelp,
      statu TYPE ekpo-statu,
      aedat TYPE ekpo-aedat,
      matnr TYPE ekpo-matnr,
      menge TYPE ekpo-menge,
      meins TYPE ekpo-meins,
      netpr TYPE ekpo-netpr,
      peinh TYPE ekpo-peinh,
    END OF t_ekko.
    DATA: it_ekko TYPE STANDARD TABLE OF t_ekko INITIAL SIZE 0,
          wa_ekko TYPE t_ekko.
    *ALV data declarations
    data: fieldcatalog type slis_t_fieldcat_alv with header line,
          gd_tab_group type slis_t_sp_group_alv,
          gd_layout    type slis_layout_alv,
          gd_repid     like sy-repid.
    *Start-of-selection.
    START-OF-SELECTION.
    perform data_retrieval.
    perform build_fieldcatalog.
    perform build_layout.
    perform display_alv_report.
    perform top-of-page.
    *&      Form  BUILD_FIELDCATALOG
          Build Fieldcatalog for ALV Report
    form build_fieldcatalog.
    There are a number of ways to create a fieldcat.
    For the purpose of this example i will build the fieldcatalog manualy
    by populating the internal table fields individually and then
    appending the rows. This method can be the most time consuming but can
    also allow you  more control of the final product.
    Beware though, you need to ensure that all fields required are
    populated. When using some of functionality available via ALV, such as
    total. You may need to provide more information than if you were
    simply displaying the result
                  I.e. Field type may be required in-order for
                       the 'TOTAL' function to work.
      fieldcatalog-fieldname   = 'EBELN'.
      fieldcatalog-seltext_m   = 'Purchase Order'.
      fieldcatalog-col_pos     = 0.
      fieldcatalog-outputlen   = 10.
      fieldcatalog-emphasize   = 'X'.
      fieldcatalog-key         = 'X'.
    fieldcatalog-do_sum      = 'X'.
    fieldcatalog-no_zero     = 'X'.
      append fieldcatalog to fieldcatalog.
      clear  fieldcatalog.
      fieldcatalog-fieldname   = 'EBELP'.
      fieldcatalog-seltext_m   = 'PO Item'.
      fieldcatalog-col_pos     = 1.
      append fieldcatalog to fieldcatalog.
      clear  fieldcatalog.
      fieldcatalog-fieldname   = 'STATU'.
      fieldcatalog-seltext_m   = 'Status'.
      fieldcatalog-col_pos     = 2.
      append fieldcatalog to fieldcatalog.
      clear  fieldcatalog.
      fieldcatalog-fieldname   = 'AEDAT'.
      fieldcatalog-seltext_m   = 'Item change date'.
      fieldcatalog-col_pos     = 3.
      append fieldcatalog to fieldcatalog.
      clear  fieldcatalog.
      fieldcatalog-fieldname   = 'MATNR'.
      fieldcatalog-seltext_m   = 'Material Number'.
      fieldcatalog-col_pos     = 4.
      append fieldcatalog to fieldcatalog.
      clear  fieldcatalog.
      fieldcatalog-fieldname   = 'MENGE'.
      fieldcatalog-seltext_m   = 'PO quantity'.
      fieldcatalog-col_pos     = 5.
      append fieldcatalog to fieldcatalog.
      clear  fieldcatalog.
      fieldcatalog-fieldname   = 'MEINS'.
      fieldcatalog-seltext_m   = 'Order Unit'.
      fieldcatalog-col_pos     = 6.
      append fieldcatalog to fieldcatalog.
      clear  fieldcatalog.
      fieldcatalog-fieldname   = 'NETPR'.
      fieldcatalog-seltext_m   = 'Net Price'.
      fieldcatalog-col_pos     = 7.
      fieldcatalog-outputlen   = 15.
      fieldcatalog-do_sum      = 'X'.        "Display column total
      fieldcatalog-datatype     = 'CURR'.
      append fieldcatalog to fieldcatalog.
      clear  fieldcatalog.
      fieldcatalog-fieldname   = 'PEINH'.
      fieldcatalog-seltext_m   = 'Price Unit'.
      fieldcatalog-col_pos     = 8.
      append fieldcatalog to fieldcatalog.
      clear  fieldcatalog.
    endform.                    " BUILD_FIELDCATALOG
    *&      Form  BUILD_LAYOUT
          Build layout for ALV grid report
    form build_layout.
      gd_layout-no_input          = 'X'.
      gd_layout-colwidth_optimize = 'X'.
      gd_layout-totals_text       = 'Totals'(201).
    gd_layout-totals_only        = 'X'.
    gd_layout-f2code            = 'DISP'.  "Sets fcode for when double
                                            "click(press f2)
    gd_layout-zebra             = 'X'.
    gd_layout-group_change_edit = 'X'.
    gd_layout-header_text       = 'helllllo'.
    endform.                    " BUILD_LAYOUT
    *&      Form  DISPLAY_ALV_REPORT
          Display report using ALV grid
    form display_alv_report.
      gd_repid = sy-repid.
      call function 'REUSE_ALV_GRID_DISPLAY'
           exporting
                i_callback_program      = gd_repid
                i_callback_top_of_page   = 'TOP-OF-PAGE'  "see FORM
               i_callback_user_command = 'USER_COMMAND'
               i_grid_title           = outtext
                is_layout               = gd_layout
                it_fieldcat             = fieldcatalog[]
               it_special_groups       = gd_tabgroup
               IT_EVENTS                = GT_XEVENTS
                i_save                  = 'X'
               is_variant              = z_template
           tables
                t_outtab                = it_ekko
           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.                    " DISPLAY_ALV_REPORT
    *&      Form  DATA_RETRIEVAL
          Retrieve data form EKPO table and populate itab it_ekko
    form data_retrieval.
    select ebeln ebelp statu aedat matnr menge meins netpr peinh
    up to 10 rows
      from ekpo
      into table it_ekko.
    endform.                    " DATA_RETRIEVAL
    Form  TOP-OF-PAGE                                                 *
    ALV Report Header                                                 *
    Form top-of-page.
    *ALV Header declarations
    data: t_header type slis_t_listheader,
          wa_header type slis_listheader,
          t_line like wa_header-info,
          ld_lines type i,
          ld_linesc(10) type c.
    Title
      wa_header-typ  = 'H'.
      wa_header-info = 'EKKO Table Report'.
      append wa_header to t_header.
      clear wa_header.
    Date
      wa_header-typ  = 'S'.
      wa_header-key = 'Date: '.
      CONCATENATE  sy-datum+6(2) '.'
                   sy-datum+4(2) '.'
                   sy-datum(4) INTO wa_header-info.   "todays date
      append wa_header to t_header.
      clear: wa_header.
    Total No. of Records Selected
      describe table it_ekko lines ld_lines.
      ld_linesc = ld_lines.
      concatenate 'Total No. of Records Selected: ' ld_linesc
                        into t_line separated by space.
      wa_header-typ  = 'A'.
      wa_header-info = t_line.
      append wa_header to t_header.
      clear: wa_header, t_line.
      call function 'REUSE_ALV_COMMENTARY_WRITE'
           exporting
                it_list_commentary = t_header.
               i_logo             = 'ideas'.
    endform.

  • Page No in ALV GRID Header disply ?

    Hi,
    How to display the page No in ALV GRID Header display.
    Thanks & Regards,
    Amir.

    hai
    I think u can use this funtion... Using this funtion u can find som solution for ur problem
    *&      Form  BUILD_EVENTTAB
          text
         -->P_EVENTS[]  text                                             *
    form build_eventtab using p_events type slis_t_event.
      data: ls_event type slis_alv_event.
      call function 'REUSE_ALV_EVENTS_GET'
           exporting
                i_list_type = 0
           importing
                et_events   = p_events.
      read table p_events with key name = slis_ev_top_of_page
                               into ls_event.
      if sy-subrc = 0.
        move formname_top_of_page to ls_event-form.
        append ls_event to p_events.
      endif.
    endform.                               " BUILD_EVENTTAB
    *&      Form  BUILD_COMMENT
          text
         -->P_HEADING[]  text                                            *
    form build_comment using p_heading type slis_t_listheader.
      data: hline type slis_listheader,
            text(60) type c,
            test_date TYPE string,
           test_date1 TYPE string,
           sep(20) type c.
      clear: hline, text.
      hline-typ  = 'H'.
      write: text-101 to text+23.
      hline-info = text.
      append hline to p_heading.
      clear text.
      write: 'User: ' to text,
             sy-uname to text+6,
             'Date: ' to text+25,
             sy-datum to text+31,
             'Page: ' to text+50,
             sy-pagno to text+56.
      hline-info = text.
      append hline to p_heading.
    endform.                    " BUILD_COMMENT
          FORM TOP_OF_PAGE                                              *
    form top_of_page.
      call function 'REUSE_ALV_COMMENTARY_WRITE'
           exporting
                it_list_commentary = heading.
    endform.
    regard
    nawa

  • Taking download into excel from ALV Grid - header is printing in two lines

    Hi All,
    I have a scenario where I am taking the download from ALV grid to an excel sheet. Now the header of the ALV (column names) is appearing in two lines in the downloaded excel sheet while items (records of the ALV table) are getting displayed in a single line.
    This download is taken from the standard download to local file (spreadsheet) button provided by SAP for ALVs.
    I am using function module "Reuse_alv_grid_display" for the purpose.
    Can somebody provide an idea how I can avoid the header printing in two lines and keep the length as it is.
    Thanks in Advance,
    Chandan

    Hi..
    1. Pass header name in internal table appned first line.
    2. after that pass u r data .
    3. Use  FM. WS_DOWNLOAD 
    Salil ......
    Edited by: salil chavan on Nov 26, 2008 11:07 AM

  • Alv field heading in two rows

    hi all
    In alv report out put  the field heading  is too long.
    So I want to disply the heading in two rows.
    Like ‘ April 2006 prior month personal’,
    Is to be disply like in one row ‘April 2006’.
    And in next row ‘prior month personal’.
    Please send the reply as early as possible to [email protected]

    i think it is not possible like that , u can increase the length of that field in fieldcatalog
    wa_fieldname-outputlen = '100'.
    and in layout u can use
    wa_layout-colwidth_optimize = 'X'.

  • 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.

  • ALV Grid -- Heading in each and every page while printing

    Hello!!!!
    How to display heading in ALV Grid in each and every page while printing?
    Thanks in Advance!!!!!!

    Hi nitesh,
    <b>data: lt_list_commentary type slis_t_listheader.
    perform build_comment using
    lt_list_commentary.
    form build_comment using
    pt_list_commentary type slis_t_listheader.
    data: ls_line type slis_listheader.
    clear ls_line.
    ls_line-typ = 'H'.
    ls_line-info = 'SREEKANTH REDDY'.
    append ls_line to pt_list_commentary.
    clear ls_line.
    ls_line-typ = 'H'.
    ls_line-info = 'HEADER1'.
    append ls_line to pt_list_commentary.
    clear ls_line.
    ls_line-typ = 'H'.
    ls_line-info = 'HEADER2TEXT'.
    append ls_line to pt_list_commentary.
    clear ls_line.
    endform.
    </b>In Function module REUSE_ALV_COMMENTARY_WRITE , give the parameter as
    <b>it_list_commentary = lt_list_commentary </b>
    Here ls_line-typ = 'H'. you can use options like 'H' , 'A' , 'S'.

  • T.code of resp. program to be displayed in  ALV as heading or header

    Hi !
    I have a rather simple yet confusing question for me.
    My requirement is to display the respective transaction code of the Zreport in the report itself.
    I am able to display it in classical format but unable to figure out a way in ALV format.
    Can you please help me find a way to display the report's respective T.CODE in the report header or footer.
    thanx in advance.

    You can do this with FM REUSE_ALV_COMMENTARY_WRITE
    Rob

  • ALV: Display Header,  line item, information after page break .............

    Hi .
    I am facing problem in displaying a particular layout in ALV.
    the layout is as follows:
    1. Header part
    2. Line item
    3. There is field customer and after every change of customer do page break and display information like how many record read and how many record processed. below is brief detail about how to get read and processed record.
    I have two internal table  say table1 and table2.
       Looping table1
      increase the counter as counter_read = counter_read +1.
    compare the record with table2.
    if matches
    increase the counter as counter_process = counter_process + 1.
    4. At the end of report display a error log.
       to get the error log we will follow the above logic and if record not matched then display as error record.
    Please help ASAP to find the solution.
    Thanks in advance

    There is a knowledge base article C2014229 (1210986 - Subreports do not have a Page Header) , but instead of providing link I will just copy content here:
    Symptom
    Since subreports are objects in the Main Report, they do not contain Page Headers. How can you create a fake page header for subreports?
    Resolution
    To create a fake page header for subreports, use the following steps:
    1. In the subreport, create a formula:
    @FakePageHeader
    //name of formula
    WhileReadingRecords;
    2. Go to the 'Insert' menu and click 'Group'. Select the @FakePageHeader formula.
    3. Select the 'Repeat Group Header on Each New Page' option, and click 'OK'.
    This inserts a new group at the lowest, or innermost, grouping level. You will need to move this group to the highest, or outermost, grouping level.
    4. Go to 'Report' menu and click 'Group Expert'. Use the up arrow to move this newest group up to the top of the list.
    5. Move all the headers that you would like repeated into this Header for the @FakePageHeader group.
    Hope it will help.

  • Reg: Adding spaces between texts in ALV list header

    Hi All,
    I was implementing a client requirement for ALV. The list header should contain something of this format.
    Pgm Id:               ZZZ01
    After this list header it is ALV display.
    I did this using the concatenate statement.
    ex: Concatenate 'PgmID' sy-repid into listheader seperated by space.
    But this is not showing spaces between text in ALV display. See I want a tabspace between the texts in headr. Any idea on how to mak it?
    Rakesh

    Depending on Fontsize the space might be so narrow that you believe its not there.
    check in the debugger if there is really a space in the string, the clause "separated by space" will insert one for sure.
    May be you'reshowing the ALV before you are modifying the listheader?
    Another approach is using strings, blanks at the end of a string are not deleted
    concatenate 'ABC ' 'XYZ' into s.
    and
    concatenate `ABC ` `XYZ` into s.
    will give different results, be aware of the difference in the quots in both cases. Using the second example you can insert as many blanks as you want.

Maybe you are looking for

  • Full version 10.4 install

    I am installing a full version OS10.4 on to my imac whenever it gets here, it's the first flat panel imac that came out, anyway because it is full version and not an upgrade do I still need to install the 10.1 and the 10.3 that came with this imac fi

  • Does Action Script 2.0 have any classes to support networking?

    Im intending to implement a flashlite 2.0 application that deals with live cam. Users are able to stream live videos via 3G using their mobile phones. Im just wondering. Is flashlite 2.0 able to achieve that>? Or should i just stick to .NET or J2ME.

  • Slow Modem Speed Graphite Base w/Dial Up

    I've had a graphite base station for a couple of months now. At first, the connection speed was comparable to the v 90 modem in the computer, but recently it started connecting at a rate so slow pages end up not loading, and mail gives me errors when

  • Ai CC Installation Failed

    While I am downloading the Ai CC 2014, it stop at 42% download status. It says's that "Installation Failed"... There's a 'Learn More" link after that error ("Installation Failed") and when I clicked that, some advice showed up and says: "Installation

  • Manny Dumps in production Please  helps

    I am facing a suddenly a problem in Production server In sm50 work process get stop one by one and if try to restart again it get stop. Ther are many dumps of 2 types but in different Tx and Table (DBIF_RSQL_INVALID_REQUEST, TEXTENV_UNICODE_LANGU_INV