Repository.Pool.GetAllPools

Gets a list of spare part pools associated with a project (does not include global or reference pools). Returns a cPool object array that contains all the pools in that project.

Syntax
.Pool.GetAllPools

Example
This example assumes that spare part pools exist in the first available project of a repository.

VBA|VB.NET MyRepository Repository ListofPools cPool MyRepository.Project.SetCurrentProject (1) ListofPools = MyRepository.Pool.GetAllPools NumberofElements Integer NumberofElements = UBound(ListofPools) - LBound(ListofPools) + 1 MsgBox (NumberofElements)