TD缺陷状态控制

开发人员往往在修改BUG状态时,习惯性的不做一些备注,对此测试管理的时候很不方便,所以我们需要通过TD编程使备注编写强制化,代码如下:

Function Defects_Bug_FieldCanChange(FieldName, NewValue)

     On Error Resume Next

    Defects_Bug_FieldCanChange = Project_DefaultRes

    On Error GoTo 0

    if FieldName = "BG_STATUS" then

        if NewValue="Fixed" then

           if Bug_Fields("BG_STATUS").Value="working" and  Bug_Fields("BG_DEV_COMMENTS").IsNull=true then

                Msgbox "请增加注释内容"

                Defects_Bug_FieldCanChange = False

                Exit Function

            end if

        end if

   end if