我有一个包含在 Word 文档中的缺陷 ID 编号列表,我想知道是否有办法在 ClearQuest 查询或 ClearQuest 中的 SQL 查询中使用该列表来将这些缺陷转移到新状态。我们说的可能是数百个缺陷中的数百个,所以我不想从所有缺陷中单独选择缺陷。
谢谢你。
我有一个包含在 Word 文档中的缺陷 ID 编号列表,我想知道是否有办法在 ClearQuest 查询或 ClearQuest 中的 SQL 查询中使用该列表来将这些缺陷转移到新状态。我们说的可能是数百个缺陷中的数百个,所以我不想从所有缺陷中单独选择缺陷。
谢谢你。
如果您可以使用 CQPerl,您可以轻松地在外部脚本中执行此操作。
读入数据,然后像这样循环遍历它:
foreach $id (@idList) {
my $entity = $session->GetEntity('defect', $id);
$session->EditEntity($entity, $action);
my $validate = $entity->Validate();
print "Validate results $validate.";
$entity->Commit();
}
如果您需要直接从 word 中阅读,可以在这里查看: http ://www.wellho.net/solutions/perl-using-perl-to-read-microsoft-word-documents.html
use Win32::OLE;
use Win32::OLE::Enum;
$document = Win32::OLE -> GetObject($ARGV[1]);
open (FH,">$ARGV[0]");
print "Extracting Text ...\n";
$paragraphs = $document->Paragraphs();
$enumerate = new Win32::OLE::Enum($paragraphs);
while(defined($paragraph = $enumerate->Next()))
{
$style = $paragraph->{Style}->{NameLocal};
print FH "+$style\n";
$text = $paragraph->{Range}->{Text};
$text =~ s/[\n\r]//g;
$text =~ s/\x0b/\n/g;
print FH "=$text\n";
}