ABAP动态参数调用FBL3N FBL4N

            ls_rspar-selname 'SD_SAKNR'.

            ls_rspar-kind    'S'.

            ls_rspar-sign    'I'.

            ls_rspar-option  'EQ'.

            ls_rspar-low     '2221020100'.

            APPEND ls_rspar TO lt_rspar.

            CLEAR ls_rspar.

   

            ls_rspar-selname 'SD_SAKNR'.

            ls_rspar-kind    'S'.

            ls_rspar-sign    'I'.

            ls_rspar-option  'EQ'.

            ls_rspar-low     '2221010100'.

            APPEND ls_rspar TO lt_rspar.

            CLEAR ls_rspar.

   

            ls_rspar-selname 'SD_BUKRS'.

            ls_rspar-kind    'S'.

            ls_rspar-sign    'I'.

            ls_rspar-option  'EQ'.

            ls_rspar-low     ls_output-bukrs.

            APPEND ls_rspar TO lt_rspar.

            CLEAR ls_rspar.

   

            ls_rspar-selname 'X_AISEL'.

            ls_rspar-kind    'P'.

            ls_rspar-low     'X'.

            APPEND ls_rspar TO lt_rspar.

            CLEAR ls_rspar.

   

            ls_rspar-selname 'X_CLSEL'.

            ls_rspar-kind    'P'.

            ls_rspar-low     ''.

            APPEND ls_rspar TO lt_rspar.

            CLEAR ls_rspar.

   

            ls_rspar-selname 'X_OPSEL'.

            ls_rspar-kind    'P'.

            ls_rspar-low     ''.

            APPEND ls_rspar TO lt_rspar.

            CLEAR ls_rspar.

   

            ls_rspar-selname 'SO_BUDAT'.

            ls_rspar-kind    'S'.

            ls_rspar-sign    'I'.

            ls_rspar-option  'BT'.

            ls_rspar-low     s_budat-low.

            ls_rspar-high    s_budat-high.

            APPEND ls_rspar TO lt_rspar.

            CLEAR ls_rspar.

   

   

            ls_trange-tablename 'BSIS'.

            ls_frange-fieldname 'MWSKZ'.

            ls_selopt-sign    'I'.

            ls_selopt-option  'EQ'.

            ls_selopt-low     ''.

            APPEND ls_selopt TO ls_frange-selopt_t.

            APPEND ls_frange TO ls_trange-frange_t.

            APPEND ls_trange TO lt_trange.

*                CLEAR ls_rspar.

   

   

            CALL FUNCTION 'FREE_SELECTIONS_RANGE_2_EX'

              EXPORTING

                field_ranges lt_trange

              IMPORTING

                expressions  lt_texpr.

   

            SUBMIT rfitemgl

            WITH SELECTION-TABLE lt_rspar

            WITH FREE SELECTIONS lt_texpr

*            VIA SELECTION-SCREEN

            AND RETURN.

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
ABAP 中,可以使用 Function Module 和 Function Module Name 来实现动态调用函数。下面是具体步骤: 1. 定义一个 Function Module Name 变量来存储要调用的函数名。 ``` DATA: lv_function_name TYPE rs38l_fnam. ``` 2. 使用 ASSIGN 语句将 Function Module Name 分配给一个 FIELD-SYMBOLS 变量。 ``` FIELD-SYMBOLS: <fs_function_module> TYPE any. ASSIGN (lv_function_name) TO <fs_function_module>. ``` 3. 使用 FUNCTION MODULE 语句调用函数模块,并将输入参数传递给函数。 ``` CALL FUNCTION lv_function_name EXPORTING p_input = ls_input IMPORTING p_output = ls_output. ``` 例如,以下代码演示了如何动态调用函数: ``` DATA: lv_function_name TYPE rs38l_fnam, ls_input TYPE zinput, ls_output TYPE zoutput. FIELD-SYMBOLS: <fs_function_module> TYPE any, <fs_input> TYPE any, <fs_output> TYPE any. * 获取函数名和输入参数 lv_function_name = 'Z_FUNCTION_MODULE'. ls_input = ... "设置输入参数 * 动态调用函数模块 ASSIGN (lv_function_name) TO <fs_function_module>. ASSIGN ls_input TO <fs_input>. CALL FUNCTION <fs_function_module> EXPORTING p_input = <fs_input> IMPORTING p_output = <fs_output>. * 获取输出参数 ASSIGN ls_output TO <fs_output>. ``` 在上面的代码中,我们首先定义了一个 Function Module Name 变量 lv_function_name 和输入参数 ls_input。然后,我们使用 ASSIGN 语句将 Function Module Name 分配给 FIELD-SYMBOLS 变量 <fs_function_module>,并将输入参数分配给 FIELD-SYMBOLS 变量 <fs_input>。 最后,使用 CALL FUNCTION 语句动态调用函数模块,并将输入参数传递给函数。然后,获取输出参数并将其分配给 FIELD-SYMBOLS 变量 <fs_output>。 希望这可以回答您的问题。
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值