SSCRFIELDS-UCOMM und USER-COMMAND (Hier Pushbutton) und CALL TRANSACTION

Bsp. für die Verwendung von Pushbutton und deren hinterlegten Code

*&---------------------------------------------------------------------*
*& Report  ZTEST16
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*
REPORT ztest16.


TABLES sscrfields.

SELECTION-SCREEN PUSHBUTTON /02(17) up1 USER-COMMAND aa.
SELECTION-SCREEN PUSHBUTTON /02(17) up2 USER-COMMAND bb.
SELECTION-SCREEN PUSHBUTTON /02(17) up3 USER-COMMAND cc.
SELECTION-SCREEN PUSHBUTTON /02(17) up4 USER-COMMAND dd.

INITIALIZATION.
  up1 = 'SE16N'.
  up2 = 'SM30'.
  up3 = 'SE11'.
  up4 = 'SE16'.

AT SELECTION-SCREEN.
  "Muss unbedingt in at selection-screen sein.

  IF sscrfields-ucomm = 'AA'.
    CLEAR sscrfields-ucomm.
    CALL TRANSACTION 'SE16N'.
  ENDIF.
  IF sscrfields-ucomm = 'BB'.
    CLEAR sscrfields-ucomm.
    CALL TRANSACTION 'SM30'.
  ENDIF.
  IF sscrfields-ucomm = 'CC'.
    CLEAR sscrfields-ucomm.
    CALL TRANSACTION 'SE11'.
  ENDIF.
  IF sscrfields-ucomm = 'DD'.
    CLEAR sscrfields-ucomm.
    CALL TRANSACTION 'SE16'.
  ENDIF.

Hinterlasse einen Kommentar

Diese Seite verwendet Akismet, um Spam zu reduzieren. Erfahre, wie deine Kommentardaten verarbeitet werden..