我有一个Word文档中包含的缺陷ID号列表,想知道是否有办法在ClearQuest查询或ClearQuest中的SQL查询中使用该列表将这些缺陷移动到新状态。我们可能会谈论数百个缺陷,因此我不想单独从所有缺陷中选择缺陷。
谢谢。
答案 0 :(得分:1)
如果你可以使用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";
}