1 DATA gt_valutab TYPE STANDARD TABLE OF rsparams.
2 CALL FUNCTION 'RS_VARIANT_CONTENTS'
3 EXPORTING
4 report = 'Y4_B4_TEST' "程序名
5 variant = '11' "变式名
6 * MOVE_OR_WRITE = 'W'
7 * NO_IMPORT = ' '
8 * EXECUTE_DIRECT = ' '
9 * IMPORTING
10 * SP =
11 TABLES
12 * L_PARAMS =
13 * L_PARAMS_NONV =
14 * L_SELOP =
15 * L_SELOP_NONV =
16 valutab = gt_valutab
17 * VALUTABL =
18 * OBJECTS =
19 * FREE_SELECTIONS_DESC =
20 * FREE_SELECTIONS_VALUE =
21 * FREE_SELECTIONS_OBJ =
22 EXCEPTIONS
23 variant_non_existent = 1
24 variant_obsolete = 2
25 OTHERS = 3.
26 IF sy-subrc <> 0.
27 * Implement suitable error handling here
28 ENDIF.