Wojtek Rutkowski

*&---------------------------------------------------------------------*
*& Report  ZZALV
*& Prosta tabela ALV
*&---------------------------------------------------------------------*
*& W. Rutkowski
*& 2009-05-18
*&---------------------------------------------------------------------*

REPORT  ZZALV.

TYPE-POOLS: slis.
DATA:
  fieldcatalog TYPE slis_t_fieldcat_alv,
  layout TYPE slis_layout_alv.

DATA: 
  alv_data TYPE TABLE OF vbap.
PARAMETER vbeln TYPE vbeln.

SELECT * FROM vbap INTO TABLE alv_data WHERE vbeln = vbeln.

CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
EXPORTING
  i_program_name = sy-repid
  i_internal_tabname = 'ALV_DATA'
  i_structure_name = 'VBAP'
  i_inclname = sy-repid
CHANGING
  ct_fieldcat = fieldcatalog.

layout-zebra = 'X'.

CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
  i_callback_program      = sy-repid
  is_layout               = layout
  it_fieldcat             = fieldcatalog[]
  i_save                  = 'X'
TABLES
  t_outtab                = alv_data.