Получить снимки ClearCase с помощью библиотеки автоматизации ClearCase (CAL)?

Question

Успешно ли используется библиотека автоматизации ClearCase (CAL) для получения представлений моментальных снимков? Я могу получить все динамические представления просто отлично, но ни один из моих представлений моментальных снимков не появляется в «Connection.get_Views (true, region);» команда ...

Есть ли какой-либо способ получить это программно как экземпляры ICCView?

Answer 1

Как насчет:

Dim CC As New ClearCase.Application 
CC.Views(true, myRegionName) 

Он должен получить коллекцию представлений в указанной области, в том числе тех, моментальных.
(Примечание: это может быть похоже на то, что вы предложили в вашем вопросе, но с более точным синтаксисом CAL)

Например, я подтвердить следующий ccperl сценарий действительно возвращается снимок и динамические представления:

Тип «ccperl listViews.pl», при условии:

• вы сделали сохранить следующую строку в файл с именем «listViewws.pl».
• Вы заменяете 'myRegionName' на ваш текущий регион ClearCase
• вы используете тот же регион, что и в сценарии.

Сценарий:

use Win32::OLE; 
$DEBUG = 1; 

print "Instantiating CAL CC\n" if $DEBUG; 
my $cal_cc = Win32::OLE->new('ClearCase.Application') 
or die "Could not create the ClearCase Application object\n"; 

$cclsview = $cal_cc->Views("False","myRegionName"); 
$Views_Entries = $cclsview->Count; 
print "nbViews $Views_Entries\n"; 
$Views_Index = 1; 
while ($Views_Index <= $Views_Entries) { 
    print "Processing View entry $CS_Index\n" if $DEBUG; 
    $View = $cclsview->Item($Views_Index); 
    $ViewName = $View->TagName; 
    $ViewIsSnapshot = $View->IsSnapShot; 
    print "View $ViewName $ViewIsSnapshot\n"; 
    $Views_Index++; 
}