关于程序变式中动态选择的一点说明

今天在做一个程序，功能是调用FBL3N（总账科目行项目显示），并且向这个程序传入相应的选择屏幕值，直接展示报表。但是，遇到了一个问题，就是这里面的动态选择中的屏幕选项，无法写入值，废了好大的周折，才搞定。分享一下，留念一下。



实现功能：通过事务FBL3N查询特定，总账科目、公司代码、过账日期和会计期间下的总账科目行项目

实现方法：1、建立程序RFITEMGL的变式，变式名ZFBL3N，或者使用标准SAP变式SAP&AUDIT

2、在自开发程序中添加类似如下代码：

TYPE-POOLS:rsds.

DATA: trange TYPE rsds_trange,

trange_line

LIKE LINE OF trange,

trange_frange_t_line

LIKE LINE OF trange_line-frange_t,

trange_frange_t_selopt_t_line

LIKE LINE OF trange_frange_t_line-selopt_t,

texpr TYPE rsds_texpr.

trange_line-tablename = 'BSIS'.

trange_frange_t_line-fieldname = 'MONAT'.

trange_frange_t_selopt_t_line-sign = 'I'.

trange_frange_t_selopt_t_line-option = 'BT'.

trange_frange_t_selopt_t_line-low = '13'.

trange_frange_t_selopt_t_line-high = '16'.

APPEND trange_frange_t_selopt_t_line

TO trange_frange_t_line-selopt_t.

APPEND trange_frange_t_line TO trange_line-frange_t.

APPEND trange_line TO trange.

CALL FUNCTION 'FREE_SELECTIONS_RANGE_2_EX'

EXPORTING

field_ranges = trange

IMPORTING

EXPRESSIONS = texpr.

SUBMIT rfitemgl "VIA SELECTION-SCREEN

USING SELECTION-SET 'SAP&AUDIT'

WITH sd_saknr = '2423423432'

WITH sd_bukrs = '9000'

WITH x_opsel = ' '

WITH x_clsel = ' '

WITH x_aisel = 'X'

WITH so_budat BETWEEN '20120601' AND '20120630'

WITH FREE SELECTIONS texpr

AND RETURN.

简单的修改上面的代码就可以定制你自己的调用方式。