利用TD将测试过程中发现的Bug与需求关联

 

1、需要在缺陷管理模块添加一个按钮，使得测试人员可以添加需求名称

A、添加字段

进入后台管理界面，使用admin进行登录，CUSTOMIZE—>admin登录—>Customize Project Entities—>DEFECT—>User Fields—>New field—>Requirement Name，字段设置为String类型—>保存退出

B、设置工作流

在后台管理界面，Set Up Workflow—>Script Editor—>Command Bar Editor—>在Command bar中选择Defects模块—>设置Caption: Requirement Name,Hint: Requirement Name—>Add—>在Commands列表中出现Defects_Command—>选中Defects_Command_01—>修改Action Name为Linked Bug—>选择一个Image图片—>保存Apply

C、对需求字段设置校验

Script Editor—>Requirements module script—>修改其中的脚本

Function Defects_ActionCanExecute(ActionName)

         On Error Resume Next

         Dim td

         Dim ReqF

         Dim ReqL

‘判断按钮是不是自定义的按钮

If ActionName = “Linked_Bug” then

         ‘弹出窗口，接受输入的需求名称

         RequirementName = InputBox(“输入需求名:”,”需求名”)

         ‘如果是数字或者空，则报错

If(IsNumeric(RequirementName)) and Len(RequirementName) > 0 then

         MsgBox “That is not a valid Requirement Name !”

         Exit Function

         ‘如果按的是确定按钮，我们首先校验数据

Elseif Len(requirementName) > 0 then

         ‘创建TDConnection对象

         Set td = TDConnection

         ‘创建Reqfactory对象

         Set ReqF = td.ReqFactory

         ‘创建Reqfactory的List对象，通过SQL校验需求名是否存在

         Set ReqL = ReqF.NEWList(“select * from REQ where RQ_REQ_NAME = requirementName”)

         ‘如果返回的需求总数为零，则表示需求不存在

         If ReqL.Count = 0 then

                MsgBox “That Requirement Name does not exist !”

                Exit function

         ‘如果不是则把需求名放到自定义的字段中去

         Else

                Bug_Fields(“BG_USER_03”).Value = RequirementName

         End if

         ‘清空对象值

         Set ReqL = nothing

         Set ReqF = nothing

         Set td = nothing

End if

End if

 

 

 

 

上述步骤完成之后，保存设置并退出。

 

2、重新登录TD，在DEFECTS管理模块中，多了一个刚才添加的按钮。测试人员输入需求名称，TD对输入的值进行校验，确保输入的需求名没有错误

 

3、如果需求名输入正确，则将需求名关联到缺陷中去，否则弹出需求名不正确的提示。

 

4、则在每个Bug页面都会出现和bug相关的需求名。

 

与该方法类似，你可以根据各自的需要来设置不同的符合自己需要的功能。