AT LINE-SELECTION与HIDE事件的应用

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