Repository.Model.GetModel: Difference between revisions

From ReliaWiki
Jump to navigation Jump to search
No edit summary
No edit summary
Line 9: Line 9:
=== Parameters ===
=== Parameters ===
''ID''
''ID''
:Integer. The ID number of the model to retrieve.
:Required. Integer. The ID number of the model to retrieve.




== Example ==
== Example ==
This example assumes that a model with ID# 47 exists in the repository.
This example assumes that a model with ID #47 exists in the first project of a Synthesis repository.


  '''VBA'''
  '''VBA'''

Revision as of 23:31, 24 August 2015

APIWiki.png


Member of: SynthesisAPI10.Repository


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

Syntax

.Model.GetModel(ID)

Parameters

ID

Required. Integer. The ID number of the model to retrieve.


Example

This example assumes that a model with ID #47 exists in the first project of a Synthesis repository.

VBA

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

  
 'Get model #47 from project#1. 
 Dim AModel As cModel
 MyRepository.Project.SetCurrentProject(1)
 Set AModel = MyRepository.Model.GetModel(47)

 'Output sample: Display the name and ID of the model. 
 Dim ModelName As String
 Dim ModelID As Integer
 ModelName = AModel.Name
 ModelID = AModel.ID
 MsgBox ("You got " & ModelName & ", ID#" & ModelID)
VB.NET

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


 'Get model #47 from project#1. 
 Dim AModel As cModel
 MyRepository.Project.SetCurrentProject(1)
 AModel = MyRepository.Model.GetModel(47)

 'Output sample: Display the name and ID of the model. 
 Dim ModelName As String
 Dim ModelID As Integer
 ModelName = AModel.Name
 ModelID = AModel.ID
 MsgBox ("You got " & ModelName & ", ID#" & ModelID)