调用SO10填充选择屏
* 本段代码调用SO10, 使用户可以在选择屏中选择文本, 并同时填充TEXT ID.
TABLES: pstxt.
** call trx so10 (rstxtcat is the program of so10)
PARAMETERS: p_head TYPE tdobname.
PARAMETERS: p_txtid TYPE tdid.
DATA: it_value TYPE TABLE OF dynpread WITH HEADER LINE.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_head.
SET PARAMETER ID 'TXT' FIELD p_head.
SUBMIT rstxtcat AND RETURN.
GET PARAMETER ID 'TXT' FIELD pstxt.
p_head = pstxt-tdname.
CLEAR it_value.
it_value-fieldname = 'P_TXTID'.
it_value-fieldvalue = pstxt-tdid.
APPEND it_value.
CALL FUNCTION 'DYNP_VALUES_UPDATE'
EXPORTING
dyname = sy-repid
dynumb = sy-dynnr
TABLES
dynpfields = it_value.
来自 “ ITPUB博客 ” ，链接：https://blog.itpub.net/11011430/viewspace-1017640/ ，如需转载，请注明出处，否则将追究法律责任。
