WEBI Capabilities

Question

I have an Excel Report that I need to create in WEBI.  I do not know how to recreat my days of supply function in WEBI:
The report looks like this in Excel and below that is my function for Days of Supply.  Any help is appreciated.
SNP PLAN        M 05/2011     M 06/2011     M 07/2011     M 08/2011     M 09/2011
Total Demand     429     435     426     434     429
Total Receipts     406     900     100     300     1000
Stock on Hand     -23     442     116     -18     553
Days in Period     31     30     31     31     30
Days of Supply      0     32     8     0     39
Private Function DOS(EndInventory As Single, Forecast As Variant, Days As Variant) As Single
    DOS = 0
    TotalDays = 0
    InventoryVar = EndInventory
    For x = 1 To Days.Count
    TotalDays = TotalDays + Days(x)
    Next
    For i = 1 To Days.Count
    If InventoryVar > 0 Then
        If Forecast(i) = 0 Then
            DOS = DOS + Days(i)
        Else
            If InventoryVar < Forecast(i) Then
                DOS = DOS + ((InventoryVar / Forecast(i)) * Days(i))
            Else
                DOS = DOS + Days(i)
            End If
        End If
    Else
        Exit For
    End If
    InventoryVar = InventoryVar - Forecast(i)
    Next
If InventoryVar > 0 Then
    DOS = 9999
End If
End Function

Answer 1

Hi David,
Thanks for the tip on Code Tags. 
The logic for Days of Supply is to take the ending inventory (Stock on Hand) for the month then looking forward at the forecast for future months determine the Days of Inventory on Hand (Days of Supply).
In the example Stock on Hand for May is -23 and Days of Supply is 0
However for June 2011, Stock on Hand is 442 so it has coverage for all the days in July (31) and then it can cover an additional day in August so Days of Supply is 32.
The code I placed in original question is just an example of how it could be calculated in Excel.
We would like to create the report in WEBI but we know longer can use Macro's in the version we are rolling out.
Here is the Excel Function I created for Days of Supply:  This will give you the code to acheive the narrative I stated above.
It passes Stock on Hand then two arrays.  The forecast for future periods and the number of days in each respective period.
Private Function DOS(EndInventory As Single, Forecast As Variant, Days As Variant) As Single
    DOS = 0
    TotalDays = 0
    InventoryVar = EndInventory
    For x = 1 To Days.Count
    TotalDays = TotalDays + Days(x)
    Next
    For i = 1 To Days.Count
    If InventoryVar > 0 Then
        If Forecast(i) = 0 Then
            DOS = DOS + Days(i)
        Else
            If InventoryVar < Forecast(i) Then
                DOS = DOS + ((InventoryVar / Forecast(i)) * Days(i))
            Else
                DOS = DOS + Days(i)
            End If
        End If
    Else
        Exit For
    End If
    InventoryVar = InventoryVar - Forecast(i)
    Next
If InventoryVar > 0 Then
    DOS = 9999
End If
End Function