Approves a process unit, and optionally approves all other process units that consist of the specified Scenario, Year, Entity, and Value dimension members and the other base Period dimension members.
To attach documents when approving, use Approve2.
<HsvProcessFlow>.ApproveEx lScenario, lYear, lPeriod, lEntity, lParent, lValue, vbUseAllValueMembers, vbApplyToAllPeriods, bstrAnnotation, psNewProcessState
This example approves the specified process unit and the process units that consist of the base Period dimension members and the specified members of the other dimensions. The calls to the user-defined GetMemberID function get the process unit’s member IDs; for information on GetMemberID, see the Examples for GetItemID. These member IDs are then passed to ApproveEx.
Dim lScen As Long, lYear As Long, lPer As Long
Dim lEnt As Long, lPar As Long, lVal As Long, iState As Integer
Dim cHsvProcessFlow As HsvProcessFlow, lRights As Long
lScen = GetMemberID(DIMENSIONSCENARIO, "Budget")
lYear = GetMemberID(DIMENSIONYEAR, "2001")
lPer = GetMemberID(DIMENSIONPERIOD, "September")
lEnt = GetMemberID(DIMENSIONENTITY, "Connecticut")
lPar = GetMemberID(DIMENSIONENTITY, "UnitedStates")
lVal = GetMemberID(DIMENSIONVALUE, "USD")
'g_cSession is an HsvSession object reference
Set cHsvProcessFlow = g_cSession.ProcessFlow
cHsvProcessFlow.ApproveEx lScen, lYear, lPer, lEnt, lPar, lVal, _
False, True, "Approving base periods", iState