Repository.Xfmea.GetXfmeaCause Method: Difference between revisions
Jump to navigation
Jump to search
Kate Racaza (talk | contribs) mNo edit summary |
Kate Racaza (talk | contribs) No edit summary |
||
| (One intermediate revision by the same user not shown) | |||
| Line 2: | Line 2: | ||
<onlyinclude> | <onlyinclude>Returns an '''[[XfmeaCause Class|XfmeaCause]]''' object that represents a given FMEA cause in the current project. Returns nothing if the cause does not exist or is not in the current project.</onlyinclude> | ||
==Syntax== | ==Syntax== | ||
| Line 16: | Line 16: | ||
'''VBA''' | '''VBA''' | ||
{{APIComment|' | {{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 | ||
MyRepository.ConnectToAccessRepository({{APIString|"C:\RSRepository1.rsr10"}}) | |||
{{APIComment|'Get cause ID#1 from the first project in the repository.}} | {{APIComment|'Get cause ID#1 from the first project in the repository.}} | ||
{{APIPrefix|Dim}} ACause {{APIPrefix|As}} XfmeaCause | |||
MyRepository.Project.SetCurrentProject(1) | |||
{{APIPrefix|Set}} ACause = MyRepository.Xfmea.GetXfmeaCause(1) | |||
{{APIComment|'Output sample: Display the description of the cause.}} | {{APIComment|'Output sample: Display the description of the cause.}} | ||
MsgBox (ACause.Dsc) | |||
'''VB.NET''' | '''VB.NET''' | ||
{{APIComment|' | {{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 | ||
MyRepository.ConnectToAccessRepository({{APIString|"C:\RSRepository1.rsr10"}}) | |||
{{APIComment|'Get cause ID#1 from the first project in the repository.}} | {{APIComment|'Get cause ID#1 from the first project in the repository.}} | ||
{{APIPrefix|Dim}} ACause {{APIPrefix|As}} XfmeaCause | |||
MyRepository.Project.SetCurrentProject(1) | |||
ACause = MyRepository.Xfmea.GetXfmeaCause(1) | |||
{{APIComment|'Output sample: Display the description of the cause.}} | {{APIComment|'Output sample: Display the description of the cause.}} | ||
MsgBox (ACause.Dsc) | |||
Latest revision as of 18:44, 9 June 2016
 |
Member of: SynthesisAPI.Repository
Returns an XfmeaCause object that represents a given FMEA cause in the current project. Returns nothing if the cause does not exist or is not in the current project.
Syntax
.Xfmea.GetXfmeaCause(ID)
Parameters
ID
- Required. Integer. The record ID number of the cause to retrieve.
Example
This example assumes that a cause with ID#1 exists in 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 cause ID#1 from the first project in the repository. Dim ACause As XfmeaCause MyRepository.Project.SetCurrentProject(1) Set ACause = MyRepository.Xfmea.GetXfmeaCause(1) 'Output sample: Display the description of the cause. MsgBox (ACause.Dsc)
VB.NET 'Declare a new Repository object and connect to a Synthesis repository. Dim MyRepository As New Repository MyRepository.ConnectToAccessRepository("C:\RSRepository1.rsr10") 'Get cause ID#1 from the first project in the repository. Dim ACause As XfmeaCause MyRepository.Project.SetCurrentProject(1) ACause = MyRepository.Xfmea.GetXfmeaCause(1) 'Output sample: Display the description of the cause. MsgBox (ACause.Dsc)