ABAP选择屏幕TAB页签

最新推荐文章于 2025-11-17 16:27:21 发布

原创最新推荐文章于 2025-11-17 16:27:21 发布 · 1.4k 阅读

5 ·

CC 4.0 BY-SA版权

10.Abap 专栏收录该内容

57 篇文章

订阅专栏

这篇博客详细介绍了如何在SAP ABAP中使用SELECTION-SCREEN进行子屏幕间的交互。通过示例代码展示了如何定义选择屏幕、子屏幕以及在初始化和选择屏幕事件中处理用户输入，实现不同子屏幕间的切换。

REPORT Y_CLY_104X.

SELECTION-SCREEN: BEGIN OF TABBED BLOCK P_TAB_MAT FOR 30 LINES,
                  TAB (18) P_TEXT1 USER-COMMAND BUT1 DEFAULT SCREEN 2100,
                  TAB (18) P_TEXT2 USER-COMMAND BUT2 DEFAULT SCREEN 2200,
                  END OF BLOCK P_TAB_MAT.

SELECTION-SCREEN BEGIN OF SCREEN 2100 AS SUBSCREEN .
PARAMETERS: P_MATNR1 TYPE CHAR16.
SELECTION-SCREEN END OF SCREEN 2100.

SELECTION-SCREEN BEGIN OF SCREEN 2200 AS SUBSCREEN .
PARAMETERS: P_MATNR2 TYPE CHAR16.
SELECTION-SCREEN END OF SCREEN 2200.

INITIALIZATION.
  P_TEXT1 = 'MAT1'.
  P_TEXT2 = 'MAT2'.

*&-------------------------------------------------------------------------------------------*
* AT SELECTION-SCREEN
*&-------------------------------------------------------------------------------------------*
AT SELECTION-SCREEN.
  CASE  SY-DYNNR .
    WHEN 1000 .
      CASE SY-UCOMM .
        WHEN 'BUT1'.
          P_TAB_MAT-DYNNR = 2100 .
        WHEN 'BUT2'.
          P_TAB_MAT-DYNNR = 2200.
        WHEN OTHERS .
      ENDCASE.

  ENDCASE.

START-OF-SELECTION.
  CASE  P_TAB_MAT-DYNNR .
    WHEN 2100.
    WHEN 2200.
    WHEN OTHERS.
  ENDCASE.