Indexes

ExpertRuleBaseComponentRuntime (Object)

Represents a rule base component in a ruleset.

Property Index

Comment
Returns or sets the comment of a rulebase component.

Method Index

AccurateType
Returns as a string the type of component.
Activate
Activates the RuleBaseComponent.
Deactivate
Desactivates the RuleBaseComponent.
IsUseOnly
Retrieves the use-only status of the component.
Isactivate
Tells if the RuleBaseComponent is active.
Parse
Syntactically analyses (ie parses) the component.
SetUseOnly
Prevents any access to the component for reading or deleting.

Properties


o Property Comment() As
Returns or sets the comment of a rulebase component.

Methods


o Func AccurateType() As
Returns as a string the type of component. Returns a string among ("ExpertCheck", "ExpertCheckRuntime", "ExpertRule", "ExpertRuleRuntime", "ExpertRuleSet", "ExpertRuleSetRuntime").
Returns:
Type name of the rule base component
o Sub Activate()
Activates the RuleBaseComponent.
Example:
This example activates the SolidActivity ExpertCheck: 
 Dim CATDocs As Document
 Set CATDocs   = CATIA.Documents
 Dim partdoc As PartDocument
 Set partdoc   = CATDocs.Add("CATPart")
 Dim part As Part
 Set part      = partdoc.Part
  part.Relations.Item("RuleBase").RuleSet.ExpertRuleBaseComponentRuntimes.Item("SolidActivity").Activate()
o Sub Deactivate()
Desactivates the RuleBaseComponent.
Example:
This example Desactivates the SolidActivity ExpertCheck: 
 Dim CATDocs As Document
 Set CATDocs   = CATIA.Documents
 Dim partdoc As PartDocument
 Set partdoc   = CATDocs.Add("CATPart")
 Dim part As Part
 Set part      = partdoc.Part
  part.Relations.Item("RuleBase").RuleSet.ExpertRuleBaseComponentRuntimes.Item("SolidActivity").Deactivate()
o Func IsUseOnly() As
Retrieves the use-only status of the component.
Returns:
Use only status of the component
o Func Isactivate() As
Tells if the RuleBaseComponent is active.
Example:
This example tells if the SolidActivity ExpertCheck is active : 
 Dim CATDocs As Document
 Set CATDocs   = CATIA.Documents
 Dim partdoc As PartDocument
 Set partdoc   = CATDocs.Add("CATPart")
 Dim part As Part
 Set part      = partdoc.Part
 status = part.Relations.Item("RuleBase").RuleSet.ExpertRuleBaseComponentRuntimes.Item("SolidActivity").Isactivate()
Returns:
Activity of the rule base component
o Func Parse() As
Syntactically analyses (ie parses) the component.
Returns:
Empty string if the parse is correct, otherwise comments on the errors
o Sub SetUseOnly()
Prevents any access to the component for reading or deleting. Be careful : this operation is not reversible.

Copyright © 2006, Dassault Systèmes. All rights reserved.