通過ClearCase自動化庫（CAL）獲取ClearCase快照視圖？

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'的文件中。
• 您用當前的ClearCase區域替換'myRegionName'
• 您正在使用與腳本中相同的區域。

腳本：

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++; 
}