GetICPTopMember

Returns the member ID of the Intercompany Partner dimension member that has been assigned as an Account dimension member’s ICPTopMember attribute.

Syntax

<HsvAccounts>.GetICPTopMember lItemID, plICPTopMember

Argument	Description
lItemID	Long (ByVal). The member ID of the account.
plICPTopMember	Long. Returns the member ID of the Intercompany Member assigned as the account’s ICPTopMember attribute.

Example

The following is a function that takes an Account member’s label and returns the label of the Intercompany Partner member assigned as the account’s ICPTopMember attribute.

Function getTopIcpLabel(sAcctName As String) As String
Dim cAccounts As HsvAccounts, lTopID As Long, lAcctID As Long
Dim cTreeInfo As IHsvTreeInfo, sLabel As String
Set cAccounts = m_cMetadata.Accounts
Set cTreeInfo = m_cMetadata.Accounts
lAcctID = cTreeInfo.GetItemID(sAcctName)
cAccounts.GetICPTopMember lAcctID, lTopID
cTreeInfo.GetLabel lTopID, sLabel
getTopIcpLabel = sLabel
End Function