Repository.Pool.UpdatePool

Updates the spare parts pool in the repository. Returns True if successful, otherwise returns False.

Syntax

• UpdatePool( pool As cPool )As Boolean

Parameters

pool: The cPool to update.

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")
 
 'Get the list of pools in the connected repository. 
 Dim ListOfPools() As cPool
 ListOfPools = MyRepository.Pool.GetAllPools()
 
 'After modifying the pool, update the repository. 
 Dim SuccessUpdatePool As Boolean = False
 SuccessUpdatePool = MyRepository.Pool.UpdatePool(ListOfPools(0))