ODI-HFM issue with decimal separator

Question

Hi all,
We are extracting data from an HFM application A and loading into an HFM application B.
Example:
Data extracted from applicaiton A = 21.742.139,55
Data loaded to application B (verified from Explore Data and Smart View) = 2.174.213.955,00
Is data loading with ODI-HFM taking the regional settings?
Any suggestions?
If we extract data with HFM Client (logged on with the same user configured in HFM Data server) from application A and load it into application B, data is correct in application B.
Current configuration is:
- User preferences for HFM Application A
     * Decimal separator = ","
     * Thousands separator = "."
- User preferences for HFM Application B
     * Decimal separator = ","
     * Thousands separator = "."
- Regional settings of the server where the agent is running (English US)
     * Decimal separator = "."
     * Thousands separator = ","
This setting is the same for all HFM application servers
- ODI Datastore HFMDatastore
     * Decimal separator set to "," (this setting was changed to see if solved the issue)
- ODI Datastore for staging table
     * Decimal separator set to "," (this setting was changed to see if solved the issue)
- Language Settings for DB (American English)
Thanks in advance!

Answer 1

Hi Pls Use This
    For Decimal Separator other than . we need to Code to Convert , See This Code Below and Do the Code
Private Function ReturnQty(ByVal Qty As String) As String
Dim strQty As String
Dim strSQL As String
Dim strSeprtr As String
Dim objRS As SAPbobsCOM.Recordset
strSQL = "SELECT ThousSep FROM OADM"
Set objRS = oSBC.oDICompany.GetBusinessObject(BoRecordset)
objRS.DoQuery (strSQL)
If Not objRS.EOF Then
        strSeprtr = objRS.Fields.Item("ThousSep").Value
End If
If strSeprtr = "," Then
ReturnQty = Qty
ElseIf strSeprtr = "'" And Len(Qty) <= 6 Then
Qty = Replace(Qty, ",", ".")
'Qty = Replace(Qty, ",", ".")
ReturnQty = Qty
Qty = Qty
ElseIf strSeprtr = "'" Then
Qty = Replace(Qty, "'", "")
'Qty = Replace(Qty, ",", ".")
ReturnQty = Qty
Qty = Qty
ElseIf strSeprtr = "." And Len(Qty) <= 6 Then
Qty = Replace(Qty, ".", ",")
Qty = Replace(Qty, ",", ".")
ReturnQty = Qty
ElseIf strSeprtr = "." Then
Qty = Replace(Qty, ".", "")
Qty = Replace(Qty, ",", ".")
ReturnQty = Qty
End If
End Function
Mohamed Zubair