通过 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”的文件中。
• 您将“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++;
}