Obtenez des vues d'instantané ClearCase via la bibliothèque d'automatisation de Clearcase (CAL)?

StackOverflow https://stackoverflow.com/questions/1193805

  •  19-09-2019
  •  | 
  •  

Question

Quelqu'un utilise-t-il avec succès la bibliothèque d'automatisation de Clearcase (CAL) pour récupérer les vues d'instantané? Je peux bien obtenir toutes les vues dynamiques, mais pas une seule de mes vues d'instantané apparaît dans le 'connection.get_views (true, région);' commande...

Existe-t-il un moyen de les obtenir par programme en tant qu'instances ICCVIEW?

Était-ce utile?

La solution

Que diriez-vous:

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

Il devrait obtenir la collection de vues dans la région spécifiée, y compris celles des instantanés.
(Remarque: cela peut être similaire à ce que vous avez proposé dans votre question, mais avec une syntaxe CAL plus précise)

Par exemple, je confirme que le script CCPERL suivant renvoie des vues instantanées et dynamiques:

Taper 'ccperl listViews.pl', fourni:

  • Vous avez enregistré la ligne suivante dans un fichier nommé 'listViewws.pl'.
  • vous remplacez 'myRegionName'par votre région de Clearcase actuelle
  • Vous utilisez la même région que celle du script.

Scénario:

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++;
}
Licencié sous: CC-BY-SA avec attribution
Non affilié à StackOverflow
scroll top