TERM_CONTROL_EDIT

  REPORT ztest_nyj2.
DATA: BEGIN OF it_text OCCURS 0,
      line LIKE tline-tdline,
  END OF it_text.


it_text-line = '文本测试'.
APPEND it_text.
CALL FUNCTION 'TERM_CONTROL_EDIT'
  EXPORTING
    titel          = '标题－－文本测试'
  TABLES
    textlines      = it_text
  EXCEPTIONS
    user_cancelled = 1
    OTHERS         = 2.
LOOP AT it_text.
  WRITE :/ it_text-line.
ENDLOOP.