Aligning Data In ALV GRID Using Function Modules

ERP SAP Modules ==> ABAP Programming

How to aligning the data in TOP-OF-PAGE in ALV GRID using function modules?

By: Raju

Here is a sample alv code which aligns the data according to the position specified.

REPORT  alv_top_of_page.

TABLES : t001.

TYPE-POOLS: slis.

DATA : w_repid LIKE sy-repid.

TYPES : BEGIN OF ty_comp.
       INCLUDE STRUCTURE t001.

TYPES : END OF ty_comp.

DATA: wa_layout  TYPE slis_layout_alv.

DATA: it_fieldcat TYPE slis_t_fieldcat_alv,
            wa_fieldcat TYPE slis_fieldcat_alv.

DATA : it_comp TYPE TABLE OF ty_comp.

INITIALIZATION.
  w_repid = sy-repid.

START-OF-SELECTION.

  SELECT * FROM t001 INTO TABLE it_comp.

END-OF-SELECTION.

  CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'

    EXPORTING
      i_program_name         = w_repid
      i_internal_tabname     = 'IT_COMP'
      i_inclname             = w_repid

    CHANGING
      ct_fieldcat            = it_fieldcat[]

    EXCEPTIONS
      inconsistent_interface = 1
      program_error          = 2

      OTHERS                 = 3.

  CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'

    EXPORTING
      i_callback_program          = w_repid
      i_callback_html_top_of_page = 'HTML_TOP_OF_PAGE'
      is_layout                   = wa_layout
      it_fieldcat                 = it_fieldcat

    TABLES
      t_outtab                    = it_comp

    EXCEPTIONS
      program_error               = 1

      OTHERS                      = 2.

*&---------------------------------------------------------------------*
*&      Form  html_top_of_page
*&---------------------------------------------------------------------*

FORM html_top_of_page USING document TYPE REF TO cl_dd_document.

  DATA: text TYPE sdydo_text_element.

  CALL METHOD document->add_gap

    EXPORTING
      width = 100.
      text =  'Company Code Data'.

  CALL METHOD document->add_text

    EXPORTING
      text      = text
      sap_style = 'HEADING'.

  CALL METHOD document->new_line.

  CALL METHOD document->new_line.

  CALL METHOD document->new_line.
      text = 'User Name : '.

  CALL METHOD document->add_text

    EXPORTING
      text         = text
      sap_emphasis = 'Strong'.

  CALL METHOD document->add_gap

    EXPORTING
      width = 6.
      text = sy-uname.

  CALL METHOD document->add_text

    EXPORTING
      text      = text
      sap_style = 'Key'.

  CALL METHOD document->add_gap

    EXPORTING
      width = 50.
      text = 'Date : '.

  CALL METHOD document->add_text

    EXPORTING
      text         = text
      sap_emphasis = 'Strong'.

  CALL METHOD document->add_gap

    EXPORTING
      width = 6.
      text = sy-datum.

  CALL METHOD document->add_text

    EXPORTING
      text      = text
      sap_style = 'Key'.

  CALL METHOD document->add_gap

    EXPORTING
      width = 50.
      text = 'Time : '.

  CALL METHOD document->add_text

    EXPORTING
      text         = text
      sap_emphasis = 'Strong'.

  CALL METHOD document->add_gap

    EXPORTING
      width = 6.
      text = sy-uzeit.

  CALL METHOD document->add_text

    EXPORTING
      text      = text
      sap_style = 'Key'.

  CALL METHOD document->new_line.

  CALL METHOD document->new_line.

ENDFORM.                    "HTML_TOP_OF_PAGE

ABAP Books
ABAP Certification, BAPI, Java, Web Programming, Smart Forms, Sapscripts Reference Books

More ABAP Tips

Best regards,
SAP Basis, ABAP Programming and Other IMG Stuff
http://www.erpgreat.com

All the site contents are Copyright © www.erpgreat.com and the content authors. All rights reserved.
All product names are trademarks of their respective companies.  The site www.erpgreat.com is in no way affiliated with SAP AG. 
Every effort is made to ensure the content integrity.  Information used on this site is at your own risk. 
 The content on this site may not be reproduced or redistributed without the express written permission of 
www.erpgreat.com or the content authors.