Repository.Action.GetAction: Difference between revisions

From ReliaWiki
Jump to navigation Jump to search
No edit summary
No edit summary
Line 30: Line 30:
   ActionName = MyAction.ActionDescription
   ActionName = MyAction.ActionDescription
   ActionID = MyAction.ID
   ActionID = MyAction.ID
   MsgBox ({{APIString|"ID# "}} & ActionID & ", " & ActionName)
   MsgBox ({{APIString|"ID# "}} & ActionID & {{APIString|", "}} & ActionName)


  '''VB.NET'''
  '''VB.NET'''
Line 49: Line 49:
   ActionName = MyAction.ActionDescription
   ActionName = MyAction.ActionDescription
   ActionID = MyAction.ID
   ActionID = MyAction.ID
   MsgBox ({{APIString|"ID# "}} & ActionID & ", " & ActionName)
   MsgBox ({{APIString|"ID# "}} & ActionID & {{APIString|", "}} & ActionName)

Revision as of 18:53, 21 July 2015

APIWiki.png


Member of: SynthesisAPI10.Repository


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

Syntax

Action.GetAction(ID)

Parameters

ID

Integer. The ID number of the action to retrieve.


Example

This example assumes that an action with ID#1 exists in a repository.

VBA

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


 'Get action #1 from project #1. 
 Dim MyAction As cAction
 MyRepository.Project.SetCurrentProject(1)
 Set MyAction = MyRepository.Action.GetAction(1)

 'Output sample: Display the name and ID of the action. 
 Dim ActionName As String
 Dim ActionID As Integer
 ActionName = MyAction.ActionDescription
 ActionID = MyAction.ID
 MsgBox ("ID# " & ActionID & ", " & ActionName)
VB.NET

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

 'Get action #1 from project #1. 
 Dim MyAction As cAction
 MyRepository.Project.SetCurrentProject(1)
 MyAction = MyRepository.Action.GetAction(1)

 'Output sample: Display the name and ID of the action. 
 Dim ActionName As String
 Dim ActionID As Integer
 ActionName = MyAction.ActionDescription
 ActionID = MyAction.ID
 MsgBox ("ID# " & ActionID & ", " & ActionName)