Получите просмотры снимков ClearCase через библиотеку автоматизации ClearCase (CAL)?
-
19-09-2019 - |
Вопрос
Кто -нибудь использует библиотеку Automation ClearCase (CAL), чтобы получить представления снимков? Я могу получить все динамические представления просто отлично, но ни один из моих представлений с моментальными снимками не отображается в 'Connection.get_views (True, Region);' командование ...
Есть ли способ получить эти программно в качестве экземпляров ICCVIEW?
Решение
Как насчет:
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++;
}