Repository.Pool.AddPool: Difference between revisions
Jump to navigation
Jump to search
Chris Kahn (talk | contribs) No edit summary |
Chris Kahn (talk | contribs) |
||
| Line 9: | Line 9: | ||
== Usage Example == | == Usage Example == | ||
{{APIComment|Declare a new repository connection class.}} | <div style="margin-right: 150px;"> | ||
{{APIComment|'Declare a new repository connection class.}} | |||
Dim MyRepository As New Repository | |||
{{APIComment|Connect to the Synthesis repository.}} | |||
{{APIComment|'Connect to the Synthesis repository.}} | |||
Dim Success As Boolean = False | |||
Success = MyRepository.ConnectToRepository("RepositoryFileNamePath") | |||
{{APIComment|Declare a new Pool.}} | |||
{{APIComment|'Declare a new Pool.}} | |||
Dim newPool As New cPool("NewPool1") | |||
{{APIComment|Add the Pool to the repository.}} | |||
{{APIComment|'Add the Pool to the repository.}} | |||
Dim SuccessAddPool As Boolean | |||
SuccessAddPool = MyRepository.AddPool(newPool) | |||
</div> | |||
Revision as of 22:18, 23 May 2014
Saves the spare parts pool in the repository. Returns True if successful, otherwise returns False.
Syntax
- AddPool( pool As cPool ) As Boolean
Parameters:
- pool: The cPool to add.
Usage Example
'Declare a new repository connection class. Dim MyRepository As New Repository 'Connect to the Synthesis repository. Dim Success As Boolean = False Success = MyRepository.ConnectToRepository("RepositoryFileNamePath") 'Declare a new Pool. Dim newPool As New cPool("NewPool1") 'Add the Pool to the repository. Dim SuccessAddPool As Boolean SuccessAddPool = MyRepository.AddPool(newPool)