Есть ли способ в ClearQuest сделать запрос к списку, который содержится в документе? - PullRequest
4 голосов
/ 27 октября 2008

У меня есть список идентификационных номеров дефектов, содержащийся в документе Word, и я хочу знать, есть ли способ использовать этот список в запросе ClearQuest или запросе SQL в ClearQuest для перемещения только этих дефектов в новое состояние. Мы говорим, возможно, о сотнях дефектов из многих сотен, поэтому я не хочу индивидуально выбирать дефекты из всех дефектов.

Спасибо.

1 Ответ

1 голос
/ 24 октября 2009

Если вы хорошо используете CQPerl, вы можете легко сделать это во внешнем скрипте.

Считать данные, затем просмотреть их, как:

foreach $id (@idList) {
    my $entity = $session->GetEntity('defect', $id);
    $session->EditEntity($entity, $action);
    my $validate = $entity->Validate();
    print "Validate results $validate.";
    $entity->Commit();
}

Если вам нужно прочитать прямо из слова, вы можете увидеть здесь: 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";
    }
...