Forum Discussion

Davy's avatar
Davy
Contributor
3 years ago
Solved

view the POV of the datacell executing BusinessRule.DashboardStringFunction XFBR business rule?

How do I view the POV of the datacell executing BusinessRule.DashboardStringFunction XFBR business rule? I think I can run this statement: Dim viewMember As ViewMember = ViewMember.GetItem(api.Pov....
cubeview
XFBR
  • ChristianW's avatar
    ChristianW
    3 years ago

    It is an UD8 member formula and it has to be used together with a text view member like annotation:

     

     

    The member formula might look like this:

    ' Test if the cell is a text-based dataCell.
If api.View.IsAnnotationType() Then
	'Has the cell a cell text or an attachement?
	If Not api.Data.HasDataAttachments("O#Forms:V#Periodic:Ud8#None") Then
		'Retrieves the cells to test		
		Dim amount As DataCell = api.Data.GetDataCell("O#Top:V#Periodic:UD8#None")
		Dim budget As DataCell = api.Data.GetDataCell("O#Top:V#Periodic:UD8#None:S#BudgetV2")
		'Calculate the variance percent
		Dim variance As Decimal = (amount.CellAmount - budget.CellAmount  ) / budget.CellAmount

		'Is there a negative variance?
		If variance < 0 Then
			Return "<== Explantion Required"
		Else 
			Return Nothing
		End If
	Else
		Return Nothing		
	End If
End If

Return Nothing

     

Davy's avatar
Davy
Contributor
3 years ago

You are a life-saver!! Thanks. May i have the code to this formula and it's settings? Also, if you can give me a screen shot of how this cubeview calls the formula, that will be great.
My I will change your formula to suit my needs - by making it returning a text (e.g. color pink)  to my cubeview.

Thanks again for your hard work!! 
Maybe I can pay you back by recommending some great movies?  I usually watch only movies based on real events of incredible people

 

ChristianW's avatar
ChristianW
Icon for OneStream Employee rankOneStream Employee
3 years ago

It is an UD8 member formula and it has to be used together with a text view member like annotation:

 

 

The member formula might look like this:

' Test if the cell is a text-based dataCell.
If api.View.IsAnnotationType() Then
	'Has the cell a cell text or an attachement?
	If Not api.Data.HasDataAttachments("O#Forms:V#Periodic:Ud8#None") Then
		'Retrieves the cells to test		
		Dim amount As DataCell = api.Data.GetDataCell("O#Top:V#Periodic:UD8#None")
		Dim budget As DataCell = api.Data.GetDataCell("O#Top:V#Periodic:UD8#None:S#BudgetV2")
		'Calculate the variance percent
		Dim variance As Decimal = (amount.CellAmount - budget.CellAmount  ) / budget.CellAmount

		'Is there a negative variance?
		If variance < 0 Then
			Return "<== Explantion Required"
		Else 
			Return Nothing
		End If
	Else
		Return Nothing		
	End If
End If

Return Nothing