Repository.Pool.AddPool

Member of: SynthesisAPI10.Repository

Saves a new cPool object to the current project. Returns a Boolean value; when true, indicates indicates a successful save.

If a pool with the same name already exists in the current project, the application will automatically increment the name. For example, if "Pool1" already exists, the new pool might be renamed to "Pool2," "Pool3," etc.

Syntax

.Pool.AddPool(pool)

Parameters

pool

The cPool object to be added. (Required)

Example

This example creates a new spare part pool resource, and then saves it in the first available project in a Synthesis repository.

VBA

 'Add code to connect to a Synthesis repository. 
  Dim MyRepository As New Repository
  ... 


 'Create a new pool. The following example creates a pool named "MyNewSpares." 
 Dim NewSpares As New cPool
 NewSpares.Name = "MyNewSpares"

 'Add the new spare part pool to project #1. The spare part pool will be visible in the Synthesis repository upon refresh. 
 MyRepository.Project.SetCurrentProject(1)   
 Call MyRepository.Pool.AddPool(NewSpares)

VB.NET

 'Add code to connect to a Synthesis repository. 
  Dim MyRepository As New Repository
  ... 


 'Create a new pool. The following example creates a pool named "MyNewSpares." 
 Dim NewSpares As New cPool ("MyNewSpares")

 'Add the new spare part pool to project #1. The spare part pool will be visible in the Synthesis repository upon refresh. 
 MyRepository.Project.SetCurrentProject(1)   
 MyRepository.Pool.AddPool(NewSpares)