4

我有一个包含在 Word 文档中的缺陷 ID 编号列表,我想知道是否有办法在 ClearQuest 查询或 ClearQuest 中的 SQL 查询中使用该列表来将这些缺陷转移到新状态。我们说的可能是数百个缺陷中的数百个,所以我不想从所有缺陷中单独选择缺陷。

谢谢你。

4

1 回答 1

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";
    }
于 2009-10-23T20:35:49.533 回答