ABAP SCREEN/选择屏幕/RADIO BUTTON

最新推荐文章于 2024-05-07 13:17:18 发布

Cici_Leee

最新推荐文章于 2024-05-07 13:17:18 发布

阅读量3.1k

点赞数 2

分类专栏： SAP/ABAP记录文章标签：经验分享

本文链接：https://blog.csdn.net/weixin_55593130/article/details/125186497

版权

SAP/ABAP记录专栏收录该内容

47 篇文章 3 订阅

订阅专栏

目的：针对radio button 选择的不同，显示和隐藏条件字段

1、ZTEST_S中：

SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME  TITLE TEXT-001 .
SELECT-OPTIONS:
  s_bukrs FOR pa0001-bukrs MODIF ID m1,
  s_pernr FOR pa0001-pernr MODIF ID m1,
  s_ename FOR pa0001-ename MODIF ID m1.

PARAMETERS: p_file LIKE rlgrap-filename MODIF ID m2.
SELECTION-SCREEN END OF BLOCK b1.


SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME  TITLE TEXT-002.
PARAMETERS: rb1 RADIOBUTTON GROUP g1 DEFAULT 'X' USER-COMMAND u1,
            rb2 RADIOBUTTON GROUP g1,
            rb3 RADIOBUTTON GROUP g1
            .
SELECTION-SCREEN END OF BLOCK b2.

2、在 AT SELECTION-SCREEN OUTPUT 中，创建form，如下
"PERFORM frm_screen"

FORM frm_screen .

  LOOP AT SCREEN.
    IF rb2 EQ 'X'.
      IF screen-group1 EQ 'M1'.
        screen-active = '0'.  "隐藏
      ELSE.
        screen-active = '1'.  "显示
      ENDIF.

    ELSEIF rb1 EQ 'X' OR rb3 EQ 'X'.
      IF screen-group1 EQ 'M2'.
        screen-active = '0'.
      ELSE.
        screen-active = '1'.
      ENDIF.
    ENDIF.

    MODIFY SCREEN.
  ENDLOOP.
ENDFORM.