Repository.Pool.GetPool

Gets the spare part pool with the designated ID number and returns it as a cPool object. Returns nothing if the spare part pool does not exist or is not in the current project.

Syntax
.Pool.GetPool(ID)

Parameters
ID
 * Integer. The ID number of the spare part pool to retrieve.

Example
This example assumes that a spare part pool with ID#1 exists in a repository. VBA MyRepository Repository MyPool cPool MyRepository.Project.SetCurrentProject(1) MyPool = MyRepository.Pool.GetPool(1) PoolName String PoolID Integer PoolName = MyPool.Name PoolID = MyPool.ID  MsgBox ( & PoolName &  & PoolID)

VB.NET MyRepository Repository MyPool cPool MyRepository.Project.SetCurrentProject(1) MyPool = MyRepository.Pool.GetPool(1) PoolName String PoolID Integer PoolName = MyPool.Name PoolID = MyPool.ID MsgBox ( & PoolName &  & PoolID)