SAP ABAP 控制选择屏幕的控件显示
第一次执行,两组控件都显示了:
点击 p_hide1, 界面马上隐藏了第一组控件:
点击 p_hide2, 界面又隐藏了第二组控件:
*&---------------------------------------------------------------------*
*& Report ZJAMES001
*&---------------------------------------------------------------------*
*&
*&---------------------------------------------------------------------*
REPORT ZJAMES001.
PARAMETERS p_hide1 AS CHECKBOX USER-COMMAND flag.
PARAMETERS p_hide2 AS CHECKBOX USER-COMMAND flag.
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME.
PARAMETERS: p1 TYPE c LENGTH 10 MODIF ID bl1,
p2 TYPE c LENGTH 10 MODIF ID bl1,
p3 TYPE c LENGTH 10 MODIF ID bl1.
SELECTION-SCREEN END OF BLOCK b1.
SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME.
PARAMETERS: p4 TYPE c LENGTH 10 MODIF ID bl2,
p5 TYPE c LENGTH 10 MODIF ID bl2,
p6 TYPE c LENGTH 10 MODIF ID bl2.
SELECTION-SCREEN END OF BLOCK b2.
AT SELECTION-SCREEN OUTPUT.
"屏幕输出事件:
" 在输出前,这里可以关闭一些不需要的控件. 每一次选择后,这些屏幕控件又被重置了
LOOP AT SCREEN INTO DATA(screen_wa).
IF p_hide1 = 'X' and screen_wa-group1 = 'BL1'.
screen_wa-active = '0'.
ENDIF.
IF p_hide2 = 'X' and screen_wa-group1 = 'BL2'.
screen_wa-active = '0'.
ENDIF.
MODIFY SCREEN FROM screen_wa.
ENDLOOP.
post SAP-Garson
原文链接:https://blog.csdn.net/ot512csdn/article/details/120502371文章来自于网络,如果侵犯了您的权益,请联系站长删除!