Repository.Xfmea.AddXfmeaFailure Method

Member of: SynthesisAPI.Repository

Adds a new failure to an FMEA function. Returns a Boolean value; when true, indicates a successful save.

Syntax

.Xfmea.AddXfmeaFailure(failure, FunctionID)

Parameters

failure

Required. The XfmeaFailure object to be added.

FunctionID

Required. Integer. The record ID of parent FMEA function.

Example

This example assumes that FMEAs exist in a repository. It creates a new failure, and then saves it to one of the FMEA functions in the repository.

VBA

 'Declare a new Repository object and connect to a Synthesis repository. 
  Dim MyRepository As New Repository
  MyRepository.ConnectToAccessRepository("C:\RSRepository1.rsr10")
 
 'Create a new failure. The following code creates a failure described as "Lamp shatters." 
  Dim AFailure As New XfmeaFailure
  AFailure.Dsc = "Lamp shatters"

 'Add the new failure to function #1 located in project #1. 
  MyRepository.Project.SetCurrentProject(1)
  Call MyRepository.Xfmea.AddXfmeaFailure(AFailure,1)

VB.NET

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

 'Create a new failure. The following code creates a failure described as "Lamp shatters." 
  Dim AFailure As New XfmeaFailure
  AFailure.Dsc = "Lamp shatters"

 'Add the new failure to function #1 located in project #1. 
  MyRepository.Project.SetCurrentProject(1)
  MyRepository.Xfmea.AddXfmeaFailure(AFailure,1)