Repository.BlockSim.GetAllFaultTrees

Member of: SynthesisAPI.Repository

Gets a list of all BlockSim fault trees associated with a project. Returns a NameIdPair object that represents the name and ID pairs of the fault trees.

Syntax

.BlockSim.GetAllFaultTrees()

Example

VBA|VB.NET
 
 'Connect to a Synthesis repository. 
  Dim MyRepository As New Repository
  MyRepository.ConnectToAccessRepository("C:\RSRepository1.rsr10")

 'Connect to project#1 in the repository. 
  MyRepository.Project.SetCurrentProject (1)
   
 'Get a list of all fault trees in project #1. 
  Dim ListofFTs() As NameIdPair
  ListofFTs = MyRepository.BlockSim.GetAllFaultTrees()

 'Output sample: Display the number of fault trees in the project. 
  Dim NumberofElements As Integer
  NumberofElements = UBound(ListofFTs) - LBound(ListofFTs) + 1
  MsgBox (NumberofElements)