Repository.Pool.UpdatePool

Updates the spare parts Pool

Parameters
pool

Usage Example
Private WithEvents MyRepository As New Repository

Dim Success As Boolean = False Success = MyRepository.ConnectToRepository("RepositoryFileNamePath")

Dim ListOfPools As cPool ListOfPools = MyRepository.GetAllPools

Dim SuccessUpdatePool As Boolean = False SuccessUpdatePool = MyRepository.UpdatePool(ListOfPools(0))