ISReferenceSeries.Concept

Description

The concept that is linked to the reference series.

Syntax

object.Concept

Part Attribute Type Description
object Required
The object always implements the ISReferenceSeries interface

Return Value

ISConcept

Example

Display the number of reference series and some information about them, including the concepts linked to them.

Dim aReferenceSeriesCollection
Dim aReferenceSeries
Dim aMessage
Dim i   

Set aReferenceSeriesCollection = Profile.GetReferenceSeriesCollection

aMessage = "Reference Series Count = " & aReferenceSeriesCollection.Count & vbNewLine

for i = 0 to aReferenceSeriesCollection.Count - 1
  set aReferenceSeries = aReferenceSeriesCollection.Item(i)
  aMessage = aMessage & vbNewLine & (i + 1) & ". " &_
    "Series Name: " & aReferenceSeries.SeriesName & vbNewLine &_
    "-Comment: " & aReferenceSeries.Comment & vbNewLine &_
    "-ID: " & aReferenceSeries.ID & vbNewLine &_   
    "-Is Range: " & aReferenceSeries.IsRange & vbNewLine
  if not aReferenceSeries.Concept is nothing then
    aMessage = aMessage & "-Concept: " & aReferenceSeries.Concept.Name & vbNewLine
  end if   
next  

Profile.MsgBox(aMessage)   
Note:

In Profile Client v8 on User Interface Concept can be found in Maintain > Reference Series > Open reference series > General > Concept.

Version information

Added in v7.8.0