DATA text(20).
*输出行与其内容相关联,当双击某行时,会根据HIDE关联内容输出相应的值
START-OF-SELECTION.
PERFORM write_and_hide.
AT LINE-SELECTION.
CASE text.
WHEN 'LINE1'.
WRITE:'You had select the line1'.
WHEN 'LINE2'.
WRITE:'You had select the line2'.
WHEN OTHERS.
WRITE:'The other line'.
ENDCASE.
CLEAR text.
*&---------------------------------------------------------------------*
*& Form write_and_hide
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
FORM write_and_hide.
text = 'LINE1'.
WRITE / text.
HIDE text.
text = 'LINE2'.
WRITE / text.
HIDE text.
text = 'LINE3'.
WRITE / text.
HIDE text.
ENDFORM. "write_and_hide
转载于:https://www.cnblogs.com/zxiu/p/7573295.html