函数RS_REFRESH_FROM_SELECTOPTIONS可以取得选择画面中的select-option和parameters的输入值。
代码如下：
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
|
REPORT ztest_get_select_value.
*&---------------------------------------------------------------------*
*& Data Declaration
*&---------------------------------------------------------------------*
TABLES: mara.
DATA:git_params TYPE TABLE OF rsparams.
DATA:gwa_params TYPE rsparams.
*&---------------------------------------------------------------------*
*& Selection Screen
*&---------------------------------------------------------------------*
SELECT-OPTIONS:s_matnr FOR mara-matnr.
PARAMETERS:p_mtart TYPE mara-mtart.
PARAMETERS:p_matkl TYPE mara-matkl.
*&---------------------------------------------------------------------*
*& Start of Selection
*&---------------------------------------------------------------------*
START-OF-SELECTION.
CALL FUNCTION 'RS_REFRESH_FROM_SELECTOPTIONS'
EXPORTING
curr_report = sy-repid
TABLES
selection_table = git_params[].
SORT git_params BY kind.
WRITE:/ 'Parameters'.
WRITE:/ 'Name' ,20 'Value' .
LOOP AT git_params INTO gwa_params WHERE kind = 'P'.
WRITE:/ gwa_params-selname ,20 gwa_params-low.
ENDLOOP.
SKIP.
WRITE:/ 'Select-Options'.
WRITE:/ 'Name' ,20 'Sign' ,25 'Option',32 'Low',52 'High'.
LOOP AT git_params INTO gwa_params WHERE kind = 'S'.
WRITE:/ gwa_params-selname ,20 gwa_params-sign ,
25 gwa_params-option, 32 gwa_params-low,
52 gwa_params-high.
ENDLOOP.
|
测试：
选择画面中输入需要的值：
运行结果：
以上。