cancel
Showing results for 
Search instead for 
Did you mean: 

Showing MetaAttributes from a MetaAssociation

Solved
MEGA Partner

Showing MetaAttributes from a MetaAssociation

How do you configure the hookCellContent function in a report to show the values (metaAttributes) on a link between two objects in stead of showing the check mark in a cell.

Eg. replacing the check mark in a report showing the CRUD value between Entities and Applications/IT Services.

Tags (2)
5 Replies
Administrator

Re: Showing MetaAttributes from a MetaAssociation

Hello,

 

Thank you for your post.

Can you join to your topic screenshot for a better understanding.

 

Waiting for your return.

 

See you.

MEGA Partner

Re: Showing MetaAttributes from a MetaAssociation

Basically I just want to replace the check mark in the cell with the CRUD value.

 

2012-06-07_2134.png

 

2012-06-07_2135.png

Contributor

Re: Showing MetaAttributes from a MetaAssociation

Hi,

 

If you look in the Macro in your report template, you will find these lines :

 

  ' TODO: To replace the cell content by a user-defined content, remove the comment below.
  ' If the comment is removed, the macro must implement the hookCellContent function.
  '  Set oMatrixCheckmark.hookCellContentComponent = MySelf

 

uncomment the 3rd line then look for the "hookCellContent" function

you will need to add some code to this function to return the CRUD value.

 

Gregory 

MEGA Partner

Re: Showing MetaAttributes from a MetaAssociation

Hi, yes I know that part. It was the code I was interessted in :-(

 

 

Contributor

Re: Showing MetaAttributes from a MetaAssociation

Here is an example :

 

Function hookCellContent (oRoot, oAnalysis, omoColumObject, omcRowObject, bFound, sStandardCellContent)
  If bFound Then
    Dim omoEntity, omoApplication
    Set omoEntity = omcRowObject.Item(1)
    Set omoApplication = omoEntity.GetCollection("CRUD Element").Item(omoColumObject)
    hookCellContent = omoApplication.GetProp("CRUD Value")
  Else
    hookCellContent = sStandardCellContent
  End If
End Function  

 You may need to adapt it to your problem.

 

Gregory