Repository.Pool.GetAllPools

Returns an array containing all spare parts pools from the current project.

Syntax

• GetAllPools() As cPool()

Usage Example

 'Declare a new repository connection object. 
 Dim MyRepository As New Repository
 
 'Connect to the Synthesis repository. 
 Dim Success As Boolean = False
 Success = MyRepository.ConnectToRepository("RepositoryFileNamePath")
 
 'Set a first available project as current. 
 MyRepository.Project.SetCurrentProject(0)

 'Get the list of pools in the current project. 
 Dim ListOfPools() As cPool
 ListOfPools = MyRepository.Pool.GetAllPools()