Rabu, 27 Februari 2013

Coloring a cell in an ALV conditionally



Add a button beside execute button



*&---------------------------------------------------------------------*
*& Report  ZSBK_BUTTON_SAMPING_EXECUTE
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*

REPORT  zbutton_samping_execute.

TABLES : sscrfields, smp_dyntxt.

*----------------------------------------------------------------------*
*       SELECTION SCREEN                                               *
*----------------------------------------------------------------------*
SELECTION-SCREEN FUNCTION KEY 1.
SELECTION-SCREEN FUNCTION KEY 2.

PARAMETERS    : p_param TYPE t001l-werks.

AT SELECTION-SCREEN.
  CASE sscrfields-ucomm.
    WHEN 'FC01'.
      MESSAGE 'Button 1' TYPE 'I'.
    WHEN 'FC02'.
      MESSAGE 'Button 2' TYPE 'I'.
    WHEN OTHERS.

  ENDCASE.

INITIALIZATION.
  smp_dyntxt-text = 'Button1'.
  smp_dyntxt-icon_id = '@PO@'.
  smp_dyntxt-icon_text = 'Button1'.
  smp_dyntxt-quickinfo = 'Button1'.
  sscrfields-functxt_01 = smp_dyntxt.

  smp_dyntxt-text = 'Button2'.
  smp_dyntxt-icon_id = '@PO@'.
  smp_dyntxt-icon_text = 'Button2'.
  smp_dyntxt-quickinfo = 'Button2'.
  sscrfields-functxt_02 = smp_dyntxt.