Abap Selection Screen ekranında statüs bar buton ekleme

SELECTION-SCREEN BEGIN OF BLOCK parametreler WITH FRAME TITLE
text–001.
SELECT-OPTIONS:
  sdmid FOR zcd_dnsmn_kmlk–dmid,
  svorna  FOR zcd_dnsmn_kmlk–vorna,
  snachn  FOR zcd_dnsmn_kmlk–nachn,
  sulke FOR zcd_dnsmn_kmlk–ulke,
  sfirma FOR  zcd_dnsmn_kmlk–firma,
  syaratan FOR zcd_dnsmn_kmlk–yaratan,
  serdat FOR zcd_dnsmn_kmlk–erdat.
SELECTION-SCREEN END OF BLOCK parametreler.

SELECTION-SCREEN FUNCTION KEY 1.

START-OF-SELECTION.
INITIALIZATION.
CONCATENATE icon_create ‘Yeni’
INTO sscrfields–functxt_01.

AT SELECTION-SCREEN.
IF sscrfields–ucomm EQ ‘FC01’.
SET SCREEN 0.
CLEAR ztablo.
CALL SCREEN 0100.
ENDIF.