*&---------------------------------------------------------------------*
*& Report ZTEST_ABAP_26
*&
*&---------------------------------------------------------------------*
*&获取屏幕中的数据
*&
*&---------------------------------------------------------------------*
REPORT ZTEST_ABAP_26.
data: text(20).
START-OF-SELECTION.
PERFORM write_and_hide.
AT LINE-SELECTION.
CASE text.
WHEN 'LINE1'.
WRITE: 'LINE1 CHOOSED.'.
WHEN 'LINE2'.
WRITE: 'LINE2 CHOOSED.'.
WHEN OTHERS.
WRITE: 'THE OTHER LINE.'.
ENDCASE.
CLEAR TEXT.
FORM write_and_hide.
TEXT = 'LINE1'.
WRITE / TEXT.
HIDE TEXT.
TEXT = 'LINE2'.
WRITE / TEXT.
HIDE TEXT.
ENDFORM.