Repository.Pool.UpdatePool

From ReliaWiki
Revision as of 17:29, 9 June 2016 by Kate Racaza (talk | contribs)
(diff) ← Older revision | Latest revision (diff) | Newer revision → (diff)
Jump to navigation Jump to search
The printable version is no longer supported and may have rendering errors. Please update your browser bookmarks and please use the default browser print function instead.
APIWiki.png


Member of: SynthesisAPI.Repository


Updates the properties of a given spare part pool in the current project. Returns a Boolean value; when true, indicates a successful update.

Syntax

.Pool.UpdatePool(pool)

Parameters

pool

Required. The cPool object that represents the spare part pool to be updated.


Example

This example assumes that a spare part pool with ID #1 exists in the first available project of a repository.

VBA

 'Declare a new Repository object and connect to a Synthesis repository. 
  Dim MyRepository As New Repository
  MyRepository.ConnectToAccessRepository("C:\RSRepository1.rsr10")
  
 'Get spare part pool #1 from project #1. 
  Dim MyPool As cPool
  MyRepository.Project.SetCurrentProject(1)  
  Set MyPool = MyRepository.Pool.GetPool(1)

 'Change the pool's name to "New_Name." 
  MyPool.Name = "New_Name"

 'Send the change to the Synthesis repository. 
  Call MyRepository.Pool.UpdatePool(MyPool)
VB.NET

 'Declare a new Repository object and connect to a Synthesis repository. 
  Dim MyRepository As New Repository
  MyRepository.ConnectToAccessRepository("C:\RSRepository1.rsr10")
  
 'Get spare part pool #1 from project #1. 
  Dim MyPool As cPool
  MyRepository.Project.SetCurrentProject(1)  
  MyPool = MyRepository.Pool.GetPool(1)

 'Change the pool's name to "New_Name." 
  MyPool.Name = "New_Name"

 'Send the change to the Synthesis repository. 
  MyRepository.Pool.UpdatePool(MyPool)