SAP中动态显示屏幕元素

SAP中动态显示屏幕元素实现

最新推荐文章于 2025-02-14 17:06:48 发布

转载最新推荐文章于 2025-02-14 17:06:48 发布 · 200 阅读

0 ·

CC 4.0 BY-SA版权

原文链接：http://www.cnblogs.com/softbird/archive/2005/11/08/271391.html

博客展示了在SAP中动态显示屏幕元素的代码实现。定义了单选按钮、选择选项等参数，在选择屏幕事件中根据条件刷新选择选项，在输出事件中通过循环判断屏幕组，根据单选按钮状态设置屏幕元素的激活状态。

REPORT ZJC20051108_01.
TABLES: T001.

PARAMETERS: G1 RADIOBUTTON GROUP GR1 DEFAULT 'X' USER-COMMAND ZUS1.
PARAMETERS: G2 RADIOBUTTON GROUP GR1.

SELECT-OPTIONS: S1 FOR T001-BUKRS MODIF ID M1.
SELECT-OPTIONS: S2 FOR T001-BUTXT MODIF ID M2.

AT SELECTION-SCREEN.
IF SY-UCOMM = 'ZUS1'.
    IF G1 IS INITIAL.
      REFRESH S1.
    ELSE.
      REFRESH S2.
    ENDIF.
ELSE.
    IF NOT G1 IS INITIAL.
      CHECK S1.
    ELSE.
      CHECK S2.
    ENDIF.
ENDIF.

AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
    CASE SCREEN-GROUP1.
      WHEN 'M1'.
        IF G1 IS INITIAL.
          SCREEN-ACTIVE = '0'. MODIFY SCREEN.
        ENDIF.
      WHEN 'M2'.
        IF G2 IS INITIAL.
          SCREEN-ACTIVE = '0'. MODIFY SCREEN.
        ENDIF.
    ENDCASE.
ENDLOOP.

转载于:https://www.cnblogs.com/softbird/archive/2005/11/08/271391.html