kurz und knackige ALV-Ausgabe Fubau

www.4AP.de - ABAP Syntaxbeispiele:

Beispielcoding: (kopieren erlaubt aber auf eigene Gefahr :-))

Wenn man einfach nur mal die Treffermenge ausgeben will geht das auch ziemlich kurz und knackig.

*
* Coded by Thorsten Neubüser - www.4ap.de
*

*&---------------------------------------------------------------------*
*&      Form  daten_anzeigen
*&---------------------------------------------------------------------*
FORM daten_anzeigen.
  data: it_zspcumaster type table of zspcumaster.           "#EC ENHOK
  SELECT * FROM zspcumaster CLIENT SPECIFIED
    INTO TABLE it_zspcumaster
   where mandt = sy-mandt.
* ALV Aufbau des Feldkatalogs
  TYPE-POOLS: slis.  " immer benötigt damit nachfolgendes gefunden wird
  DATA: g_repid  type syrepid.
  DATA  tabname  TYPE slis_tabname VALUE 'ZSPCUMASTER'.
  DATA: fieldcat TYPE slis_t_fieldcat_alv.
  g_repid   = sy-repid.
* Feldkatalog besorgen
  CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
    EXPORTING
      i_program_name     = g_repid
      i_structure_name   = tabname
      i_inclname         = g_repid
    CHANGING
      ct_fieldcat        = fieldcat[].
* ALV Listausgabe
  CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
    EXPORTING
      i_callback_program = g_repid
      it_fieldcat        = fieldcat[]
    TABLES
      t_outtab           = it_zspcumaster[].
ENDFORM.                    " daten_anzeigen