Repository.Xfmea.AssignActionToXfmeaCause Method
Jump to navigation
Jump to search
Member of: SynthesisAPI.Repository
Assigns an action to a cause. Returns a Boolean value; when true, indicates the action was assigned successfully.
Syntax
.Xfmea.AssignActionToXfmeaCause(ActionID, CauseID)
Parameters
Action ID
- Required. The Action ID of the action that is to be assigned to the cause.
Cause ID
- Required. The Cause ID of the cause to which the action is to be assigned.
Example
This example assumes that a function with ID #1 exists in the first available project of 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 FMEA function #1 from project #1. Dim MyFunction As XfmeaFunction MyRepository.Project.SetCurrentProject(1) Set MyFunction = MyRepository.Xfmea.GetXfmeaFunction(1) 'Change the FMEA function's description to "New_Description." MyFunction.Dsc = "New_Description" 'Send the change to the Synthesis repository. Call MyRepository.Xfmea.UpdateXfmeaFunction(MyFunction)
VB.NET 'Declare a new Repository object and connect to a Synthesis repository. Dim MyRepository As New Repository MyRepository.ConnectToAccessRepository("C:\RSRepository1.rsr10") 'Get FMEA function #1 from project #1. Dim MyFunction As XfmeaFunction MyRepository.Project.SetCurrentProject(1) MyFunction = MyRepository.Xfmea.GetXfmeaFunction(1) 'Change the FMEA function's description to "New_Description." MyFunction.Dsc = "New_Description" 'Send the change to the Synthesis repository. MyRepository.Xfmea.UpdateXfmeaFunction(MyFunction)