zwei Traffic Light in ALV Grid?

Code: Alles auswählen.

** Tabelle
TYPES: BEGIN OF t_tab,
         fksta       TYPE vbup-fksta,
         fksta_ampel TYPE icon-id,        "hier kommt die Ampel rein
       END   OF t_tab.

** Feldkatalog
  CLEAR gw_fieldcat.
  gw_fieldcat-fieldname     = 'FKSTA_AMPEL'.
  gw_fieldcat-icon          = 'X'.
  gw_fieldcat-reptext_ddic  = 'FS'.
  gw_fieldcat-seltext_s     = 'Fakt.Stat.'.
  gw_fieldcat-seltext_m     = 'Faktura Status'.
  gw_fieldcat-seltext_l     = 'Faktura Status'.
  gw_fieldcat-ref_fieldname = 'ID'.
  gw_fieldcat-ref_tabname   = 'ICON'.
  APPEND gw_fieldcat TO  gt_fieldcat.

*** Die Ampeln zu weisen
* A
  CLEAR gw_tab.
  gw_tab-fksta_ampel = icon_red_light.
  MODIFY gt_tab FROM gw_tab TRANSPORTING fksta_ampel WHERE fksta = 'A'.
* B
  CLEAR gw_tab.
  gw_tab-fksta_ampel = icon_yellow_light.
  MODIFY gt_tab FROM gw_tab TRANSPORTING fksta_ampel WHERE fksta = 'B'.
* C
  CLEAR gw_tab.
  gw_tab-fksta_ampel = icon_green_light.
  MODIFY gt_tab FROM gw_tab TRANSPORTING fksta_ampel WHERE fksta = 'C'.