Adicionar botão na tela

Normalmente utilizado em aplicações para mobile.

REPORT ZSAPeiros.

TABLES: sscrfields.

SELECTION-SCREEN:
PUSHBUTTON 1(29) text-p01 USER-COMMAND cli1.

AT SELECTION-SCREEN.
  CASE sscrfields-ucomm.
    WHEN 'CLI1'.
      CALL TRANSACTION 'ZSEUPROGRAMA'.
  ENDCASE.