Plug accounts issues

Question

Hi guys,
I'm not quite sure of having understand plug accounts and I have some issues with eliminations right now.
I have tree accounts with the same plug account.
Father1
Child1- PlugAccount1
Child2- PlugAccount1
Child3- PlugAccount1
PlugAccount1
The application works with default consolidation. My problem is that the PlugAccount it's showing a weird resulta at some entity level. The entities are as follows:
Entity0
EntityA
EntityB1
EntityC1 EntityC2 (those are te IC partners)
Plugaccount1 shows value in EntityB1 (the difference) and also in EntityA and Entity0. Is this usual? Should it roll out to all the parents? PlugAccount1 has value in EC, ECT, PC, PCT and Elimination... Is it right?
I'd really appreciate your comments.
Thank you!
Lu
Edited by: user6351237 on 13-dic-2011 22:59

Answer 1

Hello
If you want the elimination to work and you do not want to use the default rule you have to follow the next step
1. In the app setting mark ConsolidationRule=Y
2.Upload the consolidate rule, I am send in you an example in the last part of this mail
3Entitys property isICP, flag Y in each entity that you are going to have intercompany transactions
4Account flag s isicp for the plug account and the account that you want to have intercompany transactions
The eliminations are going to appear in elimination in the child . SO it will not consolidate to the parent.
I hope it help
sofia
Sub Consolidate() 'consolidation rules (if app does not use default this section is used to consolidate
Dim MyDataUnit
Dim lNumItems
Dim dPCon
Set MyDataUnit = HS.OpenDataUnit("")
dPCon = HS.Node.PCon("")
lNumItems = MyDataUnit.GetNumItems
for i = 0 to lNumItems-1
' Get the next item from the dataunit
call MyDataUnit.GetItem(i, strAccount, strICP, strCustom1, strCustom2, strCustom3, strCustom4, dData)
' See if this is a consolidatable account
If HS.Account.IsConsolidated(strAccount) Then
' Proportionalize this account
call HS.Con("",dPCon,"Proporción")
' see if we should eliminate this account
call Eliminate(strAccount, strICP)
End If
next
End sub
Sub Eliminate (strAccount, strICP) 'intercompany elimination rules
Dim CanEliminate
Dim strPlug
Dim dPCon
CanEliminate = TRUE
NegatePlug = FALSE
If (StrComp(strICP, "[ICP None]", vbTextCompare) = 0) Then
CanEliminate = FALSE
ElseIf (HS.Account.IsICP(strAccount) = FALSE) Then
CanEliminate = FALSE
ELSEIF (HS.Node.ISDESCENDANT(HS.PARENT.Member,strICP,"") = FALSE) THEN
CanEliminate = FALSE
'ElseIf (HS.PARENT.ISDESCENDANT(strICP,"") = FALSE) Then
'CanEliminate = FALSE
Else
strPlug = HS.Account.PlugAcct(strAccount)
'HS.Parent.IsDescendant("I#[ICP Top]", "")
If (strPlug = "") Then CanEliminate = FALSE
End If
If CanEliminate Then
dPCon = HS.Node.PCon("")
call HS.Con("V#[Elimination]",-1*dPCon,"Eliminacion interco")
call HS.Con("V#[Elimination].A#" & strPlug,dPCon,"Eliminacion interco")
End If
End Sub