【ABAP系列】SAP ABAP中将字符格式的金额转换为数值的函数

公众号：SAP Technical

本文作者：matinal

原文出处：http://www.cnblogs.com/SAPmatinal/

原文链接：【ABAP系列】SAP ABAP中将字符格式的金额转换为数值的函数

 

前言部分

大家可以关注我的公众号，公众号里的排版更好，阅读更舒适。

正文部分

函数名：UNITS_STRING_CONVERT

作用：根据当前用户的金额显示方式,将带有分隔符的金额(字符型)转换为P类型的数值。例如：将“1,000.123”转换为 1000.123
(我一开始的时候是用replace将逗号替换掉,然后直接赋值给一个数值型的变量.但是通用性不太好)

先说说sap的数字显示的三种方式:

1. 小数点是逗号，分隔符是句号  N.NNN,NN(欧洲人的方式很奇怪:))

2.小数点是句号，分隔符是逗号 N,NNN.NN

3.小数点是逗号，分隔符是空格 N NNN,NN

系统以哪种方式显示,存储在用户表USR01的DCPFM字段,值分别是"空" 、“X”、“Y”。

调用函数的时候将这个字段将作为其中的一个输入参数.函数会根据当前显示转换.

例如:

DATA: l_clabs TYPE p DECIMALS ,
          l_dcpfm LIKE usr01-dcpfm.

SELECT SINGLE dcpfm INTO l_dcpfm
      FROM usr01
      WHERE bname = sy-uname.

CALL 

FUNCTION 'UNITS_STRING_CONVERT'
  EXPORTING
    units_string       = '123,456.789'
    dcpfm              = l_dcpfm      "此时为X
*     MLLN               = 'M'
*     TSND               = 'T'
  IMPORTING
    units              = l_clabs
  EXCEPTIONS
    invalid_type       =
    OTHERS             = .