ABAP 数据动态计算

DATA: lv_num     TYPE cha_class_data-sollwert,
      lv_formula TYPE string,
      lv_out_num TYPE cha_class_view-sollwert.

PARAMETERS : p_num_01 TYPE i,
             p_num_02 TYPE i,
             p_fh     TYPE c LENGTH 1.

START-OF-SELECTION.

*字符串拼接
  lv_formula = | { p_num_01 } { p_fh } { p_num_02 }|.

*  函数调用
  CALL FUNCTION 'EVAL_FORMULA'
    EXPORTING
      formula = lv_formula "'   3 * 4   '
    IMPORTING
      value   = lv_num.

* 将科学计数法数据转为正常数据
  CALL FUNCTION 'QSS0_FLTP_TO_CHAR_CONVERSION'
    EXPORTING
      i_number_of_digits       = 2
      i_fltp_value             = lv_num
      i_value_not_initial_flag = 'X'
      i_screen_fieldlength     = 16
    IMPORTING
      e_char_field             = lv_out_num.


  WRITE / lv_num.
  WRITE lv_out_num.