GetIsICP

Indicates the value assigned to the IsICP attribute of an Account dimension member.

Syntax

<HsvAccounts>.GetIsICP lItemID, psIsICP

Argument	Description
lItemID	Long (ByVal). The member ID of the account.
psIsICP	Integer. Indicates the value of the account’s IsICP attribute. Valid values are as follows: -1 if the IsICP value is Y. 0 if the IsICP value is N. 1 if the IsICP value is R.

Example

The following function takes the label of an Account dimension member and returns the value of the account’s IsICP attribute.

Function getIsIcpLabel(sLabel As String) As Integer
Dim cAccounts As HsvAccounts, iRet As Integer, lAcctID As Long
Dim cTreeInfo As IHsvTreeInfo
Set cAccounts = m_cMetadata.Accounts
Set cTreeInfo = m_cMetadata.Accounts
lAcctID = cTreeInfo.GetItemID(sLabel)
cAccounts.GetIsICP lAcctID, iRet
getIsIcpLabel = iRet
End Function