ABAP中如何获取数据库转换后值及实现M3到CCM单位转换？

1. 数值格式转换（点转逗号） #

首先明确：如果数据库表YMSNVT003中确实存在存储带逗号格式的Value列，直接修改SELECT语句，将volum替换为该列即可。若该列不存在，则需要在ABAP程序中手动处理格式——因为数据库中数值类型字段（如P、F）存储的是纯数值，没有分隔符，显示格式需在程序中转换。

实现方法 #

以下是两种常用的格式化方案：

方式一：字符串模板（ABAP 7.02及以上版本支持）

遍历it_mtiga表，对每条数据的volum字段进行格式化：

LOOP AT it_mtiga ASSIGNING FIELD-SYMBOL(<fs_mtiga>).
  " 将未转换值格式化为带逗号的小数格式（保留3位小数）
  <fs_mtiga>-formatted_volum = |{ <fs_mtiga>-volum NUMBER = RAW DECIMALS = 3 DECIMAL_SEPARATOR = ',' }|.
ENDLOOP.

注意：需先在it_mtiga的结构中新增formatted_volum字段（类型CHAR，建议长度15以上）。

方式二：WRITE TO语句

DATA(lv_formatted) TYPE char15.
LOOP AT it_mtiga ASSIGNING FIELD-SYMBOL(<fs_mtiga>).
  WRITE <fs_mtiga>-volum TO lv_formatted DECIMALS 3 USING EDIT MASK '999,999.999'.
  " 若需将逗号作为小数分隔符，调整编辑掩码为'999.999,999'
  <fs_mtiga>-formatted_volum = lv_formatted.
ENDLOOP.

2. 立方米(M3)转立方厘米(CCM) #

单位换算逻辑：1立方米 = 1,000,000立方厘米，直接将数值乘以1000000即可。注意确保数值类型精度足够（如使用P DECIMALS 3或更高精度类型），避免溢出。

实现代码 #

可在格式转换前或转换后执行换算，示例如下：

LOOP AT it_mtiga ASSIGNING FIELD-SYMBOL(<fs_mtiga>).
  " 先执行单位转换：M3 → CCM
  <fs_mtiga>-volum_ccm = <fs_mtiga>-volum * 1000000.
  " 再格式化CCM值为带逗号的显示格式
  <fs_mtiga>-formatted_ccm = |{ <fs_mtiga>-volum_ccm NUMBER = RAW DECIMALS = 3 DECIMAL_SEPARATOR = ',' }|.
ENDLOOP.

需在表结构中新增volum_ccm（数值类型）和formatted_ccm（字符类型）字段。

结合现有代码的完整示例 #

在你的SELECT查询后添加处理逻辑：

IF gt_vttk IS NOT INITIAL. 
   SELECT vsart
       volum
   FROM YMSNVT003
   INTO CORRESPONDING FIELDS OF TABLE it_mtiga
   FOR ALL ENTRIES IN gt_vttk
   WHERE vsart EQ gt_vttk-vsart.

   " 新增：处理数值格式和单位转换
   LOOP AT it_mtiga ASSIGNING FIELD-SYMBOL(<fs_mtiga>).
     " M3转CCM
     <fs_mtiga>-volum_ccm = <fs_mtiga>-volum * 1000000.
     " 格式化CCM值为带逗号格式
     <fs_mtiga>-formatted_ccm = |{ <fs_mtiga>-volum_ccm NUMBER = RAW DECIMALS = 3 DECIMAL_SEPARATOR = ',' }|.
     " 格式化原M3值为带逗号格式
     <fs_mtiga>-formatted_volum = |{ <fs_mtiga>-volum NUMBER = RAW DECIMALS = 3 DECIMAL_SEPARATOR = ',' }|.
   ENDLOOP.
ENDIF.

内容的提问来源于stack exchange，提问作者Ramzi