当状态更改为失败时，从切除网格中获得的新缺陷

Question

我想在" tc_status"为"失败"

时从测试集的执行网格打开缺陷窗口

我执行"完整"运行

时，以下代码似乎只能工作

Actions.Action("Defects.NewDefect").Execute

或

Actions.Action("StepsView.NewDefect").Execute

我已经尝试过：

 Actions.Action("TestSetView.NewDefect").Execute       

但这无济于事

Answer 1

您可以自动发布新的缺陷

在测试实验室模块脚本工作流程中放置此代码：

Sub TestSetTests_FieldChange(FieldName)
 On Error Resume Next
 If FieldName = "TC_STATUS" and TestSetTest_Fields.Field("TC_STATUS").Value = "Failed" Then
    Set BugFact = TDConnection.BugFactory
    Set NewBug = BugFact.AddItem(null)
    'Fill new defect fields
    NewBug.Summary = "New Defect"
    NewBug.Field("BG_SEVERITY") = "3-High"
    NewBug.Field("BG_STATUS") = "New"
    NewBug.Field("BG_DETECTION_DATE") = "2016-01-01"
    '...
    NewBug.Post()
    TestInstanceId = TestSetTest_Fields.Field("TC_TESTCYCL_ID").Value
    Set TestInstanceFact = TDConnection.TSTestFactory
    Set TestInstance = TestInstanceFact.Item(TestInstanceId)
    Set NewBugLinkFact = TestInstance.BugLinkFactory
    Set NewBugLink = NewBugLinkFact.AddItem(null)
    NewBugLink.TargetEntity = NewBug
    NewBugLink.Post
 End If
 On Error GoTo 0
End Sub

或者，如果您正在使用ALM 12.53，则可以尝试执行所有模块可用的Masthead"新缺陷"操作。

Actions.Action("HeaderActions.HeaderNewDefect").Execute