DATA: lv_FUNCNAME type RS38L_FNAM ,
lt_import TYPE rsfb_para WITH HEADER LINE,
lt_export TYPE rsfb_para WITH HEADER LINE,
lt_change TYPE rsfb_para WITH HEADER LINE,
lt_tables TYPE rsfb_para WITH HEADER LINE.
lv_FUNCNAME = 'ZFM_MM201' .
* Read parameter of function
REFRESH:lt_import[],lt_export[],lt_change[],lt_tables[].
PERFORM frm_param_read(saplzfg_comm)
USING
lv_FUNCNAME
CHANGING
lt_import[]
lt_export[]
lt_change[]
lt_tables[].
lv_FUNCNAME 就是SE37能查到的function函数,传入函数就能返回函数的各个参数 ,changing参数中的 lt_import[] 是传入参数列表,lt_export[]是传出参数列表 ,lt_change[]是正在更改参数列表,lt_tables[]是表参数列表。
即下图的四个页签参数
perform 的具体代码如下
form frm_param_read using i_fname type clike
changing et_import type rsfb_para
et_export type rsfb_para
et_change type rsfb_para
et_tables type rsfb_para.
data: ls_header type header_fb,
l_pname type tfdir-pname.
ls_header-name = i_fname.
* Read function pool
select single pname
from tfdir
into l_pname
where funcname = ls_header-name.
* Read namespace
call function 'FUNCTION_INCLUDE_SPLIT'
exporting
program = l_pname
importing
group = ls_header-area
namespace = ls_header-namespace.
* Insert namespace
concatenate ls_header-namespace ls_header-area
into ls_header-area.
* Read parameter of function module
call method cl_fb_parameter_db=>read
importing
import = et_import
export = et_export
change = et_change
tables = et_tables
changing
header = ls_header.
endform.
也可以通过查表的方法查找参数
FUPARAREF:存储功能模块参数