ISTSTermSet.Code

Description

The code of the termset.

Syntax

object.Code

Part	Attribute	Type	Description
`object`	Required	ISTSTermSet	The `object` always implements the ISTSTermSet interface

Restriction: This property is readonly.

Return Value

string

Example

Display some information about the termset, including its code.

Dim aTermSelector
Dim aConcept
Dim aTermset
Dim aMessage

Set aTermSelector = Profile.ShowTermSelector
if aTermSelector.Cancelled then
  Profile.MsgBox("No concept is selected")
  exit sub
end if

set aConcept = aTermSelector.SelectedConcept   
aMessage =_
  "The code of the concept: " & vbTab & vbTab & aConcept.Code & vbNewLine &_
  "The description of the concept: " & vbTab & aConcept.Description & vbNewLine 

set aTermset = aTermSelector.SelectedTermset
aMessage = aMessage &_
  "The code of the termset: " & vbTab & vbTab & aTermset.Code & vbNewLine &_
  "The description of the termset: " & vbTab & aTermset.Description & vbNewLine &_
  "Is Local: " & vbTab & vbTab & vbTab & vbTab & aTermset.IsLocal

Profile.MsgBox(aMessage)

Note:

In Profile Client v8 on User Interface Code cannot be found, but Termset can be found in Maintain > Termset Maintenance > Select the termset from the drop-down list; Special > Terms > Select the termset from the drop-down listor inMaintain > Termset Maintenance > Details > Termset.

Version information

Added in v7.8.0