Popup text editor control

DATA: BEGIN OF IT_TEXT OCCURS 0,

      LINE LIKE TLINE-TDLINE,

  END OF IT_TEXT.

CALL FUNCTION 'TERM_CONTROL_EDIT'

  TABLES

    TEXTLINES      = IT_TEXT

  EXCEPTIONS

    USER_CANCELLED = 1

    OTHERS         = 2.

LOOP AT IT_TEXT.

  WRITE :/ IT_TEXT-LINE.

ENDLOOP.