Saturday, January 21, 2012

Application tool bar in Selection screen

*&---------------------------------------------------------------------*
*& Report  YSAP_APP_TOOLBAR_SELSCREEN
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*

REPORT  ysap_app_toolbar_selscreen.

TABLES: sscrfields.

SELECTION-SCREEN BEGIN OF BLOCK block1 WITH FRAME.

PARAMETERS: p1(10),
            p2(10).

SELECTION-SCREEN SKIP.

SELECTION-SCREEN END OF BLOCK block1.

SELECTION-SCREEN FUNCTION KEY 1.

INITIALIZATION.

  MOVE 'OUTPUT' TO sscrfields-functxt_01.

START-OF-SELECTION.

  WRITE: p1, p2.

AT SELECTION-SCREEN.

  IF sscrfields-ucomm = 'FC01'.
    BREAK-POINT.
  ENDIF.

 In Runtime

 

If  You select Output :


 

If You execute normally:

 

No comments:

Post a Comment