Repository.URD.GetURD: Difference between revisions

From ReliaWiki
Jump to navigation Jump to search
mNo edit summary
No edit summary
Line 2: Line 2:




<onlyinclude>Gets the URD with the designated ID number and returns it as a '''[[CURD Class|cURD]]''' object. Returns nothing if the URD does not exist or is not in the current project.</onlyinclude>  
<onlyinclude>Returns a '''[[CURD Class|cURD]]''' object, which represents a universal reliability definition (URD) resource. Returns nothing if the URD does not exist or is not in the current project.</onlyinclude>  


== Syntax ==
== Syntax ==
Line 16: Line 16:
  '''VBA'''
  '''VBA'''
   
   
  {{APIComment|'Add code to connect to a Synthesis repository.}}
  {{APIComment|'Declare a new Repository object and connect to a Synthesis repository.}}
   {{APIPrefix|Dim}} MyRepository {{APIPrefix|As New}} Repository
   {{APIPrefix|Dim}} MyRepository {{APIPrefix|As New}} Repository
  {{APIComment|...}}
  MyRepository.ConnectToAccessRepository({{APIString|"C:\RSRepository1.rsr10"}})
 
   
  {{APIComment|'Get URD #1 from project #1.}}
  {{APIComment|'Get URD #1 from project #1.}}
  {{APIPrefix|Dim}} MyURD {{APIPrefix|As}} cURD
  {{APIPrefix|Dim}} MyURD {{APIPrefix|As}} cURD
  MyRepository.Project.SetCurrentProject(1)
  MyRepository.Project.SetCurrentProject(1)
  {{APIPrefix|Set}} MyURD = MyRepository.URD.GetURD(1)
  {{APIPrefix|Set}} MyURD = MyRepository.URD.GetURD(1)
   
   
  {{APIComment|'Output sample: Display the name and ID of the URD.}}
  {{APIComment|'Output sample: Display the name and ID of the URD.}}
  {{APIPrefix|Dim}} URDName {{APIPrefix|As}} String
  {{APIPrefix|Dim}} URDName {{APIPrefix|As}} String
  {{APIPrefix|Dim}} URDID {{APIPrefix|As}} Integer
  {{APIPrefix|Dim}} URDID {{APIPrefix|As}} Integer
  URDName = MyURD.Name
  URDName = MyURD.Name
  URDID = MyURD.ID
  URDID = MyURD.ID
  MsgBox ({{APIString|"You got "}} & URDName & {{APIString|", ID#"}} & URDID)
  MsgBox ({{APIString|"You got "}} & URDName & {{APIString|", ID#"}} & URDID)


  '''VB.NET'''
  '''VB.NET'''
   
   
  {{APIComment|'Add code to connect to a Synthesis repository.}}
  {{APIComment|'Declare a new Repository object and connect to a Synthesis repository.}}
   {{APIPrefix|Dim}} MyRepository {{APIPrefix|As New}} Repository
   {{APIPrefix|Dim}} MyRepository {{APIPrefix|As New}} Repository
  {{APIComment|...}}
  MyRepository.ConnectToAccessRepository({{APIString|"C:\RSRepository1.rsr10"}})
   
   
  {{APIComment|'Get URD #1 from project #1.}}
  {{APIComment|'Get URD #1 from project #1.}}
  {{APIPrefix|Dim}} MyURD {{APIPrefix|As}} cURD
  {{APIPrefix|Dim}} MyURD {{APIPrefix|As}} cURD
  MyRepository.Project.SetCurrentProject(1)
  MyRepository.Project.SetCurrentProject(1)
  MyURD = MyRepository.URD.GetURD(1)
  MyURD = MyRepository.URD.GetURD(1)
   
   
  {{APIComment|'Output sample: Display the name and ID of the URD.}}
  {{APIComment|'Output sample: Display the name and ID of the URD.}}
  {{APIPrefix|Dim}} URDName {{APIPrefix|As}} String
  {{APIPrefix|Dim}} URDName {{APIPrefix|As}} String
  {{APIPrefix|Dim}} URDID {{APIPrefix|As}} Integer
  {{APIPrefix|Dim}} URDID {{APIPrefix|As}} Integer
  URDName = MyURD.Name
  URDName = MyURD.Name
  URDID = MyURD.ID
  URDID = MyURD.ID
  MsgBox ({{APIString|"You got "}} & URDName & {{APIString|", ID#"}} & URDID)
  MsgBox ({{APIString|"You got "}} & URDName & {{APIString|", ID#"}} & URDID)

Revision as of 16:55, 8 April 2016

APIWiki.png


Member of: SynthesisAPI.Repository


Returns a cURD object, which represents a universal reliability definition (URD) resource. Returns nothing if the URD does not exist or is not in the current project.

Syntax

.URD.GetURD(ID)

Parameters

ID

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


Example

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

VBA

 'Declare a new Repository object and connect to a Synthesis repository. 
  Dim MyRepository As New Repository
  MyRepository.ConnectToAccessRepository("C:\RSRepository1.rsr10")
   
 'Get URD #1 from project #1. 
  Dim MyURD As cURD
  MyRepository.Project.SetCurrentProject(1)
  Set MyURD = MyRepository.URD.GetURD(1)

 'Output sample: Display the name and ID of the URD. 
  Dim URDName As String
  Dim URDID As Integer
  URDName = MyURD.Name
  URDID = MyURD.ID
  MsgBox ("You got " & URDName & ", ID#" & URDID)
VB.NET

 'Declare a new Repository object and connect to a Synthesis repository. 
  Dim MyRepository As New Repository
  MyRepository.ConnectToAccessRepository("C:\RSRepository1.rsr10")

 'Get URD #1 from project #1. 
  Dim MyURD As cURD
  MyRepository.Project.SetCurrentProject(1)
  MyURD = MyRepository.URD.GetURD(1)

 'Output sample: Display the name and ID of the URD. 
  Dim URDName As String
  Dim URDID As Integer
  URDName = MyURD.Name
  URDID = MyURD.ID
  MsgBox ("You got " & URDName & ", ID#" & URDID)