REPORT zviltest.
DATA: BEGIN OF lit_text OCCURS 0,
line LIKE tline-tdline,
END OF lit_text.
CALL FUNCTION 'TERM_CONTROL_EDIT'
TABLES
textlines = lit_text
EXCEPTIONS
user_cancelled = 1
OTHERS = 2.
LOOP AT lit_text.
WRITE :/ lit_text-line.
ENDLOOP.
阅读(648) | 评论(0) | 转发(0) |