QC执行流中将缺陷状态为Closed的缺陷设置为只读

QC执行流中将缺陷状态为Closed的缺陷设置为只读

【转自】http://www.51testing.com/?uid-72-action-viewspace-itemid-90200

   qc作为测试管理工具除了本身四大模块的管理功能，其中很吸引人的地方就可以通过workflow定制其测试流程，并根据情况定制其功能。

   案例1： 如某项目组，项目组成员经常会误操作状态为closed的bug内容，为了缺陷得到保护，可以在workflow中的defects_bug_moveto事件中添加如下代码：作用是把所有状态为closed的bug为只读。

      Sub Defects_Bug_MoveTo
      On Error Resume Next
      if Bug_Fields("BG_STATUS" ).value= "Closed" then
          For i=0 toBug_Fields.Count
             Bug_Fields.FieldById(i).IsReadOnly = True
          Next
       end if
       On Error GoTo 0
      End Sub