lunedì 22 settembre 2014

Bottoni nella videata di selezione

*----------------------------------------------------------------------*
* DECLARATIONS                                                         *
*----------------------------------------------------------------------*
TABLES: SSCRFIELDS.

*----------------------------------------------------------------------*
* LAYOUT                                                               *
*----------------------------------------------------------------------*
SELECTION-SCREEN PUSHBUTTON 05(35) pb_tcd01 USER-COMMAND COMM01.
SELECTION-SCREEN PUSHBUTTON 45(35) pb_tcd02 USER-COMMAND COMM02.

*----------------------------------------------------------------------*
* EVENTS                                                               *
*----------------------------------------------------------------------*
AT SELECTION-SCREEN.
  CASE SSCRFIELDS-UCOMM.
    WHEN 'COMM01'.
      CALL TRANSACTION 'TCODE01'.
    WHEN 'COMM02'.
      CALL TRANSACTION 'TCODE02'.
  ENDCASE.

*----------------------------------------------------------------------*
* INIT                                                                 *
*----------------------------------------------------------------------*
INITIALIZATION.
  pb_tcd01 = 'Testo del primo bottone'.
  pb_tcd02 = 'Testo del secondo bottone'.

Nessun commento: