Repository.Xfmea.AddXfmeaEffect Method
Jump to navigation
Jump to search
Member of: SynthesisAPI10.Repository
Adds a new effect to a failure. Returns a Boolean value; when true, indicates a successful save.
Syntax
.Xfmea.AddXfmeaEffect(Effect, FailureID)
Parameters
Effect
- Required. The XfmeaEffect object to be added.
FailureID
- Required. Integer. The record ID of the failure to add the effect to.
Example
This example assumes that FMEAs exist in a repository. It creates a new effect, and then saves it to one of the failures in the repository.
VBA 'Add code to connect to a Synthesis repository. Dim MyRepository As New Repository ... 'Create a new effect. The following code creates a effect described as "No light, potential injury to user." Dim AEffect As New XfmeaEffect AEffect.Dsc = "No light, potential injury to user" 'Add the new effect to failure #1 located in project #1. MyRepository.Project.SetCurrentProject(1) Call MyRepository.Xfmea.AddXfmeaEffect(AEffect,1)
VB.NET 'Add code to connect to a Synthesis repository. Dim MyRepository As New Repository ... 'Create a new effect. The following code creates a effect described as "No light, potential injury to user." Dim AEffect As New XfmeaEffect AEffect.Dsc = "No light, potential injury to user" 'Add the new effect to failure #1 located in project #1. MyRepository.Project.SetCurrentProject(1) MyRepository.Xfmea.AddXfmeaEffect(AEffect,1)