An account that calculates Daily Revenue by taking three months of Total Revenue and dividing it down to a daily amount
'Calculate Daily Revenue
'Get Text1 priority from current Scenario to learn which Scenario to copy prior data from
Dim priorScenario As String = api.Scenario.Text(api.Pov.Scenario.MemberPK.MemberId, 1)
Dim srcPov As String = "A#YourTotalRevenueAccount:F#Top:I#Top:V#Periodic"
Dim srcInputs As String = String.Empty
Select Case Right(api.Pov.Time.Name, 2)
Case "M1"
srcInputs = srcPov & ":S#" & priorScenario & ":T#PovPriorYearM11 +" & _
srcPov & ":S#" & priorScenario & ":T#PovPriorYearM12 +" & _
srcPov
Case "M2"
srcInputs = srcPov & ":S#" & priorScenario & ":T#PovPriorYearM12 +" & _
srcPov & ":T#PovPrior1 +" & _
srcPov
Case Else
srcInputs = srcPov & ":T#PovPrior2 +" & _
srcPov & ":T#PovPrior1 +" & _
srcPov
End Select
api.Data.Calculate("A#YourDailyRevenueAccount:F#None:I#None:V#YTD = (((" & srcInputs & ")/3)*12/365)")
