51Testing软件测试论坛

 找回密码
 (注-册)加入51Testing

QQ登录

只需一步,快速开始

微信登录,快人一步

手机号码,快捷登录

查看: 3372|回复: 5
打印 上一主题 下一主题

[原创] 如何通过quality center工作流来修改bug字段的默认值

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2010-4-21 18:07:26 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
不好意思又来打扰了
我通过QC后台创建了新的字段[修复人员][bug归属],数值都是userlist.

我想达到的效果是: 当开发人员将bug状态置成[fixed]时,[修复人员][bug归属]默认为当前修改bug状态的开发人员.
.
其实这个效果跟创建bug时的创建人员默认值差不多,但是我找不到这样的代码,也不知道修改哪个函数. 麻烦大虾指点一下,谢谢

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?(注-册)加入51Testing

x
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏
回复

使用道具 举报

该用户从未签到

2#
 楼主| 发表于 2010-4-22 08:43:06 | 只看该作者
持续求助中......
回复 支持 反对

使用道具 举报

该用户从未签到

3#
 楼主| 发表于 2010-4-22 14:26:03 | 只看该作者
谁能帮忙解决一下, 急用....
回复 支持 反对

使用道具 举报

该用户从未签到

4#
 楼主| 发表于 2010-4-27 14:16:28 | 只看该作者
可怜, 还是没有人可以回答. 庆幸, 自己已经解决了, 虽然感觉还不是很完美.
注明的字段有:BG_RESPONSIBLE = 分配给, BG_USER_07 = 修复人员, BG_USER_05 = bug归属
想要实现的功能有:  当前用户把状态修改成'已修复'时, 自动把 修复人员/bug归属 = 当前用户.
代码如下:
Sub Defects_Bug_FieldChange(FieldName)
  On Error Resume Next
     user_C=Bug_Fields("BG_RESPONSIBLE").Value

     if Bug_Fields("BG_STATUS").Value="已修复" then
     Bug_Fields("BG_USER_07").Value= user_C
     Bug_Fields("BG_USER_05").Value=user_C

     elseif Bug_Fields("BG_STATUS").Value <> "已修复" then
     Bug_Fields("BG_USER_07").Value="Null"
     Bug_Fields("BG_USER_05").Value="Null"

    end if

  On Error GoTo 0

End Sub


一般来说bug指派给谁, 就由那个人来修复.  但是, 如果是由其他人来修复的话, 那么代码就会出错. 如果能把 BG_USER_07 = 当前登录用户, 那么就不会有问题. 但是, 关键的问题就是,[[[[[[ 当前登录用户]]]]]]]]函数是什么??????????
还望高手来解决. 谢谢.
回复 支持 反对

使用道具 举报

  • TA的每日心情
    奋斗
    2018-2-28 18:04
  • 签到天数: 40 天

    连续签到: 1 天

    [LV.5]测试团长

    5#
    发表于 2010-4-28 09:06:52 | 只看该作者
    记得有个函数是叫currentUser的,具体看下QC的api
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    6#
     楼主| 发表于 2010-4-28 14:22:42 | 只看该作者
    搞定了, 当前用户为User.UserName. 代码更新为
    Sub Defects_Bug_FieldChange(FieldName)
      On Error Resume Next


    if bug_field("bug类型").value = "需求变动"  then
      if (Bug_Fields("BG_STATUS").Value="已修复") or ( Bug_Fields("BG_STATUS").Value= "后期修复"  ) then
         Bug_Fields("BG_USER_07").Value= User.UserName
         Bug_Fields("BG_USER_05").Value= "Null"
      else
         Bug_Fields("BG_USER_07").Value="Null"
         Bug_Fields("BG_USER_05").Value="Null"
        end if
    elseif (Bug_Fields("BG_STATUS").Value="已修复") or ( Bug_Fields("BG_STATUS").Value= "后期修复"  ) then

       Bug_Fields("BG_USER_07").Value= User.UserName
         Bug_Fields("BG_USER_05").Value= User.UserName
    end if
      On Error GoTo 0
    End Sub

    欢迎指正.
    回复 支持 反对

    使用道具 举报

    本版积分规则

    关闭

    站长推荐上一条 /1 下一条

    小黑屋|手机版|Archiver|51Testing软件测试网 ( 沪ICP备05003035号 关于我们

    GMT+8, 2024-10-6 01:44 , Processed in 0.098299 second(s), 29 queries .

    Powered by Discuz! X3.2

    © 2001-2024 Comsenz Inc.

    快速回复 返回顶部 返回列表