Forum Discussion
Krishna
8 months agoValued Contributor
VENKAB05 - You have to set the following
1. for USD Accounts you should set the below property to true
2. In the Flow you have to Create a Calc & Input Member. or You can also create a Finance Rule.
3. The below is the sample for the USD override formula but you need to change based on your requirement and also test this in Dev environment.
If Not api.Entity.HasChildren Then
Dim destAcct As String = "A#APIC_Interco"
Dim destDataBuffer As DataBuffer = api.Data.GetDataBufferUsingFormula("FilterMembers(A#APIC_Interco:F#EndingBal:C#USD)")
'USD ACCOUNT
Dim srcAcct As String = "A#USDAPIC_Interco"
Dim srcDataBuffer As DataBuffer = api.Data.GetDataBufferUsingFormula("FilterMembers(A#USDAPIC_Interco:F#EndBalInput:A#USDAPIC_Interco)")
If Not srcDataBuffer Is Nothing Then
For Each srccell As DataBufferCell In srcDataBuffer.DataBufferCells.Values
If srccell.CellAmount <> 0 Then
Dim ud1Member As String = srccell.GetUD1Name(api)
Dim ud3Member As String = srccell.GetUD3Name(api)
Dim icp As String = srccell.GetICName(api)
If Not destDataBuffer Is Nothing Then
For Each sourcecell As DataBufferCell In destDataBuffer.DataBufferCells.Values
If Not sourcecell.CellStatus.IsNoData Then
api.Data.ClearCalculatedData(True,True,True,destAcct,,,"I#" & icp,"U1#" & ud1Member,,"U3#" & ud3Member,,,,,)
End If
Next
End If
End If
Next
api.Data.Calculate("A#APIC_Interco:F#EndBalInput= RemoveZeros(A#USDAPIC_Interco:F#EndBalInput)")
End If
End If
Related Content
- 4 months ago
- 6 months ago