ClearCase Automation Library (CAL) を使用してスナップショット ビューを正常に取得している人はいますか? すべての動的ビューを問題なく取得できますが、「Connection.get_Views(true, region);」にスナップショット ビューが 1 つも表示されません。指図...
これらをプログラムで ICCView インスタンスとして取得する方法はありますか?
ClearCase Automation Library (CAL) を使用してスナップショット ビューを正常に取得している人はいますか? すべての動的ビューを問題なく取得できますが、「Connection.get_Views(true, region);」にスナップショット ビューが 1 つも表示されません。指図...
これらをプログラムで 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++;
}