为何在工作流中添加的两个Defects_Bug_FieldChange函数只有一个起作用？

sharon0000

在TD工作流中添加了两个Defects_Bug_FieldChange函数如下：

Sub Defects_Bug_FieldChange(FieldName)
  On Error Resume Next
  if FieldName = "BG_STATUS" then
     if Bug_Fields.Field(FieldName).IsModified and Bug_Fields.Field(FieldName).Value = "Reopen" then
        Bug_Fields.Field("BG_USER_41").Value  = Bug_Fields.Field("BG_USER_41").Value + 1
     else Bug_Fields.Field("BG_USER_41").Value  = Bug_Fields.Field("BG_USER_41").Value
     end if
  end if

  On Error GoTo 0
End Sub

Sub Defects_Bug_FieldChange(FieldName)
  On Error Resume Next
  if FieldName = "BG_STATUS" then
     if Bug_Fields.Field(FieldName).IsModified and Bug_Fields.Field(FieldName).Value = "Resolved" then
        Bug_Fields.Field("BG_USER_42").Value  = date
     end if
  end if

  On Error GoTo 0
End Sub

后重新登录，只有第二个函数生效了，第一个函数的内容不起作用，而且如果只有第一个函数时，函数是起作用的，各位大侠可否帮小弟看看为啥？

MountLion

同名过程，后面的会覆盖前面的，相当于只写了最后一个。

sharon0000

嗯呐，是因为我之前在网上看拿到说可以有多个这样的函数，所以就分开写了，谢谢了哈

Roberts

你为什么要分开写呢？Sub Defects_Bug_FieldChange(FieldName)是一个过程
也就是像一个容器一样，意思是表示，当缺陷详情页面中字段值出现改变时，触发这个过程中
{}内的代码执行，也就是你添加的代码，你把你两段{}内的代码合在一个Sub Defects_Bug_FieldChange(FieldName)中就可以了！